Parameterüber (cmdline) + _AD_RecursiveGetMemberOf

Racer

Hallo AutoIt'ler!

Ich stehe an, verstehe nicht wo der Unterschied ist und bin schon recht verzweifelt

Zuerst das kleine Script:

C

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=Icons\Control_Panel.ico
#AutoIt3Wrapper_Change2CUI=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ActiveDirektory_UDF/AD.au3>
#include <advfha_proc.au3>
#include <array.au3>
#include <Constants.au3>


Local $skz
Local $user


$skz = $cmdline[1]
$user= $cmdline[2]




ConsoleWrite ("SKZ : " & $skz & @tab & StringLen($skz) & @CRLF)
ConsoleWrite ("User: " & $user& @tab & StringLen($user) & @CRLF)




_AD_Open()
$alle_gruppen = _AD_RecursiveGetMemberOf($user, 10, 1, false)
_AD_Close()




for $i = 1 to ubound ($alle_gruppen) -1
        if StringInStr (gettok ($alle_gruppen[$i], "|" , 1), $skz) Then
	    ConsoleWrite (gettok ($alle_gruppen[$i], "|" , 1) & @CRLF)
	EndIf
Next

Alles anzeigen

Was soll es tun: Ich frage mit Hilfe der AD_UDF einen Domainuser ab in welche Gruppe er ist. Das Ganze soll als Commandline-Programm verwendet werden. Um das typische "DOS" feeling zu haben

Zu dem Eigenlichen Problem: Nach dem Compilieren rufe ich das Programm in der Console mit zwei Parameter auf: Programm.exe Parameter1 Parameter2
Die beiden Parameter lasse ich mir zur Sicherheit auch noch ausgeben mit der Stringlänge (Zeile 17 und 18). Bis hier her ist alles OK. Aber ich bekommen keine Daten in das Array $alle_gruppen.

Schreibe ich in das Script hardcodet die Parameter (ab Zeile 16)

Code

$skz = "0123456"
$user = "Benutzer"

funktioniert die Abfrage und ich bekomme eine lange Liste an Gruppeninformationen. Die Consolenausgabe (Zeile 16 und 17) ist exakt die Selbe als würde ich Parameter übergeben!

Ich habe schon Probiert Leerzeichen an die Parameter anzuhängen, ich überprüfte mit _arraydisplay den Inhalt von $cmdline - alles OK

Was mache ich da falsch da?

lg
Racer

**Musashi**

Hallo @Racer !

Hast Du die Parameter in Anführungsstriche gesetzt, also :
Programm.exe "0123456" "Benutzer"

Gruß Musashi

**Kanashius**

@Musashi das hat er ja schon ausgeschlossen. die anführungszeichen braucht man auch nur, wenn leerzeichen in den Parametern sind.

Also ich sehe, wenn alles gleich ist, so wie du sagst, als einzige Möglichkeit die Textkodierung. Lass dir mal mit Asc("char") jeden einzelnen Buchstaben als ASCII-Code ausgeben und vergleich die ASCII werte.

Etwa so:

Spoiler anzeigen

[autoit]

for $i=1 to StringLen($user) step 1
ConsoleWrite(Asc(StringMid($user,$i,1))&@tab)
next
ConsoleWrite(@crlf)

[/autoit]

BLinz

Ich habe auch mal so etwas gebaut - zum Vergleich:

AutoIt

Global $Gruppen_indirekt[1]
Global $Gruppen_direkt[1]


