* Added preliminary Postscript (tm) (r) (c) exporter.

cucul/Makefile.am

@@ -19,6 +19,7 @@ libcucul_la_SOURCES = \
 	export_irc.c \
 	export_ansi.c \
 	export_html.c \
+	export_ps.c \
 	$(NULL)
 libcucul_la_LDFLAGS = -no-undefined
 libcucul_la_LIBADD = @CUCUL_LIBS@

cucul/cucul.c

@@ -78,7 +78,7 @@ cucul_t * cucul_init(void)
     qq->irc_buffer = NULL;
     qq->html3_buffer = NULL;
     qq->html_buffer = NULL;
-    
+
     return qq;
 }
 
@@ -285,6 +285,8 @@ void cucul_end(cucul_t *qq)
         free(qq->html3_buffer);
     if(qq->html_buffer)
         free(qq->html_buffer);
+    if(qq->ps_buffer)
+        free(qq->ps_buffer);
 
 
     free(qq);

cucul/cucul.h

@@ -208,6 +208,8 @@ char* cucul_get_html(cucul_t *, int *size);
 char* cucul_get_html3(cucul_t *, int *size);
 char* cucul_get_irc(cucul_t *, int *size);
 char* cucul_get_ansi(cucul_t *, int trailing, int *size);
+char* cucul_get_ps(cucul_t *qq, int *size);
+
 /*  @} */
 
 #ifdef __cplusplus

cucul/cucul_internals.h

@@ -53,9 +53,7 @@ struct cucul_context
     char *irc_buffer;
     char *html3_buffer;
     char *html_buffer;
-    
-
-
+    char *ps_buffer;
 };
 
 /* Initialisation functions */

cucul/export_ps.c

@@ -0,0 +1,158 @@
+/*
+ *  libcucul      Unicode canvas library
+ *  Copyright (c) 2002-2006 Sam Hocevar <sam@zoy.org>
+ *                All Rights Reserved
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the Do What The Fuck You Want To
+ *  Public License, Version 2, as published by Sam Hocevar. See
+ *  http://sam.zoy.org/wtfpl/COPYING for more details.
+ */
+
+/** \file export.c
+ *  \version \$Id: export_irc.c 384 2006-03-13 18:07:35Z sam $
+ *  \author Sam Hocevar <sam@zoy.org>
+ *  \author Jean-Yves Lamoureux <jylam@lnxscene.org>
+ *  \brief Export function
+ *
+ *  This file contains export functions for Postscript files
+ */
+
+#include "config.h"
+
+#if !defined(__KERNEL__)
+#   include <stdlib.h>
+#   include <stdio.h>
+#   include <string.h>
+#endif
+
+#include "cucul.h"
+#include "cucul_internals.h"
+
+
+char ps_header[] = {"%%! \n \
+%%%% libcaca PDF export      \n \
+%%%%LanguageLevel: 2 \n \
+%%%%Pages: 1 \n \
+%%%%DocumentData: Clean7Bit \n \
+/csquare { \n \
+        newpath \n \
+        0 0 moveto \n \
+        0 1 rlineto \n \
+        1 0 rlineto \n \
+        0 -1 rlineto \n \
+        closepath \n \
+        setrgbcolor \n \
+        fill \n \
+} def \n \
+/S { \n \
+  Show \n \
+} bind def \n \
+ \n \
+ \n \
+/Times-Roman findfont \n \
+8 scalefont \n \
+setfont\n \
+6 10 scale \n"};
+
+
+
+
+/** \brief Generate Postscript representation of current image.
+ *
+ *  This function generates and returns a Postscript representation of
+ *  the current image.
+ */
+char* cucul_get_ps(cucul_t *qq, int *size)
+{
+
+    static float const paletteR[] =
+    {
+        0,   0,   0,   0,
+        0.5, 0.5, 0.5, 0.5,
+        0.5, 0.5, 0.5, 0.5,
+        1.0, 1.0, 1.0, 1.0,
+    };
+    static float const paletteG[] =
+    {
+        0, 0, 0.5, 0.5,
+        0, 0, 0.5, 0.5,
+        0, 0, 1.0, 1.0,
+        0, 0, 1.0, 1.0,
+    };
+    static float const paletteB[] =
+    {
+        0, 0.5, 0,   0.5,
+        0, 0.5, 0,   0.5,
+        0, 1.0, 0.5, 1.0,
+        0, 1.0, 0,   1.0,
+    };
+
+
+    char *cur;
+    unsigned int x, y;
+
+    if(qq->ps_buffer)
+        free(qq->ps_buffer);
+
+    /* 400 is arbitrary and needs to be precised */
+    qq->ps_buffer = malloc((strlen(ps_header) + (qq->height*qq->width)*400) * sizeof(char));
+    cur = qq->ps_buffer;
+
+    /* Header */
+    cur += sprintf(cur, "%s", ps_header);
+
+
+    /* Background, drawn using csquare macro defined in header */
+    for(y=0;y<qq->height; y++) {
+        uint8_t *lineattr = qq->attr + y * qq->width;
+
+        for(x = 0; x < qq->width; x++) {
+	    float bgR = paletteR[lineattr[x] >> 4];
+	    float bgG = paletteG[lineattr[x] >> 4];
+	    float bgB = paletteB[lineattr[x] >> 4];
+
+
+	    cur += sprintf(cur, "1 0 translate \n %f %f %f csquare\n", bgR, bgG, bgB);
+  	}
+
+	/* Return to beginning of the line, and jump to the next one */
+	cur += sprintf(cur, "%d 1 translate \n", -qq->width);
+
+
+    }
+
+    /* Text. FIXME, doesn't work yet */
+    cur += sprintf(cur, "1 1 scale\n");
+    cur += sprintf(cur, "newpath\n0 0 moveto\n");
+    for(y=0;y<qq->height; y++) {
+        uint8_t *lineattr = qq->attr + y * qq->width;
+        uint32_t *linechar = qq->chars + y * qq->width;
+
+        for(x = 0; x < qq->width; x++) {
+	    uint32_t cR = linechar[x];
+	    float fgR = paletteR[lineattr[x] & 0x0f];
+	    float fgG = paletteG[lineattr[x] & 0x0f];
+	    float fgB = paletteB[lineattr[x] & 0x0f];
+
+	    cur += sprintf(cur, "%f %f %f setrgbcolor\n", fgR, fgG, fgB);
+	    cur += sprintf(cur, "1 0 translate\n");
+	    cur += sprintf(cur, "{%c} \n", cR);
+
+	}
+	cur += sprintf(cur, "%d 1 translate \n", -qq->width);
+    }
+
+
+    cur += sprintf(cur, "showpage");
+
+    /* Crop to really used size */
+    *size = (strlen(qq->ps_buffer) + 1) * sizeof(char);
+    qq->ps_buffer = realloc(qq->ps_buffer, *size);
+
+    return qq->ps_buffer;
+
+}
+
+
+