[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
cloud213

Rank: 1

帖子
8 
积分
14 
技术
0  
捐助
0  
注册时间
2011-9-2 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2011-9-4 12:02 | 只看该作者

[文本处理] [已解决]批处理如何整理SYN扫描的结果？

本帖最后由 cloud213 于 2011-9-5 10:21 编辑

首先这是一个SYN 端口扫描批处理.他扫描的端口是3个.然后生成一个Result.txt 的 文本 .

代码如下:
  1. @echo off

  2. setlocal

  3. cls

  4. color A

  5. 

  6. del ips.txt

  7. del Result.txt

  8. for /f "eol= tokens=1,2 delims= " %%i in (1.txt) do s syn %%i %%j 135,1433,3389 /save
复制代码
这是用S扫描器扫描，之后会生成一个Result.txt 的 文本

我希望最好能在这段代码的基础上增加处理代码.
让最后只留下IP：并去掉重复IP：再将IP分类保存成3个为端口号命名的文档.
最好能按1-255的顺序排列出来..

Result.txt 的 文本 .格式如下.

-------------------------------------------------------------------------------
Performing Time: 12/20/2008 21:39:10 --> SYN Scan: About To Scan 16384 IP For 5 Ports Using 1 Thread
202.96.219.14    135   Open            
202.96.219.21    135  Open            
202.96.246.22    135  Open            
202.96.246.22    1433   Open
202.96.246.22    1433  Open
202.100.24.22    1433  Open
202.96.246.22    3389  Open            
202.96.246.194   3389  Open            
Scan 16384 IPs Complete In 0 Hours 0 Minutes 4 Seconds. Found 8 Hosts
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------


处理最后想要达到的效果，

202.96.219.14            
202.96.219.21
202.96.246.22

这几个135端口的 分类保存到135.txt下..去掉重复的IP..并按1-255的顺序排列.  

202.96.246.22
202.96.246.22
202.100.24.22

这几个1433端口的 分类保存到1433.txt下..去掉重复的IP..并按1-255的顺序排列.

202.96.246.22
202.96.246.194

这几个3389端口的 分类保存到3389.txt下..去掉重复的IP..并按1-255的顺序排列.
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2
收藏 分享

ArdentMan

Rank: 5Rank: 5

帖子
288 
积分
924 
技术
70  
捐助
0  
注册时间
2011-7-1 
2楼
发表于 2011-9-4 13:13 | 只看该作者 
  1. @echo Off&SetLocal EnableDelayedExpansion

  2. For /F "tokens=1,2" %%a In ('Findstr "Open" result.txt') Do (

  3.   For /F "tokens=1-4 delims=." %%i In ("%%a") Do (

  4.     Set "stra=000%%i"&Set "strb=000"%%j&Set "strc==000%%k"&Set "strd=000%%l"

  5.     Set "_%%b_!stra:~-3!.!strb:~-3!.!strc:~-3!.!strd:~-3!=%%i.%%j.%%k.%%L"

  6.   )

  7. )

  8. For /F "tokens=1,3 delims==_" %%i In ('Set _') Do Echo %%j>>%%i.txt
复制代码
一路飘过的鸟~~~

TOP

cloud213

Rank: 1

帖子
8 
积分
14 
技术
0  
捐助
0  
注册时间
2011-9-2 
3楼
发表于 2011-9-4 13:38 | 只看该作者
本帖最后由 cloud213 于 2011-9-4 13:42 编辑

这段代码加在最后面吗???

还是直接就用这段代码就行了??

TOP

ArdentMan

Rank: 5Rank: 5

帖子
288 
积分
924 
技术
70  
捐助
0  
注册时间
2011-7-1 
4楼
发表于 2011-9-4 13:43 | 只看该作者 
  1. @Echo Off&SetLocal EnableDelayedExpansion

  2. Del Result.txt 2>Nul

  3. for /f "eol= tokens=1,2 delims= " %%i in (1.txt) do s syn %%i %%j 135,1433,3389 /save

  4. For /F "tokens=1,2" %%a In ('Findstr "Open" result.txt') Do (

  5.   For /F "tokens=1-4 delims=." %%i In ("%%a") Do (

  6.     Set "stra=000%%i"&Set "strb=000"%%j&Set "strc==000%%k"&Set "strd=000%%l"

  7.     Set "_%%b_!stra:~-3!.!strb:~-3!.!strc:~-3!.!strd:~-3!=%%i.%%j.%%k.%%L"

  8.   )

  9. )

  10. For /F "tokens=1,3 delims==_" %%i In ('Set _') Do Echo %%j>>%%i.txt
复制代码
一路飘过的鸟~~~

TOP

cloud213

Rank: 1

帖子
8 
积分
14 
技术
0  
捐助
0  
注册时间
2011-9-2 
5楼
发表于 2011-9-4 14:09 | 只看该作者
本帖最后由 cloud213 于 2011-9-4 14:12 编辑

怎么好像扫描速度很慢呢??

能不能把速度提高点呢?


而且扫出的最后保存结果是.  

86.5.52.%L   后面的数字变成.%L了

TOP

ArdentMan

Rank: 5Rank: 5

帖子
288 
积分
924 
技术
70  
捐助
0  
注册时间
2011-7-1 
6楼
发表于 2011-9-4 19:10 | 只看该作者
手机上网写不了什么代码，看了一下应该是set “strc==000%%k”这里多了个=号，至于扫描的速度与代码无关吧。
一路飘过的鸟~~~

TOP

cloud213

Rank: 1

帖子
8 
积分
14 
技术
0  
捐助
0  
注册时间
2011-9-2 
7楼
发表于 2011-9-4 20:21 | 只看该作者
嗯. 谢谢了呢.

还有那个排序. 好像不是按数字的大小来排列. 排的有点乱..

TOP

wc726842270

Rank: 7Rank: 7Rank: 7

帖子
1107 
积分
4218 
技术
37  
捐助
0  
注册时间
2010-6-8 
8楼
发表于 2011-9-4 20:46 | 只看该作者
LZ有兴趣用SORT改一下吧
枫中残雪：风停了，我的心却在动，让我心中的寒意走向远方

TOP

ArdentMan

Rank: 5Rank: 5

帖子
288 
积分
924 
技术
70  
捐助
0  
注册时间
2011-7-1 
9楼
发表于 2011-9-5 09:16 | 只看该作者
还是粗心了
  1. @Echo Off&SetLocal EnableDelayedExpansion

  2. Del Result.txt 2>Nul

  3. for /f "eol= tokens=1,2 delims= " %%i in (1.txt) do s syn %%i %%j 135,1433,3389 /save

  4. For /F "tokens=1,2" %%a In ('Findstr "Open" result.txt') Do (

  5.   For /F "tokens=1-4 delims=." %%i In ("%%a") Do (

  6.     Set "stra=000%%i"&Set "strb=000"%%j&Set "strc=000%%k"&Set "strd=000%%l"

  7.     Set "_%%b_!stra:~-3!.!strb:~-3!.!strc:~-3!.!strd:~-3!=%%i.%%j.%%k.%%l"

  8.   )

  9. )

  10. For /F "tokens=1,3 delims==_" %%i In ('Set _') Do Echo %%j>>%%i.txt
复制代码
1

评分人数

一路飘过的鸟~~~

TOP

cloud213

Rank: 1

帖子
8 
积分
14 
技术
0  
捐助
0  
注册时间
2011-9-2 
10楼
发表于 2011-9-5 10:21 | 只看该作者
3Q了.  就是这样.

非常感谢.!!

TOP

返回列表