1 # Copyright 2005 MJ Ray and koha development team
3 # This file is part of Koha.
5 # Koha is free software; you can redistribute it and/or modify it under the
6 # terms of the GNU General Public License as published by the Free Software
7 # Foundation; either version 2 of the License, or (at your option) any later
10 # Koha is distributed in the hope that it will be useful, but WITHOUT ANY
11 # WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
12 # A PARTICULAR PURPOSE. See the GNU General Public License for more details.
14 # You should have received a copy of the GNU General Public License along with
15 # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
16 # Suite 330, Boston, MA 02111-1307 USA
18 # Current maintainer MJR slef at users.sourceforge.net
19 # See http://www.koha.org/wiki/?page=KohaInstaller
21 use ExtUtils::MakeMaker;
23 die "perl 5.6.1 or later required" unless ($] >= 5.006001);
34 'HTML::Template' => 1,
36 'MARC::Record' => 2.0,
37 'MARC::Charset' => 0.95,
38 'MARC::File::XML' => 0.83,
39 'Mail::Sendmail' => 1,
44 'XML::SAX::LibXML' => 1
47 # Figure out options here?
48 return { macro => { 'export TEST' => '755' } }
51 PL_FILES => { # generator => target
52 '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'],
53 'misc/koha.conf.PL' => '$(INST_LIBDIR)/../etc/koha.conf',
54 'misc/apache-koha.conf.PL' => '$(INST_LIBDIR)/../etc/apache-koha.conf',
55 'misc/koha.sql.PL' => '$(INST_LIBDIR)/intranet/scripts/koha.sql',
56 'z3950/z3950-daemon-options.PL' => '$(INST_LIBDIR)/intranet/scripts/z3950daemon/z3950-daemon-options',
57 # fake target to check permissions
58 'misc/chmod.PL' => '$(INST_LIBDIR)/fake-target'
60 # need to set ownerships
61 # need to load koha.sql
62 # need to link koha-httpd.conf
63 # need to start z3950-daemon
67 my ($self,$path) = @_;
69 # set up the recursion
71 elsif ($path !~ /\//) { $path = ''; }
73 # reimplementation of buildrelease and Install::installfiles
74 # ban some shell specials too
75 elsif ($path =~ /(\/CVS\/|\.(bak|orig|PL)$|\/,|\/t\/|[^\$]\(| )/) { $path = ''; }
77 $path =~ s:\)/misc:\)/intranet/scripts: ||
78 $path =~ s:\)/updater:\)/intranet/scripts/updater: ||
79 $path =~ s:\)/z3950/(processz3950queue|.*sh):\)/intranet/scripts/z3950daemon/\1: ||
80 $path =~ s:\)/z3950:\)/intranet/cgi-bin/z3950: ||
81 $path =~ s:\)/koha-tmpl/intranet-tmpl:\)/intranet/htdocs/intranet-tmpl: ||
82 $path =~ s:\)/koha-tmpl/intranet.html:\)/intranet/htdocs/index.html: ||
83 $path =~ s:\)/koha-tmpl/opac-tmpl:\)/opac/htdocs/opac-tmpl: ||
84 $path =~ s:\)/koha-tmpl/opac.html:\)/opac/htdocs/index.html: ||
85 $path =~ s:\)/opac:\)/opac/cgi-bin:
87 elsif ($path !~ /\.p[lm]$/) { $path = ''; }
88 elsif ($path !~ /\)\/C4/) { $path =~ s!/!/intranet/cgi-bin/!; }
90 #print STDERR $path."\n";