Apple-2gs-SW
/
tcpsnooper
mirror of https://github.com/ksherlock/tcpsnooper.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

minor tweaks to build with golden gate.

This commit is contained in:
Kelvin Sherlock 2019-01-15 00:10:12 -05:00
parent fe5b75d4ac
commit 34224915f7
7 changed files with 405 additions and 151 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
GNUmakefile Normal file
View File

@ -0,0 +1,30 @@
.PHONY: all
all: tcpsnooper netstat
tcpsnooper : o/cda.a o/nscda.a o/debug.a
iix -DKeepType=cda link o/cda o/nscda o/debug keep=tcpsnooper
netstat : o/netstat.a
iix link o/netstat keep=netstat
o:
mkdir o
cda.mac: cda.asm
iix macgen cda.asm cda.mac 13:ainclude:m16.= 13:orcainclude:m16.=
o/cda.a : cda.asm | cda.mac o
iix compile cda.asm keep=o/cda
o/nscda.a : nscda.c | o
iix compile nscda.c keep=o/nscda
o/netstat.a : netstat.c | o
iix compile netstat.c keep=o/netstat
o/debug.a : debug.c ur.c | o
iix compile debug.c keep=o/debug

6
cda.asm
View File

@ -25,9 +25,9 @@
*=================================================
case on
copy /lang/orca/libraries/ainclude/e16.gsos
copy /lang/orca/libraries/ainclude/e16.event
copy /lang/orca/libraries/ainclude/e16.memory
copy 13/ainclude/e16.gsos
copy 13/ainclude/e16.event
copy 13/ainclude/e16.memory
mcopy cda.mac

247
cda.mac Normal file
View File

