Gecko [ tsuru-no-tsurugi.tokyo ]

Name	Size	Permission	Date
data	[ DIR ]	drwxr-xr-x	2024-08-29 14:21
afp.lua	71.48 KB	-rw-r--r--	2023-01-13 02:40
ajp.lua	16.77 KB	-rw-r--r--	2023-01-13 02:40
amqp.lua	10.41 KB	-rw-r--r--	2023-01-13 02:40
anyconnect.lua	4.31 KB	-rw-r--r--	2023-01-13 02:40
asn1.lua	14.57 KB	-rw-r--r--	2023-01-13 02:40
base32.lua	7.36 KB	-rw-r--r--	2023-01-13 02:40
base64.lua	5.83 KB	-rw-r--r--	2023-01-13 02:40
bin.lua	12.99 KB	-rw-r--r--	2023-01-13 02:40
bitcoin.lua	18.25 KB	-rw-r--r--	2023-01-13 02:40
bits.lua	2.54 KB	-rw-r--r--	2023-01-13 02:40
bittorrent.lua	35.76 KB	-rw-r--r--	2023-01-13 02:40
bjnp.lua	9.55 KB	-rw-r--r--	2023-01-13 02:40
brute.lua	50.64 KB	-rw-r--r--	2023-01-13 02:40
cassandra.lua	5.48 KB	-rw-r--r--	2023-01-13 02:40
citrixxml.lua	16 KB	-rw-r--r--	2023-01-13 02:40
coap.lua	75.1 KB	-rw-r--r--	2023-01-13 02:40
comm.lua	11.03 KB	-rw-r--r--	2023-01-13 02:40
creds.lua	18.26 KB	-rw-r--r--	2023-01-13 02:40
cvs.lua	3.05 KB	-rw-r--r--	2023-01-13 02:40
datafiles.lua	11.05 KB	-rw-r--r--	2023-01-13 02:40
datetime.lua	7.5 KB	-rw-r--r--	2023-01-13 02:40
dhcp.lua	28.57 KB	-rw-r--r--	2023-01-13 02:40
dhcp6.lua	19.86 KB	-rw-r--r--	2023-01-13 02:40
dns.lua	51.07 KB	-rw-r--r--	2023-01-13 02:40
dnsbl.lua	19.01 KB	-rw-r--r--	2023-01-13 02:40
dnssd.lua	12.61 KB	-rw-r--r--	2023-01-13 02:40
drda.lua	24.08 KB	-rw-r--r--	2023-01-13 02:40
eap.lua	7.54 KB	-rw-r--r--	2023-01-13 02:40
eigrp.lua	12.98 KB	-rw-r--r--	2023-01-13 02:40
formulas.lua	5.68 KB	-rw-r--r--	2023-01-13 02:40
ftp.lua	9.03 KB	-rw-r--r--	2023-01-13 02:40
geoip.lua	1.71 KB	-rw-r--r--	2023-01-13 02:40
giop.lua	18.42 KB	-rw-r--r--	2023-01-13 02:40
gps.lua	3.38 KB	-rw-r--r--	2023-01-13 02:40
http.lua	117.07 KB	-rw-r--r--	2023-01-13 02:40
httpspider.lua	36.65 KB	-rw-r--r--	2023-01-13 02:40
iax2.lua	9.58 KB	-rw-r--r--	2023-01-13 02:40
idna.lua	17.14 KB	-rw-r--r--	2023-01-13 02:40
ike.lua	14.63 KB	-rw-r--r--	2023-01-13 02:40
imap.lua	9.59 KB	-rw-r--r--	2023-01-13 02:40
informix.lua	39.93 KB	-rw-r--r--	2023-01-13 02:40
ipOps.lua	29.06 KB	-rw-r--r--	2023-01-13 02:40
ipmi.lua	8.08 KB	-rw-r--r--	2023-01-13 02:40
ipp.lua	12.57 KB	-rw-r--r--	2023-01-13 02:40
irc.lua	757 B	-rw-r--r--	2023-01-13 02:40
iscsi.lua	21.38 KB	-rw-r--r--	2023-01-13 02:40
isns.lua	14.98 KB	-rw-r--r--	2023-01-13 02:40
jdwp.lua	43.52 KB	-rw-r--r--	2023-01-13 02:40
json.lua	11.62 KB	-rw-r--r--	2023-01-13 02:40
knx.lua	2.42 KB	-rw-r--r--	2023-01-13 02:40
ldap.lua	31.94 KB	-rw-r--r--	2023-01-13 02:40
lfs.luadoc	1.68 KB	-rw-r--r--	2023-01-13 02:40
libssh2-utility.lua	4.69 KB	-rw-r--r--	2023-01-13 02:40
libssh2.luadoc	4.75 KB	-rw-r--r--	2023-01-13 02:40
listop.lua	4.66 KB	-rw-r--r--	2023-01-13 02:40
lpeg-utility.lua	5.64 KB	-rw-r--r--	2023-01-13 02:40
lpeg.luadoc	351 B	-rw-r--r--	2023-01-13 02:40
ls.lua	10.96 KB	-rw-r--r--	2023-01-13 02:40
match.lua	2.05 KB	-rw-r--r--	2023-01-13 02:40
membase.lua	9.93 KB	-rw-r--r--	2023-01-13 02:40
mobileme.lua	8.46 KB	-rw-r--r--	2023-01-13 02:40
mongodb.lua	21.3 KB	-rw-r--r--	2023-01-13 02:40
mqtt.lua	28.86 KB	-rw-r--r--	2023-01-13 02:40
msrpc.lua	190.07 KB	-rw-r--r--	2023-01-13 02:40
msrpcperformance.lua	29.65 KB	-rw-r--r--	2023-01-13 02:40
msrpctypes.lua	168.52 KB	-rw-r--r--	2023-01-13 02:40
mssql.lua	109.43 KB	-rw-r--r--	2023-01-13 02:40
multicast.lua	5.97 KB	-rw-r--r--	2023-01-13 02:40
mysql.lua	16.03 KB	-rw-r--r--	2023-01-13 02:40
natpmp.lua	5.11 KB	-rw-r--r--	2023-01-13 02:40
nbd.lua	16.04 KB	-rw-r--r--	2023-01-13 02:40
ncp.lua	35.64 KB	-rw-r--r--	2023-01-13 02:40
ndmp.lua	11.43 KB	-rw-r--r--	2023-01-13 02:40
netbios.lua	14.44 KB	-rw-r--r--	2023-01-13 02:40
nmap.luadoc	40.34 KB	-rw-r--r--	2023-01-13 02:40
nrpc.lua	4.46 KB	-rw-r--r--	2023-01-13 02:40
nsedebug.lua	3.49 KB	-rw-r--r--	2023-01-13 02:40
omp2.lua	4.78 KB	-rw-r--r--	2023-01-13 02:40
oops.lua	3.61 KB	-rw-r--r--	2023-01-13 02:40
openssl.luadoc	7.5 KB	-rw-r--r--	2023-01-13 02:40
ospf.lua	15.29 KB	-rw-r--r--	2023-01-13 02:40
packet.lua	36.18 KB	-rw-r--r--	2023-01-13 02:40
pcre.luadoc	6.79 KB	-rw-r--r--	2023-01-13 02:40
pgsql.lua	20.6 KB	-rw-r--r--	2023-01-13 02:40
pop3.lua	5.74 KB	-rw-r--r--	2023-01-13 02:40
pppoe.lua	29.42 KB	-rw-r--r--	2023-01-13 02:40
proxy.lua	11.37 KB	-rw-r--r--	2023-01-13 02:40
punycode.lua	11.5 KB	-rw-r--r--	2023-01-13 02:40
rand.lua	2.7 KB	-rw-r--r--	2023-01-13 02:40
rdp.lua	14.73 KB	-rw-r--r--	2023-01-13 02:40
re.lua	8.22 KB	-rw-r--r--	2023-01-13 02:40
redis.lua	3.61 KB	-rw-r--r--	2023-01-13 02:40
rmi.lua	47.77 KB	-rw-r--r--	2023-01-13 02:40
rpc.lua	107.64 KB	-rw-r--r--	2023-01-13 02:40
rpcap.lua	11.08 KB	-rw-r--r--	2023-01-13 02:40
rsync.lua	5.22 KB	-rw-r--r--	2023-01-13 02:40
rtsp.lua	8.62 KB	-rw-r--r--	2023-01-13 02:40
sasl.lua	16.51 KB	-rw-r--r--	2023-01-13 02:40
shortport.lua	11.99 KB	-rw-r--r--	2023-01-13 02:40
sip.lua	30.07 KB	-rw-r--r--	2023-01-13 02:40
slaxml.lua	17.9 KB	-rw-r--r--	2023-01-13 02:40
smb.lua	173.22 KB	-rw-r--r--	2023-01-13 02:40
smb2.lua	15.34 KB	-rw-r--r--	2023-01-13 02:40
smbauth.lua	37.33 KB	-rw-r--r--	2023-01-13 02:40
smtp.lua	19.85 KB	-rw-r--r--	2023-01-13 02:40
snmp.lua	16 KB	-rw-r--r--	2023-01-13 02:40
socks.lua	8.25 KB	-rw-r--r--	2023-01-13 02:40
srvloc.lua	10.99 KB	-rw-r--r--	2023-01-13 02:40
ssh1.lua	9.15 KB	-rw-r--r--	2023-01-13 02:40
ssh2.lua	11.73 KB	-rw-r--r--	2023-01-13 02:40
sslcert.lua	33.35 KB	-rw-r--r--	2023-01-13 02:40
sslv2.lua	9.68 KB	-rw-r--r--	2023-01-13 02:40
stdnse.lua	32.64 KB	-rw-r--r--	2023-01-13 02:40
strbuf.lua	4.52 KB	-rw-r--r--	2023-01-13 02:40
strict.lua	2.53 KB	-rw-r--r--	2023-01-13 02:40
stringaux.lua	4.32 KB	-rw-r--r--	2023-01-13 02:40
stun.lua	11.08 KB	-rw-r--r--	2023-01-13 02:40
tab.lua	3.35 KB	-rw-r--r--	2023-01-13 02:40
tableaux.lua	2.06 KB	-rw-r--r--	2023-01-13 02:40
target.lua	3.93 KB	-rw-r--r--	2023-01-13 02:40
tftp.lua	9.41 KB	-rw-r--r--	2023-01-13 02:40
tls.lua	58.05 KB	-rw-r--r--	2023-01-13 02:40
tn3270.lua	46.99 KB	-rw-r--r--	2023-01-13 02:40
tns.lua	64.16 KB	-rw-r--r--	2023-01-13 02:40
unicode.lua	14.23 KB	-rw-r--r--	2023-01-13 02:40
unittest.lua	12.41 KB	-rw-r--r--	2023-01-13 02:40
unpwdb.lua	10.42 KB	-rw-r--r--	2023-01-13 02:40
upnp.lua	11.18 KB	-rw-r--r--	2023-01-13 02:40
url.lua	16.7 KB	-rw-r--r--	2023-01-13 02:40
versant.lua	8.58 KB	-rw-r--r--	2023-01-13 02:40
vnc.lua	25.54 KB	-rw-r--r--	2023-01-13 02:40
vulns.lua	76.45 KB	-rw-r--r--	2023-01-13 02:40
vuzedht.lua	16.21 KB	-rw-r--r--	2023-01-13 02:40
wsdd.lua	11.98 KB	-rw-r--r--	2023-01-13 02:40
xdmcp.lua	12.09 KB	-rw-r--r--	2023-01-13 02:40
xmpp.lua	15.91 KB	-rw-r--r--	2023-01-13 02:40
zlib.luadoc	4.88 KB	-rw-r--r--	2023-01-13 02:40