; ###################################################################################
; In dieser Function findet die eigentlich Ermittlung der zugehörigen Gruppen statt
; Dies geschicht in 2 Schritten:
; 1. die direkten Gruppen werden ermittelt (was leicht war)
; 2. Alle Gruppen in der der Benutzer indirekt Mitglied ist werden ermittelt (was schwerer war)
; Die Gruppen werden in 2 Globalen Variablen abgelegt. Hier wird noch mit TEMP Variablen gearbeitet - der Compiler hatte gemeckert was
; die Definitionen der Variablen angeht wenn ich es direkt mit den Variablen gemacht habe, deshalb der Zwischenschritt
Func _GruppenErmitteln()
	_AD_Open()
	If @error Then Exit _MeldungAusgebenConsole("Konnte keinen Kontakt zum AD herstellen")
	; Liste der direkten Gruppenmitgliedschaften
	$Gruppen_direkt[0] = 0
	Global $Gruppen_direkt_TEMP = _AD_GetUserGroups(@UserName)
	If @error > 0 Then
		_MeldungAusgebenConsole("Aktueller Benutzer ist scheinbar in keinerlei Gruppen! (direkt)")
	Else
		For $i = 1 To $Gruppen_direkt_TEMP[0]
			$Gruppen_direkt_TEMP[$i] = _AD_FQDNToSamAccountName($Gruppen_direkt_TEMP[$i])
		Next
		_ArraySort($Gruppen_direkt_TEMP, 0, 1)
		$Gruppen_direkt[0] = $Gruppen_direkt_TEMP[0]
		For $i = 1 To $Gruppen_direkt_TEMP[0]
			_ArrayAdd($Gruppen_direkt, $Gruppen_direkt_TEMP[$i])
		Next
	EndIf
	; Liste der indirekten Gruppenmitgliedschaften
	$Gruppen_indirekt[0] = 0
	Global $Gruppen_indirekt_TEMP = _AD_RecursiveGetMemberOf(@UserName, 10, 1, 0)
	If @error > 0 Then
		_MeldungAusgebenConsole("Aktueller Benutzer ist scheinbar in keinerlei Gruppen! (indirekt)")
	Else
		_ArraySort($Gruppen_indirekt_TEMP, 0, 1)
		For $i = 1 To $Gruppen_indirekt_TEMP[0]
			If StringInStr($Gruppen_indirekt_TEMP[$i], "|") > 0 Then
				If (StringLeft($Gruppen_indirekt_TEMP[$i], StringInStr($Gruppen_indirekt_TEMP[$i], "|") - 1)) <> (StringLeft($Gruppen_indirekt_TEMP[$i - 1], StringInStr($Gruppen_indirekt_TEMP[$i - 1], "|") - 1)) Then
					$Gruppen_indirekt[0] = $Gruppen_indirekt[0] + 1
					_ArrayAdd($Gruppen_indirekt, StringLeft($Gruppen_indirekt_TEMP[$i], StringInStr($Gruppen_indirekt_TEMP[$i], "|") - 1))
				EndIf
			EndIf
		Next
		_ArraySort($Gruppen_indirekt, 0, 1)
	EndIf
	_AD_Close()
EndFunc   ;==>_GruppenErmitteln

Alles anzeigen

Wenn ich mir mein eigenes Skript so ansehe dann stelle ich fest, das die Funktion $Gruppen_indirekt_TEMP = _AD_RecursiveGetMemberOf(@UserName, 10, 1, 0) wohl nur die indirekten Gruppenmitgliedschaften findet.
Vielleicht ist dein Testbenutzer in keinen indirekten Gruppen.

Probier mal _AD_GetUserGroups(), der listet die direkten Gruppen auf. Da sollte es immer eine geben.

Gruß,
BLinz

PS: Das stammt aus meinem Programm ifmemberdeluxe , bei Bedarf könnten ich den ganzen Quellcode bereit stellen.
Es hat eine Testfunktion: Testfunktionen die aber immer für den gerade angemeldeten Benutzer gelten

**Musashi**

Zitat von Kanashius

@Musashi das hat er ja schon ausgeschlossen. die anführungszeichen braucht man auch nur, wenn leerzeichen in den Parametern sind.

In manchen Sprachen wird ein Parameter 123 ggf. als nummerischer Wert interpretiert, nicht als String.
Bei AutoIt ergeben 123 und "123" aber sowohl mit VarGetType() als auch IsString() -> String.
Daher sind die Anführungszeichen tatsächlich überflüssig.

Die Textkodierung habe ich mal durchgespielt. Bei mir sind die Varianten CmdLine und Hardcoded identisch.
Das muss aber nichts heißen, da die Einstellungen bei @Racer natürlich anders sein können.

Die Zeichen in "0123456" und "Benutzer" liegen alle im 7-Bit ASCII Bereich. Sind diese nicht bei den meisten Kodierungen identisch ?

Gruß Musashi

Racer

