易语言IOCP线程池1.1模块源码 [db:版本]

易语言IOCP线程池1.1模块源码

系统结构:启动,停止,锁定,解锁,取当前线程数量,取工作线程数量,提交任务,绑定对象,取指针,读整数,写整数,取处理器数量,取类方法地址,取变量地址_整数型,动态调用子程序,PostQueuedCompletionStatus,CloseHandle,GetQueuedCompletionStatus,CreateIoCompletionPort,LocalAlloc,LocalFree,CreateThread,InitializeCriticalSection,DeleteCriticalSection,EnterCriticalSection,LeaveCriticalSection,CreateEvent,SetEvent,GetSystemInfo,WaitForSingleObject,GetLastError,

======程序集1
| |
| |------ _启动子程序
| |
| |------ _临时子程序
| |
| |
======线程池类
| |
| |------ _初始化
| |
| |------ _销毁
| |
| |------ _工作线程
| |
| |------ _创建工作线程
| |
| |------ 启动
| |
| |------ 停止
| |
| |------ 锁定
| |
| |------ 解锁
| |
| |------ 取当前线程数量
| |
| |------ 取工作线程数量
| |
| |------ 提交任务
| |
| |------ 绑定对象
| |
| |------ 取指针
| |
| |
======程序集_辅助
| |
| |------ 读整数
| |
| |------ 写整数
| |
| |------ 取处理器数量
| |
| |------ 取类方法地址
| |
| |------ 取变量地址_整数型
| |
| |------ 动态调用子程序
| |
| |
======窗口程序集1
| |
| |------ _窗口1_创建完毕
| |
| |------ _按钮1_被单击
| |
| |
======调用的Dll
| |
| |---[dll]------ PostQueuedCompletionStatus
| |
| |---[dll]------ CloseHandle
| |
| |---[dll]------ GetQueuedCompletionStatus
| |
| |---[dll]------ CreateIoCompletionPort
| |
| |---[dll]------ LocalAlloc
| |
| |---[dll]------ LocalFree
| |
| |---[dll]------ CreateThread
| |
| |---[dll]------ InitializeCriticalSection
| |
| |---[dll]------ DeleteCriticalSection
| |
| |---[dll]------ EnterCriticalSection
| |
| |---[dll]------ LeaveCriticalSection
| |
| |---[dll]------ CreateEvent
| |
| |---[dll]------ SetEvent
| |
| |---[dll]------ GetSystemInfo
| |
| |---[dll]------ WaitForSingleObject
| |
| |---[dll]------ GetLastError

调用的DLL命令:

.DLL命令 PostQueuedCompletionStatus, 逻辑型, "kernel32.dll", "PostQueuedCompletionStatus"
.参数 CompletionPort, 整数型
.参数 dwNumberOfBytesTransferred, 整数型
.参数 dwCompletionKey, 整数型
.参数 lpOverlapped, 整数型

.DLL命令 CloseHandle, 整数型, , "CloseHandle"
.参数 hObject, 整数型

.DLL命令 GetQueuedCompletionStatus, 逻辑型, "kernel32.dll", "GetQueuedCompletionStatus"
.参数 CompletionPort, 整数型
.参数 lpNumberOfBytesTransferred, 整数型, 传址
.参数 lpCompletionKey, 整数型, 传址
.参数 lpOverlapped, 整数型, 传址
.参数 dwMilliseconds, 整数型

.DLL命令 CreateIoCompletionPort, 整数型, "kernel32.dll", "CreateIoCompletionPort", , 失败返回0
.参数 Handle, 整数型
.参数 ExistingCompletionPort, 整数型
.参数 CompletionKey, 整数型
.参数 NumberOfConcurrentThreads, 整数型

.DLL命令 LocalAlloc, 整数型, "kernel32.dll", "LocalAlloc", , hMem
.参数 uFlags, 短整数型
.参数 uBytes, 整数型

.DLL命令 LocalFree, 整数型, "kernel32.dll", "LocalFree"
.参数 hMem, 整数型, , hMem

.DLL命令 CreateThread, 整数型, "kernel32", , , 启动线程
.参数 lpThreadAttributes, 整数型
.参数 dwStackSize, 整数型
.参数 lpStartAddress, 整数型
.参数 lpParameter, 整数型
.参数 dwCreationFlags, 整数型
.参数 lpThreadId, 整数型, 传址

.DLL命令 InitializeCriticalSection, , "kernel32", , , 创建许可证
.参数 lpCriticalSection, 整数型

.DLL命令 DeleteCriticalSection, , "kernel32", , , 删除许可证
.参数 lpCriticalSection, 整数型

.DLL命令 EnterCriticalSection, , "kernel32", , , 进入许可区
.参数 lpCriticalSection, 整数型

.DLL命令 LeaveCriticalSection, , "kernel32", , , 退出许可区
.参数 lpCriticalSection, 整数型

.DLL命令 CreateEvent, 整数型, "Kernel32.dll", "CreateEventA"
.参数 lpEventAttributes, 整数型
.参数 bManualReset, 逻辑型, , 是否手工复原信号状态
.参数 bInitialState, 逻辑型, , 初始信号状态
.参数 lpNam, 整数型, , 事件名称

.DLL命令 SetEvent, 整数型, "Kernel32.dll", "SetEvent"
.参数 hEvent, 整数型

.DLL命令 GetSystemInfo, , "kernel32.dll", "GetSystemInfo", , 无返回值
.参数 lpSystemInfo, SYSTEM_INFO

.DLL命令 WaitForSingleObject, 整数型, "kernel32.dll", "WaitForSingleObject", , 监测对象
.参数 hHandle, 整数型, , 对象句柄
.参数 dwMilliseconds, 整数型, , 等待时间 毫秒

.DLL命令 GetLastError, 整数型