gryf/wmaker
1
0
Fork 0
mirror of https://github.com/gryf/wmaker.git synced 2025-12-18 20:10:29 +01:00
Code Issues Projects Releases Wiki Activity
Files
0e274dc979c6f22970dfca1eec6574e473d14b31
wmaker/wrlib/load_xpm_normalized.c
Christophe CURIS 19202fd2db WRaster: Create header for i18n helper functions 
This patch is just adding a single header, but because it also modifies
all the C files to add the #include, it was made as a patch on its own to
ease review.

Signed-off-by: Christophe CURIS <christophe.curis@free.fr>
2021-05-18 17:49:17 +01:00

460 lines
9.8 KiB
C
Raw Blame History

/* nxpm.c - load "normalized" XPM image
*
* Raster graphics library
*
* Copyright (c) 1997-2003 Alfredo K. Kojima
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Library General Public
* License as published by the Free Software Foundation; either
* version 2 of the License, or (at your option) any later version.
*
* This library 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
* Library General Public License for more details.
*
* You should have received a copy of the GNU Library General Public
* License along with this library; if not, write to the Free
* Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
* MA 02110-1301, USA.
*/
#include <config.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <assert.h>
#include <errno.h>
#include "wraster.h"
#include "imgformat.h"
#include "wr_i18n.h"
/*
* Restricted support for XPM images.
*
* The images must be in the following "normalized" format:
*
*
* line content
* 1 signature comment
* 2 ignored ( normally "static char *xpm[] = {" )
* 3 "width height color_count chars" where chars is 1 or 2
* 4 color definitions. Only c values with #rrggbb or #rrrrggggbbb
* format OR None
* n data
*
* - no comments or blank lines are allowed, except for the signature
* - all lines must have at most 256 characters
* - no white spaces allowed at left of each line
*/
#define LINEWIDTH 64
static void free_color_symbol_table(unsigned char *color_table[],
unsigned short *symbol_table)
{
if (color_table[0])
free(color_table[0]);
if (color_table[1])
free(color_table[1]);
if (color_table[2])
free(color_table[2]);
if (color_table[3])
free(color_table[3]);
if (symbol_table)
free(symbol_table);
}
RImage *RGetImageFromXPMData(RContext * context, char **data)
{
RImage *image = NULL;
unsigned char *color_table[4] = { NULL, NULL, NULL, NULL };
unsigned short *symbol_table = NULL;
unsigned char *r, *g, *b, *a;
int i, j, k, line = 0;
int transp;
unsigned short color;
int bsize;
int w, h, ccount, csize;
/*
* When using libXpm we need the context argument but the code here does
* not, so tell the compiler to not warn about it
*/
(void) context;
if (sscanf(data[line++], "%i %i %i %i", &w, &h, &ccount, &csize) != 4
|| w <= 0 || h <= 0 || ccount <= 0 || csize <= 0)
goto bad_format;
if (csize != 1 && csize != 2)
goto bad_format;
color_table[0] = malloc(ccount);
color_table[1] = malloc(ccount);
color_table[2] = malloc(ccount);
color_table[3] = malloc(ccount);
symbol_table = malloc(ccount * sizeof(unsigned short));
bsize = csize * w + 16;
if (!color_table[0] || !color_table[1] || !color_table[2] || !color_table[3] || !symbol_table || !bsize) {
RErrorCode = RERR_NOMEMORY;
free_color_symbol_table(color_table, symbol_table);
return NULL;
}
transp = 0;
/* get color table */
for (i = 0; i < ccount; i++) {
symbol_table[i] = data[line][0];
if (csize == 2)
symbol_table[i] |= data[line][1] << 8;
j = csize;
while (data[line][j] != '#' && data[line][j] != 0 && data[line][j] != 'N')
j++;
if (data[line][j] == '#') {
unsigned int red, green, blue;
k = 0;
j++;
while (data[line][j + k] != 0)
k++;
if (k == 6) {
if (sscanf(&(data[line][j]), "%2x%2x%2x", &red, &green, &blue) != 3)
goto bad_format;
} else if (k == 12) {
if (sscanf(&(data[line][j]), "%4x%4x%4x", &red, &green, &blue) != 3)
goto bad_format;
red >>= 8;
green >>= 8;
blue >>= 8;
} else
goto bad_format;
color_table[0][i] = red;
color_table[1][i] = green;
color_table[2][i] = blue;
color_table[3][i] = 255;
} else if (strncmp(&(data[line][j]), "None", 4) == 0 || strncmp(&(data[line][j]), "none", 4) == 0) {
color_table[3][i] = 0;
transp = 1;
} else {
goto bad_format;
}
line++;
}
image = RCreateImage(w, h, transp);
if (!image) {
free_color_symbol_table(color_table, symbol_table);
return NULL;
}
r = image->data;
g = image->data + 1;
b = image->data + 2;
if (image->format == RRGBAFormat)
a = image->data + 3;
else
a = NULL;
for (i = 0; i < h; i++) {
if (csize == 1) {
for (j = 0; j < w; j++) {
color = data[line][j];
for (k = 0; k < ccount; k++) {
if (symbol_table[k] == color)
break;
}
if (k == ccount)
k = 0;
*r = color_table[0][k];
*g = color_table[1][k];
*b = color_table[2][k];
if (a) {
*a = color_table[3][k];
r += 4;
g += 4;
b += 4;
a += 4;
} else {
r += 3;
g += 3;
b += 3;
}
}
} else {
for (j = 0; j < w * 2; j++) {
color = data[line][j++];
color |= data[line][j];
for (k = 0; k < ccount; k++) {
if (symbol_table[k] == color)
break;
}
if (k == ccount)
k = 0;
*r = color_table[0][k];
*g = color_table[1][k];
*b = color_table[2][k];
if (a) {
*a = color_table[3][k];
r += 4;
g += 4;
b += 4;
a += 4;
} else {
r += 3;
g += 3;
b += 3;
}
}
}
line++;
}
free_color_symbol_table(color_table, symbol_table);
return image;
bad_format:
RErrorCode = RERR_BADIMAGEFILE;
free_color_symbol_table(color_table, symbol_table);
if (image)
RReleaseImage(image);
return NULL;
}
RImage *RLoadXPM(RContext * context, const char *file)
{
RImage *image = NULL;
char line[LINEWIDTH + 1];
char *buffer = NULL;
unsigned char *color_table[4] = { NULL, NULL, NULL, NULL };
unsigned short *symbol_table = NULL;
unsigned char *r, *g, *b, *a;
int i, j, k;
int transp;
unsigned short color;
int bsize;
int w, h, ccount, csize;
FILE *f;
/*
* When using libXpm we need the context argument but the code here does
* not, so tell the compiler to not warn about it
*/
(void) context;
f = fopen(file, "rb");
if (!f) {
RErrorCode = RERR_OPEN;
return NULL;
}
/* sig */
if (!fgets(line, LINEWIDTH, f))
goto bad_file;
/* declaration */
if (!fgets(line, LINEWIDTH, f))
goto bad_file;
/* data */
if (!fgets(line, LINEWIDTH, f))
goto bad_file;
if (line[0] == '/')
if (!fgets(line, LINEWIDTH, f))
goto bad_file;
if (sscanf(line, "\"%i %i %i %i\"", &w, &h, &ccount, &csize) != 4
|| w <= 0 || h <= 0 || ccount <= 0 || csize <= 0)
goto bad_file;
if (csize != 1 && csize != 2)
goto bad_format;
color_table[0] = malloc(ccount);
color_table[1] = malloc(ccount);
color_table[2] = malloc(ccount);
color_table[3] = malloc(ccount);
symbol_table = malloc(ccount * sizeof(unsigned short));
bsize = csize * w + 16;
buffer = malloc(bsize);
if (!color_table[0] || !color_table[1] || !color_table[2] ||
!color_table[3] || !symbol_table || !bsize || !buffer) {
RErrorCode = RERR_NOMEMORY;
fclose(f);
free_color_symbol_table(color_table, symbol_table);
if (buffer)
free(buffer);
return NULL;
}
transp = 0;
/* get color table */
for (i = 0; i < ccount; i++) {
if (!fgets(line, LINEWIDTH, f))
goto bad_file;
if (line[0] == '/')
if (!fgets(line, LINEWIDTH, f))
goto bad_file;
symbol_table[i] = line[1];
if (csize == 2)
symbol_table[i] |= line[2] << 8;
j = csize + 1;
while (line[j] != '#' && line[j] != '"' && line[j] != 0 && line[j] != 'N')
j++;
if (line[j] == '#') {
unsigned int red, green, blue;
k = 0;
j++;
while (line[j + k] != '"' && line[j + k] != 0)
k++;
if (k == 6) {
if (sscanf(&(line[j]), "%2x%2x%2x", &red, &green, &blue) != 3)
goto bad_format;
} else if (k == 12) {
if (sscanf(&(line[j]), "%4x%4x%4x", &red, &green, &blue) != 3)
goto bad_format;
red >>= 8;
green >>= 8;
blue >>= 8;
} else
goto bad_format;
color_table[0][i] = red;
color_table[1][i] = green;
color_table[2][i] = blue;
color_table[3][i] = 255;
} else if (strncmp(&(line[j]), "None", 4) == 0 || strncmp(&(line[j]), "none", 4) == 0) {
color_table[3][i] = 0;
transp = 1;
} else {
goto bad_format;
}
}
image = RCreateImage(w, h, transp);
if (!image) {
fclose(f);
free_color_symbol_table(color_table, symbol_table);
if (buffer)
free(buffer);
return NULL;
}
r = image->data;
g = image->data + 1;
b = image->data + 2;
if (image->format == RRGBAFormat)
a = image->data + 3;
else
a = NULL;
for (i = 0; i < h; i++) {
if (!fgets(buffer, bsize, f))
goto bad_file;
if (buffer[0] == '/')
if (!fgets(buffer, bsize, f))
goto bad_file;
if (csize == 1) {
for (j = 1; j <= w; j++) {
color = buffer[j];
for (k = 0; k < ccount; k++) {
if (symbol_table[k] == color)
break;
}
if (k == ccount)
k = 0;
*r = color_table[0][k];
*g = color_table[1][k];
*b = color_table[2][k];
if (a) {
*a = color_table[3][k];
r += 4;
g += 4;
b += 4;
a += 4;
} else {
r += 3;
g += 3;
b += 3;
}
}
} else {
for (j = 1; j <= w * 2; j++) {
color = buffer[j++];
color |= buffer[j] << 8;
for (k = 0; k < ccount; k++) {
if (symbol_table[k] == color)
break;
}
if (k == ccount) {
k = 0;
}
*r = color_table[0][k];
*g = color_table[1][k];
*b = color_table[2][k];
if (a) {
*a = color_table[3][k];
r += 4;
g += 4;
b += 4;
a += 4;
} else {
r += 3;
g += 3;
b += 3;
}
}
}
}
fclose(f);
free_color_symbol_table(color_table, symbol_table);
if (buffer)
free(buffer);
return image;
bad_format:
RErrorCode = RERR_BADIMAGEFILE;
fclose(f);
free_color_symbol_table(color_table, symbol_table);
if (buffer)
free(buffer);
if (image)
RReleaseImage(image);
return NULL;
bad_file:
RErrorCode = RERR_BADIMAGEFILE;
fclose(f);
free_color_symbol_table(color_table, symbol_table);
if (buffer)
free(buffer);
if (image)
RReleaseImage(image);
return NULL;
}
Reference in New Issue View Git Blame Copy Permalink