PalmOS Port Scanner.

From: Shaun Moore <shaunige(at)yahoo.co.uk>
Date: Mon Jul 14 2003 - 16:46:04 EDT

As mobile technology develops, the possibilities of mobile capabilities expand. For a while, PalmOS has been described as what would be "a perfect hacking operating system", and numerous hacking and security programs have been released:

http://www.securiteam.com/tools/5YP0J000CS.htmlhttp://www.hackcanada.com/homegrown/palmpilot/index.htmlhttp://www.securiteam.com/tools/5RQ0B000CU.html

And numerous more articles exist across the Internet.

However, as these Palm Hacking tools emerge, I still notice that one major and necessary tool found in any Administrator's, Hacker's, and pen-tester's tool-box is still up to now missing: The Port Scanner. The Port scanner is one of the most basic yet essential tool used by anybody concerned or interested in their server's security, yet nobody that I know of has released one publicly, so I hope to change that.

I have written a port scanner for PalmOS, in the HotPaw BASIC programming language for Palm, the code is below:

# Rootscan-1.6.bas
# Rootscan PalmOS port scanner.
# The first port scanner written for PalmOS.
# Written by shaunige@yahoo.co.uk.

s$(0) = "About"
s$(1) = "PalmScan (aka Rootscan)"
s$(2) = "PalmOS port scanner"
s$(3) = "This software is Open-source."
s$(4) = "Author: shaunige@yahoo.co.uk"

x = fn myabout()

input "Enter IP address/host to scan:", h$
input "Enter start port:", p
input "Enter end port:", e

let t$ = "scanlog"
let i=p
open new "memo", t$ as #4
while(i <= e)
c = fn tcp(1, h$, i)
if(c = 0)
sound 1000, 200, 5
print "Port ", i, "- Open"
fn tcp(-1, "", 0)
print #4, "Port ", i, "- Open"
else
fn tcp(-1, "", 0)
print #4, "Port ", i, "- Closed"
endif
let i=i+1
wend
close #4
print "Scan complete!"
end

The program requires HotPaw BASIC interpreter for Palm, it can be obtained, along with documentation here: http://www.hotpaw.com/rhn/hotpaw/
Type/paste the program into a Memo and run with the Hotpaw BASIC interpreter, simple :-).

If there is indeed a port scanner for PalmOS, please kindly inform me, but as far as I know, this is the first one "released".

Maybe I will be able to soon re-write this in C, and compile it into a prc binary.

Thank you for your time.
Shaun.

---

Want to chat instantly with your online friends? Get the FREE Yahoo! Messenger http://uk.messenger.yahoo.com/ Received on Mon Jul 14 17:06:09 2003