странный возврат макроса @TempDir

saavaage · 20 Окт 2010

суть проблемы:
1. вношу твиками новые значение для путей к папкам временных файлов (Temp) и переменных сред (Tmp):
а)Temp (например, путь D:\1)

Код:

$Input_MyTemp = 'D:\1'
RunWait(@COMSPEC & ' /c Echo Y | Cacls ' & $Input_MyTemp&' /E /P "Все":F', '', @SW_HIDE)
	   RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment', 'TEMP', 'REG_SZ', $Input_MyTemp)
;~ 	   RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet\Control\Session Manager\Environment', 'TEMP', 'REG_SZ', $Input_MyTemp)
	   RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\Session Manager\Environment', 'TEMP', 'REG_SZ', $Input_MyTemp)
	   RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet002\Control\Session Manager\Environment', 'TEMP', 'REG_SZ', $Input_MyTemp)
	   RegWrite('HKEY_CURRENT_USER\Environment', 'TEMP', 'REG_SZ', $Input_MyTemp)

б) Tmp (например, D:\Tweaks):

Код:

$Input_MyTmp ='D:\Tweaks'
RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment', 'TMP', 'REG_SZ', $Input_MyTmp)
;~ 	  RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet\Control\Session Manager\Environment', 'TMP', 'REG_SZ', $Input_MyTmp)
	  RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\Session Manager\Environment', 'TMP', 'REG_SZ', $Input_MyTmp)
	  RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet002\Control\Session Manager\Environment', 'TMP', 'REG_SZ', $Input_MyTmp)
	  RegWrite('HKEY_CURRENT_USER\Environment', 'TMP', 'REG_SZ', $Input_MyTmp)

2. Логично ожидать получение следующего результата -пути для:
а) Temp - D:\1
б) Tmp - D:\Tweaks

3. В итоге получаем:
Реестр - все согласно твиков
Панель управления -> Система -> Дополнительно -> Переменные среды - все согласно твиков
Вызов Msgbox (0, '', @TempDir) упорно возвращает D:\Tweaks...

Не понимаю, что я сделал не так???

Yashied · 20 Окт 2010

$Input_MyTmp ='D:\Tweaks'

...

RegWrite('HKEY_CURRENT_USER\Environment', 'TMP', 'REG_SZ', GUICtrlRead($Input_MyTmp))

Здесь все нормально?

saavaage · 20 Окт 2010

Yashied, прошу прощения за невнимательность. Выдрал из скрипта и наспех слепил пример. В скрипте идет считка из Input. Суть проблемы не изменилась. Шапку откорректировал.

saavaage · 20 Окт 2010

итак, на настоящий момент выяснил следующее:
1. макрос @TempDir должен отображать путь к папке временных файлов, считанный системой при ее загрузке. Т.е. при изменении в входе сессии пользователем, все равно, отображаются старые значения.
2. при разных путях к Temp и Tmp макрос @TempDir отображает путь к Tmp, игнорируя Temp. Даже после перезагрузки он стандартно отображает путь к Tmp, а не к моей папке временных файлов Temp.

3. Складывается ощущение, что макрос изначально выдает информацию именно по Tmp, а не Temp. Проверить быстро не могу, т.к. у меня изначально винда ставится с одинаковым путем и для Temp и Tmp...

PS Во избежания эффекта "кривых ручек" для задания новых значений Temp и Tmp применял вполне официальную утилиту setenv.exe. Эффект - аналогично эффекту вноса через твики (в шапке).

