9 Antworten in diesem Thema

[Ostrich]

Hallo miteinander :-)

Instantby kam bei mir immer dann zum Einsatz, wenn Gerätetreiber oder Windows selbst den regulären S3/S4-Modus verweigerte, im aktuellen System meiner Signatur benötige ich es nicht. Auf meiner Testplattform und möglicherweise baldigen Produktivplattform kommt es jedoch (leider) wieder auf mich zu. Pinnacle Dual Sat Pro & UDR 1.0.0.8 mögen sich so gar nicht alleine schlafen legen. Vielleicht ist aber auch nur mein Testsystem, ein Pundit P1-AH2 schuld? Ich möchte hier nicht über die Ursachen mangelhaften Standby-Verhaltens verschiedener Hardware/Software-Kombinationen philosophieren!

@MicF: Danke für Deinen kostenlosen Einsaz und Support!

Natürlich könnte ich auch einfach die Hardware ersetzen und mir 2xDE holen, nur möchte ich momentan so viel geld nicht ausgeben. Auch 2xNova-SE2 für weniger Geld wären ja möglich, nur kommt dann möglicherweise der dual-core-bug ins Spiel, so dass ich diesen Gedanken erstmal verworfen habe.

Was für mich den Einsatz von Instantby erschwert, ist die nicht vorhandene Extenderunterstützung. Ich werde überwiegend, wegen der räumlichen Gegebenheiten, via xbox360 auf das System zugreifen. genau diese Zugriffe werden jedoch vom Tool gar nicht registriert, der Idle-Timeout läuft und irgendwann verabschiedet sich das ganze System, weil instantby es herunterfährt. Wie kann ich das nun beeinflussen?

Aus der Beschreibung geht hervor, dass in der konfigurationsdatei eine liste von Prozessen eingetragen werden kann, bei deren Vorhandensein/Aktivsein ein herunterfahren ausgeschlossen wird. Guter Ansatz! Nur wie weiter? Ich habe mal geschaut, dass im taskmanager auf dem VMC-System Prozesse auftauchen, die nicht dem angemeldetem Benutzer, sondern dem Extender zuzuordnen sind.

liste der Prozesse:
ehshell.exe
wmplayer.exe
mcrmgr.exe
ehmasas.exe
taskeng.exe
ehtray.exe
dwm.exe
rdpclip.exe

Sie tauchen jeweils unter dem benutzer "MCX1" auf.

@MicF: Gibt es eine Methode, mit der neben dem Prozessnamen auch der Benutzername ausgewertet ausgewertet werden werden?


Gruß
Harald

Bearbeitet von Ostrich, 07 August 2007 - 11:59 .

[Ostrich]

*Cleaned*

Bearbeitet von Ostrich, 14 August 2007 - 15:35 .

[Ostrich]

Moin,
na, keiner mit Extender und Instantby unter uns? Bei mir sind es (wahrscheinlich) die stargate-treiber der Pinnacle dual sat pro karte, die ein "reguläres" S3/S4-verhalten unter Vista verhindern. Habe eine für mich individuell "zusammengetrickste" Lösung erarbeitet, wobei über ein script (wsh) extenderaktivitäten abgefragt werden und bei vorhandenem extender ein kleines programm (notepad.exe) versteckt gestartet wird. bei nicht (mehr) aktivem extender wird es dann entsprechen gekillt. Ich habe dann noch "notepad" in das Config-File von Instantby eingetragen und alles funzt wie es soll.

Wenn jemand Interesse hat, einfach hier posten!

[MicF]

Sorry stolpere erst jetzt über den Thread.

Mit dem Extender ist das so eine Sache. Der Prozess ist immer eShell, somit ist das nicht nutzbar dafür.
Ich hatte mir auch mal angeschaut, wie man den User aus den Prozessen rauslesen kann. Das war aber nicht so ohne weiteres schnell umzusetzen.

Deine Lösung ist auf jedenfall Kreativ!

[Ostrich]

Danke :-) mir wärs lieber, man könnte das irgendwie einbauen! Hier mal mein Rahmenkonstrukt zur Erkennung mittels wsh:

strComputer = "."
ExtenderAktiv=0
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process")

