* TOIlet, The Other Implementation's letters. Will be a FIGlet clone. Later.

test/Makefile.am

@@ -2,7 +2,7 @@
 
 AM_CPPFLAGS = -I$(top_srcdir) -I$(top_srcdir)/cucul -I$(top_srcdir)/caca -DDATADIR=\"$(pkgdatadir)\"
 
-noinst_PROGRAMS = colors demo demo0 dithering event export font frames gamma hsv input spritedit font2tga text transform truecolor unicode import
+noinst_PROGRAMS = colors demo demo0 dithering event export font frames gamma hsv input spritedit font2tga text toilet transform truecolor unicode import
 
 colors_SOURCES = colors.c
 colors_LDADD = ../caca/libcaca.la ../cucul/libcucul.la @CACA_LIBS@
@@ -46,6 +46,9 @@ spritedit_LDADD = ../caca/libcaca.la ../cucul/libcucul.la @CACA_LIBS@
 text_SOURCES = text.c
 text_LDADD = ../cucul/libcucul.la
 
+toilet_SOURCES = toilet.c
+toilet_LDADD = ../cucul/libcucul.la
+
 transform_SOURCES = transform.c
 transform_LDADD = ../caca/libcaca.la ../cucul/libcucul.la @CACA_LIBS@
 

test/toilet.c

@@ -0,0 +1,167 @@
+/*
+ *  TOIlet        The Other Implementation’s letters
+ *  Copyright (c) 2006 Sam Hocevar <sam@zoy.org>
+ *                All Rights Reserved
+ *
+ *  $Id$
+ *
+ *  This program 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.
+ */
+
+#include "config.h"
+#include "common.h"
+
+#if !defined(__KERNEL__)
+#   if defined(HAVE_INTTYPES_H)
+#      include <inttypes.h>
+#   endif
+#   include <stdio.h>
+#   include <string.h>
+#   include <stdlib.h>
+#endif
+
+#include "cucul.h"
+#include "caca.h"
+
+/* String to canvas transformations */
+static cucul_canvas_t *cuculize_big(char const *);
+static cucul_canvas_t *cuculize_tiny(char const *);
+
+/* Canvas special effects */
+static void make_gay(cucul_canvas_t *);
+
+int main(int argc, char *argv[])
+{
+    cucul_canvas_t *cv;
+    cucul_buffer_t *buffer;
+
+    char *string = NULL;
+    unsigned int i, n;
+
+    if(argc < 2)
+    {
+        fprintf(stderr, "%s: too few arguments\n", argv[0]);
+        fprintf(stderr, "usage: %s [OPTIONS] <string>\n", argv[0]);
+        return -1;
+    }
+
+    for(i = 1, n = 0; i < (unsigned int)argc; i++)
+    {
+        unsigned int l = strlen(argv[i]);
+        if(i > 1)
+            string[n++] = ' ';
+        string = realloc(string, n + l + 1);
+        strcpy(string + n, argv[i]);
+        n += l;
+    }
+
+    /* Do gay stuff with our string (léopard) */
+    cv = cuculize_big(string);
+    make_gay(cv);
+
+    /* Output char */
+    buffer = cucul_export_canvas(cv, "utf8");
+    fwrite(cucul_get_buffer_data(buffer),
+           cucul_get_buffer_size(buffer), 1, stdout);
+    cucul_free_buffer(buffer);
+
+    cucul_free_canvas(cv);
+
+    return 0;
+}
+
+static cucul_canvas_t *cuculize_big(char const *string)
+{
+    cucul_canvas_t *cv;
+    cucul_font_t *f;
+    char const * const * fonts;
+    unsigned char *buf;
+    unsigned int n, w, h, x, y, miny, maxy;
+
+    n = strlen(string);
+    cv = cucul_create_canvas(n, 1);
+    cucul_putstr(cv, 0, 0, string);
+
+    fonts = cucul_get_font_list();
+    f = cucul_load_font(fonts[0], 0);
+
+    /* Create our bitmap buffer (32-bit ARGB) */
+    w = cucul_get_canvas_width(cv) * cucul_get_font_width(f);
+    h = cucul_get_canvas_height(cv) * cucul_get_font_height(f);
+    buf = malloc(4 * w * h);
+
+    /* Render the canvas onto our image buffer */
+    cucul_render_canvas(cv, f, buf, w, h, 4 * w);
+
+    /* Free our canvas, and allocate a bigger one */
+    cucul_free_font(f);
+    cucul_free_canvas(cv);
+    cv = cucul_create_canvas(w, h);
+
+    /* Render the image buffer on the canvas */
+    cucul_set_color(cv, CUCUL_COLOR_WHITE, CUCUL_COLOR_TRANSPARENT);
+    cucul_clear_canvas(cv);
+
+    miny = h; maxy = 0;
+
+    for(y = 0; y < h; y++)
+       for(x = 0; x < w; x++)
+    {
+        unsigned char c = buf[4 * (x + y * w) + 2];
+
+        if(c >= 0xa0)
+            cucul_putstr(cv, x, y, "█");
+        else if(c >= 0x80)
+            cucul_putstr(cv, x, y, "▓");
+        else if(c >= 0x40)
+            cucul_putstr(cv, x, y, "▒");
+        else if(c >= 0x20)
+            cucul_putstr(cv, x, y, "░");
+    }
+
+    free(buf);
+
+    return cv;
+}
+
+static cucul_canvas_t *cuculize_tiny(char const *string)
+{
+    unsigned int n = strlen(string);
+    cucul_canvas_t *cv = cucul_create_canvas(n, 1);
+
+    cucul_putstr(cv, 0, 0, string);
+
+    return cv;
+}
+
+static void make_gay(cucul_canvas_t *cv)
+{
+    static unsigned char const rainbow[] =
+    {
+        CUCUL_COLOR_LIGHTMAGENTA,
+        CUCUL_COLOR_LIGHTRED,
+        CUCUL_COLOR_YELLOW,
+        CUCUL_COLOR_LIGHTGREEN,
+        CUCUL_COLOR_LIGHTCYAN,
+        CUCUL_COLOR_LIGHTBLUE,
+    };
+    unsigned int x, y, w, h;
+
+    w = cucul_get_canvas_width(cv);
+    h = cucul_get_canvas_height(cv);
+
+    for(y = 0; y < h; y++)
+        for(x = 0; x < w; x++)
+    {
+        unsigned long int ch = cucul_getchar(cv, x, y);
+        if(ch != (unsigned char)' ')
+        {
+            cucul_set_color(cv, rainbow[(x + y) % 6], CUCUL_COLOR_TRANSPARENT);
+            cucul_putchar(cv, x, y, ch);
+        }
+    }
+}
+