Если возможно, уважаемые гуру, отпишитесь баг ли это и если нет, то в чем я не прав... :(

CreatoR · 20 Окт 2010

http://www.infocity.kiev.ua/os/content/osworkrul_15.phtml сказал(а):
TEMP и TMP - переменные, определяющие каталог, в котором программы фирмы Microsoft создают свои временные файлы. Переменная TMP используется старыми приложениями, TEMP - новыми.

Т.ч не думаю что AutoIt проверяет по старому методу, хотя кто его знает.

Код:

ConsoleWrite("@TempDir:	" & @TempDir & @LF)
ConsoleWrite("%Tmp%:		" & EnvGet("Tmp") & @LF)
ConsoleWrite("%Temp%:		" & EnvGet("Temp") & @LF)
ConsoleWrite("Registry Tmp:	" & RegRead("HKEY_CURRENT_USER\Environment", "Tmp") & @LF)
ConsoleWrite("Registry Temp:	" & RegRead("HKEY_CURRENT_USER\Environment", "Temp") & @LF)

Проверяйте.

Yashied · 20 Окт 2010

AutoIt не использует переменные окружения. Для этого есть специальная функция, и нужно использовать именно ее, а не реестр.

madmasles · 20 Окт 2010

saavaage
В ScriptOMatic нашел функции:
для переменных:

Код:

; Generated by AutoIt ScriptOMatic

$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
$strComputer = "localhost"

$OutputTitle = ""
$Output = ""
$OutputTitle &= "Computer: " & $strComputer  & @CRLF
$OutputTitle &= "==========================================" & @CRLF
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_Environment", "WQL", _
                                          $wbemFlagReturnImmediately + $wbemFlagForwardOnly)

If IsObj($colItems) then
   Local $Object_Flag = 0
   For $objItem In $colItems
      $Object_Flag = 1
      $Output &= "Caption: " & $objItem.Caption & @CRLF
      $Output &= "Description: " & $objItem.Description & @CRLF
      $Output &= "InstallDate: " & WMIDateStringToDate($objItem.InstallDate) & @CRLF
      $Output &= "Name: " & $objItem.Name & @CRLF
      $Output &= "Status: " & $objItem.Status & @CRLF
      $Output &= "SystemVariable: " & $objItem.SystemVariable & @CRLF
      $Output &= "UserName: " & $objItem.UserName & @CRLF
      $Output &= "VariableValue: " & $objItem.VariableValue & @CRLF
      if Msgbox(1,"WMI Output",$Output) = 2 then ExitLoop
      $Output=""
   Next
  If $Object_Flag = 0 Then Msgbox(1,"WMI Output",$OutputTitle)
Else
   Msgbox(0,"WMI Output","No WMI Objects Found for class: " & "Win32_Environment" )
Endif


Func WMIDateStringToDate($dtmDate)
	Return (StringMid($dtmDate, 5, 2) & "/" & _
	StringMid($dtmDate, 7, 2) & "/" & StringLeft($dtmDate, 4) _
	& " " & StringMid($dtmDate, 9, 2) & ":" & StringMid($dtmDate, 11, 2) & ":" & StringMid($dtmDate,13, 2))
EndFunc

и для процессора:

Код:

; Generated by AutoIt ScriptOMatic

$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
$strComputer = "localhost"

$OutputTitle = ""
$Output = ""
$OutputTitle &= "Computer: " & $strComputer  & @CRLF
$OutputTitle &= "==========================================" & @CRLF
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_Processor", "WQL", _
                                          $wbemFlagReturnImmediately + $wbemFlagForwardOnly)

