[50750c735a] Possible fix for uninit memory handling issue in [zlib].mistkae

1 files changed, 7 insertions, 17 deletions

diff --git a/generic/tclZlib.c b/generic/tclZlib.c
index 82486d2..37a1c09 100644
--- a/generic/tclZlib.c
+++ b/generic/tclZlib.c
@@ -3118,25 +3118,15 @@ ZlibTransformOutput(
     do {
 	e = Deflate(&cd->outStream, cd->outBuffer, cd->outAllocated,
 		Z_NO_FLUSH, &produced);
+	if (e != Z_OK || produced == 0) {
+	    break;
+	}
 
-	if ((e == Z_OK && produced > 0) || e == Z_BUF_ERROR) {
-	    /*
-	     * deflate() indicates that it is out of space by returning
-	     * Z_BUF_ERROR *or* by simply returning Z_OK with no remaining
-	     * space; in either case, we must write the whole buffer out and
-	     * retry to compress what is left.
-	     */
-
-	    if (e == Z_BUF_ERROR) {
-		produced = cd->outAllocated;
-		e = Z_OK;
-	    }
-	    if (Tcl_WriteRaw(cd->parent, cd->outBuffer, produced) < 0) {
-		*errorCodePtr = Tcl_GetErrno();
-		return -1;
-	    }
+	if (Tcl_WriteRaw(cd->parent, cd->outBuffer, produced) < 0) {
+	    *errorCodePtr = Tcl_GetErrno();
+	    return -1;
 	}
-    } while (e == Z_OK && produced > 0 && cd->outStream.avail_in > 0);
+    } while (cd->outStream.avail_in > 0);
 
     if (e == Z_OK) {
 	return toWrite - cd->outStream.avail_in;