易语言IPX通信源码

系统结构:工作线程,MAC字节集到文本,取本机MAC,十六进制到十进制,sendto,RecvFrom,bind,WSAStartup,WSACleanup,socket,WSAAsyncSelect,setsockopt,SendARP,inet_addr,GetAdaptersInfo,closesocket,GetLastError,htons,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 工作线程
           |  |
           |  |------ MAC字节集到文本
           |  |
           |  |------ 取本机MAC
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 十六进制到十进制
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ _选择框1_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   sendto
           |  |
           |  |---[dll]------   RecvFrom
           |  |
           |  |---[dll]------   bind
           |  |
           |  |---[dll]------   WSAStartup
           |  |
           |  |---[dll]------   WSACleanup
           |  |
           |  |---[dll]------   socket
           |  |
           |  |---[dll]------   WSAAsyncSelect
           |  |
           |  |---[dll]------   setsockopt
           |  |
           |  |---[dll]------   SendARP
           |  |
           |  |---[dll]------   inet_addr
           |  |
           |  |---[dll]------   GetAdaptersInfo
           |  |
           |  |---[dll]------   closesocket
           |  |
           |  |---[dll]------   GetLastError
           |  |
           |  |---[dll]------   htons

调用的DLL命令:

.DLL命令 sendto, 整数型, "ws2_32.dll", "sendto", , 发送数据(UDP)
    .参数 s, 整数型, , 套接字描述符
    .参数 buf, 字节集, , 数据
    .参数 len, 整数型, , 数据长度
    .参数 flags, 整数型, , 保留值，给0
    .参数 to, SOCKADDR_IPX, 传址, 目标地址信息
    .参数 tolen, 整数型, , 地址信息长度

.DLL命令 RecvFrom, 整数型, "ws2_32.dll", "recvfrom"
    .参数 s, 整数型
    .参数 buf, 字节集, 传址
    .参数 len, 整数型, , 缓冲区的长度
    .参数 flages, 整数型
    .参数 from, SOCKADDR_IPX, 传址
    .参数 fromlen, 整数型, 传址, 源地址处的长度

.DLL命令 bind, 整数型, "ws2_32.dll", "bind", , 绑定端口
    .参数 s, 整数型, , 建立socket时的Handle  socket套接字
    .参数 name, SOCKADDR_IPX
    .参数 namelen, 整数型

.DLL命令 WSAStartup, 整数型, "ws2_32.dll", "WSAStartup", , 成功返回0, 初始化WnSocket服务
    .参数 VersionReq, 短整数型
    .参数 WSADataReturn, WSADATA, 传址

.DLL命令 WSACleanup, 整数型, "ws2_32.dll", "WSACleanup", , 卸载Winsocket服务,成功返回0

.DLL命令 socket, 整数型, "ws2_32.dll", "socket", , 创建套接字
    .参数 af, 整数型, , 使用的通信协议的协议族
    .参数 type, 整数型, , 流套接字类型
    .参数 protocol, 整数型, , 使用的通信协议

.DLL命令 WSAAsyncSelect, 整数型, "ws2_32.dll", "WSAAsyncSelect"
    .参数 s, 整数型
    .参数 hWnd, 整数型, , 窗口句柄
    .参数 wMsg, 整数型, , 消息值
    .参数 lEvent, 整数型, , 事件

.DLL命令 setsockopt, 整数型, "ws2_32.dll", "setsockopt"
    .参数 sockfd, 整数型
    .参数 level, 整数型
    .参数 optname, 整数型
    .参数 optval, 逻辑型, 传址
    .参数 optlen, 整数型

.DLL命令 SendARP, 整数型, "IPHLPAPI.DLL", "SendARP"
    .参数 目标IP
    .参数 本机IP
    .参数 MAC缓冲, 字节集, 传址
    .参数 长度, , 传址

.DLL命令 inet_addr, 整数型, "ws2_32.dll", "inet_addr"
    .参数 IP, 文本型

.DLL命令 GetAdaptersInfo, 整数型, "iphlpapi.dll", "GetAdaptersInfo"
    .参数 AdapterInfoBuffer, 字节集
    .参数 AdapterInfoSize, 整数型, 传址

.DLL命令 closesocket, 整数型, "ws2_32.dll", "closesocket", , 销毁套接字
    .参数 s, 整数型, , 套接字描述符

.DLL命令 GetLastError, 整数型

.DLL命令 htons, 短整数型, "ws2_32.dll", "htons"
    .参数 hostshortas, 短整数型, , 十六位主机命令