Вызов команд оболочки из Squeak или Pharo
Как вы можете вызывать команды оболочки из Squeak и Pharo? Есть ли в этих средах что-то, например, функция system() в определенных языках Unix для запуска внешних команд оболочки или обратные пометки (нельзя заставить их сделать это с редактором, но то, что вы получаете, когда нажимаете клавишу слева от ""1"и выше"TAB") чтобы захватить вывод команд?
6 ответов
В Squeak вы можете использовать CommandShell, но я не знаю, что (если вообще что-то) доступно для Pharo в настоящее время.
Я думаю, что вы можете использовать пакет OSProcess, чтобы делать то, что вы хотите. Кроме того, я думаю, что лучше спросить в списке рассылки squeak-dev или pharo.
У вас есть два решения:
Используйте пакет ProcessWrapper. Плюсы: быстрая и простая установка. Минусы: ограниченная функциональность, только на win32.
Используйте пакет OSProcess/CommandShell. Плюсы: довольно хорошая функциональность (конвейеры, переменные окружения, оболочечная рабочая область...) и кроссплатформенность. Минусы: необходимо использовать инструменты VMMaker для создания внешнего плагина.
В Windows на Win API есть оболочка, позволяющая вам сделать это:
| sqlPlusExe sqlPlusRunInDir scriptPathString|
scriptPathString := (FileLocator imageDirectory / 'data' / 'sqlplus' / 'testquit.sql') pathString.
sqlPlusExe :='C:\oraclexe\app\oracle\product\11.2.0\server\bin\sqlplus.exe /nolog @' , scriptPathString.
sqlPlusRunInDir := 'C:\oraclexe\app\oracle\product\11.2.0\server\bin'.
sqlPlusWinProcessInformation := WinProcess
createAndWaitForProcess: sqlPlusExe
withCurrentDirectory: sqlPlusRunInDir
Существует большая часть поддержки того, что Windows может делать с процессами в ней (env, ...)
Итак, посмотрите в каталоге OSWindows.
Я использую Windows 10 с Pharo 6, и нашел невозможным использовать OSProcess
или же OSSubprocess
классы (сложно установить или последние версии не поддерживаются для Windows).
Что работает для меня это LibC. Вы можете перенаправить stderr в файл, используя 2>
внутри команды:
errors := '/tmp/errors.txt'.
result := LibC uniqueInstance system:
'echo "Hello World" > /tmp/hello.txt 2>', errors.
result = 0 ifFalse: [ errors asFileReference ]
Можно манипулировать переменными среды, используя:
OSEnvironment current setEnv: 'MY_ENVIRONMENT_VARIABLE' value: '1'.
Однако мне не удалось изменить текущий каталог:
OSEnvironment current changeDirectoryTo: myDirectory asFileReference. "--> doesNotUnderstand for Windows"
Обходной путь должен сделать компакт-диск в команде:
result := LibC uniqueInstance system:
'cd ', myDirectory, ' && ls > /tmp/output.txt 2>', errors.