Danke für die vielen guten Ideen zum Eingrenzen des Problems.

Ich werde mal einiges ausprobieren, inbesonders mit dem Zeichenvergleichen!

Sicher kann ich sagen der der Testuser auch in den Gruppen ist, da ich ja sonst bei einer direkten definition der Variable ja auch keine Output bekommen würde. Da funkt es ja...

Bericht folgt...

lg
Racer

**alpines**

Das ist ein altbekanntes Problem mit AutoIt. Der Klassiker darin ist die Verarbeitung von ListView Indices. Hier ein kleines Beispiel: (Konsole beachten!)

AutoIt

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>


$Form1 = GUICreate("AutoIt Test", 266, 218, 192, 124)


$ListView1 = GUICtrlCreateListView("Column 1|Column 2", 8, 8, 250, 86)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 123)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 123)


$ListView1_0 = GUICtrlCreateListViewItem("R1C1|R1C2", $ListView1)
$ListView1_1 = GUICtrlCreateListViewItem("R2C1|R2C2", $ListView1)
$ListView1_2 = GUICtrlCreateListViewItem("R3C1|R3C3", $ListView1)


GUICtrlCreateGroup("Read mit Number()", 8, 104, 249, 49)
$hReadNumber = GUICtrlCreateInput("", 16, 120, 233, 21)


GUICtrlCreateGroup("Read ohne Number()", 8, 160, 249, 49)
$hReadNoNumber = GUICtrlCreateInput("", 16, 176, 233, 21)


GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState(@SW_SHOW)


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit


	EndSwitch
WEnd


Func WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
	$varSelectedIndex = _GUICtrlListView_GetSelectedIndices($ListView1)


	GUICtrlSetData($hReadNumber, _GUICtrlListView_GetItemText($ListView1, Number($varSelectedIndex)))
	GUICtrlSetData($hReadNoNumber, _GUICtrlListView_GetItemText($ListView1, $varSelectedIndex))


	ConsoleWrite("Number:   " & ">" & Number($varSelectedIndex) & "< VarGetType = " & VarGetType(Number($varSelectedIndex)) & @CRLF)
	ConsoleWrite("NoNumber: " & ">" & $varSelectedIndex & "< VarGetType = " & VarGetType($varSelectedIndex) & @CRLF)
EndFunc

Alles anzeigen

BLinz

Zitat von BLinz

Vielleicht ist dein Testbenutzer in keinen indirekten Gruppen.

Probier mal _AD_GetUserGroups(), der listet die direkten Gruppen auf. Da sollte es immer eine geben.

Bevor du dich daran vertiefst das es Zeichensatzproblem etc ist - _AD_RecursiveGetMemberOf() listet die indirekten Gruppen auf!

BLinz

Noch ein Nachtrag:

Du nutzt diesen Aufruf:

AutoIt

$alle_gruppen = _AD_RecursiveGetMemberOf($user, 10, 1, false)

Mich stört das false - bei mir steht da 0:

AutoIt

Global $Gruppen_indirekt_TEMP = _AD_RecursiveGetMemberOf(@UserName, 10, 1, 0)

ich habe mal in AD.au3 geschaut ... richtig wäre

AutoIt

$alle_gruppen = _AD_RecursiveGetMemberOf($user, 10, True, False)

wobei im zweifel immer True nimmt. Bei mir ist es also völlig falsch und funktioniert nur zufällig wie ich es will

Racer

Soda, diverse Tests durchgeführt mit einen positiven Ergebnis!

Vorweg möchte ich mich bei allen Bedanken, ganz besonders bei Kanashius, der mich auf die richtige Fährte gebracht hat.

Kurzes Erklärung:

1.) Ich habe den fest eingeben Variable mit der übergeben simpel verglichen und sie war nicht gleich....
2.) Dann habe ich mir von Beiden Variablen (Fix und Parameter) die ASCII-Werte ausgeben lassen und die waren so weit von einander weg...ganz wild

Beim Auflösen der Werte bin ich dann dahinter gekommen: Die Parameter sind in der falschen Reihenfolge!!!!!! Mein Fehler, ich gestehe!

Kaum macht man es Richtig, funktioniert das Script auch wie erwartet!

vielen Danke nochmal
Racer