Importing from X.Org 7.2RC2

1 files changed, 216 insertions, 0 deletions

diff --git a/app/bitmap/bmtoa.c b/app/bitmap/bmtoa.c
new file mode 100644
index 000000000..6f32cb5d7
--- /dev/null
+++ b/app/bitmap/bmtoa.c
@@ -0,0 +1,216 @@
+/* $Xorg: bmtoa.c,v 1.4 2001/02/09 02:05:28 xorgcvs Exp $ */
+/* $XdotOrg: app/bitmap/bmtoa.c,v 1.3 2005/07/16 22:07:12 alanc Exp $ */
+/*
+
+Copyright 1988, 1993, 1998  The Open Group
+
+Permission to use, copy, modify, distribute, and sell this software and its
+documentation for any purpose is hereby granted without fee, provided that
+the above copyright notice appear in all copies and that both that
+copyright notice and this permission notice appear in supporting
+documentation.
+
+The above copyright notice and this permission notice shall be included
+in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
+OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR
+OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+OTHER DEALINGS IN THE SOFTWARE.
+
+Except as contained in this notice, the name of The Open Group shall
+not be used in advertising or otherwise to promote the sale, use or
+other dealings in this Software without prior written authorization
+from The Open Group.
+
+*/
+/* $XFree86: xc/programs/bitmap/bmtoa.c,v 3.6 2001/07/25 15:05:12 dawes Exp $ */
+
+/*
+ * bmtoa - bitmap to ascii filter
+ * Author:  Jim Fulton, MIT X Consortium
+ */
+
+#ifdef HAVE_CONFIG_H
+# include "config.h"
+#endif
+
+#include <stdio.h>
+#include <X11/Xlib.h>
+#include <X11/Xutil.h>
+#include <X11/Xos.h>
+
+#include <X11/Xmu/Drawing.h>
+
+#include <stdlib.h>
+#include <unistd.h>
+#ifndef HAS_MKSTEMP
+extern char *mktemp();
+#endif
+
+char *ProgramName;
+
+static void print_scanline (unsigned int width, unsigned int height, 
+			    unsigned char *data, char *chars);
+
+static void 
+usage (void)
+{
+    fprintf (stderr, "usage:  %s [-options ...] [filename]\n\n",
+	     ProgramName);
+    fprintf (stderr, 
+	"where options include:\n");
+    fprintf (stderr,
+	"    -chars cc        chars to use for 0 and 1 bits, respectively\n");
+    fprintf (stderr, "\n");
+    exit (1);
+}
+
+static char *
+copy_stdin (void)
+{
+#ifdef WIN32
+    static char tmpfilename[] = "/temp/bmtoa.XXXXXX";
+#else
+    static char tmpfilename[] = "/tmp/bmtoa.XXXXXX";
+#endif
+    char buf[BUFSIZ];
+    FILE *fp;
+    int nread, nwritten;
+
+#ifndef HAS_MKSTEMP
+    if (mktemp (tmpfilename) == NULL) {
+	fprintf (stderr,
+		 "%s:  unable to genererate temporary file name for stdin.\n",
+		 ProgramName);
+	exit (1);
+    }
+    fp = fopen (tmpfilename, "w");
+#else
+    int fd;
+
+    if ((fd = mkstemp(tmpfilename)) < 0) {
+	fprintf (stderr,
+		 "%s:  unable to genererate temporary file name for stdin.\n",
+		 ProgramName);
+	exit (1);
+    }
+    fp = fdopen(fd, "w");
+#endif
+    while (1) {
+	buf[0] = '\0';
+	nread = fread (buf, 1, sizeof buf, stdin);
+	if (nread <= 0) break;
+	nwritten = fwrite (buf, 1, nread, fp);
+	if (nwritten != nread) {
+	    fprintf (stderr,
+		     "%s:  error copying stdin to file (%d of %d chars)\n",
+		     ProgramName, nwritten, nread);
+	    (void) fclose (fp);
+	    (void) unlink (tmpfilename);
+	    exit (1);
+	}
+    }
+    (void) fclose (fp);
+    return tmpfilename;
+}
+
+int
+main (int argc, char *argv[]) 
+{
+    char *filename = NULL;
+    int isstdin = 0;
+    char *chars = "-#";
+    int i;
+    unsigned int width, height;
+    unsigned char *data;
+    int x_hot, y_hot;
+    int status;
+
+    ProgramName = argv[0];
+
+    for (i = 1; i < argc; i++) {
+	char *arg = argv[i];
+
+	if (arg[0] == '-') {
+	    switch (arg[1]) {
+	      case '\0':
+		filename = NULL;
+		continue;
+	      case 'c':
+		if (++i >= argc) usage ();
+		chars = argv[i];
+		continue;
+	      default:
+		usage ();
+	    }
+	} else {
+	    filename = arg;
+	}
+    }
+
+    if (strlen (chars) != 2) {
+	fprintf (stderr,
+	 "%s:  bad character list \"%s\", must have exactly 2 characters\n",
+		 ProgramName, chars);
+	exit (1);
+    }
+
+    if (!filename) {
+	filename = copy_stdin ();
+	isstdin = 1;
+    }
+
+    status = XmuReadBitmapDataFromFile (filename, &width, &height, &data,
+					&x_hot, &y_hot);
+    if (isstdin) (void) unlink (filename);  /* don't need it anymore */
+    if (status != BitmapSuccess) {
+	fprintf (stderr, "%s:  unable to read bitmap from file \"%s\"\n",
+		 ProgramName, isstdin ? "(stdin)" : filename);
+	exit (1);
+    }
+
+    print_scanline (width, height, data, chars);
+    exit (0);
+}
+
+static void
+print_scanline (unsigned int width, 
+		unsigned int height, 
+		unsigned char *data, 
+		char *chars)
+{
+    char *scanline = (char *) malloc (width + 1);
+    unsigned char *dp = data;
+    int row, column;
+    static unsigned char masktable[] = {
+	0x01, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80 };
+    int padded = ((width & 7) != 0);
+
+    if (!scanline) {
+	fprintf (stderr, "%s:  unable to allocate %d bytes for scanline\n",
+		 ProgramName, width + 1);
+	exit (1);
+    }
+
+    for (row = 0; row < height; row++) {
+	for (column = 0; column < width; column++) {
+	    int i = (column & 7);
+
+	    if (*dp & masktable[i]) {
+		putchar (chars[1]);
+	    } else {
+		putchar (chars[0]);
+	    }
+
+	    if (i == 7) dp++;
+	}
+	putchar ('\n');
+	if (padded) dp++;
+    }
+    return;
+}
+