From 3c7918aa2bce345bedbb604d55c5617632c151ae Mon Sep 17 00:00:00 2001
From: slef <slef>
Date: Wed, 17 Jan 2007 17:01:11 +0000
Subject: [PATCH] new installer: sysadmin side

---
 MANIFEST.SKIP |  1 +
 Makefile.PL   | 95 +++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 96 insertions(+)
 create mode 100644 MANIFEST.SKIP
 create mode 100644 Makefile.PL

diff --git a/MANIFEST.SKIP b/MANIFEST.SKIP
new file mode 100644
index 0000000000..1e3ec7217a
--- /dev/null
+++ b/MANIFEST.SKIP
@@ -0,0 +1 @@
+[ ]
diff --git a/Makefile.PL b/Makefile.PL
new file mode 100644
index 0000000000..981d4727dc
--- /dev/null
+++ b/Makefile.PL
@@ -0,0 +1,95 @@
+# Copyright 2005 MJ Ray and koha development team
+#
+# This file is part of Koha.
+#
+# Koha is free software; you can redistribute it and/or modify it under the
+# terms of the GNU General Public License as published by the Free Software
+# Foundation; either version 2 of the License, or (at your option) any later
+# version.
+#
+# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
+# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License along with
+# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
+# Suite 330, Boston, MA  02111-1307 USA
+#
+# Current maintainer MJR slef at users.sourceforge.net
+# See http://www.koha.org/wiki/?page=KohaInstaller
+
+use ExtUtils::MakeMaker;
+
+die "perl 5.6.1 or later required" unless ($] >= 5.006001);
+
+WriteMakefile(
+    NAME => 'Koha',
+    DISTNAME => 'koha',
+    VERSION => '2.2.8',
+    NO_META => 1,
+    PREREQ_PM => {
+        'DBI' => 0,
+        'Date::Manip' => 0,
+        'DBD::mysql' => 0,
+        'Digest::MD5' => 0,
+        'HTML::Template' => 0,
+        'MARC::Record' => 2.0,     # custom
+        'MARC::Charset' => 0.95,   # custom
+        'MARC::File::XML' => 0.61, # custom
+        'Mail::Sendmail' => 0,
+        'PDF::API2' => 0.57,
+        'PDF::Reuse::Barcode' => 0.05,
+        #'Net::LDAP' => 0, # optional?
+        'Net::Z3950::ZOOM' => 1.14,
+        #'XML::Simple'=> 0,
+	    'XML::LibXML' => 1.58
+        },
+   CONFIGURE => sub {
+     # Figure out options here?
+     return { macro => { 'export TEST' => '755' } }
+     },
+   PMLIBDIRS => [ '.' ],
+#   PL_FILES => { # generator => target
+#     'opac/getfromintranet.PL' => ['$(INST_LIBDIR)/opac/cgi-bin/detail.pl','$(INST_LIBDIR)/opac/cgi-bin/moredetail.pl','$(INST_LIBDIR)/opac/cgi-bin/search.pl','$(INST_LIBDIR)/opac/cgi-bin/subjectsearch.pl','$(INST_LIBDIR)/opac/cgi-bin/logout.pl'],
+#     'misc/koha.conf.PL' => '$(INST_LIBDIR)/../etc/koha.conf',
+#     'misc/apache-koha.conf.PL' => '$(INST_LIBDIR)/../etc/apache-koha.conf',
+#     'misc/koha.sql.PL' => '$(INST_LIBDIR)/intranet/scripts/koha.sql',
+#     'z3950/z3950-daemon-options.PL' => '$(INST_LIBDIR)/intranet/scripts/z3950daemon/z3950-daemon-options',
+#     # fake target to check permissions
+#     'misc/chmod.PL' => '$(INST_LIBDIR)/fake-target'
+#     }
+   # post-inst script:
+   # need to set ownerships
+   # need to load koha.sql
+   # need to set up conf files
+);
+
+sub MY::libscan {
+  my ($self,$path) = @_;
+  
+  # set up the recursion
+  if (-d $path) { 1; }
+  elsif ($path !~ /\//) { $path = ''; }
+  # from here
+  # reimplementation of buildrelease and Install::installfiles
+  # ban some shell specials too
+  elsif ($path =~ /(\/CVS\/|\.(bak|orig|PL)$|\/,|\/t\/|[^\$]\(| )/) { $path = ''; }
+  elsif (
+    $path =~ s:\)/misc:\)/intranet/scripts: ||
+    $path =~ s:\)/updater:\)/intranet/scripts/updater: ||
+    $path =~ s:\)/z3950/(processz3950queue|.*sh):\)/intranet/scripts/z3950daemon/\1: ||
+    $path =~ s:\)/z3950:\)/intranet/cgi-bin/z3950: ||
+    $path =~ s:\)/koha-tmpl/intranet-tmpl:\)/intranet/htdocs/intranet-tmpl: ||
+    $path =~ s:\)/koha-tmpl/intranet.html:\)/intranet/htdocs/index.html: ||
+    $path =~ s:\)/koha-tmpl/opac-tmpl:\)/opac/htdocs/opac-tmpl: ||
+    $path =~ s:\)/koha-tmpl/opac.html:\)/opac/htdocs/index.html: ||
+    $path =~ s:\)/opac:\)/opac/cgi-bin:
+    ) { 1; }
+  elsif ($path !~ /\.p[lm]$/) { $path = ''; }
+  elsif ($path !~ /\)\/C4/) { $path =~ s!/!/intranet/cgi-bin/!; }
+
+  #print STDERR $path."\n";
+  
+  return($path);
+  
+  }
-- 
2.39.5