Add ppm and rppm viewer by Alexander Papst

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@17835 a1c6a512-1295-4272-9138-f99709370657

4 files changed, 337 insertions, 0 deletions

diff --git a/apps/plugins/CATEGORIES b/apps/plugins/CATEGORIES
index b8ed0af75b..029bcfd164 100644
--- a/apps/plugins/CATEGORIES
+++ b/apps/plugins/CATEGORIES
@@ -54,6 +54,7 @@ pegbox,games
 pictureflow,demos
 plasma,demos
 pong,games
+ppmviewer,viewers
 properties,viewers
 random_folder_advance_config,apps
 reversi,games
diff --git a/apps/plugins/SOURCES b/apps/plugins/SOURCES
index 260a357c39..7eabed6e00 100644
--- a/apps/plugins/SOURCES
+++ b/apps/plugins/SOURCES
@@ -60,6 +60,7 @@ fire.c
 jpeg.c
 mandelbrot.c
 plasma.c
+ppmviewer.c
 
 blackjack.c
 bounce.c
diff --git a/apps/plugins/ppmviewer.c b/apps/plugins/ppmviewer.c
new file mode 100644
index 0000000000..4bb43e50da
--- /dev/null
+++ b/apps/plugins/ppmviewer.c
@@ -0,0 +1,334 @@
+/*****************************************************************************

+ *             __________               __   ___.

+ *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___

+ *   Source     |       _// __ \_/ ___\|  |/ /| __ \ / __ \  \/  /

+ *   Jukebox    |    |   ( (__) )  \___|    ( | \_\ ( (__) )    (

+ *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \

+ *                     \/            \/     \/    \/            \/

+ * $Id$

+ *

+ * Copyright (C) 2008 Alexander Papst

+ *

+ * All files in this archive are subject to the GNU General Public License.

+ * See the file COPYING in the source tree root for full license agreement.

+ *

+ * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY

+ * KIND, either express or implied.

+ *

+ ****************************************************************************/

+

+#include "plugin.h"

+#include "bmp.h"

+

+#if defined(HAVE_LCD_COLOR)

+

+PLUGIN_HEADER

+

+/* Magic constants. */

+#define PPM_MAGIC1 'P'

+#define PPM_MAGIC2 '3'

+#define RPPM_MAGIC2 '6'

+#define PPM_FORMAT (PPM_MAGIC1 * 256 + PPM_MAGIC2)

+#define RPPM_FORMAT (PPM_MAGIC1 * 256 + RPPM_MAGIC2)

+

+#define PPM_OVERALLMAXVAL 65535

+#define PPM_MAXSIZE (300*1024)/sizeof(fb_data)

+

+#define ppm_error(...) rb->splash(HZ*2, __VA_ARGS__ )

+

+static fb_data buffer[PPM_MAXSIZE];

+static fb_data lcd_buf[LCD_WIDTH * LCD_HEIGHT];

+

+static const struct plugin_api* rb; /* global api struct pointer */

+

+int ppm_read_magic_number(int fd)

+{

+    char i1, i2;

+    if(!rb->read(fd, &i1, 1) || !rb->read(fd, &i2, 1))

+    {

+        ppm_error( "Error reading magic number from ppm image stream. "\

+                   "Most often, this means your input file is empty." );

+        return PLUGIN_ERROR;

+    }        

+    return i1 * 256 + i2;

+}

+

+char ppm_getc(int fd)

+{

+    char ch;

+

+	if (!rb->read(fd, &ch, 1)) {

+	    ppm_error("EOF. Read error reading a byte");

+	    return PLUGIN_ERROR;

+	}

+       

+    if (ch == '#') {

+        do {

+	        if (!rb->read(fd, &ch, 1)) {

+	            ppm_error("EOF. Read error reading a byte");

+	            return PLUGIN_ERROR;

+	        }

+	    } while (ch != '\n' && ch != '\r');

+	}

+    return ch;

+}

+

+int ppm_getuint(int fd)