@ -0,0 +1,247 @@
MACRO
&lab _DisposeHandle
&lab ldx #$1002
jsl $E10000
MEND
MACRO
&lab _MMStartUp
&lab ldx #$0202
jsl $E10000
MEND
MACRO
&lab _GetInGlobals
&lab ldx #$0C0C
jsl $E10000
MEND
MACRO
&lab _GetInputDevice
&lab ldx #$120C
jsl $E10000
MEND
MACRO
&lab _GetOutGlobals
&lab ldx #$0D0C
jsl $E10000
MEND
MACRO
&lab _GetOutputDevice
&lab ldx #$130C
jsl $E10000
MEND
MACRO
&lab _SetInGlobals
&lab ldx #$090C
jsl $E10000
MEND
MACRO
&lab _SetInputDevice
&lab ldx #$0F0C
jsl $E10000
MEND
MACRO
&lab _SetOutGlobals
&lab ldx #$0A0C
jsl $E10000
MEND
MACRO
&lab _SetOutputDevice
&lab ldx #$100C
jsl $E10000
MEND
MACRO
&lab _EMStatus
&lab ldx #$0606
jsl $E10000
MEND
macro
&l ~GetNextEvent &p1,&p2
&l ph2 &p1
ph4 &p2
ldx #$0A06
jsl $E10000
mend
macro
&l ~NewHandle &p1,&p2,&p3,&p4
&l ph4 &p1
ph2 &p2
ph2 &p3
ph4 &p4
ldx #$0902
jsl $E10000
mend
macro
&l ~InitTextDev &p1
&l ph2 &p1
ldx #$150C
jsl $E10000
mend
macro
&l ~SetInGlobals &p1,&p2
&l ph2 &p1
ph2 &p2
ldx #$090C
jsl $E10000
mend
macro
&l ~SetInputDevice &p1,&p2
&l ph2 &p1
ph4 &p2
ldx #$0F0C
jsl $E10000
mend
macro
&l ~SetOutGlobals &p1,&p2
&l ph2 &p1
ph2 &p2
ldx #$0A0C
jsl $E10000
mend
macro
&l ~SetOutputDevice &p1,&p2
&l ph2 &p1
ph4 &p2
ldx #$100C
jsl $E10000
mend
macro
&l ~WriteChar &p1
&l ph2 &p1
ldx #$180C
jsl $E10000
mend
macro
&l dw &adr
&l dc i1"l:~&SYSNAME&SYSCNT"
~&SYSNAME&SYSCNT dc c"&adr"
mend
macro
&l long &a,&b
lclb &i
lclb &m
&a amid &a,1,1
&m setb ("&a"="M").or.("&a"="m")
&i setb ("&a"="I").or.("&a"="i")
aif c:&b=0,.a
&b amid &b,1,1
&m setb ("&b"="M").or.("&b"="m").or.&m
&i setb ("&b"="I").or.("&b"="i").or.&i
.a
&l rep #&m*32+&i*16
aif .not.&m,.b
longa on
.b
aif .not.&i,.c
longi on
.c
mend
macro
&l ph2 &n1
&l anop
aif "&n1"="*",.f
lclc &c
&c amid &n1,1,1
aif "&c"="#",.d
aif s:longa=1,.a
rep #%00100000
.a
aif "&c"<>"{",.b
&c amid &n1,l:&n1,1
aif "&c"<>"}",.g
&n1 amid &n1,2,l:&n1-2
lda (&n1)
pha
ago .e
.b
aif "&c"="<",.c
lda &n1
pha
ago .e
.c
&n1 amid &n1,2,l:&n1-1
pei &n1
ago .e
.d
&n1 amid &n1,2,l:&n1-1
pea &n1
ago .f
.e
aif s:longa=1,.f
sep #%00100000
.f
mexit
.g
mnote "Missing closing '}'",16
mend
macro
&l ph4 &n1
&l anop
aif "&n1"="*",.f
lclc &c
&c amid &n1,1,1
aif "&c"="#",.d
aif s:longa=1,.a
rep #%00100000
.a
aif "&c"<>"{",.b
&c amid &n1,l:&n1,1
aif "&c"<>"}",.g
&n1 amid &n1,2,l:&n1-2
ldy #2
lda (&n1),y
pha
lda (&n1)
pha
ago .e
.b
aif "&c"<>"[",.c
ldy #2
lda &n1,y
pha
lda &n1
pha
ago .e
.c
aif "&c"<>"<",.c1
&n1 amid &n1,2,l:&n1-1
pei &n1+2
pei &n1
ago .e
.c1
lda &n1+2
pha
lda &n1
pha
ago .e
.d
&n1 amid &n1,2,l:&n1-1
pea +(&n1)|-16
pea &n1
ago .f
.e
aif s:longa=1,.f
sep #%00100000
.f
mexit
.g
mnote "Missing closing '}'",16
mend
macro
&l short &a,&b
lclb &i
lclb &m
&a amid &a,1,1
&m setb ("&a"="M").or.("&a"="m")
&i setb ("&a"="I").or.("&a"="i")
aif c:&b=0,.a
&b amid &b,1,1
&m setb ("&b"="M").or.("&b"="m").or.&m
&i setb ("&b"="I").or.("&b"="i").or.&i
.a
&l sep #&m*32+&i*16
aif .not.&m,.b
longa off
.b
aif .not.&i,.c
longi off
.c
mend

161
debug.c
View File

