[jTool] Alle Befehle auslesen | j_cmdsAuslesen.vbs

Jeffry · 11. September 2014

[jTool] Alle Befehle auslesen

Hallo,

ich veröffentliche hiermit ein kleines aber effizientes Tool, welches alle verwendbaren Befehle aus einem Filterscript bzw. einem Gamemode auslesen und ausgeben kann, das spart durchaus mehrere Stunden Sucharbeit im Code. Die Idee stammt aus diesem Thread: Frage zu OCMD

Verzichtserklärung:
Der Code wird veröffentlicht "wie er ist". Es wird dringendst empfohlen vor Benutzung ein Backup der Serverfiles zu machen. Für Schäden jeglicher Art übernehme ich keine Haftung, die Benutzung erfolgt auf eigene Verantwortung.
Der Code darf jederzeit von jedem verändert werden, solange die Namensnennung nicht aus dem Code entfernt wird.
Der Code darf nicht unter eigenem Name veröffentlicht werden, weder frei noch kommerziell.

Vorführung

Das Tool ist nicht mehr als eine kleine ausführbare Datei bzw. ein Visual Basic Code (.vbs) um es beim Namen zu nennen. Im richtigen Verzeichnis abgelegt und gestartet macht der Code in Sekundenschnelle die Arbeit für die man selbst mehrere Stunden bräuchte.

Externer Inhalt www.youtube.com

Inhalte von externen Seiten werden ohne Ihre Zustimmung nicht automatisch geladen und angezeigt.

Durch die Aktivierung der externen Inhalte erklären Sie sich damit einverstanden, dass personenbezogene Daten an Drittplattformen übermittelt werden. Mehr Informationen dazu haben wir in unserer Datenschutzerklärung zur Verfügung gestellt.

Anleitung

Die folgenden Schritte sollen zeigen wie der Code verwendet werden kann, um die Befehle aus der jeweiligen .pwn Datei auszulesen.
Ich weise nochmals darauf hin, vor Benutzung ein Backup des Servers, bzw. der Dateien darin, anzulegen. Der Code wurde nach bestem Wissen und Gewissen getestet, dennoch können unvorhergesehene Ereignisse (z.B. Stromausfall) möglicherweise zu Fehlern führen. Ebenfalls weise ich nochmals darauf hin, dass die Benutzung auf eigene Gefahr geschieht.

1. Code herunterladen
Um den Code auf den Rechner zu bekommen gibt es zwei Möglichkeiten:

Die erste und einfachste Variante ist der direkte Download. Im Anhang befindet sich ein ZIP-Ordner der die ausführbare Datei enthält.
1) ZIP Ordner auf den Windows-PC herunterladen
2) Datei entpacken

Die zweite Variante ist die manuelle Erstellung der Datei:
1) Kopiere folgenden Quellcode:

C

'-------------------------------------------------------------------------'
'                                                                         '
'                     [jTool] - Alle Befehle auslesen                     '
'                           j_cmdsAusgeben.vbs                            '
'                                                                         '
'                         Version 1.1 - 11.12.2014                        '
'                                                                         '
'                                © Jeffry                                 '
'                                                                         '
'-------------------------------------------------------------------------'




Set fs = CreateObject("Scripting.FileSystemObject")
pfad = fs.GetParentFolderName(Wscript.ScriptFullName)


If(fs.FileExists(pfad & "\AlleBefehle.txt")) Then
	Set wFile = fs.OpenTextFile(pfad & "\AlleBefehle.txt", 8)
	wFile.WriteLine ""
	wFile.WriteLine ""
Else
	Set wFile = fs.CreateTextFile(pfad & "\AlleBefehle.txt", True)
End If


wFile.WriteLine "----" & CStr(Now) & "----"
cmds = 0


