devlog: finalized 2019-12-14

Pond.package/CarpException.class/README.md

@@ -0,0 +1 @@
+I’m an exception that gets thrown when Carp does something funky.

Pond.package/CarpException.class/instance/defaultAction.st

@@ -0,0 +1,3 @@
+accessing
+defaultAction
+	UnhandledError signalForException: self

Pond.package/CarpException.class/instance/from..st

@@ -0,0 +1,3 @@
+instance creation
+from: anError
+	error := anError 

Pond.package/CarpException.class/properties.json

@@ -0,0 +1,14 @@
+{
+	"commentStamp" : "VeitHeller 12/14/2019 17:49",
+	"super" : "Exception",
+	"category" : "Pond",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
+	"instvars" : [
+		"parent",
+		"error"
+	],
+	"name" : "CarpException",
+	"type" : "normal"
+}

Pond.package/CarpProcess.class/class/carp..st

@@ -0,0 +1,3 @@
+as yet unclassified
+carp: aString
+  ^ self new setCarp: aString

Pond.package/CarpProcess.class/instance/died.st

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

Pond.package/CarpProcess.class/instance/initialize.st

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

Pond.package/CarpProcess.class/instance/isRunning.st

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

Pond.package/CarpProcess.class/instance/receiveErrorString.st

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

Pond.package/CarpProcess.class/instance/receiveString.st

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

Pond.package/CarpProcess.class/instance/run.st

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

Pond.package/CarpProcess.class/instance/sendString..st

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

Pond.package/CarpProcess.class/instance/setCarp..st

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

Pond.package/CarpProcess.class/instance/setDir..st

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

Pond.package/CarpProcess.class/properties.json

@@ -6,7 +6,10 @@
 	"pools" : [ ],
 	"classvars" : [ ],
 	"instvars" : [
-		"proc"
+		"proc",
+		"out",
+		"in",
+		"excepted"
 	],
 	"name" : "CarpProcess",
 	"type" : "normal"

devlog/2019-12-14.md

@@ -15,3 +15,17 @@ I’ll likely spend a lot of time hunting down the right API; I just
 hope that it even exists.
 
 ## Review
+
+Time worked: 1h30m
+
+I got the basics of reading from Carp and writing to Carp working.
+`OSProcess` turned out not to be what I need, instead I’m now using
+a library called `OSSubProcess` that has a way more powerful API and
+better documentation.
+
+Sadly `OSSubProcess` requires me to close the `stdin` stream after the
+first chunk of writing to it. I’m not sure whether I can reopen the
+stream, it seems not to work. I filed [an issue on Github](https://github.com/pharo-contributions/OSSubprocess/issues/51),
+but I suspect that this is actually not really fixable/not a use
+case that they want to support. We will see. I gave up getting more
+done for today.