From 181cec4348da40331b3e8ab365732c025ec149b2 Mon Sep 17 00:00:00 2001 From: Reinhard Tartler Date: Wed, 27 Apr 2011 19:24:15 +0200 Subject: Import upstream version 0.11.0~svn1143 --- drv_Image.c | 485 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 485 insertions(+) create mode 100644 drv_Image.c (limited to 'drv_Image.c') diff --git a/drv_Image.c b/drv_Image.c new file mode 100644 index 0000000..7f8a005 --- /dev/null +++ b/drv_Image.c @@ -0,0 +1,485 @@ +/* $Id: drv_Image.c 840 2007-09-09 12:17:42Z michael $ + * $URL: https://ssl.bulix.org/svn/lcd4linux/trunk/drv_Image.c $ + * + * new style Image (PPM/PNG) Driver for LCD4Linux + * + * Copyright (C) 2003 Michael Reinelt + * Copyright (C) 2004 The LCD4Linux Team + * + * This file is part of LCD4Linux. + * + * LCD4Linux 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. + * + * LCD4Linux 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 this program; if not, write to the Free Software + * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + * + */ + +/* + * + * exported fuctions: + * + * struct DRIVER drv_Image + * + */ + + +#include "config.h" + +#include +#include +#include +#include +#include +#include +#include +#include + + +#ifdef WITH_PNG + +#ifdef HAVE_GD_GD_H +#include +#else +#ifdef HAVE_GD_H +#include +#else +#error "gd.h not found!" +#error "cannot compile PNG driver" +#endif +#endif + +#if GD2_VERS != 2 +#error "lcd4linux requires libgd version 2" +#error "cannot compile PNG driver" +#endif + +#endif + + +#include "debug.h" +#include "cfg.h" +#include "timer.h" +#include "qprintf.h" +#include "plugin.h" +#include "drv.h" +#include "drv_generic_graphic.h" + +#ifdef WITH_DMALLOC +#include +#endif + +static char Name[] = "Image"; + +static enum { NIL, PPM, PNG } Format; + +static int pixel = -1; /* pointsize in pixel */ +static int pgap = 0; /* gap between points */ +static int rgap = 0; /* row gap between lines */ +static int cgap = 0; /* column gap between characters */ +static int border = 0; /* window border */ + +static int dimx, dimy; /* total window dimension in pixel */ + +static RGBA BC; +static RGBA *drv_IMG_FB = NULL; + +static int dirty = 1; + +/****************************************/ +/*** hardware dependant functions ***/ +/****************************************/ + +#ifdef WITH_PPM +static int drv_IMG_flush_PPM(void) +{ + static int seq = 0; + static RGBA *bitbuf = NULL; + static unsigned char *rowbuf = NULL; + int xsize, ysize, row, col, i; + char path[256], tmp[256], buffer[256]; + int fd; + + xsize = 2 * border + (DCOLS / XRES - 1) * cgap + DCOLS * pixel + (DCOLS - 1) * pgap; + ysize = 2 * border + (DROWS / YRES - 1) * rgap + DROWS * pixel + (DROWS - 1) * pgap; + + if (bitbuf == NULL) { + if ((bitbuf = malloc(xsize * ysize * sizeof(*bitbuf))) == NULL) { + error("%s: malloc() failed: %s", Name, strerror(errno)); + return -1; + } + } + + if (rowbuf == NULL) { + if ((rowbuf = malloc(3 * xsize * sizeof(*rowbuf))) == NULL) { + error("Raster: malloc() failed: %s", strerror(errno)); + return -1; + } + } + + for (i = 0; i < xsize * ysize; i++) { + bitbuf[i] = BC; + } + + for (row = 0; row < DROWS; row++) { + int y = border + (row / YRES) * rgap + row * (pixel + pgap); + for (col = 0; col < DCOLS; col++) { + int x = border + (col / XRES) * cgap + col * (pixel + pgap); + int a, b; + for (a = 0; a < pixel; a++) + for (b = 0; b < pixel; b++) + bitbuf[y * xsize + x + a * xsize + b] = drv_IMG_FB[row * DCOLS + col]; + } + } + + snprintf(path, sizeof(path), output, seq++); + qprintf(tmp, sizeof(tmp), "%s.tmp", path); + + /* remove the file */ + unlink(tmp); + + /* avoid symlink security hole: */ + /* open it with O_EXCL will fail if the file exists. */ + /* This should not happen because we just unlinked it. */ + if ((fd = open(tmp, O_WRONLY | O_CREAT | O_EXCL, 0644)) < 0) { + error("%s: open(%s) failed: %s", Name, tmp, strerror(errno)); + return -1; + } + + qprintf(buffer, sizeof(buffer), "P6\n%d %d\n255\n", xsize, ysize); + if (write(fd, buffer, strlen(buffer)) < 0) { + error("%s: write(%s) failed: %s", Name, tmp, strerror(errno)); + return -1; + } + + for (row = 0; row < ysize; row++) { + int c = 0; + for (col = 0; col < xsize; col++) { + RGBA p = bitbuf[row * xsize + col]; + rowbuf[c++] = p.R; + rowbuf[c++] = p.G; + rowbuf[c++] = p.B; + } + if (write(fd, rowbuf, c) < 0) { + error("%s: write(%s) failed: %s", Name, tmp, strerror(errno)); + break; + } + } + + if (close(fd) < 0) { + error("%s: close(%s) failed: %s", Name, tmp, strerror(errno)); + return -1; + } + if (rename(tmp, path) < 0) { + error("%s: rename(%s) failed: %s", Name, tmp, strerror(errno)); + return -1; + } + + return 0; +} +#endif + +#ifdef WITH_PNG +static int drv_IMG_flush_PNG(void) +{ + static int seq = 0; + int xsize, ysize, row, col; + char path[256], tmp[256]; + FILE *fp; + int fd; + gdImagePtr im; + + xsize = 2 * border + (DCOLS / XRES - 1) * cgap + DCOLS * pixel + (DCOLS - 1) * pgap; + ysize = 2 * border + (DROWS / YRES - 1) * rgap + DROWS * pixel + (DROWS - 1) * pgap; + + im = gdImageCreateTrueColor(xsize, ysize); + gdImageFilledRectangle(im, 0, 0, xsize, ysize, gdTrueColor(BC.R, BC.G, BC.B)); + + for (row = 0; row < DROWS; row++) { + int y = border + (row / YRES) * rgap + row * (pixel + pgap); + for (col = 0; col < DCOLS; col++) { + int x = border + (col / XRES) * cgap + col * (pixel + pgap); + RGBA p = drv_IMG_FB[row * DCOLS + col]; + int c = gdTrueColor(p.R, p.G, p.B); + gdImageFilledRectangle(im, x, y, x + pixel - 1, y + pixel - 1, c); + } + } + + snprintf(path, sizeof(path), output, seq++); + qprintf(tmp, sizeof(tmp), "%s.tmp", path); + + /* remove the file */ + unlink(tmp); + + /* avoid symlink security hole: */ + /* open it with O_EXCL will fail if the file exists. */ + /* This should not happen because we just unlinked it. */ + if ((fd = open(tmp, O_WRONLY | O_CREAT | O_EXCL, 0644)) < 0) { + error("%s: open(%s) failed: %s", Name, tmp, strerror(errno)); + return -1; + } + + if ((fp = fdopen(fd, "w")) == NULL) { + error("%s: fdopen(%s) failed: %s\n", Name, tmp, strerror(errno)); + close(fd); + return -1; + } + + gdImagePng(im, fp); + gdImageDestroy(im); + + + if (fclose(fp) != 0) { + error("%s: fclose(%s) failed: %s\n", Name, tmp, strerror(errno)); + return -1; + } + + if (rename(tmp, path) < 0) { + error("%s: rename(%s) failed: %s\n", Name, tmp, strerror(errno)); + return -1; + } + + return 0; +} +#endif + + +static void drv_IMG_flush(void) +{ + switch (Format) { + case PPM: +#ifdef WITH_PPM + drv_IMG_flush_PPM(); +#endif + break; + case PNG: +#ifdef WITH_PNG + drv_IMG_flush_PNG(); +#endif + break; + default: + break; + } +} + + +static void drv_IMG_timer( __attribute__ ((unused)) + void *notused) +{ + if (dirty) { + drv_IMG_flush(); + dirty = 0; + } +} + + +static void drv_IMG_blit(const int row, const int col, const int height, const int width) +{ + int r, c; + + for (r = row; r < row + height; r++) { + for (c = col; c < col + width; c++) { + RGBA p1 = drv_IMG_FB[r * DCOLS + c]; + RGBA p2 = drv_generic_graphic_rgb(r, c); + if (p1.R != p2.R || p1.G != p2.G || p1.B != p2.B) { + drv_IMG_FB[r * DCOLS + c] = p2; + dirty = 1; + } + } + } +} + + +static int drv_IMG_start(const char *section) +{ + int i; + char *s; + + if (output == NULL || *output == '\0') { + error("%s: no output file specified (use -o switch)", Name); + return -1; + } + + /* read file format from config */ + s = cfg_get(section, "Format", NULL); + if (s == NULL || *s == '\0') { + error("%s: no '%s.Format' entry from %s", Name, section, cfg_source()); + free(s); + return -1; + } + + Format = NIL; + +#ifdef WITH_PPM + if (strcmp(s, "PPM") == 0) { + Format = PPM; + } +#endif + +#ifdef WITH_PNG + if (strcmp(s, "PNG") == 0) { + Format = PNG; + } +#endif + + if (Format == NIL) { + error("%s: bad %s.Format '%s' from %s", Name, section, s, cfg_source()); + free(s); + return -1; + } + free(s); + + /* read display size from config */ + if (sscanf(s = cfg_get(section, "Size", "120x32"), "%dx%d", &DCOLS, &DROWS) != 2 || DCOLS < 1 || DROWS < 1) { + error("%s: bad %s.Size '%s' from %s", Name, section, s, cfg_source()); + free(s); + return -1; + } + free(s); + + if (sscanf(s = cfg_get(section, "font", "5x8"), "%dx%d", &XRES, &YRES) != 2 || XRES < 1 || YRES < 1) { + error("%s: bad %s.Font '%s' from %s", Name, section, s, cfg_source()); + free(s); + return -1; + } + free(s); + + if (sscanf(s = cfg_get(section, "pixel", "4+1"), "%d+%d", &pixel, &pgap) != 2 || pixel < 1 || pgap < 0) { + error("%s: bad %s.Pixel '%s' from %s", Name, section, s, cfg_source()); + free(s); + return -1; + } + free(s); + + if (sscanf(s = cfg_get(section, "gap", "-1x-1"), "%dx%d", &cgap, &rgap) != 2 || cgap < -1 || rgap < -1) { + error("%s: bad %s.Gap '%s' from %s", Name, section, s, cfg_source()); + free(s); + return -1; + } + free(s); + + if (rgap < 0) + rgap = pixel + pgap; + if (cgap < 0) + cgap = pixel + pgap; + + if (cfg_number(section, "border", 0, 0, -1, &border) < 0) + return -1; + + s = cfg_get(section, "basecolor", "000000ff"); + if (color2RGBA(s, &BC) < 0) { + error("%s: ignoring illegal color '%s'", Name, s); + } + free(s); + + drv_IMG_FB = malloc(DCOLS * DROWS * sizeof(*drv_IMG_FB)); + if (drv_IMG_FB == NULL) { + error("%s: framebuffer could not be allocated: malloc() failed", Name); + return -1; + } + + for (i = 0; i < DCOLS * DROWS; i++) { + drv_IMG_FB[i] = BC; + } + + dimx = DCOLS * pixel + (DCOLS - 1) * pgap + (DCOLS / XRES - 1) * cgap; + dimy = DROWS * pixel + (DROWS - 1) * pgap + (DROWS / YRES - 1) * rgap; + + + /* initially flush the image to a file */ + drv_IMG_flush(); + + /* regularly flush the image to a file */ + /* Fixme: make 100msec configurable */ + timer_add(drv_IMG_timer, NULL, 100, 0); + + + return 0; +} + + + +/****************************************/ +/*** plugins ***/ +/****************************************/ + +/* none at the moment... */ + + +/****************************************/ +/*** exported functions ***/ +/****************************************/ + + +/* list models */ +int drv_IMG_list(void) +{ +#ifdef WITH_PPM + printf("PPM "); +#endif +#ifdef WITH_PNG + printf("PNG "); +#endif + return 0; +} + + +/* initialize driver & display */ +int drv_IMG_init(const char *section, const __attribute__ ((unused)) + int quiet) +{ + int ret; + + info("%s: %s", Name, "$Rev: 840 $"); + + /* real worker functions */ + drv_generic_graphic_real_blit = drv_IMG_blit; + + /* start display */ + if ((ret = drv_IMG_start(section)) != 0) + return ret; + + /* initialize generic graphic driver */ + if ((ret = drv_generic_graphic_init(section, Name)) != 0) + return ret; + + /* register plugins */ + /* none at the moment... */ + + + return 0; +} + + +/* close driver & display */ +int drv_IMG_quit(const __attribute__ ((unused)) + int quiet) +{ + + info("%s: shutting down.", Name); + drv_generic_graphic_quit(); + + if (drv_IMG_FB) { + free(drv_IMG_FB); + drv_IMG_FB = NULL; + } + + return (0); +} + + +DRIVER drv_Image = { + .name = Name, + .list = drv_IMG_list, + .init = drv_IMG_init, + .quit = drv_IMG_quit, +}; -- cgit v1.2.3