Rename

local os = require "os"
local stdnse = require "stdnse"
local string = require "string"
local unittest = require "unittest"
_ENV = stdnse.module("gps", stdnse.seeall)

---
-- A smallish gps parsing module.
-- Currently does GPRMC NMEA decoding
--
-- @author Patrik Karlsson <patrik@cqure.net>
--
--

NMEA = {

-- Parser for the RMC sentence
  RMC = {

parse = function(str)

local time, status, latitude, ns_indicator, longitude,
        ew_indicator, speed, course, date, variation,
        ew_variation, checksum = str:match("^%$GPRMC,([^,]*),([^,]*),([^,]*),([^,]*),([^,]*),([^,]*),([^,]*),([^,]*),([^,]*),([^,]*),([^%*]*)(.*)$")

if ( not(latitude) or not(longitude) ) then
        return
      end

local deg, min = latitude:match("^(..)(.*)$")
      if ( not(deg) or not(min) ) then
        return
      end
      latitude = tonumber(deg) + (tonumber(min)/60)

deg, min = longitude:match("^(..)(.*)$")
      if ( not(deg) or not(min) ) then
        return
      end
      longitude = tonumber(deg) + (tonumber(min)/60)
      if ( ew_indicator == 'W' ) then
        longitude = -longitude
      end

if ( ns_indicator == 'S' ) then
        latitude = -latitude
      end

return { time = time, status = status, latitude = latitude,
      longitude = longitude, speed = speed, course = course,
      date = date, variation = variation,
      ew_variation = ew_variation }
    end,

-- Calculates an verifies the message checksum
  --
  -- @param str containing the GPS sentence
  -- @return status true on success, false if the checksum does not match
  -- @return err string if status is false
  checksum = function(str)
    local val = 0
    for c in str:sub(2,-4):gmatch(".") do
      val = val ~ string.byte(c)
    end

if ( str:sub(-2):upper() ~= stdnse.tohex(string.char(val)):upper() ) then
      return false, ("Failed to verify checksum (got: %s; expected: %s)"):format(stdnse.tohex(string.char(val)), str:sub(-2))
    end
    return true
  end,

-- Parses a GPS sentence using the appropriate parser
  --
  -- @param str containing the GPS sentence
  -- @return entry table containing the parsed response or
  --         err string if status is false
  -- @return status true on success, false on failure
  parse = function(str)

local status, err = NMEA.checksum(str)
    if ( not(status) ) then
      return false, err
    end

local prefix = str:match("^%$GP([^,]*)")
    if ( not(prefix) ) then
      return false, "Not a NMEA sentence"
    end

if ( NMEA[prefix] and NMEA[prefix].parse ) then
      local e = NMEA[prefix].parse(str)
      if (not(e)) then
        return false, ("Failed to parse entry: %s"):format(str)
      end
      return true, e
    else
      local err = ("No parser for prefix: %s"):format(prefix)
      stdnse.debug2("%s", err)
      return false, err
    end

end

}

Util = {

convertTime = function(date, time)
    local d = {}
    d.hour, d.min, d.sec = time:match("(..)(..)(..)")
    d.day, d.month, d.year = date:match("(..)(..)(..)")
    d.year = d.year + 2000
    return os.time(d)
  end
}

if not unittest.testing() then
  return _ENV
end

test_suite = unittest.TestSuite:new()
test_suite:add_test(unittest.is_true(NMEA.checksum("$GPGLL,5300.97914,N,00259.98174,E,125926,A*28")), "valid checksum")
test_suite:add_test(unittest.is_false(NMEA.checksum("$XPGLL,5300.97914,N,00259.98174,E,125926,A*28")), "invalid checksum")
return _ENV;