Fix streaming file upload in GemStone: GsFile>>nextPutAll: wrote 0 by…

…tes on the file when invoked with a ZnStringBuffer as argument due to the optimized implementation. Fixed by writing the internal collection class instead.
SeasideSt · Mar 17, 2024 · 166a98c · 166a98c
1 parent 9998d1f
commit 166a98c
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/repository/Seaside-Zinc-Core.package/ZnRingBuffer.class/instance/writeAllOn..st b/repository/Seaside-Zinc-Core.package/ZnRingBuffer.class/instance/writeAllOn..st
@@ -0,0 +1,4 @@
+private
+writeAllOn: aStream
+
+	aStream nextPutAll: buffer
diff --git a/...artFormDataEntity.class/instance/parseMultiPartFieldWithoutLengthWithBoundary.writeOn..st b/...artFormDataEntity.class/instance/parseMultiPartFieldWithoutLengthWithBoundary.writeOn..st
@@ -36,7 +36,7 @@ parseMultiPartFieldWithoutLengthWithBoundary: aBoundary writeOn: writer
 					If not we have to check for the next boundary candidate as we might have loaded the next boundary partially."
 					buffer = aBoundary ] ]
 		ifNil: [
-			writer nextPutAll: buffer.
+			buffer writeAllOn: writer.
 			stream atEnd
 				ifFalse: [
 					"#next:into: answers a copy of the buffer if not enough bytes could be read.