易语言HTTPS代理服务器源码

系统结构:HTTP_HTTPS_启动代理服务器,HTTP_HTTPS_停止代理服务器,延时_超级延时,UnicodeToAnsi2,进程是否有效,进程创建,获取宽带帐号密码,文本_取文本中间,重拨_cmd,拨号_cmd,断开_cmd,HTTPS_start,HTTPS_sotp,CreateProcessA,CreateWaitableTimerA,SetWaitableTimer,MsgWaitForMultipleObjects,分配虚拟页_,取字节集变量地址_,RtlUnicodeStringToAnsiString,释放虚拟页_,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ HTTP_HTTPS_启动代理服务器
           |  |
           |  |------ HTTP_HTTPS_停止代理服务器
           |  |
           |  |------ 延时_超级延时
           |  |
           |  |------ UnicodeToAnsi2
           |  |
           |  |------ 进程是否有效
           |  |
           |  |------ 进程创建
           |  |
           |  |------ 获取宽带帐号密码
           |  |
           |  |------ 文本_取文本中间
           |  |
           |  |
======ADSL拨号类
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 重拨_cmd
           |  |
           |  |------ 拨号_cmd
           |  |
           |  |------ 断开_cmd
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   HTTPS_start
           |  |
           |  |---[dll]------   HTTPS_sotp
           |  |
           |  |---[dll]------   _创建快照
           |  |
           |  |---[dll]------   _第一个
           |  |
           |  |---[dll]------   _下一个
           |  |
           |  |---[dll]------   _关闭对象
           |  |
           |  |---[dll]------   CreateProcessA
           |  |
           |  |---[dll]------   CreateWaitableTimerA
           |  |
           |  |---[dll]------   SetWaitableTimer
           |  |
           |  |---[dll]------   MsgWaitForMultipleObjects
           |  |
           |  |---[dll]------   分配虚拟页_
           |  |
           |  |---[dll]------   取字节集变量地址_
           |  |
           |  |---[dll]------   RtlUnicodeStringToAnsiString
           |  |
           |  |---[dll]------   释放虚拟页_

调用的DLL命令:

.DLL命令 HTTPS_start, 逻辑型, "Proxy.dll", "HTTPS_start"
    .参数 端口, 整数型

.DLL命令 HTTPS_sotp, , "Proxy.dll", "HTTPS_sotp"

.DLL命令 _创建快照, 整数型, , "CreateToolhelp32Snapshot"
    .参数 falg, 整数型
    .参数 id, 整数型

.DLL命令 _第一个, 整数型, , "Process32First"
    .参数 h, 整数型
    .参数 p, s5yh5sgrty

.DLL命令 _下一个, 整数型, , "Process32Next"
    .参数 h, 整数型
    .参数 p, s5yh5sgrty

.DLL命令 _关闭对象, 整数型, , "CloseHandle", , kernel32.dll
    .参数 对象句柄, 整数型

.DLL命令 CreateProcessA, 整数型, "kernel32.dll"
    .参数 lpApplicationName, 文本型
    .参数 lpCommandLine, 文本型
    .参数 lpProcessAttributes, 整数型
    .参数 lpThreadAttributes, 整数型
    .参数 bInheritHandles, 整数型
    .参数 dwCreationFlags, 整数型
    .参数 lpEnvironment, 整数型
    .参数 lpCurrentDriectory, 文本型
    .参数 lpStartupInfo, StartupInfo
    .参数 lpProcessInformation, 进程结构

.DLL命令 CreateWaitableTimerA, 整数型, , "CreateWaitableTimerA"
    .参数 lpTimerAttributes, 整数型
    .参数 bManualReset, 逻辑型
    .参数 lpTimerName, 整数型

.DLL命令 SetWaitableTimer, 整数型, , "SetWaitableTimer"
    .参数 hTimer, 整数型
    .参数 pDueTime, yb4ydr
    .参数 lPeriod, 整数型
    .参数 pfnCompletionRoutine, 整数型
    .参数 lpArgToCompletionRoutine, 整数型
    .参数 fResume, 逻辑型

.DLL命令 MsgWaitForMultipleObjects, 整数型, , "MsgWaitForMultipleObjects"
    .参数 nCount, 整数型
    .参数 pHandles, 整数型, 传址
    .参数 fWaitAll, 逻辑型
    .参数 dwMilliseconds, 整数型
    .参数 dwWakeMask, 整数型

.DLL命令 分配虚拟页_, 整数型, "kernel32.dll", "VirtualAlloc", , , 保留虚拟页
    .参数 分配文本地址, 整数型, , lpAddress
    .参数 分配大小, 整数型, , dwSize
    .参数 分配类型, 整数型, , flAllocationType
    .参数 内存保护标志, 整数型, , flProtect

.DLL命令 取字节集变量地址_, 整数型, "kernel32.dll", "lstrcpyn", , ,
    .参数 数据1, 字节集, 传址, lpString1
    .参数 数据2, 字节集, 传址, lpString2
    .参数 数据长度, 整数型, , iMaxLength

.DLL命令 RtlUnicodeStringToAnsiString, 整数型, "ntdll.dll", "RtlUnicodeStringToAnsiString"
    .参数 DestinationString, PANSI_STRING
    .参数 SourceString, PUNICODE_STRING
    .参数 AllocateDestinationString, 逻辑型

.DLL命令 释放虚拟页_, 整数型, "kernel32.dll", "VirtualFree", , 释放虚拟页
    .参数 分配文本地址, 整数型, , lpAddress
    .参数 分配大小, 整数型, , dwSize
    .参数 释放类型, 整数型, , dwFreeType