1#!/usr/bin/perl -w 2 3my ${exec_prefix}; 4my ${prefix}; 5 6${prefix}="@prefix@"; 7${exec_prefix}="@exec_prefix@"; 8while ($f = shift @ARGV) { 9 10 if (-x "/bin/mktemp") { 11 $TEMP = `/bin/mktemp $f.$$.XXXXXX`; 12 die 'Cannot make temporary file $TEMP' if($?); 13 chomp $TEMP; 14 } else { 15 $XXXXXX = rand; 16 $TEMP = "$f.$$.$XXXXXX"; 17 } 18 19 open(IN,"<$f.in"); 20 open(OUT,">$TEMP") || die 'Cannot make temporary file $TEMP'; 21 22 while (<IN>) { 23 s|\@nsca_user\@|@nsca_user@|g; 24 s|\@nsca_grp\@|@nsca_grp@|g; 25 s|\@nsca_port\@|@nsca_port@|g; 26 s|\@libexecdir\@|@libexecdir@|g; # put all --with-vars before directories 27 s|\@localstatedir\@|@localstatedir@|g; 28 s|\@sysconfdir\@|@sysconfdir@|g; 29 s|\@datadir\@|@datadir@|g; 30 s|\@sbindir\@|@sbindir@|g; 31 s|\@bindir\@|@bindir@|g; 32 s|\$\{exec_prefix\}|@exec_prefix@|g; # must be next to last 33 s|\$\{prefix\}|@prefix@|g; # must be last 34 print OUT $_; 35 } 36 37 close IN; 38 close OUT; 39 40 if ((! -e $f) || (`diff $f $TEMP`)) { 41 `mv $TEMP $f`; 42 } else { 43 unlink $TEMP; 44 } 45 46} 47