1 files changed, 65 insertions, 0 deletions
diff --git a/ext/gd/libgd/gd2copypal.c b/ext/gd/libgd/gd2copypal.c
new file mode 100644
index 0000000..ae9b559
--- /dev/null
+++ b/ext/gd/libgd/gd2copypal.c
@@ -0,0 +1,65 @@
+
+#include <stdio.h>
+#include "gd.h"
+#include <stdlib.h>
+
+/* A short program which converts a .png file into a .gd file, for
+   your convenience in creating images on the fly from a
+   basis image that must be loaded quickly. The .gd format
+   is not intended to be a general-purpose format. */
+
+int
+main (int argc, char **argv)
+{
+  gdImagePtr im;
+  gdImagePtr pal;
+  FILE *in, *out;
+  if (argc != 3)
+    {
+      fprintf (stderr, "Usage: gd2copypal palettefile.gd2 filename.gd2\n");
+      exit (1);
+    }
+  in = fopen (argv[1], "rb");
+  if (!in)
+    {
+      fprintf (stderr, "Palette file does not exist!\n");
+      exit (1);
+    }
+  pal = gdImageCreateFromGd2 (in);
+  fclose (in);
+  if (!pal)
+    {
+      fprintf (stderr, "Palette is not in GD2 format!\n");
+      exit (1);
+    }
+
+  in = fopen (argv[2], "rb");
+  if (!in)
+    {
+      fprintf (stderr, "Input file does not exist!\n");
+      exit (1);
+    }
+  im = gdImageCreateFromGd2 (in);
+  fclose (in);
+  if (!im)
+    {
+      fprintf (stderr, "Input is not in GD2 format!\n");
+      exit (1);
+    }
+
+  gdImagePaletteCopy (im, pal);
+
+  out = fopen (argv[2], "wb");
+  if (!out)
+    {
+      fprintf (stderr, "Output file cannot be written to!\n");
+      gdImageDestroy (im);
+      exit (1);
+    }
+  gdImageGd2 (im, out, 128, 2);
+  fclose (out);
+  gdImageDestroy (pal);
+  gdImageDestroy (im);
+
+  return 0;
+}