If IsObj($colItems) then
   Local $Object_Flag = 0
   For $objItem In $colItems
      $Object_Flag = 1
      $Output &= "AddressWidth: " & $objItem.AddressWidth & @CRLF
      $Output &= "Architecture: " & $objItem.Architecture & @CRLF
      $Output &= "Availability: " & $objItem.Availability & @CRLF
      $Output &= "Caption: " & $objItem.Caption & @CRLF
      $Output &= "ConfigManagerErrorCode: " & $objItem.ConfigManagerErrorCode & @CRLF
      $Output &= "ConfigManagerUserConfig: " & $objItem.ConfigManagerUserConfig & @CRLF
      $Output &= "CpuStatus: " & $objItem.CpuStatus & @CRLF
      $Output &= "CreationClassName: " & $objItem.CreationClassName & @CRLF
      $Output &= "CurrentClockSpeed: " & $objItem.CurrentClockSpeed & @CRLF
      $Output &= "CurrentVoltage: " & $objItem.CurrentVoltage & @CRLF
      $Output &= "DataWidth: " & $objItem.DataWidth & @CRLF
      $Output &= "Description: " & $objItem.Description & @CRLF
      $Output &= "DeviceID: " & $objItem.DeviceID & @CRLF
      $Output &= "ErrorCleared: " & $objItem.ErrorCleared & @CRLF
      $Output &= "ErrorDescription: " & $objItem.ErrorDescription & @CRLF
      $Output &= "ExtClock: " & $objItem.ExtClock & @CRLF
      $Output &= "Family: " & $objItem.Family & @CRLF
      $Output &= "InstallDate: " & WMIDateStringToDate($objItem.InstallDate) & @CRLF
      $Output &= "L2CacheSize: " & $objItem.L2CacheSize & @CRLF
      $Output &= "L2CacheSpeed: " & $objItem.L2CacheSpeed & @CRLF
      $Output &= "LastErrorCode: " & $objItem.LastErrorCode & @CRLF
      $Output &= "Level: " & $objItem.Level & @CRLF
      $Output &= "LoadPercentage: " & $objItem.LoadPercentage & @CRLF
      $Output &= "Manufacturer: " & $objItem.Manufacturer & @CRLF
      $Output &= "MaxClockSpeed: " & $objItem.MaxClockSpeed & @CRLF
      $Output &= "Name: " & $objItem.Name & @CRLF
      $Output &= "NumberOfCores: " & $objItem.NumberOfCores & @CRLF
      $Output &= "NumberOfLogicalProcessors: " & $objItem.NumberOfLogicalProcessors & @CRLF
      $Output &= "OtherFamilyDescription: " & $objItem.OtherFamilyDescription & @CRLF
      $Output &= "PNPDeviceID: " & $objItem.PNPDeviceID & @CRLF
      $strPowerManagementCapabilities = $objItem.PowerManagementCapabilities(0)
      $Output &= "PowerManagementCapabilities: " & $strPowerManagementCapabilities & @CRLF
      $Output &= "PowerManagementSupported: " & $objItem.PowerManagementSupported & @CRLF
      $Output &= "ProcessorId: " & $objItem.ProcessorId & @CRLF
      $Output &= "ProcessorType: " & $objItem.ProcessorType & @CRLF
      $Output &= "Revision: " & $objItem.Revision & @CRLF
      $Output &= "Role: " & $objItem.Role & @CRLF
      $Output &= "SocketDesignation: " & $objItem.SocketDesignation & @CRLF
      $Output &= "Status: " & $objItem.Status & @CRLF
      $Output &= "StatusInfo: " & $objItem.StatusInfo & @CRLF
      $Output &= "Stepping: " & $objItem.Stepping & @CRLF
      $Output &= "SystemCreationClassName: " & $objItem.SystemCreationClassName & @CRLF
      $Output &= "SystemName: " & $objItem.SystemName & @CRLF
      $Output &= "UniqueId: " & $objItem.UniqueId & @CRLF
      $Output &= "UpgradeMethod: " & $objItem.UpgradeMethod & @CRLF
      $Output &= "Version: " & $objItem.Version & @CRLF
      $Output &= "VoltageCaps: " & $objItem.VoltageCaps & @CRLF
      if Msgbox(1,"WMI Output",$Output) = 2 then ExitLoop
      $Output=""
   Next
  If $Object_Flag = 0 Then Msgbox(1,"WMI Output",$OutputTitle)
Else
   Msgbox(0,"WMI Output","No WMI Objects Found for class: " & "Win32_Processor" )
Endif


Func WMIDateStringToDate($dtmDate)
	Return (StringMid($dtmDate, 5, 2) & "/" & _
	StringMid($dtmDate, 7, 2) & "/" & StringLeft($dtmDate, 4) _
	& " " & StringMid($dtmDate, 9, 2) & ":" & StringMid($dtmDate, 11, 2) & ":" & StringMid($dtmDate,13, 2))
EndFunc

Посмотрите, у меня они работают.

saavaage · 21 Окт 2010

CreatoR, вот возврат:

@TempDir: C:\Dr
%Tmp%: C:\Dr
%Temp%: C:\Dura
Registry Tmp: C:\Dr
Registry Temp: C:\Dura

