carp process: reading and writing works for one iteration

This commit is contained in:
2019-12-14 18:22:23 +01:00
parent 0711432f7e
commit 17ca848344
14 changed files with 54 additions and 3 deletions

View File

@@ -0,0 +1,3 @@
accessing
died
^ excepted isNotNil

View File

@@ -1,3 +1,7 @@
initialization
initialize
proc := OSProcess command: 'carp'
proc := OSSUnixSubprocess new command: 'carp';
redirectStdin;
redirectStdout;
redirectStderr;
addAllEnvVariablesFromParentWithoutOverride

View File

@@ -0,0 +1,3 @@
accessing
isRunning
^ self died not and: proc pid; and: proc exitStatus isNil

View File

@@ -0,0 +1,3 @@
accessing
receiveErrorString
^ proc stderrStream upToEnd

View File

@@ -0,0 +1,3 @@
accessing
receiveString
^ proc stdoutStream upToEnd

View File

@@ -0,0 +1,3 @@
accessing
run
[ [ proc run ] on: Error do: [ :err | excepted := err ] ] fork

View File

@@ -0,0 +1,5 @@
accessing
sendString: aString
proc stdinStream nextPutAll: aString.
proc stdinStream close.
proc redirectStdin

View File

@@ -1,3 +1,3 @@
accessing
setCarp: aString
proc := OSProcess command: aString
proc command: aString

View File

@@ -0,0 +1,3 @@
accessing
setDir: aString
proc environmentAt: 'CARP_DIR' put: aString