+{

+    char ch;

+    int i;

+    int digitVal;

+

+    do {

+        ch = ppm_getc(fd);

+	} while (ch == ' ' || ch == '\t' || ch == '\n' || ch == '\r');

+

+    if (ch < '0' || ch > '9') {

+        ppm_error("Junk (%c) in file where an integer should be.", ch);

+        return PLUGIN_ERROR;

+    }

+

+    i = 0;

+

+    do {

+        digitVal = ch - '0';

+

+        if (i > INT_MAX/10 - digitVal) {

+            ppm_error("ASCII decimal integer in file is "\

+                      "too large to be processed.");

+            return PLUGIN_ERROR;

+        }

+

+        i = i * 10 + digitVal;

+        ch = ppm_getc(fd);

+        

+    } while (ch >= '0' && ch <= '9');

+

+    return i;

+}

+

+int ppm_getrawbyte(int fd)

+{

+    unsigned char by;

+

+    if (!rb->read(fd, &by, 1)) {

+        ppm_error("EOF. Read error while reading a one-byte sample.");

+        return PLUGIN_ERROR;

+    }

+

+    return (int)by;

+}

+

+int ppm_getrawsample(int fd, int const maxval)

+{

+    if (maxval < 256) {

+        /* The sample is just one byte. Read it. */

+        return(ppm_getrawbyte(fd));

+    } else {

+        /* The sample is two bytes. Read both. */

+        unsigned char byte_pair[2];

+

+        if (!rb->read(fd, byte_pair, 2)) {

+            ppm_error("EOF. Read error while reading a long sample.");

+            return PLUGIN_ERROR;

+        }

+        return((byte_pair[0]<<8) | byte_pair[1]);

+    }

+}

+

+int read_ppm_init_rest(int fd, 

+                       int * const cols, 

+                       int * const rows, 

+                       int * const maxval)

+{

+    /* Read size. */

+    *cols = ppm_getuint(fd);

+    *rows = ppm_getuint(fd);

+

+    if ((long unsigned int)(*cols * *rows) > PPM_MAXSIZE) {

+        ppm_error("Imagesize (%ld pixels) is too large. "\

+                  "The maximum allowed is %ld.",

+                  (long unsigned int)(*cols * *rows), 

+                  (long unsigned int)PPM_MAXSIZE);

+        return PLUGIN_ERROR;

+    }

+

+    /* Read maxval. */

+    *maxval = ppm_getuint(fd);

+    

+    if (*maxval > PPM_OVERALLMAXVAL) {

+        ppm_error("maxval of input image (%u) is too large. "\

+                  "The maximum allowed by the PPM is %u.",

+                  *maxval, PPM_OVERALLMAXVAL);

+        return PLUGIN_ERROR;

+    }

+    if (*maxval == 0) {

+        ppm_error("maxval of input image is zero.");

+        return PLUGIN_ERROR;

+    }

+    return 1;

+}

+

+void read_ppm_init(int fd, 

+                   int * const cols, 

+                   int * const rows, 

+                   int * const maxval, 

+                   int * const format)

+{

+    /* Check magic number. */

+    *format = ppm_read_magic_number( fd );

+    

+    if (*format == PLUGIN_ERROR) return;

+    switch (*format) {

+        case PPM_FORMAT:

+        case RPPM_FORMAT:

+            if(read_ppm_init_rest(fd, cols, rows, maxval) == PLUGIN_ERROR) {

+                *format = PLUGIN_ERROR;

+            }

+            break;

+

+        default:

+            ppm_error( "Bad magic number - not a ppm or rppm file." );

+            *format = PLUGIN_ERROR;

+    }

+}

+

+int read_ppm_row(int fd, 

+                 int const row, 

+                 int const cols, 

+                 int const maxval, 

+                 int const format)

