Initial import of tcl-scotty, the Tnm (tcl network monitoring) module for

tcl, and the scotty interpreter, which has tnm built in.  Note that it is
expected that many users will choose to do

	#!/usr/pkg/bin/tclsh
	package require Tnm

instead of

	#!/usr/pkg/bin/scotty

This package and the pkgsrc/net/tkined package supplant the pkgsrc/net/scotty
package, updating the pkgsrc scotty support to scotty-2.1.10, and adapting it
to tcl/tk-8.3.2.

Changes to the scotty packages since scotty-2.1.8:

      * tcl-scotty and tkined are now separate packages.  tcl-scotty installs
	the tnm network monitoring extensions for tcl and the scotty interpreter,
	and can be installed on machines without x11, and by extension without
	tk.  tkined installs the program tkined, which is a (really cool)
	graphical network diagraming/discovery/monitoring app based on tnm.

changes to the tnm module itself since scotty-2.1.8:

----------------- Released 2.1.10, 29/10/98 -----------------------

22/9/98 (feature change) Changed the "--disable-multicast" configure
option to "--enable-multicast". This means that multicast support is
turned off by default.

15/9/98 (bug fix) Added additional tests to calls to inet_addr in
order to accept the value 255.255.255.255.

9/7/98 (bug fix) Make sure we return a Tcl error message when the
MIB parser detects an error.

8/7/98 (bug fix) Map the BITS data type to the underlying OCTET STRING
in the MIB parser.

8/7/98 (bug fix) Allow relative pathes in the tnm(mibs) variable so
that one can write "vendor/file.mib" and scotty will search for the
file in $tnm(library)/site/vendor/file.mib. (Suggestion and patch from
Joe Rogers <joe@usf.edu>.)

26/6/98 (bug fix) The code now accepts traps and informs with
arbitrary community strings. This behaviour is now consistent with the
way SNMPv3 folks look at the problem. The community string is passed
in the session handle to the callback.

25/6/98 (bug fix) Added back code to encode and decode Opaque values.

2/5/98 (bug fix) Fixed the MIB parser to use SEQUENCE as a default
type for unknown type names used in SYNTAX clauses. This solves some
problems with forward references by making a best guess.

2/5/98 (bug fix) Handle variables that can not be created by returning
an error message instead of dumping core.

----------------- Released 2.1.9, 23/4/98 -----------------------

23/4/98 (bug fix) Fixed the non-unique request ID bug. Added the
cleanup loop to close all unused file descriptors to straps.

25/2/98 (bug fix) Inclusion of <asm/byteorder.h> caused problems
and RedHat systems. We now use the configured WORDS_BIGENDIAN
value to determine the byte order in ntping.c

4/2/98 (bug fix) Fixed the selection of SNMP agents in the standalone
version of the mibtree script.

10 files changed, 561 insertions, 0 deletions

