精易论坛

标题: 【一周一训练NO.0079】端口扫描器 [打印本页]

作者: 漩涡鸣人 时间: 2017-11-21 20:27
标题: 【一周一训练NO.0079】端口扫描器
本帖最后由漩涡鸣人于 2017-12-14 23:51 编辑

作业练习区>作业题目交易币有偿征集贴
http://125.confly.eu.org/forum.php?mod=viewthread&tid=14063761

用到的命令:端口检测 (, )&易语言基础命令

要求:制作一个端口扫描器，扫描端口，并显示进度指定IP扫描，指定IP段扫描，指定端口扫描，指定端口范围扫描为60分，一个功能为15分
自动取出本机所在nei网IP段扫描；扫描结果区分，能否访问，比如说XXX端口是开放的，然后是什么监控的登陆地址，路由器登陆地址。(20分)一个功能为10分

多线程(20分)

网上直接下载的源码判0分扣20精币扣好评

满分100分，达到60及格线即可获得奖励，60分以下鼓励奖，作业请用源码形式提交，与作业无关内容将受到处罚。

注意：作业请用附件形式上传，不要回复跟作业无关的内容。

端口扫描多线程.e

890.6 KB, 下载次数: 469, 下载积分: 精币 -2 枚

扫描端口写的不好，就把结果扫描开源吧……

作者: mxsoft 时间: 2017-11-22 18:19

端口扫描程序.e (660.28 KB, 下载次数: 53)
思路是自己原创的，只用了精易模块中的线程池和易的网络通讯支持库，效率还可以

作者: 拉面 时间: 2017-11-24 21:41

单线程_端口检测.e (646.24 KB, 下载次数: 38)

作者: zoujialan 时间: 2017-12-18 04:57
不知道什么情况  用线程  在调试模式下很多种类的端口检测会出问题  编译出来的又大部分不会

.版本 2
.支持库 spec
.支持库 EThread
.支持库 iext

.局部变量 add, sockaddr_in
.局部变量 s, 整数型
.局部变量超时时间, 整数型
.局部变量 ul, 长整数型
.局部变量 time, timeval
.局部变量 fd, fd_set
.局部变量 err, 整数型
.局部变量局_申请内存, 整数型
.局部变量索引, 整数型

局_申请内存＝申请内存 (15, )
写到内存 (插入IP, 局_申请内存, 15)
s ＝ socket (#AF_INET, #SOCK_STREAM, #IPPROTO_TCP)
.如果真 (s ＝ #INVALID_SOCKET)
调试输出 (“创建 socket 失败”)
返回 ()
.如果真结束

超时时间＝ 100  ' 时间
setsockopt (s, #SOL_SOCKET, #SO_SNDTIMEO, 超时时间, 4)  ' 发送超时
setsockopt (s, #SOL_SOCKET, #SO_RCVTIMEO, 超时时间, 4)  ' 接受超时

ul ＝ 1  ' 1非阻塞;0阻塞
.如果真 (ioctlsocket (s, #FIONBIO, ul) ＝ #SOCKET_ERROR)  ' 设置非阻塞方式
返回 ()
.如果真结束

add.sin_family ＝ #AF_INET
add.sin_port ＝ htons (插端口)
add.sin_addr ＝ inet_addr (插入IP)
connect (s, add, 16)
time.sec ＝ 1  ' 连接超时
time.usec ＝ 0
fd.count ＝ 1
fd.s [1] ＝ s
.如果真 (select (0, 0, fd, 0, time) ＞ 0)
err ＝ -1
getsockopt (s, #SOL_SOCKET, 4103, err, 4)
.如果 (err ＝ 0)
      进入许可区 (线程许可)
      索引＝结果_超级列表框.取表项数 ()
      结果_超级列表框.插入表项 (-1, 插入IP, , , , )
      结果_超级列表框.置标题 (索引, 1, 到文本 (插端口))
      ' 写到文件 (结果数据目录＋ “结果数据.ini”, 到字节集 (插入IP ＋ “:” ＋到文本 (插端口) ＋ “端口开启”))
      退出许可区 (线程许可)
.否则

作者: ゞωǒ天堂牧心 时间: 2018-2-23 19:43
不要回复跟作业无关的内容

作者: ゞωǒ天堂牧心 时间: 2018-2-23 19:45
写得不错写得不错

作者: chen3xing 时间: 2018-2-26 21:53
下载下来学习学习

作者: 全镇 时间: 2018-4-8 10:58
谢谢下来参考

作者: xinxinyu1234 时间: 2018-5-18 15:34
好好学习天天上上

作者: 2161045897 时间: 2019-3-17 17:56
gxfx~~~~~~~~~~

作者: gaoqing 时间: 2019-10-5 10:43
谢谢分享啊

作者: 原味 时间: 2020-10-5 10:19
学习下啊

作者: qe147258 时间: 2021-2-24 21:27
能否访问

作者: 没病走两步 时间: 2021-4-19 12:21
60及格线即可获得奖励，60分以下鼓励奖，作业请用源码形式提交，与作业无关内容将受到处罚。

作者: huoshanlangzhe 时间: 2022-7-11 15:44
下载下来学习学习

作者: xuantang 时间: 2023-5-4 03:50
学习一下

欢迎光临精易论坛 (https://125.confly.eu.org/)