@ -36,11 +36,9 @@
#include <intmath.h>
#include <loader.h>
#include <misctool.h>
#include <stdio.h>
extern int fdprintf(int, const char *, ...);
extern int orca_sprintf(char *, const char *, ...);
char *errStrings[] =
{
"tcpDGMSTBLEN",
@ -87,27 +85,13 @@ char *tuneStrings[] =
};
long write(Word fd, const void *data, LongWord size)
{
static IORecGS ioDCB = { 4, 0, 0, 0};
ioDCB.refNum = fd;
ioDCB.dataBuffer = (Pointer)data;
ioDCB.requestCount = size;
WriteGS(&ioDCB);
return _toolErr ? -1 : ioDCB.transferCount;
}
// creates a unique file and opens it.
int createFile(void)
FILE *createFile(void)
{
static GSString32 template = {28, "*:system:tcpip:debugxxxx.txt"};
static CreateRecGS createDCB = {4, (GSString255Ptr)&template, 0xe3, 4, 0};
static OpenRecGS openDCB = {4, 0, (GSString255Ptr)&template, writeEnable, 0};
FILE *fp;
word i;
for (i = 0; i < 9999; i++)
@ -125,15 +109,13 @@ word i;
break;
}
if (_toolErr) return 0;
if (_toolErr) return NULL;
OpenGS(&openDCB);
if (_toolErr) return 0;
return openDCB.refNum;
fp = fopen(template.text, "w");
return fp;
}
void dump(Word fd, void *data, Word length)
void dump(FILE *fp, void *data, Word length)
{
Word i;
Word j;
@ -155,8 +137,7 @@ static char buffer[80];
{
buffer[j++] = 0;
fdprintf(fd, "%04x: %s\r", i - 15, buffer);
//write(fd, buffer, j);
fprintf(fp, "%04x: %s\r", i - 15, buffer);
j = 0;
}
}
@ -164,8 +145,7 @@ static char buffer[80];
if (i & 0x0f)
{
buffer[j++] = 0;
fdprintf(fd, "%04x: %s\r", i - 15, buffer);
//write(fd, buffer, j);
fprintf(fp, "%04x: %s\r", i - 15, buffer);
}
}
@ -192,89 +172,88 @@ static srBuff tcp;
Word count;
Handle h;
Word size;
Word fd;
Word closeDCB[2];
FILE *fp;
fd = createFile();
if (fd == 0) return;
fp = createFile();
if (!fp) return;
// version
VersionString(0, TCPIPLongVersion(), buffer);
fdprintf(fd, "Version: %b\r", buffer);
fprintf(fp, "Version: %b\r", buffer);
// link layer
TCPIPGetLinkLayer(&link);
fdprintf(fd, "Link Layer:\r");
fdprintf(fd, " MethodID: $%04x\r", link.liMethodID);
fdprintf(fd, " Name: %b\r", link.liName);
fprintf(fp, "Link Layer:\r");
fprintf(fp, " MethodID: $%04x\r", link.liMethodID);
fprintf(fp, " Name: %b\r", link.liName);
VersionString(0, link.liVersion, buffer);
fdprintf(fd, " Version: %b\r", buffer);
fdprintf(fd, " Flags: $%04x\r", link.liFlags);
fprintf(fp, " Version: %b\r", buffer);
fprintf(fp, " Flags: $%04x\r", link.liFlags);
lv = TCPIPGetLinkVariables();
fdprintf(fd, "Link Variables\r");
fdprintf(fd, " Version: %d\r", lv->lvVersion);
fdprintf(fd, " Connected: $%04x\r", lv->lvConnected);
fprintf(fp, "Link Variables\r");
fprintf(fp, " Version: %d\r", lv->lvVersion);
fprintf(fp, " Connected: $%04x\r", lv->lvConnected);
TCPIPConvertIPToASCII(lv->lvIPaddress, buffer, 0);
fdprintf(fd, " IP Address: %b\r", buffer);
fdprintf(fd, " RefCon: $%08lx\r", lv->lvRefCon);
fdprintf(fd, " Errors: $%08lx\r", lv->lvErrors);
fdprintf(fd, " MTU: %d\r", lv->lvMTU);
fprintf(fp, " IP Address: %b\r", buffer);
fprintf(fp, " RefCon: $%08lx\r", lv->lvRefCon);
fprintf(fp, " Errors: $%08lx\r", lv->lvErrors);
fprintf(fp, " MTU: %d\r", lv->lvMTU);
// connect status
fdprintf(fd, "Connect Status: $%04x\r", TCPIPGetConnectStatus());
fprintf(fp, "Connect Status: $%04x\r", TCPIPGetConnectStatus());
// ip address
l = TCPIPGetMyIPAddress();
TCPIPConvertIPToASCII(l, buffer, 0);
fdprintf(fd, "IP Address: %b\r", buffer);
fprintf(fp, "IP Address: %b\r", buffer);
// dns
TCPIPGetDNS(&dns);
TCPIPConvertIPToASCII(dns.DNSMain, buffer, 0);
fdprintf(fd, "DNS 1: %b\r", buffer);
fprintf(fp, "DNS 1: %b\r", buffer);
TCPIPConvertIPToASCII(dns.DNSAux, buffer, 0);
fdprintf(fd, "DNS 2: %b\r", buffer);
fprintf(fp, "DNS 2: %b\r", buffer);
// hostname
TCPIPGetHostName((hnBuffPtr)buffer);
fdprintf(fd, "Hostname: %b\r", buffer);
fprintf(fp, "Hostname: %b\r", buffer);
//mtu
fdprintf(fd, "MTU: %d\r", TCPIPGetMTU());
fdprintf(fd, "Alive Flag: $%04x\r", TCPIPGetAliveFlag());
fdprintf(fd, "Alive Minutes: %d\r", TCPIPGetAliveMinutes());
fdprintf(fd, "Login Count: %d\r", TCPIPGetLoginCount());
fprintf(fp, "MTU: %d\r", TCPIPGetMTU());
fprintf(fp, "Alive Flag: $%04x\r", TCPIPGetAliveFlag());
fprintf(fp, "Alive Minutes: %d\r", TCPIPGetAliveMinutes());
fprintf(fp, "Login Count: %d\r", TCPIPGetLoginCount());
// error table
fdprintf(fd, "\rError Table\r");
fprintf(fp, "\rError Table\r");
lw = (LongWord *)TCPIPGetErrorTable();
count = lw[0] >> 2;
if (count > sizeof(errStrings) / 4) count = sizeof(errStrings) / 4;
for (i = 0; i < count; i++);
{
fdprintf(fd, " %s -- $%08lx\r", errStrings[i], lw[i]);
fprintf(fp, " %s -- $%08lx\r", errStrings[i], lw[i]);
}
// tuning table
tune[0] = 10;
fdprintf(fd, "\rTuning Table\r");
fprintf(fp, "\rTuning Table\r");
TCPIPGetTuningTable((tunePtr)tune);
count = tune[0] >> 1;
if (count > sizeof(tuneStrings) / 4) count = sizeof(tuneStrings) / 4;
for (i = 0; i < count; i++)
{
fdprintf(fd, " %s -- $%04x\r", tuneStrings[i], tune[i]);
fprintf(fp, " %s -- $%04x\r", tuneStrings[i], tune[i]);
}
fdprintf(fd, "\rDirect Page\r");
dump(fd, (void *)TCPIPGetDP(), 0x0100);
fprintf(fp, "\rDirect Page\r");
dump(fp, (void *)TCPIPGetDP(), 0x0100);
// dump all user records. ipid will be even numbers in the range 0..98
for (i = 0; i < 100; i += 2)
@ -285,25 +264,25 @@ Word closeDCB[2];
if (_toolErr) continue;
fdprintf(fd, "\rIpid %d\r", i);
fprintf(fp, "\rIpid %d\r", i);
fdprintf(fd, "Datagram count (all): %d\r",
fprintf(fp, "Datagram count (all): %d\r",
TCPIPGetDatagramCount(i, protocolAll));
fdprintf(fd, "Datagram count (icmp): %d\r",
fprintf(fp, "Datagram count (icmp): %d\r",
TCPIPGetDatagramCount(i, protocolICMP));
fdprintf(fd, "Datagram count (tcp): %d\r",
fprintf(fp, "Datagram count (tcp): %d\r",
TCPIPGetDatagramCount(i, protocolTCP));
fdprintf(fd, "Datagram count (udp): %d\r",
fprintf(fp, "Datagram count (udp): %d\r",
TCPIPGetDatagramCount(i, protocolUDP));
fdprintf(fd, "User statistic 1: $%08lx\r",
fprintf(fp, "User statistic 1: $%08lx\r",
TCPIPGetUserStatistic(i, 1));
fdprintf(fd, "User statistic 2: $%08lx\r",
fprintf(fp, "User statistic 2: $%08lx\r",
TCPIPGetUserStatistic(i, 2));
#if 0 // tcpipStatusUDP has a stack imbalance bug.
@ -311,13 +290,13 @@ Word closeDCB[2];
TCPIPStatusUDP(i, &udp);
if (_toolErr == 0)
{
fdprintf(fd, "\rStatus UDP\r");
fdprintf(fd, " Queue Size: %d\r", udp.uvQueueSize);
fdprintf(fd, " Error: %d\r", udp.uvError);
fdprintf(fd, " Error Tick: %ld\r", udp.uvErrorTick);
fdprintf(fd, " Count: %ld\r", udp.uvCount);
fdprintf(fd, " Total Count: %ld\r", udp.uvTotalCount);
fdprintf(fd, " Dispatch Flag: %d\r", udp.uvDispatchFlag);
fprintf(fp, "\rStatus UDP\r");
fprintf(fp, " Queue Size: %d\r", udp.uvQueueSize);
fprintf(fp, " Error: %d\r", udp.uvError);
fprintf(fp, " Error Tick: %ld\r", udp.uvErrorTick);
fprintf(fp, " Count: %ld\r", udp.uvCount);
fprintf(fp, " Total Count: %ld\r", udp.uvTotalCount);
fprintf(fp, " Dispatch Flag: %d\r", udp.uvDispatchFlag);
}
#endif
@ -325,16 +304,16 @@ Word closeDCB[2];
TCPIPStatusTCP(i, &tcp);
if (_toolErr == 0)
{
fdprintf(fd, "\rStatus TCP\r");
fdprintf(fd, " State: %d\r", tcp.srState);
fdprintf(fd, " Network Error: %d\r", tcp.srNetworkError);
fdprintf(fd, " Send Queued: %ld\r", tcp.srSndQueued);
fdprintf(fd, " Recv Queued: %ld\r", tcp.srRcvQueued);
fprintf(fp, "\rStatus TCP\r");
fprintf(fp, " State: %d\r", tcp.srState);
fprintf(fp, " Network Error: %d\r", tcp.srNetworkError);
fprintf(fp, " Send Queued: %ld\r", tcp.srSndQueued);
fprintf(fp, " Recv Queued: %ld\r", tcp.srRcvQueued);
TCPIPConvertIPToASCII(tcp.srDestIP, buffer, 0);
fdprintf(fd, " Dest IP: %b\r", buffer);
fdprintf(fd, " Dest Port: %d\r", tcp.srDestPort);
fdprintf(fd, " Connect Type: %d\r", tcp.srConnectType);
fdprintf(fd, " Accept Count: %d\r", tcp.srAcceptCount);
fprintf(fp, " Dest IP: %b\r", buffer);
fprintf(fp, " Dest Port: %d\r", tcp.srDestPort);
fprintf(fp, " Connect Type: %d\r", tcp.srConnectType);
fprintf(fp, " Accept Count: %d\r", tcp.srAcceptCount);
}
@ -343,23 +322,19 @@ Word closeDCB[2];
{
GSString255Ptr appName;
userRecord *rec = (userRecord *)*h;
fdprintf(fd, "\rUser Record\r");
fprintf(fp, "\rUser Record\r");
appName = (GSString255Ptr)LGetPathname2(rec->uwUserID, 1);
if (_toolErr == 0)
{
fdprintf(fd, "\rApplication %B\r", appName);
fprintf(fp, "\rApplication %.*s\r", appName->length, appName->text);
}
#include "ur.c"
}
else dump(fd, *h, size);
else dump(fp, *h, size);
HUnlock(h);
}
closeDCB[0] = 1;
closeDCB[1] = fd;
CloseGS(closeDCB);
fclose(fp);
}
@ -373,6 +348,6 @@ void main (void)
{
_beginStackCheck();
debug();
fdprintf(2, "%d bytes of stack used\r", _endStackCheck());
fprintf(fp "%d bytes of stack used\r", _endStackCheck());
}
#endif

2
makefile.mk
View File

@ -35,7 +35,7 @@ LDLIBS += -l liborca
netstat: netstat.o
$(CC) $(LDFLAGS) netstat.o $(LDLIBS) -o $@
tcpsnooper.cda: cda.o nscda.o debug.o
$(CC) $(LDFLAGS) cda.o nscda.o debug.o $(LDLIBS) -o $@
chtyp -t cda $@

2
nscda.c
View File

@ -33,6 +33,8 @@
#include <texttool.h>
#include <tcpip.h>
#include <stdio.h>
extern Word GetKey(void);
extern void debug(void);

108
ur.c
View File

@ -24,61 +24,61 @@
*
*=================================================*/
fdprintf(fd, " uwUserID: %04x\r", rec->uwUserID);
fdprintf(fd, " uwDestIP: %08lx\r", rec->uwDestIP);
fdprintf(fd, " uwDestPort: %04x\r", rec->uwDestPort);
fdprintf(fd, " uwIP_TOS: %04x\r", rec->uwIP_TOS);
fdprintf(fd, " uwIP_TTL: %04x\r", rec->uwIP_TTL);
fprintf(fp, " uwUserID: %04x\r", rec->uwUserID);
fprintf(fp, " uwDestIP: %08lx\r", rec->uwDestIP);
fprintf(fp, " uwDestPort: %04x\r", rec->uwDestPort);
fprintf(fp, " uwIP_TOS: %04x\r", rec->uwIP_TOS);
fprintf(fp, " uwIP_TTL: %04x\r", rec->uwIP_TTL);
fdprintf(fd, " uwSourcePort: %04x\r", rec->uwSourcePort);
fdprintf(fd, " uwLogoutPending: %04x\r", rec->uwLogoutPending);
fdprintf(fd, " uwICMPQueue: %08lx\r", rec->uwICMPQueue);
fdprintf(fd, " uwTCPQueue: %08lx\r", rec->uwTCPQueue);
fprintf(fp, " uwSourcePort: %04x\r", rec->uwSourcePort);
fprintf(fp, " uwLogoutPending: %04x\r", rec->uwLogoutPending);
fprintf(fp, " uwICMPQueue: %08lx\r", rec->uwICMPQueue);
fprintf(fp, " uwTCPQueue: %08lx\r", rec->uwTCPQueue);
fdprintf(fd, " uwTCPMaxSendSeg: %04x\r", rec->uwTCPMaxSendSeg);
fdprintf(fd, " uwTCPMaxReceiveSeg: %04x\r", rec->uwTCPMaxReceiveSeg);
fdprintf(fd, " uwTCPDataInQ: %08lx\r", rec->uwTCPDataInQ);
fdprintf(fd, " uwTCPDataIn: %08lx\r", rec->uwTCPDataIn);
fdprintf(fd, " uwTCPPushInFlag: %04x\r", rec->uwTCPPushInFlag);
fdprintf(fd, " uwTCPPushInOffset: %08lx\r", rec->uwTCPPushInOffset);
fdprintf(fd, " uwTCPPushOutFlag: %04x\r", rec->uwTCPPushOutFlag);
fdprintf(fd, " uwTCPPushOutSEQ: %08lx\r", rec->uwTCPPushOutSEQ);
fdprintf(fd, " uwTCPDataOut: %08lx\r", rec->uwTCPDataOut);
fdprintf(fd, " uwSND_UNA: %08lx\r", rec->uwSND_UNA);
fdprintf(fd, " uwSND_NXT: %08lx\r", rec->uwSND_NXT);
fdprintf(fd, " uwSND_WND: %04x\r", rec->uwSND_WND);
fdprintf(fd, " uwSND_UP: %04x\r", rec->uwSND_UP);
fdprintf(fd, " uwSND_WL1: %08lx\r", rec->uwSND_WL1);
fdprintf(fd, " uwSND_WL2: %08lx\r", rec->uwSND_WL2);
fdprintf(fd, " uwISS: %08lx\r", rec->uwISS);
fdprintf(fd, " uwRCV_NXT: %08lx\r", rec->uwRCV_NXT);
fdprintf(fd, " uwRCV_WND: %04x\r", rec->uwRCV_WND);
fdprintf(fd, " uwRCV_UP: %04x\r", rec->uwRCV_UP);
fdprintf(fd, " uwIRS: %08lx\r", rec->uwIRS);
fdprintf(fd, " uwTCP_State: %04x\r", rec->uwTCP_State);
fdprintf(fd, " uwTCP_StateTick: %08lx\r", rec->uwTCP_StateTick);
fdprintf(fd, " uwTCP_ErrCode: %04x\r", rec->uwTCP_ErrCode);
fdprintf(fd, " uwTCP_ICMPError: %04x\r", rec->uwTCP_ICMPError);
fdprintf(fd, " uwTCP_Server: %04x\r", rec->uwTCP_Server);
fdprintf(fd, " uwTCP_ChildList: %08lx\r", rec->uwTCP_ChildList);
fdprintf(fd, " uwTCP_ACKPending: %04x\r", rec->uwTCP_ACKPending);
fdprintf(fd, " uwTCP_ForceFIN: %04x\r", rec->uwTCP_ForceFIN);
fdprintf(fd, " uwTCP_FINSEQ: %08lx\r", rec->uwTCP_FINSEQ);
fdprintf(fd, " uwTCP_MyFINACKed: %04x\r", rec->uwTCP_MyFINACKed);
fdprintf(fd, " uwTCP_Timer: %08lx\r", rec->uwTCP_Timer);
fdprintf(fd, " uwTCP_TimerState: %04x\r", rec->uwTCP_TimerState);
fdprintf(fd, " uwTCP_rt_timer: %04x\r", rec->uwTCP_rt_timer);
fdprintf(fd, " uwTCP_2MSL_timer: %04x\r", rec->uwTCP_2MSL_timer);
fdprintf(fd, " uwTCP_SaveTTL: %04x\r", rec->uwTCP_SaveTTL);
fdprintf(fd, " uwTCP_SaveTOS: %04x\r", rec->uwTCP_SaveTOS);
fdprintf(fd, " uwTCP_TotalIN: %08lx\r", rec->uwTCP_TotalIN);
fdprintf(fd, " uwTCP_TotalOUT: %08lx\r", rec->uwTCP_TotalOUT);
fprintf(fp, " uwTCPMaxSendSeg: %04x\r", rec->uwTCPMaxSendSeg);
fprintf(fp, " uwTCPMaxReceiveSeg: %04x\r", rec->uwTCPMaxReceiveSeg);
fprintf(fp, " uwTCPDataInQ: %08lx\r", rec->uwTCPDataInQ);
fprintf(fp, " uwTCPDataIn: %08lx\r", rec->uwTCPDataIn);
fprintf(fp, " uwTCPPushInFlag: %04x\r", rec->uwTCPPushInFlag);
fprintf(fp, " uwTCPPushInOffset: %08lx\r", rec->uwTCPPushInOffset);
fprintf(fp, " uwTCPPushOutFlag: %04x\r", rec->uwTCPPushOutFlag);
fprintf(fp, " uwTCPPushOutSEQ: %08lx\r", rec->uwTCPPushOutSEQ);
fprintf(fp, " uwTCPDataOut: %08lx\r", rec->uwTCPDataOut);
fprintf(fp, " uwSND_UNA: %08lx\r", rec->uwSND_UNA);
fprintf(fp, " uwSND_NXT: %08lx\r", rec->uwSND_NXT);
fprintf(fp, " uwSND_WND: %04x\r", rec->uwSND_WND);
fprintf(fp, " uwSND_UP: %04x\r", rec->uwSND_UP);
fprintf(fp, " uwSND_WL1: %08lx\r", rec->uwSND_WL1);
fprintf(fp, " uwSND_WL2: %08lx\r", rec->uwSND_WL2);
fprintf(fp, " uwISS: %08lx\r", rec->uwISS);
fprintf(fp, " uwRCV_NXT: %08lx\r", rec->uwRCV_NXT);
fprintf(fp, " uwRCV_WND: %04x\r", rec->uwRCV_WND);
fprintf(fp, " uwRCV_UP: %04x\r", rec->uwRCV_UP);
fprintf(fp, " uwIRS: %08lx\r", rec->uwIRS);
fprintf(fp, " uwTCP_State: %04x\r", rec->uwTCP_State);
fprintf(fp, " uwTCP_StateTick: %08lx\r", rec->uwTCP_StateTick);
fprintf(fp, " uwTCP_ErrCode: %04x\r", rec->uwTCP_ErrCode);
fprintf(fp, " uwTCP_ICMPError: %04x\r", rec->uwTCP_ICMPError);
fprintf(fp, " uwTCP_Server: %04x\r", rec->uwTCP_Server);
fprintf(fp, " uwTCP_ChildList: %08lx\r", rec->uwTCP_ChildList);
fprintf(fp, " uwTCP_ACKPending: %04x\r", rec->uwTCP_ACKPending);
fprintf(fp, " uwTCP_ForceFIN: %04x\r", rec->uwTCP_ForceFIN);
fprintf(fp, " uwTCP_FINSEQ: %08lx\r", rec->uwTCP_FINSEQ);
fprintf(fp, " uwTCP_MyFINACKed: %04x\r", rec->uwTCP_MyFINACKed);
fprintf(fp, " uwTCP_Timer: %08lx\r", rec->uwTCP_Timer);
fprintf(fp, " uwTCP_TimerState: %04x\r", rec->uwTCP_TimerState);
fprintf(fp, " uwTCP_rt_timer: %04x\r", rec->uwTCP_rt_timer);
fprintf(fp, " uwTCP_2MSL_timer: %04x\r", rec->uwTCP_2MSL_timer);
fprintf(fp, " uwTCP_SaveTTL: %04x\r", rec->uwTCP_SaveTTL);
fprintf(fp, " uwTCP_SaveTOS: %04x\r", rec->uwTCP_SaveTOS);
fprintf(fp, " uwTCP_TotalIN: %08lx\r", rec->uwTCP_TotalIN);
fprintf(fp, " uwTCP_TotalOUT: %08lx\r", rec->uwTCP_TotalOUT);
fdprintf(fd, " uwUDP_Server : %04x\r", rec->uwUDP_Server);
fdprintf(fd, " uwUDPQueue : %08lx\r", rec->uwUDPQueue);
fdprintf(fd, " uwUDPError : %04x\r", rec->uwUDPError);
fdprintf(fd, " uwUDPErrorTick : %08lx\r", rec->uwUDPErrorTick);
fdprintf(fd, " uwUDPCount : %08lx\r", rec->uwUDPCount);
fprintf(fp, " uwUDP_Server : %04x\r", rec->uwUDP_Server);
fprintf(fp, " uwUDPQueue : %08lx\r", rec->uwUDPQueue);
fprintf(fp, " uwUDPError : %04x\r", rec->uwUDPError);
fprintf(fp, " uwUDPErrorTick : %08lx\r", rec->uwUDPErrorTick);
fprintf(fp, " uwUDPCount : %08lx\r", rec->uwUDPCount);
fdprintf(fd, " uwTriggers[0]: %08lx\r", rec->uwTriggers[0]);
fdprintf(fd, " uwSysTriggers[0]: %08lx\r", rec->uwSysTriggers[0]);
fprintf(fp, " uwTriggers[0]: %08lx\r", rec->uwTriggers[0]);
fprintf(fp, " uwSysTriggers[0]: %08lx\r", rec->uwSysTriggers[0]);