+// SavePCX:
+// Saves a PCX file into the wxImage object pointed by image.
+// Returns wxPCX_OK on success, or an error code otherwise
+// (see above for error codes). Currently, always saves images
+// in 24 bit format. XXX
+//
+int SavePCX(wxImage *image, wxOutputStream& stream)
+{
+ unsigned char hdr[128]; // PCX header
+ unsigned char *p; // space to store one scanline
+ unsigned char *src; // pointer into wxImage data
+ unsigned int width, height; // size of the image
+ unsigned int bytesperline; // bytes per line (each plane)
+ int nplanes = 3; // number of planes
+ int format = wxPCX_24BIT; // image format (8 bit, 24 bit)
+ unsigned int i;
+
+ /* XXX
+ build_palette();
+ if (num_of_colors <= 256)
+ {
+ format = wxPCX_8BIT;
+ nplanes = 1;
+ }
+ else
+ free_palette();
+ */
+
+ // Get image dimensions, calculate bytesperline (must be even,
+ // according to PCX specs) and allocate space for one complete
+ // scanline.
+ //
+ if (!image->Ok())
+ return wxPCX_INVFORMAT;
+
+ width = image->GetWidth();
+ height = image->GetHeight();
+ nplanes = 3; /* 1 for wxPCX_8BIT */
+ bytesperline = width;
+ if (bytesperline % 2)
+ bytesperline++;
+
+ if ((p = (unsigned char *) malloc(bytesperline * nplanes)) == NULL)
+ return wxPCX_MEMERR;
+
+ // Build header data and write it to the stream. Initially,
+ // set all bytes to zero (most values default to zero).
+ //
+ memset(hdr, 0, sizeof(hdr));
+
+ hdr[HDR_MANUFACTURER] = 10;
+ hdr[HDR_VERSION] = 5;
+ hdr[HDR_ENCODING] = 1;
+ hdr[HDR_NPLANES] = nplanes;
+ hdr[HDR_BITSPERPIXEL] = 8;
+ hdr[HDR_BYTESPERLINE] = bytesperline % 256;
+ hdr[HDR_BYTESPERLINE + 1] = bytesperline / 256;
+ hdr[HDR_XMAX] = (width - 1) % 256;
+ hdr[HDR_XMAX + 1] = (width - 1) / 256;
+ hdr[HDR_YMAX] = (height - 1) % 256;
+ hdr[HDR_YMAX + 1] = (height - 1) / 256;
+ hdr[HDR_PALETTEINFO] = 1;
+
+ stream.Write(hdr, 128);
+
+ // Encode image data line by line and write it to the stream
+ //
+ src = image->GetData();
+
+ for (; height; height--)
+ {
+ switch (format)
+ {
+ case wxPCX_8BIT:
+ /* XXX
+ {
+ for (i = 0; i < width; i++)
+ {
+ hash = *(src++) << 24 +
+ *(src++) << 16 +
+ *(src++) << 8;
+
+ p[i] = palette_lookup(hash);
+ }
+ break;
+ }
+ */
+ case wxPCX_24BIT:
+ {
+ for (i = 0; i < width; i++)
+ {
+ p[i] = *(src++);
+ p[i + bytesperline] = *(src++);
+ p[i + 2 * bytesperline] = *(src++);
+ }
+ break;
+ }
+ }
+
+ RLEencode(p, bytesperline * nplanes, stream);
+ }
+
+ free(p);
+
+ /* XXX
+ if (format == wxPCX_8BIT)
+ {
+ stream.PutC(12);
+ dump_palette();
+ }
+ */
+
+ return wxPCX_OK;
+}
+