易语言小豪TPC模块源码 [db:版本]

小豪TPC模块易语言源码

系统结构:取TPC连接,GetDate,踢TPC连接,GetAscIP,GetProcessHeap,GetProcAddress,LoadLibrary,InternalGetTcpTable2,InternalGetUdpTableWithOwnerPid,AllocateAndGetUdpExTableFromStack,AllocateAndGetTcpExTableFromStack,inet_ntoa,ntohs,GetTcpTable,RtlMoveMemory_文本,Len_tcp,SetTcpEntry,lstrlen,HeapFree,

======程序集1
| |
| |------ 取TPC连接
| |
| |------ GetDate
| |
| |------ _启动子程序
| |
| |------ 踢TPC连接
| |
| |------ GetAscIP
| |
| |
======调用的Dll
| |
| |---[dll]------ GetProcessHeap
| |
| |---[dll]------ GetProcAddress
| |
| |---[dll]------ LoadLibrary
| |
| |---[dll]------ InternalGetTcpTable2
| |
| |---[dll]------ InternalGetUdpTableWithOwnerPid
| |
| |---[dll]------ AllocateAndGetUdpExTableFromStack
| |
| |---[dll]------ AllocateAndGetTcpExTableFromStack
| |
| |---[dll]------ inet_ntoa
| |
| |---[dll]------ ntohs
| |
| |---[dll]------ GetTcpTable
| |
| |---[dll]------ RtlMoveMemory_文本
| |
| |---[dll]------ Len_tcp
| |
| |---[dll]------ SetTcpEntry
| |
| |---[dll]------ lstrlen
| |
| |---[dll]------ HeapFree

调用的DLL命令:

.DLL命令 GetProcessHeap, 整数型, "kernel32.dll", "GetProcessHeap"

.DLL命令 GetProcAddress, 整数型, "kernel32.dll", "GetProcAddress"
.参数 hModule, 整数型
.参数 ProName, 文本型

.DLL命令 LoadLibrary, 整数型, "kernel32", "LoadLibraryA"
.参数 lpLibFileName, 文本型

.DLL命令 InternalGetTcpTable2, 整数型, "Iphlpapi.dll", "InternalGetTcpTable2"
.参数 pTcpTable_Vista, 整数型, 传址
.参数 heap, 整数型
.参数 flags, 整数型

.DLL命令 InternalGetUdpTableWithOwnerPid, 整数型, "Iphlpapi.dll", "InternalGetUdpTableWithOwnerPid"
.参数 pUdpTable, 整数型, 传址
.参数 heap, 整数型
.参数 flags, 整数型

.DLL命令 AllocateAndGetUdpExTableFromStack, 整数型, "Iphlpapi.dll", "AllocateAndGetUdpExTableFromStack"
.参数 ppUDPTable, 整数型, 传址
.参数 bOrder, 逻辑型
.参数 hHeap, 整数型
.参数 dwFlags, 整数型
.参数 dwFamily, 整数型

.DLL命令 AllocateAndGetTcpExTableFromStack, 整数型, "Iphlpapi.dll", "AllocateAndGetTcpExTableFromStack"
.参数 ppUDPTable, 整数型, 传址
.参数 bOrder, 逻辑型
.参数 hHeap, 整数型
.参数 dwFlags, 整数型
.参数 dwFamily, 整数型

.DLL命令 inet_ntoa, 整数型, "ws2_32.dll", "inet_ntoa"
.参数 IP, 整数型

.DLL命令 ntohs, 整数型, "ws2_32.dll", "ntohs", , 　
.参数 netshort, 短整数型

.DLL命令 GetTcpTable, 整数型, "IPHLPAPI.DLL", "GetTcpTable"
.参数 pTcpTable, MIB_TCPTABLE, 传址
.参数 pdwSize, 整数型, 传址
.参数 border, 整数型

.DLL命令 RtlMoveMemory_文本, , "kernel32", "RtlMoveMemory"
.参数 pDest, 文本型
.参数 pSrc, 整数型
.参数 ByteLen, 整数型

.DLL命令 Len_tcp, 整数型, "kernel32", "LocalSize", , 返回本地内存块大小
.参数 hMem, MIB_TCPTABLE

.DLL命令 SetTcpEntry, 整数型, "IPHLPAPI.DLL", "SetTcpEntry"
.参数 pTcpRow, MIB_TCPROW

.DLL命令 lstrlen, 整数型, "kernel32", "lstrlenA", , 返回字符串中字符数
.参数 lpString, 整数型

.DLL命令 HeapFree, 整数型, "kernel32", "HeapFree", , , HeapFree，释放从堆中分配的内存
.参数 hHeap, 整数型, , hHeap
.参数 dwFlags, 整数型, , dwFlags
.参数 lpMem, 整数型, , any，lpMem