'do
For Each objProcess in colProcessList
colProperties = objProcess.GetOwner(strNameOfUser,strUserDomain)
if strNameOfUser="Mcx1" then
if objProcess.Name="ehshell.exe" then
'Extender aktiv
ExtenderAktiv=1
end if
end if
'Wscript.Echo "Process " & objProcess.Name & " is owned by " _
'& strUserDomain & "\" & strNameOfUser & "."
Next
if ExtenderAktiv>0 then
WScript.Echo "Extender aktiv!"
else WScript.Echo "Extender inaktiv!"
end if
WScript.sleep 30000
ExtenderAktiv=0
'loop

Ein Bekannter von mir, der eigentlich alles mögliche coded, meinte, die wmi-Abfragen lassen sich nicht so gut "umsetzen". Gibts vielleicht ne Chance, aus Instantby selbst heraus entweder das Script so zu starten und entsprechend ein Flag auszuwerten, oder, ist eine ping-abfrage realisierbar?

Kämpfe nämlich grad wieder mit nem System, was nicht schlafen will ...

[MicF]

Wie gesagt, hatte ich es mir auch schonmal angeschaut und weiß, dass man über getOwner drankommt.

Allerdings kommt noch eine zusätzliche Dimension der Prozesse hinzu, da du ja nicht nur ein Prozess, sondern derer mehrere definieren kannst.
Außerdem muss noch das Event, das die Beendigung des Prozesses Überwacht, das dann auch noch machen.

Alles in Allem erhöht es die Komplexität und die Fehleranfälligkeit, was dann wieder zu Unmutsäußerungen führt ala "das funktioniert alles nicht".

Da drauf habe ich, ehrlicherweise, keine Lust.

Mic

[Ostrich]

Da drauf habe ich, ehrlicherweise, keine Lust.

Find ich schade, wenn auch verständlich! Hier im Folgenden daher mein vollständiger Quelltext

strPrefUser="Mcx1"
strPrefProc="ehshell.exe"
strWaProcess="Notepad.exe"
strLockFile="C:\Windows\ehome\Instantby\Extender.lock"
msTimer=3000
strComputer = "."
ExtenderAktiv=0
WaActive=0



function CreateLockFile()
Dim objFSO, objCreatedFile
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objCreatedFile = objFSO.CreateTextFile(strLockFile, True)
objCreatedFile.Close
end function

function DeleteLockFile()
Dim objFSO, objCreatedFile
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFile strLockFile
end function

function CreateProcess()
Const HIDDEN_WINDOW = 0
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set objStartup = objWMIService.Get("Win32_ProcessStartup")
Set objConfig = objStartup.SpawnInstance_
objConfig.ShowWindow = HIDDEN_WINDOW
Set objProcess = GetObject("winmgmts:root\cimv2:Win32_Process")
errReturn = objProcess.Create(StrWaProcess, null, objConfig, intProcessID)
end Function

function KillProcess()
set wmi = getobject("winmgmts:")
sQuery = "select * from win32_process " &_
"where name='" & strWaProcess & "'"
set processes = wmi.execquery(sQuery)
for each process in processes
process.terminate
next
end Function


On Error Resume Next
do
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process")
For Each objProcess in colProcessList
colProperties = objProcess.GetOwner(strNameOfUser,strUserDomain)
if strNameOfUser=strPrefUser then
if objProcess.Name=strPrefProc then
'Extender aktiv
ExtenderAktiv=1
end if
end if
Next
if ExtenderAktiv>0 then
'WScript.Echo "Extender aktiv!"
if WaActive=0 then
'CreateProcess
CreateLockfile
WaActive=1
end if
else
'WScript.Echo "Extender inaktiv!"
if WaActive=1 then
'KillProcess
DeleteLockFile
WaActive=0
end if
end if
WScript.sleep msTimer
ExtenderAktiv=0
loop



EDIT: Wird nun über eine Extender.lock-Datei gesteuert!

Wer will, kann sich das gerne nach seinen Bedürfnissen modifizieren und Instantby damit zu Extenderfähigkeit verhelfen

Bearbeitet von Ostrich, 28 August 2007 - 14:46 .

[stephanvoegele]

wie kann ich den quelltext in instandby einfügen?

[Ostrich]

wie kann ich den quelltext in instandby einfügen?

GAR NICHT!

Nimm den Text, mache notepad auf und speicher ihn als zbsp. extenderwaechter.vbs auf dem desktop ab. Wenn es so bei Dir funktioniert, kannst Du es (das script) ja per autostart anstarten!

[stephanvoegele]

super.. danke werd ich gleich ausprobieren!