web封包拦截修改工具

.子程序 封包分析, , , 分析封包数据并把相关数据添加到超级列表框中
.参数 动作, 文本型
.参数 封包内容, 文本型
.局部变量 提交地址, 文本型
.局部变量 提交数据, 文本型
.局部变量 cookies, 文本型
.局部变量 rtcookies, 文本型
.局部变量 a, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 cookie, 文本型

.判断开始 (动作 ＝ “返回”)
.如果真 (寻找文本 (封包内容, “Set-Cookie”, , 假) ＞ -1)
a ＝ 分割文本 (封包内容, #换行符, )
.计次循环首 (取数组成员数 (a), i)
cookie ＝ 取指定内容 (a [i], “Set-Cookie: ”, “; ”) ＋ “; ”
.如果真 (cookie ≠ “; ”)
rtcookies ＝ rtcookies ＋ cookie
.如果真结束

.计次循环尾 ()
.如果真结束

.判断 (动作 ＝ “”)
提交数据 ＝ 封包内容
.默认
提交地址 ＝ 取指定内容 (封包内容, “Host: ”, #换行符) ＋ 取指定内容 (封包内容, “ ”, “HTTP/1.1”)
提交数据 ＝ 取指定内容 (封包内容, “Cookie:”, )
提交数据 ＝ 取指定内容 (提交数据, #换行符, )
提交数据 ＝ 取指定内容 (提交数据, #换行符, )
cookies ＝ 取指定内容 (封包内容, “Cookie: ”, #换行符)
.判断结束
超级列表框_详细数据.置标题 (0, 1, 动作)
超级列表框_详细数据.置标题 (1, 1, 提交地址)
超级列表框_详细数据.置标题 (2, 1, 提交数据)
超级列表框_详细数据.置标题 (3, 1, cookies)
超级列表框_详细数据.置标题 (4, 1, rtcookies)