From 4b0b8c0fc69ea82584d91e623969b574e5c39b5d Mon Sep 17 00:00:00 2001
From: "Mirar (Pontus Hagland)" <pike@sort.mirar.org>
Date: Sun, 23 May 1999 19:46:18 +0200
Subject: [PATCH] gd format support initiated (0.0)
Rev: src/modules/Image/encodings/gd.c:1.1
---
.gitattributes | 1 +
src/modules/Image/encodings/gd.c | 122 +++++++++++++++++++++++++++++++
2 files changed, 123 insertions(+)
create mode 100644 src/modules/Image/encodings/gd.c
diff --git a/.gitattributes b/.gitattributes
index eea4bfc157..bc1a8e1a67 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -182,6 +182,7 @@ testfont binary
/src/modules/Image/encodings/avs.c foreign_ident
/src/modules/Image/encodings/bmp.c foreign_ident
/src/modules/Image/encodings/configure.in foreign_ident
+/src/modules/Image/encodings/gd.c foreign_ident
/src/modules/Image/encodings/gif.c foreign_ident
/src/modules/Image/encodings/gif_lzw.c foreign_ident
/src/modules/Image/encodings/gif_lzw.h foreign_ident
diff --git a/src/modules/Image/encodings/gd.c b/src/modules/Image/encodings/gd.c
new file mode 100644
index 0000000000..7cb69402bc
--- /dev/null
+++ b/src/modules/Image/encodings/gd.c
@@ -0,0 +1,122 @@
+#include "global.h"
+#include "config.h"
+#include <math.h>
+#include <ctype.h>
+
+#ifdef HAVE_NETINET_IN_H
+#include <netinet/in.h>
+#endif
+
+#include "stralloc.h"
+RCSID("$Id: gd.c,v 1.1 1999/05/23 17:46:18 mirar Exp $");
+#include "pike_macros.h"
+#include "object.h"
+#include "constants.h"
+#include "interpret.h"
+#include "svalue.h"
+#include "threads.h"
+#include "array.h"
+#include "error.h"
+#include "operators.h"
+#include "builtin_functions.h"
+#include "module_support.h"
+
+
+#include "image.h"
+
+extern struct program *image_program;
+
+/*
+**! module Image
+**! submodule GD
+**!
+**! Handle encoding and decoding of GD images.
+**!
+**! GD is the internal format of libgd by Thomas Boutell,
+**! <a href=http://www.boutell.com/gd/><tt>http://www.boutell.com/gd/</tt></a>
+**! It is a rather simple, uncompressed, palette
+**! format.
+*/
+
+/*
+**! method object decode(string data)
+**! method object decode_alpha(string data)
+**! method mapping decode_header(string data)
+**! method mapping _decode(string data)
+**! decodes a GD image
+**!
+**! The <ref>decode_header</ref> and <ref>_decode</ref>
+**! has these elements:
+**!
+**! <pre>
+**! "image":object - image object \
+**! "alpha":object - decoded alpha |- not decode_header
+**! "colortable":object - decoded palette /
+**!
+**! "type":"image/x-gd" - image type
+**! "xsize":int - horisontal size in pixels
+**! "ysize":int - vertical size in pixels
+**! "alpha_index":int - index to transparancy in palette
+**! -1 means no transparency
+**! "colors":int - numbers of colors
+**! </pre>
+**!
+**!
+**! method string encode(object image)
+**! method string encode(object image,mapping options)
+**! encode a GD image
+**!
+**! options is a mapping with optional values:
+**! <pre>
+**! "colortable":object - palette to use (max 256 colors)
+**! "alpha":object - alpha channel (truncated to 1 bit)
+**! "alpha_index":int - index to transparancy in palette
+**! </pre>
+*/
+
+void image_gd_f_encode(INT32 args)
+{
+ error("not implemented\n");
+}
+
+void img_gd_decode(INT32 args,int header_only)
+{
+ error("not implemented\n");
+}
+
+static void image_gd_f_decode(INT32 args)
+{
+ img_gd_decode(args,0);
+ push_string(make_shared_string("image"));
+ f_index(2);
+}
+
+static void image_gd_f_decode_alpha(INT32 args)
+{
+ img_gd_decode(args,0);
+ push_string(make_shared_string("alpha"));
+ f_index(2);
+}
+
+static void image_gd_f_decode_header(INT32 args)
+{
+ img_gd_decode(args,1);
+}
+
+static void image_gd_f__decode(INT32 args)
+{
+ img_gd_decode(args,0);
+}
+
+void init_image_avs()
+{
+ add_function( "decode", image_gd_f_decode, tFunc(tStr,tObj), 0);
+ add_function( "decode_alpha", image_gd_f_decode_alpha, tFunc(tStr,tObj), 0);
+ add_function( "_decode", image_gd_f__decode, tFunc(tStr,tMapping), 0);
+ add_function( "encode", image_gd_f_encode, tFunc(tStr,tObj), 0);
+ add_function( "decode_header", image_gd_f_decode_header, tFunc(tStr,tMapping), 0);
+}
+
+void exit_image_avs()
+{
+}
--
GitLab