Added crypt.pl

This commit is contained in:
hjp 2004-11-03 14:18:39 +00:00
parent e8c3f76218
commit af75f9b864
2 changed files with 23 additions and 4 deletions

View File

@ -3,13 +3,15 @@ include GNUmakevars
CONFDIR=../../configure CONFDIR=../../configure
CONFDIR_exists=$(shell [ -d $(CONFDIR) ] && echo ok) CONFDIR_exists=$(shell [ -d $(CONFDIR) ] && echo ok)
all: configure dus fnp fnpa fnpc isodate psg save all: configure dus fnp fnpa fnpc isodate psg save crypt
clean: clean:
rm fnp fnpa fnpc customize rm fnp fnpa fnpc customize crypt
install: \ install: \
$(BINDIR)/crypt \
$(BINDIR)/dus \ $(BINDIR)/dus \
$(BINDIR)/findsock \
$(BINDIR)/fnp \ $(BINDIR)/fnp \
$(BINDIR)/fnpa \ $(BINDIR)/fnpa \
$(BINDIR)/fnpc \ $(BINDIR)/fnpc \
@ -17,22 +19,28 @@ install: \
$(BINDIR)/psg \ $(BINDIR)/psg \
$(BINDIR)/save \ $(BINDIR)/save \
$(BINDIR)/savedate \ $(BINDIR)/savedate \
$(BINDIR)/findsock \
fnp: fnp.sh fnp: fnp.sh
fnpa: fnpa.sh fnpa: fnpa.sh
fnpc: fnpc.sh fnpc: fnpc.sh
crypt: crypt.pl
%: %.sh customize %: %.sh customize
sh ./customize < $< > $@ sh ./customize < $< > $@
chmod +x $@ chmod +x $@
%: %.pl customize
sh ./customize < $< > $@
chmod +x $@
customize: configure customize: configure
sh ./configure sh ./configure
ifeq ($(CONFDIR_exists),ok) ifeq ($(CONFDIR_exists),ok)
configure: $(CONFDIR)/start $(CONFDIR)/find-printf $(CONFDIR)/finish configure: $(CONFDIR)/start \
$(CONFDIR)/find-printf $(CONFDIR)/perl \
$(CONFDIR)/finish
cat $^ > $@ cat $^ > $@
endif endif

11
tiny/crypt.pl Normal file
View File

@ -0,0 +1,11 @@
#!@@@perl@@@
use warnings;
use strict;
unless (@ARGV == 2) {
print STDERR "Usage: $0 password salt\n";
exit(2);
}
my $encpwd = crypt($ARGV[0], $ARGV[1]);
print "$encpwd\n";
exit($ARGV[1] eq $encpwd ? 0 : 1);