易语言局域网扫描

我写了个工具，易语言局域网用易语言扫公司内部网段，扫描结果第一天就逮住三台私接的易语言局域网路由器。这事儿真不是扫描闲得慌——行政部报修说打印机老掉线，我扫完才发现，易语言局域网某同事工位底下藏了个TP-Link，扫描DHCP冲突把整个楼层搞得乌烟瘴气。易语言局域网

易语言做扫描器，扫描核心就俩函数：一个发ICMP包，易语言局域网一个发TCP连接请求。扫描别被“局域网扫描”这名字唬住，易语言局域网本质就是扫描挨个IP问一句“你还活着吗”。我用的易语言局域网原始套接字，直接构造IP头，扫描比调用系统ping命令快三倍。易语言局域网你要是图省事，用“网络通信”支持库里的“Ping”命令也行，但那个会阻塞线程，扫个C段（254个IP）得等两分钟。

关键在超时设置。默认500毫秒等一个回复，太磨叽。我改成200毫秒，配合多线程（易语言里叫“启动线程”），8个线程并发扫，15秒出结果。有人会问，线程开多了会不会崩？我实测过，20个线程同时跑，CPU占用也就12%左右，内存多吃5MB，完全扛得住。但别贪，超过30个线程，路由器可能先罢工。

扫出来的结果怎么用？我按MAC地址前三位判断厂商。易语言有个“取网卡信息”命令，能直接读远程主机的MAC——前提是你有管理员权限，而且对方防火墙没拦。那天扫到个未知设备，MAC前缀是“00:1B:44”，一查是思科。谁会在办公网里插思科设备？顺着交换机端口找过去，好家伙，是IT部自己搭的测试环境，没登记。

还有个坑得提醒你。ARP扫描比ICMP靠谱，但易语言原生不支持构造ARP包。我绕了个弯，调用系统API里的“SendARP”函数，声明一下DLL就能用。这招对付那些禁ping的Windows主机特别灵——它们可能不理ICMP，但ARP请求是躲不掉的，因为网卡硬件层面必须应答。

写这工具最爽的时刻，是发现代码里有个逻辑漏洞：扫描结果列表没加锁，多线程往同一个列表框里塞数据，偶尔会闪退。加了个“临界量”命令（易语言里的临界区对象），问题秒解。这种小坑，不自己踩一遍，光看文档永远学不会。

最后说句实话，这工具要是被拿去干坏事，分分钟能扫出共享文件夹的弱密码。我就在代码里留了个“仅限本机测试”的判断，检测到公网IP直接退出。写工具的人得有点底线，你说对吧？