changeset 870:26a2f3423141

[xemacs-hg @ 2002-06-10 12:43:41 by ben] fucking cvs sucks
author ben
date Mon, 10 Jun 2002 12:43:42 +0000
parents a07667553efc
children 732270854293
files src/libinterface.c src/libinterface.h
diffstat 2 files changed, 321 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/libinterface.c	Mon Jun 10 12:43:42 2002 +0000
@@ -0,0 +1,197 @@
+/* Interface to graphics/etc libraries, with cdecl calling convention.
+   Copyright (C) 2002 Ben Wing
+
+This file is part of XEmacs.
+
+XEmacs is free software; you can redistribute it and/or modify it
+under the terms of the GNU General Public License as published by the
+Free Software Foundation; either version 2, or (at your option) any
+later version.
+
+XEmacs is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+for more details.
+
+You should have received a copy of the GNU General Public License
+along with XEmacs; see the file COPYING.  If not, write to
+the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+Boston, MA 02111-1307, USA.  */
+
+/* Synched up with: Not in FSF. */
+
+#include <config.h>
+#include "lisp.h"
+
+#include "libinterface.h"
+
+/* YUUUUUUUUUUUUUUCK!
+
+   This file exists only because VC++ lacks pragmas that let you change the
+   default calling convention in the middle of a file.  With optimization,
+   we compile XEmacs using fastcall as the default convention; but
+   libraries are not compiled this way, and thus need __cdecl in their
+   declaration.  Without the pragma, we either
+
+   (a) depend on libraries that declare their external functions with
+   suitable preprocessor definitions that we can change;
+
+   (b) force the user to recompile the library with fastcall (not
+   reasonable);
+
+   (c) hack the headers manually (not reasonable);
+
+   (d) put all calls to the library in a separate file where the default
+   calling convention is __cdecl (hence, this file).
+
+   In fact, some libraries do make (a) feasible.  This is the case with PNG
+   and ZLIB.  JPEG almost does so, since all externs are wrapped with
+   EXTERN(); but they fail to wrap their definition of EXTERN with #ifndef
+   EXTERN, so we can't override it. XPM is similar, wrapping their externs
+   with FUNC() -- again, not overridable.  With PNG, we define PNG_EXPORT;
+   with ZLIB, we define ZEXPORT and ZEXPORTVA. */
+
+#ifdef HAVE_XPM
+
+void
+qxe_XpmFreeXpmImage (XpmImage *image)
+{
+  XpmFreeXpmImage (image);
+}
+
+void
+qxe_XpmFreeXpmInfo (XpmInfo *info)
+{
+  XpmFreeXpmInfo (info);
+}
+
+int
+qxe_XpmCreateXpmImageFromBuffer (char *buffer, XpmImage *image, XpmInfo *info)
+{
+  return XpmCreateXpmImageFromBuffer (buffer, image, info);
+}
+
+void
+qxe_XpmFree (void *ptr)
+{
+  XpmFree (ptr);
+}
+
+int
+qxe_XpmReadFileToData (char *filename, char ***data_return)
+{
+  return XpmReadFileToData (filename, data_return);
+}
+
+#endif /* HAVE_XPM */
+
+#ifdef HAVE_JPEG
+
+boolean
+qxe_jpeg_finish_decompress (j_decompress_ptr cinfo)
+{
+  return jpeg_finish_decompress (cinfo);
+}
+
+boolean
+qxe_jpeg_start_decompress (j_decompress_ptr cinfo)
+{
+  return jpeg_start_decompress (cinfo);
+}
+
+JDIMENSION
+qxe_jpeg_read_scanlines (j_decompress_ptr cinfo, JSAMPARRAY scanlines,
+			 JDIMENSION max_lines)
+{
+  return jpeg_read_scanlines (cinfo, scanlines, max_lines);
+}
+
+int
+qxe_jpeg_read_header (j_decompress_ptr cinfo, boolean require_image)
+{
+  return jpeg_read_header (cinfo, require_image);
+}
+
+void
+qxe_jpeg_CreateDecompress (j_decompress_ptr cinfo, int version,
+			   size_t structsize)
+{
+  jpeg_CreateDecompress (cinfo, version, structsize);
+}
+
+struct jpeg_error_mgr *
+qxe_jpeg_std_error (struct jpeg_error_mgr *err)
+{
+  return jpeg_std_error (err);
+}
+
+void
+qxe_jpeg_destroy_decompress (j_decompress_ptr cinfo)
+{
+  jpeg_destroy_decompress (cinfo);
+}
+
+boolean
+qxe_jpeg_resync_to_restart (j_decompress_ptr cinfo, int desired)
+{
+  return jpeg_resync_to_restart (cinfo, desired);
+}
+
+#endif /* HAVE_JPEG */
+
+#ifdef HAVE_TIFF
+
+tdata_t
+qxe_TIFFmalloc (tsize_t x1)
+{
+  return _TIFFmalloc (x1);
+}
+
+void
+qxe_TIFFfree (tdata_t x1)
+{
+  _TIFFfree (x1);
+}
+
+void
+qxe_TIFFClose (TIFF *x1)
+{
+  TIFFClose (x1);
+}
+
+int
+qxe_TIFFGetField (TIFF *x1, ttag_t x2, uint32 *x3)
+{
+  return TIFFGetField (x1, x2, x3);
+}
+
+TIFF *
+qxe_TIFFClientOpen (const char *x1, const char *x2,
+		    thandle_t x3,
+		    TIFFReadWriteProc x4, TIFFReadWriteProc x5,
+		    TIFFSeekProc x6, TIFFCloseProc x7,
+		    TIFFSizeProc x8,
+		    TIFFMapFileProc x9, TIFFUnmapFileProc x10)
+{
+  return TIFFClientOpen (x1, x2, x3, x4, x5, x6, x7, x8, x9, x10);
+}
+
+TIFFErrorHandler
+qxe_TIFFSetErrorHandler (TIFFErrorHandler x1)
+{
+  return TIFFSetErrorHandler (x1);
+}
+
+TIFFErrorHandler
+qxe_TIFFSetWarningHandler (TIFFErrorHandler x1)
+{
+  return TIFFSetWarningHandler (x1);
+}
+
+int
+qxe_TIFFReadRGBAImage (TIFF *x1, uint32 x2, uint32 x3, uint32 *x4, int x5)
+{
+  return TIFFReadRGBAImage (x1, x2, x3, x4, x5);
+}
+
+#endif /* HAVE_TIFF */
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/libinterface.h	Mon Jun 10 12:43:42 2002 +0000
@@ -0,0 +1,124 @@
+/* Define prototypes for graphics library interface functions.
+   Copyright (C) 2002 Ben Wing.
+
+This file is part of XEmacs.
+
+XEmacs is free software; you can redistribute it and/or modify it
+under the terms of the GNU General Public License as published by the
+Free Software Foundation; either version 2, or (at your option) any
+later version.
+
+XEmacs is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+for more details.
+
+You should have received a copy of the GNU General Public License
+along with XEmacs; see the file COPYING.  If not, write to
+the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+Boston, MA 02111-1307, USA.  */
+
+/* Synched up with: Not in FSF. */
+
+#ifndef INCLUDED_libinterface_h_
+#define INCLUDED_libinterface_h_
+
+#ifdef HAVE_GIF
+#include "gifrlib.h"
+#endif /* HAVE_GIF */
+
+#ifdef HAVE_PNG
+#ifdef __cplusplus
+extern "C" {
+#endif
+#define message message_ /* Yuck */
+  /* See comment in libinterface.c for the following */
+#define PNG_EXPORT(type, symbol) type XCDECL symbol
+#define ZEXPORT XCDECL
+#define ZEXPORTVA XCDECL
+#include <png.h>
+#undef message
+#ifdef __cplusplus
+}
+#endif
+#endif /* HAVE_PNG */
+
+/* #### WARNING: Utterly random magic here to prevent namespace conflicts
+   when no one bothers to be the least bit namespace-clean.  Potential
+   problems: INT32, FAR.  DONT_NEED_JPEG avoids the problem with FAR in
+   glyphs-msw.c.  For some reason, putting the XPM code after this fixes
+   other problems; don't move it before. --ben */
+#if defined (HAVE_JPEG) && !defined (DONT_NEED_JPEG)
+#ifdef __cplusplus
+extern "C" {
+#endif
+#ifdef _MSC_VER
+# ifndef XMD_H
+  /* Yuck!  This tricks jpeglib.h into not defining INT32, which is defined
+     in VC98/INCLUDE/basetsd.h */
+#  define UNDEF_XMD_H_ME_HARDER
+#  define XMD_H
+# endif
+#endif /* _MSC_VER */
+#include <jpeglib.h>
+#ifdef UNDEF_XMD_H_ME_HARDER
+# undef XMD_H
+#endif
+#include <jerror.h>
+#ifdef __cplusplus
+}
+#endif
+
+boolean XCDECL qxe_jpeg_finish_decompress (j_decompress_ptr cinfo);
+boolean XCDECL qxe_jpeg_start_decompress (j_decompress_ptr cinfo);
+JDIMENSION XCDECL qxe_jpeg_read_scanlines (j_decompress_ptr cinfo,
+					  JSAMPARRAY scanlines,
+					  JDIMENSION max_lines);
+int XCDECL qxe_jpeg_read_header (j_decompress_ptr cinfo, boolean require_image);
+#define qxe_jpeg_create_decompress(cinfo)				      \
+    qxe_jpeg_CreateDecompress((cinfo), JPEG_LIB_VERSION,		      \
+			      (size_t) sizeof(struct jpeg_decompress_struct))
+void XCDECL qxe_jpeg_CreateDecompress (j_decompress_ptr cinfo, int version,
+				      size_t structsize);
+struct jpeg_error_mgr * XCDECL qxe_jpeg_std_error (struct jpeg_error_mgr *err);
+void XCDECL qxe_jpeg_destroy_decompress (j_decompress_ptr cinfo);
+boolean XCDECL qxe_jpeg_resync_to_restart (j_decompress_ptr cinfo, int desired);
+
+#endif /* defined (HAVE_JPEG) && !defined (DONT_NEED_JPEG) */
+
+#ifdef HAVE_XPM
+
+#ifndef HAVE_GTK /* #### ????????????????????? No comprendo ni un poco.
+		    This was here before, in a different file. --ben */
+#include <X11/xpm.h>
+#endif
+
+void XCDECL qxe_XpmFreeXpmImage (XpmImage *image);
+void XCDECL qxe_XpmFreeXpmInfo (XpmInfo *info);
+int XCDECL qxe_XpmCreateXpmImageFromBuffer (char *buffer, XpmImage *image,
+					   XpmInfo *info);
+void XCDECL qxe_XpmFree (void *ptr);
+int XCDECL qxe_XpmReadFileToData (char *filename, char ***data_return);
+
+#endif /* HAVE_XPM */
+
+#ifdef HAVE_TIFF
+#include "tiffio.h"
+
+tdata_t XCDECL qxe_TIFFmalloc (tsize_t x1);
+void XCDECL qxe_TIFFfree (tdata_t x1);
+void XCDECL qxe_TIFFClose (TIFF *x1);
+int XCDECL qxe_TIFFGetField (TIFF *x1, ttag_t x2, uint32 *x3);
+TIFF * XCDECL qxe_TIFFClientOpen (const char *x1, const char *x2,
+				 thandle_t x3, TIFFReadWriteProc x4,
+				 TIFFReadWriteProc x5, TIFFSeekProc x6,
+				 TIFFCloseProc x7, TIFFSizeProc x8,
+				 TIFFMapFileProc x9, TIFFUnmapFileProc x10);
+TIFFErrorHandler XCDECL qxe_TIFFSetErrorHandler (TIFFErrorHandler x1);
+TIFFErrorHandler XCDECL qxe_TIFFSetWarningHandler (TIFFErrorHandler x1);
+int XCDECL qxe_TIFFReadRGBAImage (TIFF *x1, uint32 x2, uint32 x3, uint32 *x4,
+				 int x5);
+
+#endif /* HAVE_TIFF */
+
+#endif /* INCLUDED_libinterface_h_ */