Set sDir = fs.getfolder(pfad)
For Each file In sDir.Files
	If(LCase(Right(file.path, 4)) = ".pwn") Then
		Set rFile = fs.OpenTextFile(file.path, 1)
		blockcomment = false
		Do While rFile.AtEndOfStream <> true
			str = ""
			str = rFile.ReadLine
			If(InStr(str, "*/") And blockcomment = true) Then blockcomment = false
			If(blockcomment = false) Then
				comment = InStr(str, "//")
				bcomment = InStr(str, "/*")
				ccomment = InStr(str, "*/")
				If(bcomment <> 0 And ccomment = 0) Then comment = bcomment
				tmp = InStr(str, "dcmd_")
				If(tmp And (comment > tmp Or comment = 0) And (ccomment < tmp Or bcomment > tmp) And (bcomment > tmp Or bcomment = 0)) Then
					If(InStr(tmp, str, "),") = 0 And InStr(tmp, str, ");") = 0 And InStr(str, "#define") = 0) Then
						tmpstr = Mid(str, tmp+5, InStr(tmp, str, "(")-(tmp+5))
						wFile.WriteLine "/" & tmpstr
						cmds = cmds + 1
					End If
				End If
				tmp = InStr(str, "ocmd:")
				If(tmp And (comment > tmp Or comment = 0) And (ccomment < tmp Or bcomment > tmp) And (bcomment > tmp Or bcomment = 0)) Then
					tmpstr = Mid(str, tmp+5, InStr(tmp, str, "(")-(tmp+5))
					wFile.WriteLine "/" & tmpstr
					cmds = cmds + 1
				End If
				tmp = InStr(str, "ocmd@")
				If(tmp And InStr(tmp+1, str, ":") = (tmp+6)) Then
					again = true
					start = InStr(tmp+1, str, ":")
					Do While again <> false
						again = false
						If(tmp And (comment > tmp Or comment = 0) And (ccomment < tmp Or bcomment > tmp) And (bcomment > tmp Or bcomment = 0)) Then
							If(start And InStr(start+1, str, ",") < InStr(start+1, str, "(")) Then
								tmpstr = Mid(str, start+1, InStr(start+1, str, ",")-(start+1))
								wFile.WriteLine "/" & tmpstr
								cmds = cmds + 1
								again = true
							Else
								If(start) Then
									tmpstr = Mid(str, start+1, InStr(start+1, str, "(")-(start+1))
									wFile.WriteLine "/" & tmpstr
									cmds = cmds + 1
								End If
							End If
						End If
						start = InStr(start+1, str, ",")
					Loop
				End If
				tmp = InStr(str, "YCMD:")
				If(tmp And (comment > tmp Or comment = 0) And (ccomment < tmp Or bcomment > tmp) And (bcomment > tmp Or bcomment = 0)) Then
					tmpstr = Mid(str, tmp+5, InStr(tmp, str, "(")-(tmp+5))
					wFile.WriteLine "/" & tmpstr
					cmds = cmds + 1
				End If
				if(tmp = 0) Then 
					tmp = InStr(str, "CMD:")
				Else 
					tmp = 0
				End If
				If(tmp And (comment > tmp Or comment = 0) And (ccomment < tmp Or bcomment > tmp) And (bcomment > tmp Or bcomment = 0)) Then
					tmpstr = Mid(str, tmp+4, InStr(tmp, str, "(")-(tmp+4))
					wFile.WriteLine "/" & tmpstr
					cmds = cmds + 1
				End If
				tmp = 0
				again = true
				Do While again <> false
					tmp = InStr(tmp+1, str, "strcmp(cmd")
					If(tmp) Then start = InStr(tmp, str, """")
					again = false
					If(tmp And (comment > tmp Or comment = 0) And (ccomment < tmp Or bcomment > tmp) And (bcomment > tmp Or bcomment = 0)) Then
						If(InStr(tmp, str, "/") = (start+1)) Then
							tmpstr = Mid(str, start+2, InStr(start+1, str, """")-(start+2))
							wFile.WriteLine "/" & tmpstr
							cmds = cmds + 1
							again = true
						End If
					End If
				Loop
				tmp = 0
				again = true
				Do While again <> false
					tmp = InStr(tmp+1, str, "strcmp(""/")
					If(tmp And InStr(tmp+1, str, "cmd")) Then start = InStr(tmp, str, """")
					again = false
					If(tmp And (comment > tmp Or comment = 0) And (ccomment < tmp Or bcomment > tmp) And (bcomment > tmp Or bcomment = 0)) Then
						If(InStr(tmp, str, "/") = (start+1)) Then
							tmpstr = Mid(str, start+2, InStr(start+1, str, """")-(start+2))
							wFile.WriteLine "/" & tmpstr
							cmds = cmds + 1
							again = true
						End If
					End If
				Loop
				If(InStr(str, "/*") And InStr(str, "*/") = 0 And blockcomment = false) Then blockcomment = true
			End If
		Loop
		rFile.Close()
	End If
Next


wFile.close()


If(cmds > 0) Then 
	MsgBox "Es wurden " & cmds & " Befehle gefunden und gespeichert."
Else
	MsgBox "Es wurden keine Befehle gefunden."
End If

Alles anzeigen

2) Erstelle eine leere Textdatei (.txt) und öffne diese mit einem Editor.
3) Füge den kopierten Code ein.
4) Speichere die Datei mit "Speichern unter..." als "j_cmdsAuslesen.vbs"

