Kodér USB Rubber Ducky Script (VBScript): 5 krokov

2024 Autor: John Day | [email protected]. Naposledy zmenené: 2024-01-30 11:57

Ak máte USB Rubber Ducky, budete vedieť, že zostavenie skriptu do súboru.bin je veľmi nepríjemná úloha. Ak budete musieť vykonať akékoľvek ladenie, budete vedieť, že neustále sťahovanie vášho skompilovaného skriptu môže byť utrpením. Aby som vyriešil tento problém, vytvoril som VBScript, ktorý dokáže váš kód rýchlo a jednoducho skompilovať.

Skompilovaný.exe a zdrojový kód si môžete stiahnuť nižšie.

Každopádne vás pravdepodobne zaujíma, ako som vytvoril takú úžasnú aplikáciu GUI vo vbs, a ak áno, prejdite na krok 3.

Krok 1: Inštalácia…

V súbore REAMDE.txt je aj návod, ako to urobiť. V každom prípade musíte na disku C vytvoriť priečinok s názvom „temp“, ak ho ešte nemáte. Tiež, ak ešte nemáte nainštalovanú javu, môžete ju získať odtiaľto. Potom si stiahnite súbor duckencode.jar a presuňte súbor do priečinka c: / temp. Ďalej rozbaľte jeden zo súborov.zip a spustite Duck.hta v rovnakom adresári ako „ico.ico“a „pic.gif“, ak používate nekompilovanú verziu. Alebo ak používate skompilovaný.exe, jednoducho spustite 'Duck.exe'.

Teraz môžeme prejsť na ďalší krok …

Krok 2: Použitie…

Tento program je skutočne jednoduchý. Ak ho chcete použiť, jednoducho kliknite na položku „Prilepiť zo schránky“a automaticky sa prilepí do kódu. Alebo kliknite na položku načítať z textového súboru a načítajte skript z textového súboru. Potom sa váš kód zobrazí v textovom poli nižšie. Vykonajte konečné zmeny kódu a kliknite na položku „Kódovať“. Prejdite na c: / temp a presuňte 'inject.bin' na svoj USB Rubber Ducky.

Možno sa pýtate, čo je to script.txt. Čo to je, je nekompilovaný kód z textového poľa. Slúži ako záloha surového kódu.

POZNÁMKA: Ak chcete vytvoriť malý skript, zadajte kód do textového poľa. Rýchly a ľahký spôsob testovania USB Rubber Ducky.

Prejdite na ďalší krok, ak sa chcete dozvedieť viac o tom, ako GUI vo vbs a ako bol tento program vytvorený, inak:

Ďakujeme, že ste si prečítali tento návod a v prípade akýchkoľvek otázok, pripomienok alebo obáv pošlite komentár alebo mi napíšte

Krok 3: GUI vo VBScript

Takže áno, je možné vytvárať GUI vo vbs. Spôsob, akým to robíte, je zabalenie textu do HTA. Pokiaľ to ešte neviete, HTA je skriptovací jazyk veľmi podobný html, ktorý sa používa iba na zabalenie skriptov, ako sú vbscripts a jscript, do GUI. Podrobné vysvetlenie a návod tu.

Takže teraz, keď viete, čo je hta, dovoľte mi poskytnúť niekoľko tipov, ako ľahko vytvárať tézy. Najprv si stiahnite HTA helpomatic (obr. 2) nižšie. Pôvodný odkaz už bohužiaľ nefunguje, ale našťastie som pred časom kópiu uložil. Ďalej si stiahnite a nainštalujte vbsedit, ktorý je súčasťou htaedit.

Potom, čo máte tieto dva programy, skutočne nepotrebujete žiadne skúsenosti s html/hta, aby ste mohli začať vytvárať GUI. Čo je skvelé pre ľudí ako ja, ktorí sa nechcú učiť hta len preto, aby vytvorili GUI.

Teraz prejdite na ďalší krok a zistite, ako som vytvoril kačací kodér …

Krok 4: Ako som to urobil

Takže najskôr:

APPLICATIONNAME = "Duck Encoder" ID = "DuckEncoder" VERSION = "1.0" INNERBORDER = "no" MAXIMIZEBUTTON = "no" ICON = "ico.ico" SCROLL = "no"

Tým sa nastaví niekoľko vecí, ako napríklad ikona, typ okraja atď.

Sub Window_OnLoad self.resizeTo 400, 454 Dim objFso: Set objFso = CreateObject ("Scripting. FileSystemObject") If Not objFso. FileExists ("c: / temp / duckencode.jar") Then MsgBox "Chyba, súbor nebol nájdený: c: / temp / duckencode.jar ", 16," Duck Encoder "Self.close () End If End Sub