diff --git a/net/tcl-scotty/Makefile b/net/tcl-scotty/Makefile
new file mode 100644
index 00000000000..d0a0eb1d9df
--- /dev/null
+++ b/net/tcl-scotty/Makefile
@@ -0,0 +1,34 @@
+# $NetBSD: Makefile,v 1.1.1.1 2000/09/07 17:38:39 jwise Exp $
+#
+
+DISTNAME=	scotty-2.1.10
+PKGNAME=	tcl-scotty-2.1.10
+CATEGORIES=	net tcl tk
+MASTER_SITES=	ftp://ftp.ibr.cs.tu-bs.de/pub/local/tkined/
+
+MAINTAINER=	jwise@netbsd.org
+HOMEPAGE=	http://wwwhome.cs.utwente.nl/~schoenw/scotty/
+
+DEPENDS+=	tcl-8.3.2:../../lang/tcl
+
+GNU_CONFIGURE=  yes
+CONFIGURE_ARGS+= --with-tcl-config=${PREFIX}/lib --enable-multicast \
+		--enable-gdmo --without-tk-config
+CONFIGURE_ENV+=	TARGET=scotty
+
+USE_LIBTOOL=	yes
+
+WRKSRC=		${WRKDIR}/${DISTNAME}/unix
+
+post-extract:
+	@${RM} -f ${WRKSRC}/../doc/http.n
+	@${RM} -f ${WRKSRC}/../doc/tkined.1
+
+do-install:
+	@${CP} ${WRKSRC}/../tnm/ntping/ntping.8 ${WRKSRC}/../doc
+	@cd ${WRKSRC} && ${MAKE_ENV} ${MAKE} tnm-install install-man sinstall
+
+post-install:
+	cd ${PREFIX}/bin && ${LN} -f -s scotty2.1.10 scotty
+
+.include "../../mk/bsd.pkg.mk"
diff --git a/net/tcl-scotty/files/md5 b/net/tcl-scotty/files/md5
new file mode 100644
index 00000000000..8fef622a2f3
--- /dev/null
+++ b/net/tcl-scotty/files/md5
@@ -0,0 +1,3 @@
+$NetBSD: md5,v 1.1.1.1 2000/09/07 17:38:43 jwise Exp $
+
+MD5 (scotty-2.1.10.tar.gz) = e885c33ac4ba9cf17ca09886ca4046b1
diff --git a/net/tcl-scotty/files/patch-sum b/net/tcl-scotty/files/patch-sum
new file mode 100644
index 00000000000..8741ef4bade
--- /dev/null
+++ b/net/tcl-scotty/files/patch-sum
@@ -0,0 +1,6 @@
+$NetBSD: patch-sum,v 1.1.1.1 2000/09/07 17:38:43 jwise Exp $
+
+MD5 (patch-aa) = 0609f277cf042b83dcd88f71cee32cb9
+MD5 (patch-ab) = 208030196224c8d778a0fd7b85c7c3dd
+MD5 (patch-ac) = 7b8b4aa176cb87ef9ef2d08399f5ca9f
+MD5 (patch-ad) = d94ffd64f935a5e4531324d8c0d00050
diff --git a/net/tcl-scotty/patches/patch-aa b/net/tcl-scotty/patches/patch-aa
new file mode 100644
index 00000000000..6aa8bfc6bc4
--- /dev/null
+++ b/net/tcl-scotty/patches/patch-aa
@@ -0,0 +1,36 @@
+$NetBSD: patch-aa,v 1.1.1.1 2000/09/07 17:38:43 jwise Exp $
+--- configure.orig	Tue Sep 22 05:44:19 1998
++++ configure	Wed Sep  6 13:19:49 2000
+@@ -1059,7 +1059,11 @@
+ fi
+ 
+ fi
++
++if [ x"$TARGET" = x ]
++then
+ TARGET="scotty tkined"
++fi
+ 
+ #--------------------------------------------------------------------
+ #       Check for various system specific things.
+@@ -1480,9 +1484,8 @@
+ done
+ 
+ if test "$found" -eq 0 ; then
+-    { echo "configure: error: "tkConfig.sh not found - use the --with-tk-config option"" 1>&2; exit 1; }
+-fi
+-
++    { echo "configure: error: tkConfig.sh not found" 1>&2; }
++else
+ . $tnm_cv_path_tk_config/tkConfig.sh
+ TK_INCLUDES=-I$TK_PREFIX/include
+ if test "$TK_INCLUDES" = "$TCL_INCLUDES" ; then
+@@ -1497,6 +1500,8 @@
+ fi
+ if test 4 -eq $TK_MAJOR_VERSION -a 1 -gt $TK_MINOR_VERSION; then
+     { echo "configure: error: "tk 4.1 or later needed"" 1>&2; exit 1; }
++fi
++
+ fi
+ 
+ #----------------------------------------------------------------------------
diff --git a/net/tcl-scotty/patches/patch-ab b/net/tcl-scotty/patches/patch-ab
new file mode 100644
index 00000000000..f702e1db07e
--- /dev/null
+++ b/net/tcl-scotty/patches/patch-ab
@@ -0,0 +1,199 @@
+$NetBSD: patch-ab,v 1.1.1.1 2000/09/07 17:38:46 jwise Exp $
+--- Makefile.in.orig	Mon Sep  7 13:12:57 1998
++++ Makefile.in	Thu Sep  7 12:10:37 2000
+@@ -35,13 +35,13 @@
+ LIB_RUNTIME_DIR =       $(exec_prefix)/lib
+ 
+ # Directory in which to install library files belonging to the extension.
+-TNM_INSTALL_DIR =	$(prefix)/lib/tnm$(TNM_VERSION)
++TNM_INSTALL_DIR =	$(prefix)/lib/tcl/tnm$(TNM_VERSION)
+ 
+ # Directory in which to install library files belonging to the extension.
+ TCL_INSTALL_DIR =	$(prefix)/lib/tcl$(TCL_VERSION)
+ 
+ # Directory in which to install the library of tkined scripts.
+-TKI_INSTALL_DIR =	$(prefix)/lib/tkined$(TKI_VERSION)
++TKI_INSTALL_DIR =	$(prefix)/lib/tcl/tkined$(TKI_VERSION)
+ 
+ # Top-level directory for manual entries:
+ MAN_INSTALL_DIR =	$(prefix)/man
+@@ -82,7 +82,7 @@
+ 
+ # The full name of the tclsh executable (including the full path
+ # and the Tcl version number).
+-TCL_TCLSH=$(TCL_EXEC_PREFIX)/bin/tclsh$(TCL_VERSION)
++TCL_TCLSH=$(TCL_EXEC_PREFIX)/bin/tclsh
+ 
+ # Top-level directory in which Tk's platform-specific files (e.g.
+ # executables) are installed.
+@@ -90,7 +90,7 @@
+ 
+ # The full name of the wish executable (including the full path
+ # and the Tk version number).
+-TK_WISH=$(TK_EXEC_PREFIX)/bin/wish$(TK_VERSION)
++TK_WISH=$(TK_EXEC_PREFIX)/bin/wish
+ 
+ # A "-I" switch that can be used when compiling to make all the
+ # Tcl include files accessible (the configure script will try to
+@@ -207,8 +207,8 @@
+ #----------------------------------------------------------------
+ 
+ INSTALL =		@INSTALL@
+-INSTALL_PROGRAM =	@INSTALL_PROGRAM@
+-INSTALL_DATA =		@INSTALL_DATA@
++INSTALL_PROGRAM =	${LIBTOOL} --mode=install ${BSD_INSTALL_PROGRAM}
++INSTALL_DATA =		${LIBTOOL} --mode=install ${BSD_INSTALL_DATA}
+ RPCGEN =		@RPCGEN@
+ LEX =			@LEX@
+ YACC =			@YACC@
+@@ -244,8 +244,8 @@
+ # either.
+ #----------------------------------------------------------------
+ 
+-CC =		@CC@
+-LD =		@CC@
++CC =		${LIBTOOL} --mode=compile @CC@
++LD =		${LIBTOOL} --mode=link @CC@
+ 
+ CC_SWITCHES	= $(CFLAGS) $(PROTO_FLAGS) $(SHLIB_CFLAGS) $(MEM_DEBUG_FLAGS)
+ 
+@@ -261,13 +261,14 @@
+ 		$(TNM_GENERIC_DIR)/tnmHttp.c $(TNM_GENERIC_DIR)/tnmNetdb.c \
+ 		$(UNIX_DIR)/tnmUnixInit.c $(UNIX_DIR)/tnmUnixLog.c \
+ 		$(UNIX_DIR)/tnmUnixSocket.c $(UNIX_DIR)/tnmUnixIcmp.c
+-TNM_GENERIC_OBJS = tnmInit.o tnmUtil.o tnmJob.o tnmIned.o \
++TNM_GENERIC_OBJS = tnmJob.o tnmIned.o \
+ 		tnmSyslog.o tnmIcmp.o tnmDns.o tnmEvent.o \
+ 		tnmUdp.o tnmSunRpc.o tnmNtp.o tnmRpc.o tnmHttp.o \
+ 		tnmNetdb.o tnmUnixInit.o tnmUnixLog.o \
+ 		tnmUnixSocket.o tnmUnixIcmp.o \
+ 		mount_clnt.o mount_xdr.o ether_clnt.o ether_xdr.o \
+-		rstat_clnt.o rstat_xdr.o pcnfsd_clnt.o pcnfsd_xdr.o
++		rstat_clnt.o rstat_xdr.o pcnfsd_clnt.o pcnfsd_xdr.o \
++		tnmInit.o tnmUtil.o
+ 
+ SNMP_SRCS =	$(TNM_SNMP_DIR)/tnmAsn1.c $(TNM_SNMP_DIR)/tnmMD5.c \
+ 		$(TNM_SNMP_DIR)/tnmSnmpNet.c $(TNM_SNMP_DIR)/tnmSnmpUtil.c \
+@@ -406,21 +407,23 @@
+ 
+ all: @TARGET@
+ 
+-scotty: tnm$(SHLIB_SUFFIX) ntping straps scotty.o
++scotty: libtnm$(SHLIB_SUFFIX) ntping straps scotty.o
+ 	$(LD) $(LD_FLAGS) $(LD_SEARCH_FLAGS) -o scotty scotty.o $(TCL_LIB_SPEC) $(LIBS) $(DL_LIBS) -lm
+ 
+-tnm$(SHLIB_SUFFIX): $(TNM_OBJS)
+-	$(SHLIB_LD) $(TNM_OBJS) -o tnm$(SHLIB_SUFFIX) $(LIBS) $(OSIMIS_LIBS) $(MSQL_LIBS) $(GDMO_LIBS)
++libtnm$(SHLIB_SUFFIX): $(TNM_OBJS)
++	${LIBTOOL} --mode=link @CC@ $(TNM_OBJS:.o=.lo) -o libtnm${SHLIB_SUFFIX:C/\.so.*/.la/} \
++		-Wl,-R${PREFIX}/lib $(LIBS) $(OSIMIS_LIBS) $(MSQL_LIBS) $(GDMO_LIBS) $(TCL_LIB_SPEC) -lm -rpath ${PREFIX}/lib -version-info 1:0
+ 
+-tkined: tkined$(SHLIB_SUFFIX) $(UNIX_DIR)/tkined.in
++tkined: libtkined$(SHLIB_SUFFIX) $(UNIX_DIR)/tkined.in
+ 	@sed -e 's+%WISH%+$(TK_WISH)+' \
+ 	    -e 's+%TCL_VERSION%+$(TCL_VERSION)+' \
+ 	    -e 's+%TK_VERSION%+$(TK_VERSION)+' \
+ 	    -e 's+%TKI_VERSION%+$(TKI_VERSION)+' \
+ 		    $(UNIX_DIR)/tkined.in > tkined
+ 
+-tkined$(SHLIB_SUFFIX): $(TKI_GENERIC_OBJS)
+-	$(SHLIB_LD) $(TKI_GENERIC_OBJS) -o tkined$(SHLIB_SUFFIX) $(LIBS)
++libtkined$(SHLIB_SUFFIX): $(TKI_OBJS)
++	${LIBTOOL} --mode=link @CC@ $(TKI_OBJS:.o=.lo) -o libtkined${SHLIB_SUFFIX:C/\.so.*/.la/} \
++		-Wl,-R${PREFIX}/lib -Wl,-R${X11BASE}/lib -L${PREFIX}/lib -L${X11BASE}/lib $(LIBS) -ltnm -ltk83 -ltcl83 -lX11 -lm -rpath ${PREFIX}/lib:${X11BASE}/lib -version-info 1:0
+ 
+ test:
+ 	@echo
+@@ -495,7 +498,7 @@
+ 	    chmod 444 $(MANN_INSTALL_DIR)/$$i; \
+ 	    done;
+ 
+-tnm-install-bin: scotty tnm$(SHLIB_SUFFIX)
++tnm-install-bin: scotty libtnm$(SHLIB_SUFFIX)
+ 	@for i in $(BIN_INSTALL_DIR) $(LIB_RUNTIME_DIR) $(TNM_INSTALL_DIR) ; \
+ 	    do \
+ 	    if [ ! -d $$i ] ; then \
+@@ -505,11 +508,10 @@
+ 		else true; \
+ 		fi; \
+ 	    done;
+-	@echo "Installing scotty$(TNM_VERSION) and tnm$(TNM_VERSION)$(SHLIB_SUFFIX)"
++	@echo "Installing scotty$(TNM_VERSION) and libtnm$(SHLIB_SUFFIX)"
+ 	@$(INSTALL_PROGRAM) scotty $(BIN_INSTALL_DIR)/scotty$(TNM_VERSION)
+-	@$(INSTALL_DATA) tnm$(SHLIB_SUFFIX) $(LIB_RUNTIME_DIR)/tnm$(TNM_VERSION)$(SHLIB_SUFFIX)
+-	@chmod 555 $(LIB_RUNTIME_DIR)/tnm$(TNM_VERSION)$(SHLIB_SUFFIX)
+-	@echo 'package ifneeded Tnm $(TNM_VERSION) "load $(LIB_RUNTIME_DIR)/tnm$(TNM_VERSION)[info sharedlibextension]"' > $(TNM_INSTALL_DIR)/pkgIndex.tcl
++	@$(INSTALL_DATA) libtnm$(SHLIB_SUFFIX:C/\.so.*/.la/) $(LIB_RUNTIME_DIR)
++	@echo 'package ifneeded Tnm $(TNM_VERSION) "load $(LIB_RUNTIME_DIR)/libtnm[info sharedlibextension]"' > $(TNM_INSTALL_DIR)/pkgIndex.tcl
+ 
+ tnm-install-mibs:
+ 	@for i in $(TNM_INSTALL_DIR)/mibs ; \
+@@ -597,7 +599,7 @@
+ 	    $(INSTALL_DATA) $$i $(TNM_INSTALL_DIR)/agents; \
+ 	    done
+ 
+-tki-install-bin: tkined tkined$(SHLIB_SUFFIX) $(TKI_LIBRARY_DIR)/pkgIndex.tcl
++tki-install-bin: tkined libtkined$(SHLIB_SUFFIX) $(TKI_LIBRARY_DIR)/pkgIndex.tcl
+ 	@for i in $(BIN_INSTALL_DIR) $(LIB_RUNTIME_DIR) $(TKI_INSTALL_DIR) ; \
+ 	    do \
+ 	    if [ ! -d $$i ] ; then \
+@@ -607,11 +609,10 @@
+ 		else true; \
+ 		fi; \
+ 	    done;
+-	@echo "Installing tkined$(TKI_VERSION) and tkined$(TKI_VERSION)$(SHLIB_SUFFIX)"
+-	@$(INSTALL_PROGRAM) tkined $(BIN_INSTALL_DIR)/tkined$(TKI_VERSION)
+-	@$(INSTALL_DATA) tkined$(SHLIB_SUFFIX) $(LIB_RUNTIME_DIR)/tkined$(TKI_VERSION)$(SHLIB_SUFFIX)
+-	@chmod 555 $(LIB_RUNTIME_DIR)/tkined$(TKI_VERSION)$(SHLIB_SUFFIX)
+-	@echo 'package ifneeded Tkined $(TKI_VERSION) "load $(LIB_RUNTIME_DIR)/tkined$(TKI_VERSION)[info sharedlibextension]"' > $(TKI_INSTALL_DIR)/pkgIndex.tcl
++	@echo "Installing tkined$(TKI_VERSION) and libtkined$(SHLIB_SUFFIX)"
++	$(BSD_INSTALL_SCRIPT) tkined $(BIN_INSTALL_DIR)/tkined$(TKI_VERSION)
++	$(INSTALL_DATA) libtkined$(SHLIB_SUFFIX:C/\.so.*/.la/) $(LIB_RUNTIME_DIR)
++	@echo 'package ifneeded Tkined $(TKI_VERSION) "load $(LIB_RUNTIME_DIR)/libtkined[info sharedlibextension]"' > $(TKI_INSTALL_DIR)/pkgIndex.tcl
+ 	@$(INSTALL_DATA) $(TKI_DIR)/tkined.defaults $(TKI_INSTALL_DIR)
+ 
+ tki-install-library:
+@@ -696,9 +697,9 @@
+ uninstall: tnm-uninstall uninstall-man tki-uninstall
+ 
+ tnm-uninstall:
+-	@echo "Removing scotty$(TNM_VERSION) and tnm$(TNM_VERSION)$(SHLIB_SUFFIX)"
++	@echo "Removing scotty$(TNM_VERSION) and libtnm$(SHLIB_SUFFIX)"
+ 	@rm -f $(BIN_INSTALL_DIR)/scotty$(TNM_VERSION)
+-	@rm -f $(LIB_RUNTIME_DIR)/tnm$(TNM_VERSION)$(SHLIB_SUFFIX)
++	@rm -f $(LIB_RUNTIME_DIR)/libtnm$(SHLIB_SUFFIX)
+ 	@for i in $(LIB_INSTALL_DIR)/tnm$(TNM_VERSION)/* ; \
+ 	    do \
+ 	    if [ "`basename $$i`" != "site" ] ; then \
+@@ -713,9 +714,9 @@
+ 	    fi
+ 
+ tki-uninstall:
+-	@echo "Removing tkined$(TNM_VERSION) and tkined$(TNM_VERSION)$(SHLIB_SUFFIX)"
++	@echo "Removing tkined$(TNM_VERSION) and libtkined$(SHLIB_SUFFIX)"
+ 	@rm -f $(BIN_INSTALL_DIR)/tkined$(TKI_VERSION)
+-	@rm -f $(LIB_RUNTIME_DIR)/tkined$(TKI_VERSION)$(SHLIB_SUFFIX)
++	@rm -f $(LIB_RUNTIME_DIR)/libtkined$(SHLIB_SUFFIX)
+ 	@for i in $(LIB_INSTALL_DIR)/tkined$(TKI_VERSION)/* ; \
+ 	    do \
+ 	    if [ "`basename $$i`" != "site" ] ; then \
+@@ -750,7 +751,7 @@
+ 	@rm -f $(TNM_OBJS) $(TKI_OBJS) scotty.o ntping.o straps.o
+ 	@rm -f tnmGdmoScan.c tnmGdmoParser.c tnmGdmoParser.h
+ 	@rm -f scotty ntping straps tkined
+-	@rm -f tnm$(SHLIB_SUFFIX) tkined$(SHLIB_SUFFIX)
++	@rm -f libtnm$(SHLIB_SUFFIX) libtkined$(SHLIB_SUFFIX)
+ 	@rm -f core *_svc.c *~ *.bak so_locations lmake.???
+ 	@rm -f map.so tnmMap.o tnmMapUtil.o 
+ 	@rm -f tnmMapNode.o tnmMapClnt.o tnmMapAppl.o
+@@ -821,8 +822,8 @@
+ 		$(MAN8_INSTALL_DIR)/straps.8 \
+ 		$(BIN_INSTALL_DIR)/ntping \
+ 		$(MAN8_INSTALL_DIR)/ntping.8 \
+-		$(LIB_RUNTIME_DIR)/tkined$(SHLIB_SUFFIX) \
+-		$(LIB_RUNTIME_DIR)/tnm$(SHLIB_SUFFIX) \
++		$(LIB_RUNTIME_DIR)/libtkined$(SHLIB_SUFFIX) \
++		$(LIB_RUNTIME_DIR)/libtnm$(SHLIB_SUFFIX) \
+ 		$(TNM_INSTALL_DIR) $(TKI_INSTALL_DIR)
+ 
+ bintar:
diff --git a/net/tcl-scotty/patches/patch-ac b/net/tcl-scotty/patches/patch-ac
new file mode 100644
index 00000000000..cb152bc1460
--- /dev/null
+++ b/net/tcl-scotty/patches/patch-ac
@@ -0,0 +1,15 @@
+$NetBSD: patch-ac,v 1.1.1.1 2000/09/07 17:38:46 jwise Exp $
+--- ../tkined/apps/ip_discover.tcl.orig	Fri Jun 12 09:23:35 1998
++++ ../tkined/apps/ip_discover.tcl	Wed Sep  6 22:56:34 2000
+@@ -56,7 +56,10 @@
+     foreach name {
+ 	nodes networks links ids trace mask fip name address gateways
+     } {
+-	catch {unset $name}
++	catch {
++	    global $name
++	    unset $name
++	}
+     }
+ }
+ 
diff --git a/net/tcl-scotty/patches/patch-ad b/net/tcl-scotty/patches/patch-ad
new file mode 100644
index 00000000000..eae691c4491
--- /dev/null
+++ b/net/tcl-scotty/patches/patch-ad
@@ -0,0 +1,19 @@
+$NetBSD: patch-ad,v 1.1.1.1 2000/09/07 17:38:46 jwise Exp $
+--- ../tnm/generic/tnmInit.c.orig	Thu Sep  7 09:52:58 2000
++++ ../tnm/generic/tnmInit.c	Thu Sep  7 09:53:14 2000
+@@ -83,15 +83,12 @@
+ 
+     machine = Tcl_GetVar2(interp, "tcl_platform", "machine", TCL_GLOBAL_ONLY);
+     os = Tcl_GetVar2(interp, "tcl_platform", "os", TCL_GLOBAL_ONLY);
+-    vers = Tcl_GetVar2(interp, "tcl_platform", "osVersion", TCL_GLOBAL_ONLY);
+ 
+     Tcl_DStringInit(&arch);
+     if (machine && os && vers) {
+ 	Tcl_DStringAppend(&arch, machine, -1);
+ 	Tcl_DStringAppend(&arch, "-", 1);
+ 	Tcl_DStringAppend(&arch, os, -1);
+-	Tcl_DStringAppend(&arch, "-", 1);
+-	Tcl_DStringAppend(&arch, vers, -1);
+     } else {
+ 	Tcl_DStringAppend(&arch, "unknown-os", -1);
+     }
diff --git a/net/tcl-scotty/pkg/COMMENT b/net/tcl-scotty/pkg/COMMENT
new file mode 100644
index 00000000000..9d4614eb350
--- /dev/null
+++ b/net/tcl-scotty/pkg/COMMENT
@@ -0,0 +1 @@
+network management extensions to TCL
diff --git a/net/tcl-scotty/pkg/DESCR b/net/tcl-scotty/pkg/DESCR
new file mode 100644
index 00000000000..8761098e045
--- /dev/null
+++ b/net/tcl-scotty/pkg/DESCR
@@ -0,0 +1,16 @@
+scotty - network management extensions to tcl
+
+scotty is a tcl extension which allows to set up TCP and UDP
+connections, to send various ICMP packets, to query the domain name
+system (DNS), to check clock screw using the NTP protocol and to query
+various SUN RPC services (like rstat and mountd).
+
+Included in this package is an interface to SNMPv1 and SNMPv2. The
+SNMP stack was written from scratch to provide an efficient and
+portable tcl SNMP extension. MIB extensions can be written in tcl by
+running the scotty extension as an SNMP agent. This allows you to
+implement your own specific MIB without getting in contact with the
+lowlevel ASN.1/BER stuff.
+
+tkined, a very nice graphical network monitoring tool based on scotty
+is available as pkgsrc/net/tkined.
diff --git a/net/tcl-scotty/pkg/PLIST b/net/tcl-scotty/pkg/PLIST
new file mode 100644
index 00000000000..619c372baf5
--- /dev/null
+++ b/net/tcl-scotty/pkg/PLIST
@@ -0,0 +1,232 @@
+@comment $NetBSD: PLIST,v 1.1.1.1 2000/09/07 17:38:43 jwise Exp $
+bin/scotty2.1.10
+bin/scotty
+bin/ntping
+bin/straps
+lib/tcl/tnm2.1.10/pkgIndex.tcl
+lib/tcl/tnm2.1.10/library/README
+lib/tcl/tnm2.1.10/library/dialog.tcl
+lib/tcl/tnm2.1.10/library/output.tcl
+lib/tcl/tnm2.1.10/library/snmp.tcl
+lib/tcl/tnm2.1.10/library/monitor.tcl
+lib/tcl/tnm2.1.10/library/obsolete.tcl
+lib/tcl/tnm2.1.10/library/init.tcl
+lib/tcl/tnm2.1.10/library/tclIndex
+lib/tcl/tnm2.1.10/mibs/cisco.mib
+lib/tcl/tnm2.1.10/mibs/dvmrp.mib
+lib/tcl/tnm2.1.10/mibs/hp-unix.mib
+lib/tcl/tnm2.1.10/mibs/ncd.mib
+lib/tcl/tnm2.1.10/mibs/rfc1213.mib
+lib/tcl/tnm2.1.10/mibs/rfc1238.mib
+lib/tcl/tnm2.1.10/mibs/rfc1269.mib
+lib/tcl/tnm2.1.10/mibs/rfc1285.mib
+lib/tcl/tnm2.1.10/mibs/rfc1315.mib
+lib/tcl/tnm2.1.10/mibs/rfc1354.mib
+lib/tcl/tnm2.1.10/mibs/rfc1381.mib
+lib/tcl/tnm2.1.10/mibs/rfc1382.mib
+lib/tcl/tnm2.1.10/mibs/rfc1406.mib
+lib/tcl/tnm2.1.10/mibs/rfc1407.mib
+lib/tcl/tnm2.1.10/mibs/rfc1414.mib
+lib/tcl/tnm2.1.10/mibs/rfc1461.mib
+lib/tcl/tnm2.1.10/mibs/rfc1471.mib
+lib/tcl/tnm2.1.10/mibs/rfc1472.mib
+lib/tcl/tnm2.1.10/mibs/rfc1473.mib
+lib/tcl/tnm2.1.10/mibs/rfc1474.mib
+lib/tcl/tnm2.1.10/mibs/rfc1493.mib
+lib/tcl/tnm2.1.10/mibs/rfc1512.mib
+lib/tcl/tnm2.1.10/mibs/rfc1513.mib
+lib/tcl/tnm2.1.10/mibs/rfc1514.mib
+lib/tcl/tnm2.1.10/mibs/rfc1515.mib
+lib/tcl/tnm2.1.10/mibs/rfc1516.mib
+lib/tcl/tnm2.1.10/mibs/rfc1525.mib
+lib/tcl/tnm2.1.10/mibs/rfc1559.mib
+lib/tcl/tnm2.1.10/mibs/rfc1565.mib
+lib/tcl/tnm2.1.10/mibs/rfc1566.mib
+lib/tcl/tnm2.1.10/mibs/rfc1567.mib
+lib/tcl/tnm2.1.10/mibs/rfc1573.mib
+lib/tcl/tnm2.1.10/mibs/rfc1595.mib
+lib/tcl/tnm2.1.10/mibs/rfc1604.mib
+lib/tcl/tnm2.1.10/mibs/rfc1611.mib
+lib/tcl/tnm2.1.10/mibs/rfc1612.mib
+lib/tcl/tnm2.1.10/mibs/rfc1628.mib
+lib/tcl/tnm2.1.10/mibs/rfc1643.mib
+lib/tcl/tnm2.1.10/mibs/rfc1650.mib
+lib/tcl/tnm2.1.10/mibs/rfc1657.mib
+lib/tcl/tnm2.1.10/mibs/rfc1658.mib
+lib/tcl/tnm2.1.10/mibs/rfc1659.mib
+lib/tcl/tnm2.1.10/mibs/rfc1660.mib
+lib/tcl/tnm2.1.10/mibs/rfc1666.mib
+lib/tcl/tnm2.1.10/mibs/rfc1694.mib
+lib/tcl/tnm2.1.10/mibs/rfc1695.mib
+lib/tcl/tnm2.1.10/mibs/rfc1696.mib
+lib/tcl/tnm2.1.10/mibs/rfc1697.mib
+lib/tcl/tnm2.1.10/mibs/rfc1724.mib
+lib/tcl/tnm2.1.10/mibs/rfc1742.mib
+lib/tcl/tnm2.1.10/mibs/rfc1747.mib
+lib/tcl/tnm2.1.10/mibs/rfc1748.mib
+lib/tcl/tnm2.1.10/mibs/rfc1749.mib
+lib/tcl/tnm2.1.10/mibs/rfc1757.mib
+lib/tcl/tnm2.1.10/mibs/rfc1759.mib
+lib/tcl/tnm2.1.10/mibs/rfc1792.mib
+lib/tcl/tnm2.1.10/mibs/rfc1850.mib
+lib/tcl/tnm2.1.10/mibs/rfc1906.mib
+lib/tcl/tnm2.1.10/mibs/rfc1907.mib
+lib/tcl/tnm2.1.10/mibs/rfc1910.mib
+lib/tcl/tnm2.1.10/mibs/rfc2020.mib
+lib/tcl/tnm2.1.10/mibs/synoptics.mib
+lib/tcl/tnm2.1.10/mibs/tubs-linux.mib
+lib/tcl/tnm2.1.10/mibs/tubs-mlm.mib
+lib/tcl/tnm2.1.10/mibs/tubs-nfs.mib
+lib/tcl/tnm2.1.10/mibs/tubs-proc.mib
+lib/tcl/tnm2.1.10/mibs/tubs-tnm.mib
+lib/tcl/tnm2.1.10/mibs/unix.mib
+lib/tcl/tnm2.1.10/mibs/wellfleet.mib
+lib/tcl/tnm2.1.10/mibs/xxx.mib
+lib/tcl/tnm2.1.10/mibs/rfc1155.smi
+lib/tcl/tnm2.1.10/mibs/rfc1573.smi
+lib/tcl/tnm2.1.10/mibs/rfc1902.smi
+lib/tcl/tnm2.1.10/mibs/compat.tc
+lib/tcl/tnm2.1.10/mibs/rfc1903.tc
+lib/tcl/tnm2.1.10/mibs/OIM.gdmo
+lib/tcl/tnm2.1.10/mibs/X721.gdmo
+lib/tcl/tnm2.1.10/mibs/X722.gdmo
+lib/tcl/tnm2.1.10/mibs/X739.gdmo
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1155.smi.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1902.smi.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1903.tc.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/compat.tc.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1906.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1907.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1213.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1910.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1269.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1238.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1757.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1315.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1354.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1381.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1382.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1406.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1407.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1414.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1461.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1471.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1472.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1473.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1474.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1493.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1512.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1513.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1514.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1515.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1516.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1525.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1559.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1565.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1566.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1567.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1573.smi.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1573.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1595.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1604.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1611.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1612.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1628.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1643.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1650.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1657.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1658.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1659.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1660.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1666.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1694.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1695.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1696.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1697.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1724.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1742.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1747.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1748.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1749.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1759.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1792.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc1850.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/rfc2020.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/tubs-tnm.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/tubs-nfs.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/tubs-proc.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/tubs-mlm.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/xxx.mib.idy
+lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}/dvmrp.mib.idy
+lib/tcl/tnm2.1.10/agents/snmpd
+lib/tcl/tnm2.1.10/agents/snmpd-tnm.tcl
+lib/tcl/tnm2.1.10/agents/snmpd-mlm.tcl
+lib/tcl/tnm2.1.10/agents/snmpd-nfs.tcl
+lib/tcl/tnm2.1.10/agents/snmpd-proc.tcl
+lib/tcl/tnm2.1.10/agents/snmpd-http.tcl
+lib/tcl/tnm2.1.10/agents/README
+lib/tcl/tnm2.1.10/examples/discover
+lib/tcl/tnm2.1.10/examples/discover.n
+lib/tcl/tnm2.1.10/examples/emok
+lib/tcl/tnm2.1.10/examples/emok.n
+lib/tcl/tnm2.1.10/examples/etherload
+lib/tcl/tnm2.1.10/examples/etherload.n
+lib/tcl/tnm2.1.10/examples/ifload
+lib/tcl/tnm2.1.10/examples/ifload.n
+lib/tcl/tnm2.1.10/examples/ifload2gif
+lib/tcl/tnm2.1.10/examples/ifload2gif.n
+lib/tcl/tnm2.1.10/examples/snmptrapd
+lib/tcl/tnm2.1.10/examples/snmptrapd.n
+lib/tcl/tnm2.1.10/examples/mibtree
+lib/tcl/tnm2.1.10/examples/mibtree.n
+lib/tcl/tnm2.1.10/examples/nslook
+lib/tcl/tnm2.1.10/examples/nslook.n
+lib/tcl/tnm2.1.10/examples/rpcprobe
+lib/tcl/tnm2.1.10/examples/rpcprobe.n
+lib/tcl/tnm2.1.10/examples/rstat
+lib/tcl/tnm2.1.10/examples/rstat.n
+lib/tcl/tnm2.1.10/examples/snmpwalk
+lib/tcl/tnm2.1.10/examples/snmpwalk.n
+lib/tcl/tnm2.1.10/examples/tcpspeed
+lib/tcl/tnm2.1.10/examples/tcpspeed.n
+lib/tcl/tnm2.1.10/examples/traceroute
+lib/tcl/tnm2.1.10/examples/traceroute.n
+lib/tcl/tnm2.1.10/examples/udploss
+lib/tcl/tnm2.1.10/examples/udploss.n
+lib/tcl/tnm2.1.10/examples/udpspeed
+lib/tcl/tnm2.1.10/examples/udpspeed.n
+lib/tcl/tnm2.1.10/examples/uiping
+lib/tcl/tnm2.1.10/examples/uiping.n
+lib/tcl/tnm2.1.10/examples/yanny
+lib/tcl/tnm2.1.10/examples/yanny.n
+lib/tcl/tnm2.1.10/examples/pcnfs
+lib/tcl/tnm2.1.10/examples/pcnfs.n
+lib/tcl/tnm2.1.10/examples/mibgrep
+lib/tcl/tnm2.1.10/examples/mibgrep.n
+lib/libtnm.so.1.0
+lib/libtnm.la
+lib/libtnm.a
+man/man1/scotty.1
+man/man8/ntping.8
+man/man8/straps.8
+man/mann/Tnm.n
+man/mann/cmip.n
+man/mann/dns.n
+man/mann/gdmo.n
+man/mann/icmp.n
+man/mann/ined.n
+man/mann/job.n
+man/mann/mib.n
+man/mann/netdb.n
+man/mann/ntp.n
+man/mann/rpc.n
+man/mann/snmp.n
+man/mann/sunrpc.n
+man/mann/syslog.n
+man/mann/udp.n
+@dirrm lib/tcl/tnm2.1.10/library
+@dirrm lib/tcl/tnm2.1.10/mibs
+@dirrm lib/tcl/tnm2.1.10/${MACHINE_ARCH}-${OPSYS}
+@dirrm lib/tcl/tnm2.1.10/agents
+@dirrm lib/tcl/tnm2.1.10/examples
+@dirrm lib/tcl/tnm2.1.10