Я немного изменил папки, Dr - Tmp, Dura - Temp. Как видите, вывод @TempDir: C:\Dr говорит сам за себя...
Добавлено:
Сообщение автоматически объединено: 21 Окт 2010

madmasles, у меня сработали немного в другом варианте. Спасибо за наводку (Autoit ScriptOmatic Tool рулит!!!)

saavaage · 21 Окт 2010

итак, небольшое предварительное резюме:
1. У меня на машине %TempDir возвращает именно Tmp, а не Temp.
2. Самый быстрый и ненапряжный, имхо, вариант получить точные значения Temp и Tmp - взять информацию из реестра. Следует учитывать, что, только что измененные через реестр пути к Tmp и Temp, вступят в силу только после перезагрузки системы.
Пояснение:
EnvGet показывает корректную информацию только после перезагрузки, Реестр - сразу же после изменений, %TempDir - вопрос вообще открыт..
3. использование утилиты setenv.exe позволяет не только оперативно менять пути к Tmp и Temp, но и получать возможность работы с ними в текущей сессии (без перезагрузки системы)

Вывод:
1. оптимально использовать связку Реестр - setenv.exe для изменения и активации путей к Temp и Tmp в режиме online.
2. вопрос по использованию в скриптах %TempDir остается открытым (непонятно куда будет обращаться скрипт, если у юзера Temp и Tmp разведены по разным местам)

Все это имхо. Жду комментарии более старших и мудрых товарищей...

SyDr · 21 Окт 2010

Yashied же уже дал ссылку на описание WinAPI-функции.

Там чётко указано, что функция проверяет следующие переменные окружения и возвращает первую найденную:
1) Путь, указанный в переменной среды TMP
2) Путь, указанный в переменной среды TEMP
3) Путь, указанный в переменной среды USERPROFILE
4) Каталог Windows

saavaage · 21 Окт 2010

SyDr , это разве меняет ситуацию с фактической некорректностью возврата @TempDir , если у юзера Temp и Tmp разведены по разным местам?
Теперь, просто есть конкретное подтверждение этому факту. Непонятно только, почему этот факт не отмечен в справке по макрасам...

SyDr · 21 Окт 2010

http://ru.wikipedia.org/wiki/Переменные_среды_Windows
TEMP or TMP системная и локальная Возвращает временные папки, по умолчанию используемые приложениями, которые доступны пользователям, выполнившим вход в систему. Некоторые приложения требуют переменную TEMP, другие — переменную TMP. Потенциально TEMP и TMP могут указывать на разные каталоги, но обычно - совпадают.

При использовании Макроса @TempDir первым проверяется именно значение переменной TMP

А в чём неккоректность возвращаемого значения? TMP ведь также указывает на каталог с временными файлами.

Yashied · 21 Окт 2010

saavaage сказал(а):
SyDr , это разве меняет ситуацию с фактической некорректностью возврата @TempDir , если у юзера Temp и Tmp разведены по разным местам?
Теперь, просто есть конкретное подтверждение этому факту. Непонятно только, почему этот факт не отмечен в справке по макрасам...

saavaage

Во-первых, то, что у юзера находится в %TEMP% или %TMP%, AutoIt'у, да и всем другим приложениям, по барабану: главное, это то, что возвращает функция GetTempPath(). Windows-приложения, как правило, вызывают эту функцию и используют возвращенный ею путь. AutoIt действует также, т.е. он ни считывает значение из %TEMP% или %TMP%, а использует GetTempPath(). А что именно она возвращает (%TEMP% или %TMP%), это уже на совести Windows, и нас не должно волновать.

Во-вторых, для работы с переменными окружения, тебе не нужно лезть в реестр. В AutoIt есть для этого функции Env... Для того, чтобы обновить переменные без "перелогинивания", нужно послать широковещательное сообщение WM_SETTINGCHANGE, как сказано здесь.

Код:

#Include <WinAPIEx.au3>
#Include <WindowsConstants.au3>

$tData = DllStructCreate('wchar[12]')
DllStructSetData($tData, 1, 'Environment')
_WinAPI_SendMessageTimeout(-1, 0x001A, 0, DllStructGetPtr($tData), 5000, $SMTO_ABORTIFHUNG)

