Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

1175 lines
36 KiB

/*++
Copyright (c) 1998-1999 Microsoft Corporation
Module Name:
kdps.c
Abstract:
Packet scheduler KD extension
Author:
Rajesh Sundaram (1st Aug, 1998)
Revision History:
--*/
#include "precomp.h"
#include <winsock.h>
//
// forwards
//
//
// globals
//
PCHAR AdapterMode[] = {
"",
"Diffserv",
"RSVP"
};
PCHAR AdapterState[] = {
"",
"AdapterStateInitializing",
"AdapterStateRunning",
"AdapterStateWaiting",
"AdapterStateDisabled",
"AdapterStateClosing",
"AdapterStateClosed"
};
/* forwards */
VOID
DumpAdapterStats(
PPS_ADAPTER_STATS Stats,
PCHAR Indent
);
/* end forwards */
DllInit(
HANDLE hModule,
DWORD dwReason,
DWORD dwReserved
)
{
switch (dwReason) {
case DLL_THREAD_ATTACH:
break;
case DLL_THREAD_DETACH:
break;
case DLL_PROCESS_DETACH:
break;
case DLL_PROCESS_ATTACH:
break;
}
return TRUE;
}
DECLARE_API( adapter )
/*
* dump a PS adapter structure
*/
{
PADAPTER TargetAdapter;
ADAPTER LocalAdapter;
PADAPTER LastAdapter;
LIST_ENTRY LocalListHead;
PLIST_ENTRY TargetListHead;
PWSTR PSName;
PWSTR MPName;
PWSTR WMIName;
PWSTR ProfileName;
PWSTR RegistryPath;
BOOLEAN DumpAllAdapters = FALSE;
ULONG bytes;
if ( *args == '\0' ) {
//
// run down the adapter list, dumping the contents of each one
//
TargetListHead = (PLIST_ENTRY)GetExpression( "PSCHED!AdapterList" );
if ( !TargetListHead ) {
dprintf("Can't convert psched!AdapterList symbol\n");
return;
}
PSName = 0;
MPName = 0;
WMIName = 0;
ProfileName = 0;
RegistryPath = 0;
//
// read adapter listhead out of target's memory
//
KD_READ_MEMORY(TargetListHead, &LocalListHead, sizeof(LIST_ENTRY));
TargetAdapter = (PADAPTER)LocalListHead.Flink;
LastAdapter = (PADAPTER)TargetListHead;
DumpAllAdapters = TRUE;
} else {
TargetAdapter = (PADAPTER)GetExpression( args );
if ( !TargetAdapter ) {
dprintf("bad string conversion (%s) \n", args );
return;
}
LastAdapter = 0;
}
while ( TargetAdapter != LastAdapter ) {
//
// read adapter struct out of target's memory
//
KD_READ_MEMORY(TargetAdapter, &LocalAdapter, sizeof(ADAPTER));
PSName = 0;
MPName = 0;
WMIName = 0;
ProfileName = 0;
RegistryPath = 0;
//
// alloc some mem for the PS and MP device names and get them too
//
if(LocalAdapter.UpperBinding.Length) {
bytes = ( LocalAdapter.UpperBinding.Length + 1);
PSName = (PWSTR)malloc( bytes );
if ( PSName != NULL ) {
KD_READ_MEMORY(LocalAdapter.UpperBinding.Buffer, PSName, bytes-1);
}
}
if(LocalAdapter.MpDeviceName.Length) {
bytes = ( LocalAdapter.MpDeviceName.Length + 1);
MPName = (PWSTR)malloc( bytes );
if ( MPName != NULL ) {
KD_READ_MEMORY((ULONG)(LocalAdapter.MpDeviceName.Buffer),
MPName,
bytes-1);
}
}
if(LocalAdapter.WMIInstanceName.Length) {
bytes = ( LocalAdapter.WMIInstanceName.Length + 1);
WMIName = (PWSTR)malloc( bytes );
if ( WMIName != NULL ) {
KD_READ_MEMORY(LocalAdapter.WMIInstanceName.Buffer, WMIName, bytes-1);
}
}
if(LocalAdapter.ProfileName.Length) {
bytes = ( LocalAdapter.ProfileName.Length + 1 );
ProfileName = (PWSTR)malloc( bytes );
if ( ProfileName != NULL ) {
KD_READ_MEMORY(LocalAdapter.ProfileName.Buffer, ProfileName, bytes-1);
}
}
if(LocalAdapter.RegistryPath.Length) {
bytes = ( LocalAdapter.RegistryPath.Length + 1 );
RegistryPath = (PWSTR)malloc( bytes );
if ( RegistryPath != NULL ) {
KD_READ_MEMORY(LocalAdapter.RegistryPath.Buffer, RegistryPath, bytes-1);
}
}
dprintf( "\nAdapter @ %08X \n\n", TargetAdapter);
dprintf( " Next Adapter @ %08X ", &TargetAdapter->Linkage);
if(&TargetAdapter->Linkage == LocalAdapter.Linkage.Flink) {
dprintf(" (empty) ");
}
dprintf( " \n");
dprintf( " Lock @ %08X\n", &TargetAdapter->Lock);
dprintf( " RefCount = %d\n", LocalAdapter.RefCount );
dprintf( " MpDeviceName = %ws \n", MPName);
dprintf( " UpperBinding = %ws \n", PSName);
dprintf( " WMIInstanceName = %ws \n", WMIName);
dprintf( " ProfileName = %ws \n", ProfileName);
dprintf( " RegistryPath = %ws \n", RegistryPath);
dprintf( " MiniportHandle (PsNdisHandle) = %x \n", LocalAdapter.PsNdisHandle);
dprintf( " BindingHandle (LowerMpHandle) = %x \n", LocalAdapter.LowerMpHandle);
dprintf( " Outstanding NDIS request = %d \n", LocalAdapter.OutstandingNdisRequests);
dprintf( " ShutdownMask = \n");
if(LocalAdapter.ShutdownMask & SHUTDOWN_CLOSE_WAN_ADDR_FAMILY)
dprintf(" SHUTDOWN_CLOSE_WAN_ADDR_FAMILY \n");
if(LocalAdapter.ShutdownMask & SHUTDOWN_DELETE_PIPE )
dprintf(" SHUTDOWN_DELETE_PIPE \n");
if(LocalAdapter.ShutdownMask & SHUTDOWN_FREE_PS_CONTEXT )
dprintf(" SHUTDOWN_FREE_PS_CONTEXT \n");
if(LocalAdapter.ShutdownMask & SHUTDOWN_UNBIND_CALLED )
dprintf(" SHUTDOWN_UNBIND_CALLED \n");
if(LocalAdapter.ShutdownMask & SHUTDOWN_MPHALT_CALLED )
dprintf(" SHUTDOWN_MPHALT_CALLED \n");
if(LocalAdapter.ShutdownMask & SHUTDOWN_CLEANUP_ADAPTER )
dprintf(" SHUTDOWN_CLEANUP_ADAPTER \n");
if(LocalAdapter.ShutdownMask & SHUTDOWN_PROTOCOL_UNLOAD )
dprintf(" SHUTDOWN_PROTOCOL_UNLOAD \n");
if(LocalAdapter.ShutdownMask & SHUTDOWN_BIND_CALLED )
dprintf(" SHUTDOWN_BIND_CALLED \n");
if(LocalAdapter.ShutdownMask & SHUTDOWN_MPINIT_CALLED )
dprintf(" SHUTDOWN_MPINIT_CALLED \n");
if(!DumpAllAdapters) {
dprintf( " IpNetAddressList @ %08X \n", LocalAdapter.IpNetAddressList);
dprintf( " IpxNetAddressList @ %08X \n", LocalAdapter.IpxNetAddressList);
dprintf( " PsMpState = %s\n", AdapterState [ LocalAdapter.PsMpState]);
dprintf( " BlockingEvent @ %08X\n", &TargetAdapter->BlockingEvent );
dprintf( " FinalStatus = %08X\n", LocalAdapter.FinalStatus );
dprintf( " Media Type = %d\n", LocalAdapter.MediaType );
dprintf( " Total Size = %d\n", LocalAdapter.TotalSize );
dprintf( " HeaderSize = %d\n", LocalAdapter.HeaderSize );
dprintf( " IPHeaderOffset = %d\n", LocalAdapter.IPHeaderOffset );
dprintf( "\n");
dprintf( " Admission Control details \n");
dprintf( " ------------------------- \n");
dprintf( " RawLinkSpeed = %d \n", LocalAdapter.RawLinkSpeed);
dprintf( " BestEffortLimit = %d \n", LocalAdapter.BestEffortLimit);
dprintf( " NonBestEffortLimit = %d \n", LocalAdapter.NonBestEffortLimit);
dprintf( " ReservationLimitValue = %d \n", LocalAdapter.ReservationLimitValue);
dprintf( " Link Speed = %dbps\n", LocalAdapter.LinkSpeed);
dprintf( " RemainingBandWidth = %dBps\n", LocalAdapter.RemainingBandWidth );
dprintf( " VCIndex = %d\n", LocalAdapter.VcIndex.QuadPart );
dprintf( " PipeHasResources = %s \n", LocalAdapter.PipeHasResources ? "TRUE" : "FALSE");
dprintf( "\n");
dprintf( " NDIS Handles, etc \n");
dprintf( " ----------------- \n");
dprintf( " BindContext = %08X \n", LocalAdapter.BindContext);
dprintf( " Send PacketPoolHandle = %08X \n", LocalAdapter.SendPacketPool);
dprintf( " Recv PacketPoolHandle = %08X \n", LocalAdapter.RecvPacketPool);
dprintf( "\n");
dprintf( " Best Effort VC \n");
dprintf( " -------------- \n");
dprintf( " BestEffortVc = %08X \n", &TargetAdapter->BestEffortVc);
dprintf( " GPC Client VC List @ %08X ", &TargetAdapter->GpcClientVcList);
if(&TargetAdapter->GpcClientVcList == LocalAdapter.GpcClientVcList.Flink)
{
dprintf( " (empty) ");
}
dprintf("\n");
dprintf( " CfinfosInstalled = %d \n", LocalAdapter.CfInfosInstalled);
dprintf( " FlowsInstalled = %d \n", LocalAdapter.FlowsInstalled);
dprintf( " \n");
dprintf( " Scheduling Components \n");
dprintf( " --------------------- \n");
dprintf( " PsComponent = %08X \n", LocalAdapter.PsComponent);
dprintf( " PsPipeContext = %08X \n", LocalAdapter.PsPipeContext);
dprintf( " PipeContextLength = %d \n", LocalAdapter.PipeContextLength);
dprintf( " FlowContextLength = %d \n", LocalAdapter.FlowContextLength);
dprintf( " PacketContextLength = %d \n", LocalAdapter.PacketContextLength);
dprintf( " ClassMapContextLength = %d \n", LocalAdapter.ClassMapContextLength);
dprintf( " PipeFlags = %08X\n", LocalAdapter.PipeFlags );
dprintf( " MaxOutstandingSends = 0x%08X \n", LocalAdapter.MaxOutstandingSends);
dprintf( "\n");
dprintf( "\n");
dprintf( " NDISWAN \n");
dprintf( " ------- \n");
dprintf( " WanCmHandle = %08X \n", LocalAdapter.WanCmHandle);
dprintf( " WanBindingState = %08X \n", LocalAdapter.WanBindingState);
dprintf( " WanLinkCount = %08X \n", LocalAdapter.WanLinkCount);
dprintf( " WanLinkList @ %08X ", &TargetAdapter->WanLinkList);
if(&TargetAdapter->WanLinkList == LocalAdapter.WanLinkList.Flink) {
dprintf( " (empty) \n");
}
else {
dprintf( " Next = %08X \n", LocalAdapter.WanLinkList.Flink);
}
dprintf( " ISSLOWPacketSize = %08X \n", LocalAdapter.ISSLOWPacketSize);
dprintf( " ISSLOWFragmentSize = %08X \n", LocalAdapter.ISSLOWFragmentSize);
dprintf( " ISSLOWTokenRate = %08X \n", LocalAdapter.ISSLOWTokenRate);
dprintf("\n");
dprintf( " Adaptermode = %s \n", AdapterMode[LocalAdapter.AdapterMode]);
}
dprintf( "\n" );
if ( PSName != NULL )
free( PSName );
if ( MPName != NULL )
free( MPName );
if ( WMIName != NULL)
free ( WMIName);
if ( RegistryPath != NULL)
free(RegistryPath);
if ( ProfileName != NULL)
free(ProfileName);
if ( !DumpAllAdapters ) {
break;
} else {
TargetAdapter = (PADAPTER)LocalAdapter.Linkage.Flink;
}
if (CheckControlC()) {
return;
}
}
} // adapter
DECLARE_API( cvc )
{
GPC_CLIENT_VC LocalClientVC;
PGPC_CLIENT_VC TargetClientVC;
if ( *args == '\0' ) {
dprintf("ClientVC <address of ClientVC structure>\n");
return;
}
TargetClientVC = (PGPC_CLIENT_VC)GetExpression( args );
if ( !TargetClientVC) {
dprintf("bad string conversion (%s) \n", args );
return;
}
//
// read ClientVC struct out of target's memory
//
KD_READ_MEMORY(TargetClientVC, &LocalClientVC, sizeof(GPC_CLIENT_VC));
DumpGpcClientVc("", TargetClientVC, &LocalClientVC);
} // cvc
DECLARE_API( astats )
/*
* dump an adapter's stats structure
*/
{
PADAPTER TargetAdapter;
ADAPTER LocalAdapter;
PADAPTER LastAdapter;
LIST_ENTRY LocalListHead;
PLIST_ENTRY TargetListHead;
PWSTR Name;
BOOLEAN DumpAllAdapters = FALSE;
ULONG bytes;
if ( *args == '\0' ) {
//
// run down the adapter list, dumping the contents of each one
//
TargetListHead = (PLIST_ENTRY)GetExpression( "psched!AdapterList" );
if ( !TargetListHead ) {
dprintf("Can't convert psched!AdapterList symbol\n");
return;
}
//
// read adapter listhead out of target's memory
//
KD_READ_MEMORY(TargetListHead, &LocalListHead, sizeof(LIST_ENTRY));
TargetAdapter = (PADAPTER)LocalListHead.Flink;
LastAdapter = (PADAPTER)TargetListHead;
DumpAllAdapters = TRUE;
} else {
TargetAdapter = (PADAPTER)GetExpression( args );
if ( !TargetAdapter ) {
dprintf("bad string conversion (%s) \n", args );
return;
}
LastAdapter = 0;
}
while ( TargetAdapter != LastAdapter ) {
//
// read adapter struct out of target's memory
//
KD_READ_MEMORY(TargetAdapter, &LocalAdapter, sizeof(ADAPTER));
//
// alloc some mem for the name and get that too
//
bytes = ( LocalAdapter.WMIInstanceName.Length + 1 ) * sizeof( WCHAR );
Name = (PWSTR)malloc( bytes );
if ( Name != NULL ) {
KD_READ_MEMORY(((PADAPTER)TargetAdapter+1), Name, bytes);
}
dprintf( "\nAdapter Stats @ %08X (%ws)\n\n", TargetAdapter, Name );
DumpAdapterStats( &LocalAdapter.Stats, " " );
if ( Name != NULL )
free( Name );
if ( !DumpAllAdapters ) {
break;
} else {
TargetAdapter = (PADAPTER)LocalAdapter.Linkage.Flink;
}
if (CheckControlC()) {
return;
}
}
} // astats
VOID
DumpAdapterStats(
PPS_ADAPTER_STATS Stats,
PCHAR Indent
)
{
dprintf( "%sOut of Packets = %d\n", Indent, Stats->OutOfPackets );
dprintf( "%sFlows Opened = %d\n", Indent, Stats->FlowsOpened );
dprintf( "%sFlows Closed = %d\n", Indent, Stats->FlowsClosed );
dprintf( "%sFlows Rejected = %d\n", Indent, Stats->FlowsRejected );
dprintf( "%sFlows Modified = %d\n", Indent, Stats->FlowsModified );
dprintf( "%sFlows ModsRejected = %d\n", Indent, Stats->FlowModsRejected );
dprintf( "%sFlows MaxSimultaneousFlows = %d\n", Indent, Stats->MaxSimultaneousFlows );
}
DECLARE_API( help )
{
dprintf("PS kd extensions\n\n");
dprintf("adapter [address] - dump adapter structure\n");
dprintf("astats [adapter address] - dump adapter stats\n");
dprintf("cvc <address> - dump client VC struct\n");
dprintf("diff <address> - dump diffserv mapping \n");
dprintf("fstats [vc address] - dump VC stats\n");
dprintf("help - This help screen \n");
dprintf("iph <address> - Dumps the IP header \n");
dprintf("list <address> - Dumps the entries of a list \n");
dprintf("lock <address> - Dumps the lock info \n");
dprintf("ndisp <address> - Dumps the NDIS_PACKET \n");
dprintf("netl <address> - Dumps the NETWORK_ADDRESS_LIST structure \n");
dprintf("psdso Struct [<address>] - Structo on the structure \n");
dprintf("tt [<filename>] - Dumps psched log on c:\\tmp\\<filename> or stdout \n");
dprintf("upri <address> - Dumps the 802.1p value \n");
dprintf("vc <adapter address> - Dumps the list of VCs on an adapter \n");
dprintf("version - Displays version information \n");
dprintf("wan <adapter address> - Dumps the list of WanLinks on an adapter \n");
dprintf("wanlink <address> - Dumps the Wanlink Structure\n");
}
DECLARE_API( ndisp )
{
PNDIS_PACKET TargetPacket;
NDIS_PACKET LocalPacket;
MDL *CurrentMdl;
LONG MDLCnt = 0;
if ( *args == '\0' ) {
dprintf("ndisp <address of NDIS_PACKET> \n");
return;
}
TargetPacket = (PNDIS_PACKET)GetExpression( args );
if ( !TargetPacket ) {
dprintf("bad string conversion (%s) \n", args );
return;
}
//
// read client struct out of target's memory
//
KD_READ_MEMORY((ULONG)TargetPacket, &LocalPacket, sizeof(NDIS_PACKET));
dprintf("\nNDIS_PACKET @ %08X \n", TargetPacket);
dprintf(" Private \n");
dprintf(" Physical Count : 0x%x (%d) \n", LocalPacket.Private.PhysicalCount,
LocalPacket.Private.PhysicalCount);
dprintf(" TotalLength : 0x%x (%d) \n", LocalPacket.Private.TotalLength,
LocalPacket.Private.TotalLength);
dprintf(" Head : 0x%x \n", LocalPacket.Private.Head);
dprintf(" Tail : 0x%x \n", LocalPacket.Private.Tail);
dprintf(" Pool : 0x%x \n", LocalPacket.Private.Pool);
dprintf(" Count : 0x%x (%d) \n", LocalPacket.Private.Count,
LocalPacket.Private.Count);
dprintf(" Flags : 0x%x (%d) \n", LocalPacket.Private.Flags,
LocalPacket.Private.Flags);
dprintf(" ValidCounts : 0x%x (%d) \n", LocalPacket.Private.ValidCounts,
LocalPacket.Private.ValidCounts);
dprintf(" NdisPacketFlags : 0x%x (%d) \n", LocalPacket.Private.NdisPacketFlags,
LocalPacket.Private.NdisPacketFlags);
dprintf(" NdisPacketOobOffset : 0x%x (%d) \n", LocalPacket.Private.NdisPacketOobOffset,
LocalPacket.Private.NdisPacketOobOffset);
CurrentMdl = LocalPacket.Private.Head;
while(CurrentMdl != 0) {
MDL *TargetMdl;
MDL LocalMdl;
dprintf("\n MDL # %d\n", ++MDLCnt);
TargetMdl = CurrentMdl;
if ( !TargetMdl ) {
dprintf("bad string conversion (%s) \n", CurrentMdl );
return;
}
//
// read client struct out of target's memory
//
KD_READ_MEMORY( TargetMdl, &LocalMdl, sizeof(MDL));
dprintf(" Next : 0x%x \n", LocalMdl.Next);
dprintf(" Size : 0x%x (%d) \n", LocalMdl.Size, LocalMdl.Size);
dprintf(" MdlFlags : 0x%x (%d) \n", LocalMdl.MdlFlags,
LocalMdl.MdlFlags);
dprintf(" Process : 0x%x \n", LocalMdl.Process);
dprintf(" MappedSystemVa : 0x%x \n", LocalMdl.MappedSystemVa);
dprintf(" StartVa : 0x%x \n", LocalMdl.StartVa);
dprintf(" ByteCount : 0x%x (%d) \n", LocalMdl.ByteCount,
LocalMdl.ByteCount);
dprintf(" ByteOffset : 0x%x (%d) \n", LocalMdl.ByteOffset,
LocalMdl.ByteOffset);
CurrentMdl = LocalMdl.Next;
}
}
DECLARE_API(iph)
{
IPHeader *TargetPacket;
IPHeader LocalPacket;
LONG MDLCnt = 0;
if ( *args == '\0' ) {
dprintf("iph <address of IP header> \n");
return;
}
TargetPacket = (IPHeader *) GetExpression( args );
if ( !TargetPacket ) {
dprintf("bad string conversion (%s) \n", args );
return;
}
//
// read client struct out of target's memory
//
KD_READ_MEMORY(TargetPacket, &LocalPacket, sizeof(IPHeader));
dprintf("IPHeader @ %08X \n", TargetPacket);
dprintf(" Version : %x \n", (LocalPacket.iph_verlen >> 4 ) & 0x0f);
dprintf(" Header Length : %x \n", LocalPacket.iph_verlen & 0x0f);
dprintf(" TOS : %x \n", LocalPacket.iph_tos);
dprintf(" Length : %x \n", ntohs(LocalPacket.iph_length));
dprintf(" ID : %x \n", ntohs(LocalPacket.iph_id));
dprintf(" Offset : %x \n", ntohs(LocalPacket.iph_offset));
dprintf(" TTL : %x \n", LocalPacket.iph_ttl);
dprintf(" Protocol : ");
switch(LocalPacket.iph_protocol) {
case 1:
dprintf("ICMP (%d) \n", LocalPacket.iph_protocol);
break;
case 2:
dprintf("IGMP (%d) \n", LocalPacket.iph_protocol);
break;
case 6:
dprintf("TCP (%d) \n", LocalPacket.iph_protocol);
break;
case 17:
dprintf("UDP (%d) \n", LocalPacket.iph_protocol);
break;
default:
dprintf("Unknown (%d) \n", LocalPacket.iph_protocol);
break;
}
//
// Validate Header checksum
//
dprintf(" Checksum : %x ", LocalPacket.iph_xsum);
if(IPHeaderXsum(&LocalPacket, sizeof(IPHeader)) == 0) {
dprintf("(Good) \n");
}
else {
dprintf("(Bad) \n");
}
{
struct in_addr ip;
ip.s_addr = LocalPacket.iph_src;
dprintf(" Source : %s \n", inet_ntoa(ip));
ip.s_addr = LocalPacket.iph_dest;
dprintf(" Dest : %s \n", inet_ntoa(ip));
}
}
DECLARE_API( upri )
{
PNDIS_PACKET TargetPacket;
NDIS_PACKET LocalPacket;
MDL *CurrentMdl;
LONG MDLCnt = 0;
NDIS_PACKET_EXTENSION PerPacketInfo;
if ( *args == '\0' ) {
dprintf("ndisp <address of NDIS_PACKET> \n");
return;
}
TargetPacket = (PNDIS_PACKET)GetExpression( args );
if ( !TargetPacket ) {
dprintf("bad string conversion (%s) \n", args );
return;
}
//
// read client struct out of target's memory
//
KD_READ_MEMORY(TargetPacket, &LocalPacket, sizeof(NDIS_PACKET));
TargetPacket = (PNDIS_PACKET)((PUCHAR)TargetPacket +
LocalPacket.Private.NdisPacketOobOffset +
sizeof(NDIS_PACKET_OOB_DATA));
KD_READ_MEMORY(TargetPacket, &PerPacketInfo, sizeof(NDIS_PACKET_EXTENSION));
dprintf("802.1p Priority in packet is 0x%x \n",
PerPacketInfo.NdisPacketInfo[Ieee8021pPriority]);
return;
}
DECLARE_API( wanlink )
{
PPS_WAN_LINK Target;
PS_WAN_LINK Local;
PCHAR DialUsage[] = {"DU_CALLIN", "DU_CALLOUT", "DU_ROUTER"};
if ( *args == '\0' ) {
dprintf("wanlink <address of wanlink> \n");
return;
}
Target= (PPS_WAN_LINK) GetExpression( args );
if ( !Target) {
dprintf("bad string conversion (%s) \n", args );
return;
}
//
// read client struct out of target's memory
//
KD_READ_MEMORY(Target, &Local, sizeof(PS_WAN_LINK));
dprintf("WanLink @ %08X \n", Target);
dprintf(" RefCount : %d \n", Local.RefCount);
dprintf(" Dial Usage : %s \n", DialUsage[Local.DialUsage]);
dprintf(" RawLinkSpeed : %d \n", Local.RawLinkSpeed);
dprintf(" LinkSpeed : %d \n", Local.LinkSpeed);
dprintf(" Lock : 0x%x \n", Local.Lock);
dprintf(" Stats @ 0x%x \n", &Target->Stats);
dprintf(" Addresses \n");
dprintf(" --------- \n");
dprintf(" Remote Address : %02x:%02x:%02x:%02x:%02x:%02x \n",
Local.OriginalRemoteMacAddress[0], Local.OriginalRemoteMacAddress[1],
Local.OriginalRemoteMacAddress[2], Local.OriginalRemoteMacAddress[3],
Local.OriginalRemoteMacAddress[4], Local.OriginalRemoteMacAddress[5]);
dprintf(" Local Address : %02x:%02x:%02x:%02x:%02x:%02x \n",
Local.OriginalLocalMacAddress[0], Local.OriginalLocalMacAddress[1],
Local.OriginalLocalMacAddress[2], Local.OriginalLocalMacAddress[3],
Local.OriginalLocalMacAddress[4], Local.OriginalLocalMacAddress[5]);
dprintf(" Protocol \n");
dprintf(" -------- \n");
dprintf(" ProtocolType : ");
switch(Local.ProtocolType) {
case PROTOCOL_IP:
{
struct in_addr ip;
dprintf("IP \n");
ip.s_addr = Local.LocalIpAddress;
dprintf(" Address (Local) : %s \n", inet_ntoa(ip));
ip.s_addr = Local.RemoteIpAddress;
dprintf(" Address (Remote) : %s \n", inet_ntoa(ip));
}
break;
case PROTOCOL_IPX:
dprintf("IPX \n");
dprintf(" Address (Local) : %d \n", Local.LocalIpxAddress);
dprintf(" Address (Remote) : %d \n", Local.RemoteIpxAddress);
break;
default:
dprintf("Unknown \n");
break;
}
return;
}
DECLARE_API( vc )
/*
* dump all the VCs on an adapter
*/
{
PADAPTER TargetAdapter;
ADAPTER LocalAdapter;
PGPC_CLIENT_VC Target;
GPC_CLIENT_VC Local;
LIST_ENTRY TargetList;
PLIST_ENTRY pL;
ULONG bytes;
if ( *args != '\0' ) {
TargetAdapter = (PADAPTER)GetExpression( args );
if ( !TargetAdapter ) {
dprintf("bad string conversion (%s) \n", args );
return;
}
//
// read adapter struct out of target's memory
//
KD_READ_MEMORY(TargetAdapter, &LocalAdapter, sizeof(ADAPTER));
TargetList = LocalAdapter.GpcClientVcList;
pL = (PLIST_ENTRY) TargetList.Flink;
while ( pL != &TargetAdapter->GpcClientVcList) {
//
// read ClientVC struct out of target's memory
//
Target = CONTAINING_RECORD(pL, GPC_CLIENT_VC, Linkage);
KD_READ_MEMORY(Target, &Local, sizeof(GPC_CLIENT_VC));
dprintf(" ---------------------------------------------- \n");
dprintf( " GpcClientVc @ %08X: State %d, Flags 0x%x, Ref %d \n\n", Target,
Local.ClVcState, Local.Flags, Local.RefCount);
pL = Local.Linkage.Flink;
}
}
}
DECLARE_API(fstats)
{
GPC_CLIENT_VC LocalClientVC;
PGPC_CLIENT_VC TargetClientVC;
if ( *args == '\0' ) {
dprintf("Flow Stats <address of ClientVC structure>\n");
return;
}
TargetClientVC = (PGPC_CLIENT_VC) GetExpression( args );
if ( !TargetClientVC) {
dprintf("bad string conversion (%s) \n", args );
return;
}
//
// read ClientVC struct out of target's memory
//
KD_READ_MEMORY(TargetClientVC, &LocalClientVC, sizeof(GPC_CLIENT_VC));
dprintf( " Stats for Vc %x \n", TargetClientVC);
dprintf( " ----------------- \n");
dprintf( " VC Stats \n");
dprintf( " Dropped Packets = %d \n", LocalClientVC.Stats.DroppedPackets);
dprintf( " Packets Scheduled = %d \n", LocalClientVC.Stats.PacketsScheduled);
dprintf( " Packets Transmitted = %d \n", LocalClientVC.Stats.PacketsTransmitted);
dprintf( " Bytes Transmitted = %ld\n", LocalClientVC.Stats.BytesTransmitted.QuadPart);
dprintf( " Bytes Scheduled = %ld\n", LocalClientVC.Stats.BytesScheduled.QuadPart);
dprintf( " Conformr Stats \n");
dprintf( " Shaper stats \n");
dprintf( " SequencerStats \n");
}
DECLARE_API(netl)
{
PNETWORK_ADDRESS_LIST Target;
NETWORK_ADDRESS_LIST Local;
LONG i;
if ( *args == '\0' ) {
dprintf("netl <address>\n");
return;
}
Target = (PNETWORK_ADDRESS_LIST) GetExpression( args );
if ( !Target) {
dprintf("bad string conversion (%s) \n", args );
return;
}
//
// read ClientVC struct out of target's memory
//
KD_READ_MEMORY(Target, &Local, FIELD_OFFSET(NETWORK_ADDRESS_LIST,Address));
dprintf("Network Address List @ 0x%x \n", Target);
dprintf(" AddressCount = %d \n", Local.AddressCount);
dprintf(" AddressType = %d \n\n", Local.AddressType);
Target = (PNETWORK_ADDRESS_LIST)((PUCHAR)Target + FIELD_OFFSET(NETWORK_ADDRESS_LIST, Address));
for(i=0; i<Local.AddressCount; i++)
{
NETWORK_ADDRESS_IP ipAddr;
NETWORK_ADDRESS_IPX ipxAddr;
NETWORK_ADDRESS LocalN;
//
// Parse the NETWORK_ADDRESS
//
KD_READ_MEMORY(Target, &LocalN, FIELD_OFFSET(NETWORK_ADDRESS, Address));
dprintf(" AddressLength = %d \n", LocalN.AddressLength);
dprintf(" AddressType = %d \n", LocalN.AddressType);
//
// Read the Address
//
Target = (PNETWORK_ADDRESS_LIST)((PUCHAR)Target + FIELD_OFFSET(NETWORK_ADDRESS, Address));
switch(LocalN.AddressType)
{
case NDIS_PROTOCOL_ID_TCP_IP:
{
struct in_addr ip;
KD_READ_MEMORY(Target, &ipAddr, sizeof(NETWORK_ADDRESS_IP));
ip.s_addr = ipAddr.in_addr;
dprintf(" sin_port = %d \n", ipAddr.sin_port);
dprintf(" in_addr = %s \n", inet_ntoa(ip));
break;
}
default:
dprintf(" *** ERROR : Unrecognized protocol \n");
break;
}
dprintf(" ---------------------------- \n");
}
}
DECLARE_API( wan )
/*
* dump all the VCs on an adapter
*/
{
PADAPTER TargetAdapter;
ADAPTER LocalAdapter;
PPS_WAN_LINK Target;
PS_WAN_LINK Local;
LIST_ENTRY TargetList;
PLIST_ENTRY pL;
ULONG bytes;
if ( *args != '\0' ) {
TargetAdapter = (PADAPTER)GetExpression( args );
if ( !TargetAdapter ) {
dprintf("bad string conversion (%s) \n", args );
return;
}
//
// read adapter struct out of target's memory
//
KD_READ_MEMORY(TargetAdapter, &LocalAdapter, sizeof(ADAPTER));
TargetList = LocalAdapter.WanLinkList;
pL = (PLIST_ENTRY) TargetList.Flink;
while ( pL != &TargetAdapter->WanLinkList) {
//
// read ClientVC struct out of target's memory
//
Target = CONTAINING_RECORD(pL, PS_WAN_LINK, Linkage);
KD_READ_MEMORY(Target, &Local, sizeof(PS_WAN_LINK));
dprintf(" ---------------------------------------------- \n");
dprintf( " WanLink @ %08X\n\n", Target);
pL = Local.Linkage.Flink;
}
}
}
DECLARE_API( lock )
{
#if DBG
PPS_SPIN_LOCK Target;
PS_SPIN_LOCK Local;
ULONG bytes;
if ( *args != '\0' ) {
Target = (PPS_SPIN_LOCK)GetExpression( args );
if ( !Target) {
dprintf("bad string conversion (%s) \n", args );
return;
}
//
// read adapter struct out of target's memory
//
KD_READ_MEMORY(Target, &Local, sizeof(PS_SPIN_LOCK));
if(Local.LockAcquired == TRUE)
{
dprintf(" Acquired : TRUE \n");
dprintf(" LastAcquiredFile : %s \n", Local.LastAcquiredFile);
dprintf(" LastAcquiredLine : %d \n", Local.LastAcquiredLine);
}
else
{
dprintf(" Acquired : FALSE \n");
dprintf(" LastReleasedFile : %s \n", Local.LastReleasedFile);
dprintf(" LastReleasedLine : %d \n", Local.LastReleasedLine);
}
}
return;
#endif
}
DECLARE_API(diff)
{
PDIFFSERV_MAPPING TargetA;
DIFFSERV_MAPPING LocalA;
int i;
if ( *args == '\0' )
{
dprintf("diff <address>\n");
return;
}
TargetA = (PDIFFSERV_MAPPING)GetExpression( args );
if ( !TargetA) {
dprintf("bad string conversion (%s) \n", args );
return;
}
dprintf("TOS : The Entire 8 bit DSField as it appears in the IP header \n");
dprintf("DSCP : The differentiated services code point (higher order 6 bits of above) \n");
dprintf("Prec : The precedence value (above field with bits swapped around \n");
dprintf("OC-TOS : The Entire 8 bit DS field on outbound packets for conforming packets\n");
dprintf("ONC-TOS: The Entire 8 bit DS field on outbound packets for non-conforming packets\n");
dprintf("\n");
dprintf("TOS DSCP Prec OC-TOS ONC-TOS VC \n");
dprintf("---------------------------------------------------------------------------------------\n");
for(i=0; i<PREC_MAX_VALUE; i++)
{
//
// read ClientVC struct out of target's memory
//
KD_READ_MEMORY(TargetA, &LocalA, sizeof(DIFFSERV_MAPPING));
TargetA = (PDIFFSERV_MAPPING)((PUCHAR)TargetA + sizeof(DIFFSERV_MAPPING));
//if(LocalA.Vc != 0)
{
dprintf("0x%2x 0x%2x 0x%2x 0x%2x 0x%2x 0x%8x\n",
i<<2,
i,
//BitShift(i),
0,
LocalA.ConformingOutboundDSField,
LocalA.NonConformingOutboundDSField,
LocalA.Vc);
}
}
dprintf("---------------------------------------------------------------------------------------\n");
}
DECLARE_API( list )
{
LIST_ENTRY Target, Local, TargetList;
PLIST_ENTRY head, pL;
ULONG bytes;
if ( *args != '\0' ) {
head = pL = (PLIST_ENTRY) GetExpression( args );
if ( !pL) {
dprintf("bad string conversion (%s) \n", args );
return;
}
//
// read adapter struct out of target's memory
//
KD_READ_MEMORY(pL, &Local, sizeof(LIST_ENTRY));
while ( Local.Flink != head)
{
pL = Local.Flink;
if(pL == 0)
{
dprintf("Local = %x %x \n", Local.Flink, Local.Blink);
}
else
{
dprintf("%x \n", pL);
}
KD_READ_MEMORY(pL, &Local, sizeof(LIST_ENTRY));
}
}
}