+{

+    int col;

+    int r, g, b;

+    switch (format) {

+	    case PPM_FORMAT:

+            for (col = 0; col < cols; ++col) {

+                r = ppm_getuint(fd);

+                g = ppm_getuint(fd);

+                b = ppm_getuint(fd);

+

+                if (r == PLUGIN_ERROR || g == PLUGIN_ERROR ||

+                    b == PLUGIN_ERROR)

+                {

+                    return PLUGIN_ERROR;

+                } 

+                buffer[(cols * row) + col] = LCD_RGBPACK(

+                    (255 / maxval) * r,

+                    (255 / maxval) * g,

+                    (255 / maxval) * b);

+            }

+            break;

+

+	    case RPPM_FORMAT:

+            for (col = 0; col < cols; ++col) {

+                r = ppm_getrawsample(fd, maxval);

+                g = ppm_getrawsample(fd, maxval);

+                b = ppm_getrawsample(fd, maxval);

+

+                if (r == PLUGIN_ERROR || g == PLUGIN_ERROR ||

+                    b == PLUGIN_ERROR)

+                {

+                    return PLUGIN_ERROR;

+                } 

+                buffer[(cols * row) + col] = LCD_RGBPACK(

+                    (255 / maxval) * r,

+                    (255 / maxval) * g,

+                    (255 / maxval) * b);

+	        }

+	        break;

+

+	    default:

+            ppm_error("What?!");

+	        return PLUGIN_ERROR;

+	}

+	return 1;

+}

+

+int read_ppm(int fd, 

+             int * const cols, 

+             int * const rows, 

+             int * const maxval)

+{

+    int row;

+    int format;

+

+    read_ppm_init(fd, cols, rows, maxval, &format);

+    

+    if(format == PLUGIN_ERROR) {

+        return PLUGIN_ERROR;

+    }

+    

+    for (row = 0; row < *rows; ++row) {

+        if( read_ppm_row(fd, row, *cols, *maxval, format) == PLUGIN_ERROR) {

+            return PLUGIN_ERROR;

+        }

+    }

+    return 1;

+}

+

+/* this is the plugin entry point */

+enum plugin_status plugin_start(const struct plugin_api* api, const void* parameter)

+{

+    static char filename[MAX_PATH];

+    int fd;

+

+    int cols; 

+    int rows; 

+    int maxval; 

+   

+    int result;

+    

+    struct bitmap small_bitmap, orig_bitmap;

+    

+    if(!parameter) return PLUGIN_ERROR;

+

+    rb = api;

+

+    rb->strcpy(filename, parameter);

+    

+    fd = rb->open(filename, O_RDONLY);

+    if (fd < 0)

+    {

+        ppm_error("Couldnt open file: %s, %d", filename, fd);

+        return PLUGIN_ERROR;

+    }

+

+    result = read_ppm(fd, &cols, &rows, &maxval);

+

+    rb->close(fd);

+    if(result == PLUGIN_ERROR) return PLUGIN_ERROR;

+

+    orig_bitmap.width = cols;

+    orig_bitmap.height = rows;

+    orig_bitmap.data = (char*)buffer;

+    

+    if (cols > LCD_WIDTH || rows > LCD_HEIGHT)

+    {

+        if (cols > LCD_WIDTH) {

+            small_bitmap.width = LCD_WIDTH;

+            small_bitmap.height = 

+                (int)(((float)LCD_WIDTH / (float)cols) * (float)rows);

+            

+        } else { /* rows > LCD_HEIGHT */

+            

+            small_bitmap.width = 

+                (int)(((float)LCD_HEIGHT / (float)rows) * (float)cols);

+            small_bitmap.height = LCD_HEIGHT;            

+        } 

+        small_bitmap.data = (char*)lcd_buf;

+

+        smooth_resize_bitmap( &orig_bitmap, &small_bitmap );

+        

+        rb->lcd_bitmap((fb_data*)small_bitmap.data, 0, 0,

+                       small_bitmap.width, small_bitmap.height);

+    } else {

+        rb->lcd_bitmap((fb_data*)orig_bitmap.data, 0, 0, cols, rows);   

+    }

+    rb->lcd_update();

+    rb->button_get(true);

+    

+    return PLUGIN_OK;

+}

+

+#endif

diff --git a/apps/plugins/viewers.config b/apps/plugins/viewers.config
index c1df1b2e71..49ade79144 100644
--- a/apps/plugins/viewers.config
+++ b/apps/plugins/viewers.config
@@ -36,6 +36,7 @@ tap,viewers/zxbox,12
 sna,viewers/zxbox,12
 tzx,viewers/zxbox,12
 z80,viewers/zxbox,12
+ppm,viewers/ppmviewer,2
 *,viewers/properties,-
 colours,apps/text_editor,11
 ssg,games/superdom,-