2. Code ausführen
Der Code durchsucht das gesamte Verzeichnis (den gesamten Ordner) in dem die Datei liegt. Die "j_cmdsAuslesen.vbs" muss nun in das entsprechende Verzeichnis gelegt werden.
1) Verschiebe die Datei in den "gamemodes" Ordner deines Servers wenn Du die Befehle aus Deinem Gamemode auslesen willst, in den "filterscripts" Ordner, wenn Du die Befehle aus allen Filterscripts auslesen willst.
2) Klicke doppelt auf die Datei "j_cmdsAuslesen.vbs" und warte. Je nach Größe der pwn-Codes und Prozessorgeschwindigkeit kann der Vorgang einige Minuten dauern.
3) Sobald der Prozess zu Ende ist, bekommst Du eine Ergebnismeldung.

3. Ergebnis ansehen
In dem Verzeichnis in welchem die "j_cmdsAuslesen.vbs" Datei liegt wurde eine Textdatei erstellt, die alle Befehle beinhaltet, die gefunden worden sind.
1) Öffne die Textdatei mit einem Editor.
2) Nun siehst Du alle Befehle, die gefunden worden sind.

Kompatibilität

In der aktuellen Version (v1.1) werden folgende Command-Prozessoren erkannt und ausgegeben:

strcmp [strcmp]
dcmd [dcmd_]
ocmd [ocmd:]
ycmd [YCMD:]
zcmd [CMD:]

Sollten weitere Command-Prozessoren gewünscht sein, können diese mir gerne bekannt gegeben werden, diese können dann in einer neueren Veröffentlichung aufgenommen werden.

Fragen/Probleme/Anregungen/Rückmeldungen

Bei Fragen und Problemen jeglicher Art bitte ich um die Benutzung der "Antworten" Funktion. Sollte ich binnen 48 Stunden nicht geantwortet haben, kann mir gerne eine Private Nachricht (PN) geschickt werden.
Für Anregungen betreffend Vorschlägen oder Verbesserungen bin ich jederzeit offen. Ich bitte darum, diese ebenfalls über die "Antworten" Funktion zu posten.

Über Rückmeldungen würde ich mich freuen.

Changelog

11.09.2014: [v1.0] Erste Veröffentlichung
14.09.2014: [v1.0.1] Bug behoben: Der define von dcmd wurde als Befehl erkannt.
11.12.2014: [v1.1] ocmd wird nun auch mit mehreren Befehlen erkannt & strcmp wird nun auch in umgekehrter Reihenfolge erkannt.
18.04.2015: [v1.1] Tippfehler im Thread behoben.
22.06.2015: [v1.1] Download-Bilder repariert
08.11.2015: [v1.1] Code-Formatierung an WBB4 angepasst

