forked from digitalbond/Redpoint
-
Notifications
You must be signed in to change notification settings - Fork 0
/
omrontcp-info.nse
174 lines (155 loc) · 5.52 KB
/
omrontcp-info.nse
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
local bin = require "bin"
local nmap = require "nmap"
local shortport = require "shortport"
local stdnse = require "stdnse"
local table = require "table"
description = [[
This NSE script is used to send two FINS packets to a remote device that
has TCP 9600 open. The script will send a Controller Data Read Command and once a
response is received, it validates that it was a proper response to the command
that was sent, and then will parse out the data.
http://digitalbond.com
]]
---
-- @usage
-- nmap --script ormontcp-info -p 9600 <host>
--
--
-- @output
--9600/tcp open OMRON FINS
--| omrontcp-info:
--| Controller Model: CJ2M-CPU32 02.01
--| Controller Version: 02.01
--| For System Use:
--| Program Area Size: 20
--| IOM size: 23
--| No. DM Words: 32768
--| Timer/Counter: 8
--| Expansion DM Size: 1
--| No. of steps/transitions: 0
--| Kind of Memory Card: 0
--|_ Memory Card Size: 0
-- @xmloutput
--<elem key="Controller Model">CS1G_CPU44H 03.00</elem>
--<elem key="Controller Version">03.00</elem>
--<elem key="For System Use"></elem>
--<elem key="Program Area Size">20</elem>
--<elem key="IOM size">23</elem>
--<elem key="No. DM Words">32768</elem>
--<elem key="Timer/Counter">8</elem>
--<elem key="Expansion DM Size">1</elem>
--<elem key="No. of steps/transitions">0</elem>
--<elem key="Kind of Memory Card">0</elem>
--<elem key="Memory Card Size">0</elem>
author = "Stephen Hilt (Digital Bond)"
license = "Same as Nmap--See http://nmap.org/book/man-legal.html"
categories = {"discovery", "version"}
--
-- Function to define the portrule as per nmap standards
--
--
portrule = shortport.portnumber(9600, "tcp")
---
-- Function to set the nmap output for the host, if a valid OMRON FINS packet
-- is received then the output will show that the port is open.
--
-- @param host Host that was passed in via nmap
-- @param port port that FINS is running on (Default TCP/9600)
function set_nmap(host, port)
--set port Open
port.state = "open"
-- set version name to OMRON FINS
port.version.name = "OMRON FINS"
nmap.set_port_version(host, port)
nmap.set_port_state(host, port, "open")
end
local memcard = {
[0] = "No Memory Card",
[1] = "SPRAM",
[2] = "EPROM",
[3] = "EEPROM"
}
function memory_card(value)
local mem_card = memcard[value] or "Unknown Memory Card Type"
return mem_card
end
---
-- Action Function that is used to run the NSE. This function will send the initial query to the
-- host and port that were passed in via nmap. The initial response is parsed to determine if host
-- is a FINS supported device.
--
-- @param host Host that was scanned via nmap
-- @param port port that was scanned via nmap
action = function(host,port)
-- this is the request address command
local req_addr = bin.pack("H", "46494e530000000c000000000000000000000000")
-- TCP requres a network address that is recived from the first request,
-- The read contoller data these two strings will be joined with the address
local controller_data_read = "46494e5300000015000000020000000080000200"
local controller_data_read2 = "000000ef050501"
-- create table for output
local output = stdnse.output_table()
-- create local vars for socket handling
local socket, try, catch
-- create new socket
socket = nmap.new_socket()
-- define the catch of the try statement
catch = function()
socket:close()
end
-- create new try
try = nmap.new_try(catch)
-- connect to port on host
try(socket:connect(host, port))
-- send Request Information Packet
try(socket:send(req_addr))
local rcvstatus, response = socket:receive()
if(rcvstatus == false) then
return false, response
end
local pos, header = bin.unpack("C", response, 1)
if(header == 0x46) then
set_nmap(host, port)
local pos, address = bin.unpack("C",response,24)
local controller_data = bin.pack("HCHC", controller_data_read, address, controller_data_read2, 0x00)
-- send the read controller data request
try(socket:send(controller_data))
local rcvstatus, response = socket:receive()
if(rcvstatus == false) then
return false, response
end
local response_code
pos, response_code = bin.unpack("<S", response, 29)
-- test for a few of the error codes I saw when testing the script
if(response_code == 2081) then
output["Response Code"] = "Data cannot be changed (0x2108)"
elseif(response_code == 290) then
output["Response Code"] = "The mode is wrong (executing) (0x2201)"
elseif(response_code == 0) then
-- parse information from response
pos, output["Response Code"] = "Normal completion (0x0000)"
pos, output["Controller Model"] = bin.unpack("z", response,31)
pos, output["Controller Version"] = bin.unpack("z", response, 51)
pos, output["For System Use"] = bin.unpack("z", response, 71)
pos, output["Program Area Size"] = bin.unpack(">S", response, 111)
pos, output["IOM size"] = bin.unpack("C", response, pos)
pos, output["No. DM Words"] = bin.unpack(">S", response, pos)
pos, output["Timer/Counter"] = bin.unpack("C", response, pos)
pos, output["Expansion DM Size"] = bin.unpack("C", response, pos)
pos, output["No. of steps/transitions"] = bin.unpack(">S", response, pos)
local mem_card_type
pos, mem_card_type = bin.unpack("C", response, pos)
output["Kind of Memory Card"] = memory_card(mem_card_type)
pos, output["Memory Card Size"] = bin.unpack(">S", response, pos)
else
output["Response Code"] = "Unknown Response Code"
end
-- close socket, return output
socket:close()
return output
else
-- close socket and return nil
socket:close()
return nil
end
end