3 use ExtUtils::MakeMaker;
5 my @binscripts=qw(id3fs-index id3fs-tag);
6 my @sbinscripts=qw(id3fsd);
8 WriteMakefile(NAME=>"id3fs",
10 EXE_FILES=>[ map( "bin/$_", @binscripts) ],
11 MAN1PODS=>{ map({ +"bin/$_" => "\${INST_MAN1DIR}/$_.1" } @binscripts) },
12 PREREQ_PM=>{ 'Fuse' => 0,
16 'Audio::FLAC::Header' => 0,
17 'Ogg::Vorbis::Header' => 0,
20 ? (ABSTRACT => 'FUSE-based filesystem for browsing music metadata',
21 AUTHOR => 'Ian Beckwith <ianb@erislabs.net>')
25 # man 5/8 stuff adapted from vipul's razor, http://razor.sf.net
33 my $inherited = $self->SUPER::constants(@_);
39 MAN8PODS = sbin/id3fsd
40 INST_MAN8DIR = blib/man8
41 INSTALLMAN8DIR = $(PERLPREFIX)/share/man/man8
42 DESTINSTALLMAN8DIR = $(DESTDIR)$(INSTALLMAN8DIR)
43 INSTALLSITEMAN8DIR = $(SITEPREFIX)/man/man8
44 DESTINSTALLSITEMAN8DIR = $(DESTDIR)$(INSTALLSITEMAN8DIR)
45 INSTALLVENDORMAN8DIR = $(VENDORPREFIX)/share/man/man8
46 DESTINSTALLVENDORMAN8DIR = $(DESTDIR)$(INSTALLVENDORMAN8DIR)
48 SBIN_FILES = sbin/id3fsd
49 INST_SBINDIR = blib/sbin
50 INSTALLSBINDIR = $(PERLPREFIX)/sbin
51 DESTINSTALLSBINDIR = $(DESTDIR)$(INSTALLSBINDIR)
52 INSTALLSITESBINDIR = $(SITEPREFIX)/sbin
53 DESTINSTALLSITESBINDIR = $(DESTDIR)$(INSTALLSITESBINDIR)
54 INSTALLVENDORSBINDIR = $(VENDORPREFIX)/sbin
55 DESTINSTALLVENDORSBINDIR = $(DESTDIR)$(INSTALLVENDORSBINDIR)
60 return $inherited . $add;
70 my $inherited = $self->SUPER::top_targets(@_);
72 my ($perlh) = $self->catfile($Config{archlibexp}, 'CORE', "perl.h");
74 my $noecho = q{NOECHO = @} unless $inherited =~ /NOECHO/;
76 my $add = sprintf <<'MAKE_FRAG', $perlh, $perlh, $perlh, $perlh;
79 config :: $(INST_MAN8DIR)/.exists $(INST_SBINDIR)/.exists
82 $(INST_MAN8DIR)/.exists :: %s
83 @$(MKPATH) $(INST_MAN8DIR)
84 @$(EQUALIZE_TIMESTAMP) %s $(INST_MAN8DIR)/.exists
85 -@$(CHMOD) $(PERM_RWX) $(INST_MAN8DIR)
87 $(INST_SBINDIR)/.exists :: %s
88 @$(MKPATH) $(INST_SBINDIR)
89 @$(EQUALIZE_TIMESTAMP) %s $(INST_SBINDIR)/.exists
90 -@$(CHMOD) $(PERM_RWX) $(INST_SBINDIR)
91 @$(CP) $(SBIN_FILES) $(INST_SBINDIR)
96 return $inherited . $add;
102 my $inherited = $self->SUPER::manifypods(@_);
104 $inherited =~ s{^(manifypods : .*)\\}{$1 manifypods-local \\}m;
106 # MakeMaker 6.06_x through 6.13 eliminated the POD2MAN macro.
108 unless ($inherited =~ /^POD2MAN\b/m)
110 $pod2man=q{POD2MAN = $(POD2MAN_EXE)};
112 my $manifypods_local = sprintf <<'MAKE_FRAG', $pod2man;
117 manifypods-local : sbin/id3fsd
118 $(POD2MAN) -s $(MAN8EXT) sbin/id3fsd $(INST_MAN8DIR)/id3fsd.$(MAN8EXT)
123 return $inherited . "\n" . $manifypods_local;
131 my $inherited = $self->SUPER::install(@_);
132 $inherited =~ s/(^\s*\$\(INST_)MAN3(DIR\s*.*)MAN3(DIR\))/${1}MAN3${2}MAN3${3} \\\n${1}SBIN${2}SBIN${3}/gm;
133 $inherited =~ s/(^\s*\$\(INST_MAN)3(DIR\s*.*MAN)3(DIR\))/${1}3${2}3$3 \\\n${1}8${2}8$3/gm;