[src/trunk]: src/crypto/dist/heimdal make this actually do something

[joda <joda%NetBSD.org@localhost>]

details:   https://anonhg.NetBSD.org/src/rev/d56f0966ebf0
branches:  trunk
changeset: 536271:d56f0966ebf0
user:      joda <joda%NetBSD.org@localhost>
date:      Thu Sep 12 14:12:18 2002 +0000

description:
make this actually do something

diffstat:

 crypto/dist/heimdal/heimdal2netbsd |  47 ++++++++++++++++++++++++++++++++-----
 1 files changed, 40 insertions(+), 7 deletions(-)

diffs (56 lines):

diff -r 126762a1d40a -r d56f0966ebf0 crypto/dist/heimdal/heimdal2netbsd
--- a/crypto/dist/heimdal/heimdal2netbsd        Thu Sep 12 14:10:25 2002 +0000
+++ b/crypto/dist/heimdal/heimdal2netbsd        Thu Sep 12 14:12:18 2002 +0000
@@ -1,12 +1,45 @@
 #! /bin/sh
 
-# $Id: heimdal2netbsd,v 1.2 2001/06/05 17:08:07 wiz Exp $
+# $Id: heimdal2netbsd,v 1.3 2002/09/12 14:12:18 joda Exp $
+
+if [ \! -f kuser/kinit.c ]; then 
+       echo "`basename $0`: should be run in top src directory" 1>&2
+       exit 1
+fi
 
-echo "`basename $0`: this doesn't do anything yet!" 1>&2
-exit 1
+if ! type perl > /dev/null 2>&1 ; then
+       echo "`basename $0`: you need perl to run this" 1>&2
+       exit 1
+fi
+
+
+echo 'Removing preformatted man pages.'
+find . -name '*.cat[1358]' | xargs rm -f
+rm doc/heimdal.info
+
+echo 'Fixing .Os in man pages.'
+perl -i~ -p -e 's/\.Os HEIMDAL/.Os/' `find . -name '*.[1358]'`
 
-# put manual notes below:
+echo 'Changing $Id: heimdal2netbsd,v 1.3 2002/09/12 14:12:18 joda Exp $ to $Heimdal$.'
+## Ugh!
+set -- 'RCSID\("'      '"\)'   '__RCSID("'     '"\n        "\$NetBSD\$")' \
+       '/\* '          ' \*/'  '/* '           '\n   \$NetBSD\$ */'       \
+       '# '            ''      '# '            '\n# \$NetBSD\$'           \
+       '\.\\" '        ''      '.\\" '         '\n.\\" \$NetBSD\$'        \
+       'dnl '          ''      'dnl '          '\ndnl \$NetBSD\$'
+
 
-# should probably rename <$>Id<$> to $Heimdal$ or similar
-# Remove 'HEIMDAL' after .Os in the man pages (NetBSD man pages should just
-# have '.Os')
+e=
+while [ $# -gt 0 ]; do
+       e="${e}s,$1\\\$Id([^\\\$]*)\\\$$2,$3\\\$Heimdal\\1\\\$$4,;"
+       shift 4
+done
+
+perl -i~ -p -e "$e" `find . -type f`
+
+echo 'Inlining <krb5-types.h> in krb5.h and gssapi.h.'
+perl -i~ -p -e 's,#include <krb5-types.h>,#include <sys/types.h>\n#include <inttypes.h>\n#include <sys/socket.h>\ntypedef socklen_t krb5_socklen_t;\ntypedef ssize_t krb5_ssize_t;,' 
lib/gssapi/gssapi.h lib/krb5/krb5.h
+
+echo 'Remember to update files in basesrc/include/heimdal/.'
+
+exit 0