Или просто вызвать EnvUpdate(), которая делает тоже самое.

Но в Windows Vista/7, это не будет работать (и твоя setenv.exe тоже), так что "перелогиниваться" все равно придется.

saavaage · 21 Окт 2010

"А в чём неккоректность возвращаемого значения? TMP ведь также указывает на каталог с временными файлами." - Означает ли это, что если я сначала выгружаю файл в C:\Temp юзеру (выгружает другая программа), а затем хочу "подобрать" его и обработать в autoit через @TempDir, то можно не беспокоиться за результат (даже если на машине Tmp и Temp не совпадают)?. Если да, то тогда часть проблемы снимается..

"Во-вторых, для работы с переменными окружения, тебе не нужно лезть в реестр. В AutoIt есть для этого функции Env" - немного непонятно для каких ветвей она это делает (есть подозрение, что только для пользовательской среды). В setenv.exe можно гибко настраивать варианты отработки

[box title=TitleBox]User environment: setenv -u name value
Machine environment: setenv -m name value
Default user environment: setenv -d name value
Volatile environment: setenv -v name value[/box]
Добавлено:
Сообщение автоматически объединено: 21 Окт 2010

Плюс в EnvSet насторожил такой момент:
"Значения переменных среды, которые устанавливаются внутри скрипта, будут доступны только тем приложениям, которые непосредственно запускаются из AutoIt скрипта командами Run или RunWait. При завершении работы AutoIt эти значения будут утрачены."
Мне необходимо прописать не на время работы данного скрипта, а на постоянной основе в системе. Будет ли эта функция работать в таком случае для всех пользователей машины после перезагрузки системы или добавлении нового пользователя в систему?

Yashied, за EnvUpdate() спасибо, что ткнули. Каюсь, не посмотрел. Сразу начал ковырять setenv.exe и зациклился на ней немного... :smile:

Yashied · 21 Окт 2010

IMHO, программы должны использовать переменные окружения только в крайнем случае. Путь к любой системной папке можно получить через WinAPI функции (_WinAPI_ShellGetSpecialFolderPath() и _WinAPI_ShellGetKnownFolderPath()), и их нужно использовать. Для поиска файлов также есть функция - _WinAPI_PathSearchAndQualify(). Какие могут быть причины для использования переменных окружения? Кроме того, ведь %TEMP% и %TMP% вообще могут отсутствовать. И что тогда?

saavaage · 21 Окт 2010

Yashied, я теперь так и буду делать. Но если прога сторонняя, а не моя, то ей ведь не прикажешь куда кидать свои файлики... Поэтому я и думал первоначально, что если программа выгружает свои файлы в Temp, то их элементарно можно подхватывать через @TempDir. Теперь я понял, что с этим делом необходимо осторожно обращаться. + Еще стоял вопрос по созданию Temp и Tmp в одной утилите по настройке и там всплыл этот вопрос у одного юзера (он попытался задать разные папки и при обновлении информации в Inputaх получил бред.)

Спасибо, в принципе, основную задачу я этим топиком решил. Тема, имхо, решена и закрыта

Автор темы	Похожие темы	Форум	Ответы	Дата
R	отслеживание вызова и возврата функции	Общие вопросы по AutoIt	5	12 Фев 2023
A	[Сеть, интернет] Странный сетевой трафик	Общие вопросы по AutoIt	0	15 Фев 2016
	Странный выбор Switch	Баг-репорты и запросы на новые функции	2	21 Авг 2012
V	Что легче выучить, иностранный язык или язык программирования ?	Общение	3	13 Авг 2011
	[Файловая система] Странный файл (0 байт)	Общение	19	16 Май 2011

Поиск

Поиск

странный возврат макроса @TempDir

saavaage

Знающий

Yashied

Модератор

saavaage

Знающий

saavaage

Знающий

CreatoR

Must AutoIt!

Yashied

Модератор

madmasles

Модератор

saavaage

Знающий

saavaage

Знающий

SyDr

Сидра

saavaage

Знающий

SyDr

Сидра

Yashied

Модератор

saavaage

Знающий

Yashied

Модератор

saavaage

Знающий