Download

Viel Spaß mit dem Tool, ich hoffe es erspart dem einen oder anderen etwas Zeit.

Beste Grüße,
Jeffry

**XeroX** · 11. September 2014

Hm vielleicht die möglichkeit einzelnde Dateien auszuwählen zum auslesen da manche mehrere .pwn dateien im gamemode / filterscript ordner haben und somit alle cmds auch die die es in dem eigentlichen gamemode / filterscript nicht gibt ausgegeben bekommen.

H4rd_B4se · 11. September 2014

Zitat von XeroX

Hm vielleicht die möglichkeit einzelnde Dateien auszuwählen zum auslesen da manche mehrere .pwn dateien im gamemode ordner haben und somit alle cmds auch die die es in dem eigentlichen gamemode nicht gibt ausgegeben bekommen.

Ehm.... wie wärs wenn man die Dateien whärend des Tests entfernt

**XeroX** · 11. September 2014

H4rd_B4se: Kennst doch die "experten" hier im forum die denken an sowas anicht

Jeffry · 14. September 2014

Zitat von XeroX

Hm vielleicht die möglichkeit einzelnde Dateien auszuwählen zum auslesen da manche mehrere .pwn dateien im gamemode / filterscript ordner haben und somit alle cmds auch die die es in dem eigentlichen gamemode / filterscript nicht gibt ausgegeben bekommen.

Wäre zwar eine nette Idee, aber das macht das Tool nur unnötig kompliziert, da die meisten sowieso die Befehle aus allen Codes auslesen wollen. Und wenn mal nicht, dann kann man sich die gewünschten Codes auch in einen Ordner kopieren und dort durchsuchen lassen. Das geht für die meisten aber schneller, wenn es keine Auswahl gibt.
Ich werde mir die Idee trotzdem merken, falls mir mal langweilig sein sollte, kann ich mich ja mal dran setzen.

[BE]axi92 · 14. September 2014

Wollte aus spaß mal testen^^

Code

----14.09.2014 17:19:37----
/%1

Entspricht nicht ganz der Wahrheit^^

Jeffry · 14. September 2014

Zitat von [BE]axi92

Entspricht nicht ganz der Wahrheit^^

Problem wurde behoben. Danke für die Meldung.

Tom Sunder · 15. September 2014

Geil, danke, hab bei meinem Selfmade Script den /help befehl noch nicht gemacht und das spart mir jetzt einige Arbeit
10/10 Punkten

**Kasakow** · 27. September 2014

Schließe mich Toms Meinung an!
Dies hat mir auch gerade ein bisschen Arbeit erspart!

Aber mir fällt gerade auf dass er diese Sachen nicht mitzählt "ocmd@2:help,hilfe(playerid, params[]) "!
Wäre gut, wenn du das ganze noch minimal überarbeiten würdest!

//Edit
Ich habe das mal selber hinzugefügt, stelle es hiermit zu Verfügung.

http://www.file-upload.net/download-9585159/jt.vbs.html

https://www.virustotal.com/de/…838d/analysis/1411826697/

Das ganze sieht dann halt so aus:

Code

/3:tban,timeban,zeitban

mfg

[BE]axi92 · 30. Oktober 2014

Zitat von Jeffry

Problem wurde behoben. Danke für die Meldung.

if(strcmp("/onlinehelp", cmd, true) == 0)
{
SendClientMessage(playerid, COLOR_YELLOW, "____________________Online Hilfe System____________________");
SendClientMessage(playerid, COLOR_GREEN, "/lehrer /oamt /admins /regierung /members /cops(nur für Cops)");
SendClientMessage(playerid, COLOR_GREEN, "/taxis /busse /tuner /bauern /medics /detektive /mechaniker /newsreporter /trucker /anwaelte");
SendClientMessage(playerid, COLOR_GREY, " ");
return 1;
}