Ďalej sa tento podsek spustí automaticky pri každom prvom spustení programu. Čo to urobí, je zmeniť veľkosť okna a potom sa uistiť, že 'duckencode.jar' je v správnom adresári.

Sub OnClickButtonbtnLoad ()

Dim objShlApp, objFolderLocation, strFileLocation, objFso, objFolder, colFiles, strTextFileList, objFile Dim strCompleteText Set objFso = CreateObject ("Scripting. FileSystemObject") Set objShlApp = CreateObject ("Shell. A (0, "Vyhľadať priečinok obsahujúci súbor:", 16384, 0) Ak je číslo Err. 0, potom MsgBox "Musíte vybrať priečinok obsahujúci súbor.", 16, "Duck Encoder" Err. Clear () Inak ak objFolderLocation = "" Potom ukončite Sub Pri chybe Choďte 0 Nastaviť objFolder = objFso. GetFolder (objFolderLocation. Self. Path & "\") Nastaviť colFiles = objFolder. Files strTextFileList = "" Pre každý objFile v colFiles ak InStr (objFile. Name, ".txt ") False Then strTextFileList = strTextFileList & objFile. Name & vbCrLf End If Next strFileLocation = InputBox (" Zadajte správny textový súbor, ktorý chcete kódovať: "& vbCrLf & vbCrLf & strTextFileList," Not Ducky " (strFileLocation) Potom ak nie, objFso. FileExists (objFolder Location. Self. Path & "\" & strFileLocation) Potom MsgBox "Chyba, musíte vybrať textový súbor zo zoznamu!", 16, "Duck Encoder" Inak pri chybe Pokračovať Ďalej strFileLocation = objFolderLocation. Self. Path & "\ "& strFileLocation Set objFile = objFso. OpenTextFile (strFileLocation, 1, FALSE) txtScript. Value = objFile. ReadAll objFile. Close () If Err. Number 0 Then MsgBox" Text file is empty. ", 16," Duck Encoder "End If End If End If End if End Sub

Ok, táto časť kódu je skutočne mätúca, toto je kód, keď používateľ klikne na „Načítať z textového súboru“. Pretože je v hta prakticky nemožné vytvoriť dialógové okno s otvoreným súborom, program zobrazí dialógové okno prehľadávania priečinkov a požiada používateľa, aby vybral priečinok obsahujúci súbor skriptu. Potom program otvorí vstupné pole s dotazom na používateľa, ktorý textový súbor má načítať do tohto priečinka. Potom program prečíta všetko, čo je v súbore, a vloží ho do textového poľa.

Sub OnClickButtonbtnPaste () Dim objHTML, ClipboardText Set objHTML = CreateObject ("htmlfile") ClipboardText = objHTML. ParentWindow. ClipboardData. GetData ("text") If IsNull (ClipboardText) = True Then MsgBox "Nič v schránke!" "Duck Encoder" Else txtScript. Value = ClipboardText End If End Sub

Všetko, čo tento kód robí, je, že keď používateľ klikne na „Prilepiť zo schránky“, program načíta text zo schránky do textového poľa.

Krok 5: Ako som to urobil (časť 2)

Sub OnClickButtonbtnEncode () If txtScript. Value = "" Then MsgBox "There is no code!", 16, "Duck Encoder" Else Dim objFso, txtScriptFile Set objFso = CreateObject ("Scripting. Filesystemobject") Set txtScriptFile = objFso.pen "c: / temp / script.txt", 2, True) txtScriptFile. WriteLine (txtScript. Value) txtScriptFile. Close () idTimer = window.setTimeout ("Compile", 800, "VBScript") End If End Sub Sub Compile () window.clearTimeout (idTimer) Dim objWshShl: Set objWshShl = CreateObject ("WScript. Shell") objWshShl. Run "java.exe -jar c: / temp / duckencode.jar -ic: / temp / script.txt -oc: / \ temp / inject.bin ", 0 'MsgBox" Skript zostavený pre inject.bin v c: / temp ", vbOKOnly+vbInformation," Ducky Encoder "End Sub

Tento kód sa spustí po kliknutí na položku „Kódovať“.

Čo to urobí, je vytvoriť textový súbor s názvom script.txt a vložiť do neho všetko, čo sa nachádza v textovom poli. Potom počká 0,8 sekundy a potom ho skompiluje.

Zvyšok kódu len vytvorí GUI. Je to celkom samozrejmé, ak poznáte základné hta.