Wird zb nicht gefunden

**Andosius** · 30. Oktober 2014

Sehr gutes Teil.

Wird bestimmt jedem mal nützlich sein!
Nur nutze ich leider Macros

- Trotzdem kommt es bei mir gut an.

-iEnerqie

Jeffry · 30. Oktober 2014

Zitat von [BE]axi92

Wird zb nicht gefunden

Gibt es tatsächlich Leute die es so rum schreiben? Hätte ich nicht gedacht. Ich werde das die Tage mit einbauen, Danke für den Hinweis.

@iEnerqie: Danke für die Rückmeldung.

Dem Hinweis von @CIBERKILLER: werde ich auch mit einbauen.

[BE]axi92 · 19. November 2014

Zitat von Jeffry

Gibt es tatsächlich Leute die es so rum schreiben? Hätte ich nicht gedacht. Ich werde das die Tage mit einbauen, Danke für den Hinweis.

Will dich nicht drängen, nur wann denkst du kommst du dazu den fix einzubauen?
Mich würde es mal brennend interessieren wie viel cmds wir wirklich haben^^

Jeffry · 19. November 2014

Zitat von [BE]axi92

Will dich nicht drängen, nur wann denkst du kommst du dazu den fix einzubauen?
Mich würde es mal brennend interessieren wie viel cmds wir wirklich haben^^

Kein Problem. Mir sind einige wichtige Dinge dazwischen gekommen, ich werde schauen es bis Ende dieser Woche fertig zu machen.
Habe es nicht vergessen.

EDIT: [BE]axi92: Ich muss dich leider noch etwas vertrösten. Ich hoffe, dass es mir diese Woche reicht, habe zur Zeit sehr viel um die Ohren. Ist nicht vergessen, steht ganz oben in der To-Do-Liste. Tut mir Leid, dass es so lange dauert, ab nächstes Jahr bessert sich das wieder, falls es dann nochmals Änderungen bedarf.

KEVAPL · 19. November 2014

Ich kriege nur sowas:

SQL

----19.11.2014 13:21:53----
/ Das System hat den Spieler %s 
/ Das System hat den Spieler %s 
/ Das System hat den Spieler %s 
/ Das System hat den Spieler %s 
/ Das System hat den Spieler %s 
/ Der Admin %s 
/ Der Admin %s 
/ %s 
/ %s 
/ %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s 
/ Der Admin %s hat den Spieler %s zum Leader der Fraktion %s
/ Der Admin %s 
/ Das System hat den Spieler %s 
/ Das System hat den Spieler %s 
/ Das System hat den Spieler %s 
/ Das System hat den Spieler %s 
/ Das System hat den Spieler %s 
/ Das System hat den Spieler %s 
/ %s 
/ Du hast %s 
/ Du wurdest von %s

Alles anzeigen

Jeffry · 19. November 2014

KEVAPL: Hast du auch einen Code dazu? Wäre gut wenn du den dazupostest, damit ich es ausprobieren kann und ggf. beheben kann.

[BE]axi92 · 11. Dezember 2014

Gibt es schon neues oder kommt das erst nächstes Jahr wie du oben geschrieben hast?

Jeffry · 11. Dezember 2014

Zitat von [BE]axi92

Gibt es schon neues oder kommt das erst nächstes Jahr wie du oben geschrieben hast?

Ich habe es heute früh gemacht, ich muss es nur noch hochladen, das mache ich wenn ich zu Hause bin.

Tut mir wirklich leid, dass es so lange gedauert hat, aber ich war die letzten zwei Wochen unerwartet weg und konnte leider gar nichts machen.

EDIT:
Version 1.1:

ocmd wird nun auch mit mehreren Befehlen erkannt
strcmp wird nun auch in umgekehrter Reihenfolge erkannt

Download

Viel Spaß damit!

Nemesus · 11. Dezember 2014

Ein sehr schönes Programm, bestimmt für viele sehr nützlich!

Beitrag von Kasakow (19. September 2014)