1 /*
2 ** Easylogo TGA->header converter
3 ** ==============================
4 ** (C) 2000 by Paolo Scaffardi (arsenio@tin.it)
5 ** AIRVENT SAM s.p.a - RIMINI(ITALY)
6 ** (C) 2007-2008 Mike Frysinger <vapier@gentoo.org>
7 **
8 ** This is still under construction!
9 */
10 
11 #include <errno.h>
12 #include <getopt.h>
13 #include <stdbool.h>
14 #include <stdio.h>
15 #include <stdlib.h>
16 #include <string.h>
17 #include <unistd.h>
18 #include <sys/stat.h>
19 
20 #pragma pack(1)
21 
22 /*#define ENABLE_ASCII_BANNERS */
23 
24 typedef struct {
25 	unsigned char id;
26 	unsigned char ColorMapType;
27 	unsigned char ImageTypeCode;
28 	unsigned short ColorMapOrigin;
29 	unsigned short ColorMapLenght;
30 	unsigned char ColorMapEntrySize;
31 	unsigned short ImageXOrigin;
32 	unsigned short ImageYOrigin;
33 	unsigned short ImageWidth;
34 	unsigned short ImageHeight;
35 	unsigned char ImagePixelSize;
36 	unsigned char ImageDescriptorByte;
37 } tga_header_t;
38 
39 typedef struct {
40 	unsigned char r, g, b;
41 } rgb_t;
42 
43 typedef struct {
44 	unsigned char b, g, r;
45 } bgr_t;
46 
47 typedef struct {
48 	unsigned char Cb, y1, Cr, y2;
49 } yuyv_t;
50 
51 typedef struct {
52 	void *data, *palette;
53 	int width, height, pixels, bpp, pixel_size, size, palette_size, yuyv;
54 } image_t;
55 
xmalloc(size_t size)56 void *xmalloc (size_t size)
57 {
58 	void *ret = malloc (size);
59 	if (!ret) {
60 		fprintf (stderr, "\nerror: malloc(%zu) failed: %s",
61 			size, strerror(errno));
62 		exit (1);
63 	}
64 	return ret;
65 }
66 
StringUpperCase(char * str)67 void StringUpperCase (char *str)
68 {
69 	int count = strlen (str);
70 	char c;
71 
72 	while (count--) {
73 		c = *str;
74 		if ((c >= 'a') && (c <= 'z'))
75 			*str = 'A' + (c - 'a');
76 		str++;
77 	}
78 }
79 
StringLowerCase(char * str)80 void StringLowerCase (char *str)
81 {
82 	int count = strlen (str);
83 	char c;
84 
85 	while (count--) {
86 		c = *str;
87 		if ((c >= 'A') && (c <= 'Z'))
88 			*str = 'a' + (c - 'A');
89 		str++;
90 	}
91 }
pixel_rgb_to_yuyv(rgb_t * rgb_pixel,yuyv_t * yuyv_pixel)92 void pixel_rgb_to_yuyv (rgb_t * rgb_pixel, yuyv_t * yuyv_pixel)
93 {
94 	unsigned int pR, pG, pB;
95 
96 	/* Transform (0-255) components to (0-100) */
97 	pR = rgb_pixel->r * 100 / 255;
98 	pG = rgb_pixel->g * 100 / 255;
99 	pB = rgb_pixel->b * 100 / 255;
100 
101 	/* Calculate YUV values (0-255) from RGB beetween 0-100 */
102 	yuyv_pixel->y1 = yuyv_pixel->y2 = 209 * (pR + pG + pB) / 300 + 16;
103 	yuyv_pixel->Cb = pB - (pR / 4) - (pG * 3 / 4) + 128;
104 	yuyv_pixel->Cr = pR - (pG * 3 / 4) - (pB / 4) + 128;
105 
106 	return;
107 }
108 
printlogo_rgb(rgb_t * data,int w,int h)109 void printlogo_rgb (rgb_t * data, int w, int h)
110 {
111 	int x, y;
112 
113 	for (y = 0; y < h; y++) {
114 		for (x = 0; x < w; x++, data++)
115 			if ((data->r <
116 			     30) /*&&(data->g == 0)&&(data->b == 0) */ )
117 				printf (" ");
118 			else
119 				printf ("X");
120 		printf ("\n");
121 	}
122 }
123 
printlogo_yuyv(unsigned short * data,int w,int h)124 void printlogo_yuyv (unsigned short *data, int w, int h)
125 {
126 	int x, y;
127 
128 	for (y = 0; y < h; y++) {
129 		for (x = 0; x < w; x++, data++)
130 			if (*data == 0x1080)	/* Because of inverted on i386! */
131 				printf (" ");
132 			else
133 				printf ("X");
134 		printf ("\n");
135 	}
136 }
137 
le16_to_cpu(unsigned short val)138 static inline unsigned short le16_to_cpu (unsigned short val)
139 {
140 	union {
141 		unsigned char pval[2];
142 		unsigned short val;
143 	} swapped;
144 
145 	swapped.val = val;
146 	return (swapped.pval[1] << 8) + swapped.pval[0];
147 }
148 
image_load_tga(image_t * image,char * filename)149 int image_load_tga (image_t * image, char *filename)
150 {
151 	FILE *file;
152 	tga_header_t header;
153 	int i;
154 	unsigned char app;
155 	rgb_t *p;
156 
157 	if ((file = fopen (filename, "rb")) == NULL)
158 		return -1;
159 
160 	fread (&header, sizeof (header), 1, file);
161 
162 	/* byte swap: tga is little endian, host is ??? */
163 	header.ColorMapOrigin = le16_to_cpu (header.ColorMapOrigin);
164 	header.ColorMapLenght = le16_to_cpu (header.ColorMapLenght);
165 	header.ImageXOrigin = le16_to_cpu (header.ImageXOrigin);
166 	header.ImageYOrigin = le16_to_cpu (header.ImageYOrigin);
167 	header.ImageWidth = le16_to_cpu (header.ImageWidth);
168 	header.ImageHeight = le16_to_cpu (header.ImageHeight);
169 
170 	image->width = header.ImageWidth;
171 	image->height = header.ImageHeight;
172 
173 	switch (header.ImageTypeCode) {
174 	case 2:		/* Uncompressed RGB */
175 		image->yuyv = 0;
176 		image->palette_size = 0;
177 		image->palette = NULL;
178 		break;
179 
180 	default:
181 		printf ("Format not supported!\n");
182 		return -1;
183 	}
184 
185 	image->bpp = header.ImagePixelSize;
186 	image->pixel_size = ((image->bpp - 1) / 8) + 1;
187 	image->pixels = image->width * image->height;
188 	image->size = image->pixels * image->pixel_size;
189 	image->data = xmalloc (image->size);
190 
191 	if (image->bpp != 24) {
192 		printf ("Bpp not supported: %d!\n", image->bpp);
193 		return -1;
194 	}
195 
196 	fread (image->data, image->size, 1, file);
197 
198 /* Swapping R and B values */
199 
200 	p = image->data;
201 	for (i = 0; i < image->pixels; i++, p++) {
202 		app = p->r;
203 		p->r = p->b;
204 		p->b = app;
205 	}
206 
207 /* Swapping image */
208 
209 	if (!(header.ImageDescriptorByte & 0x20)) {
210 		unsigned char *temp = xmalloc (image->size);
211 		int linesize = image->pixel_size * image->width;
212 		void *dest = image->data,
213 			*source = temp + image->size - linesize;
214 
215 		printf ("S");
216 		if (temp == NULL) {
217 			printf ("Cannot alloc temp buffer!\n");
218 			return -1;
219 		}
220 
221 		memcpy (temp, image->data, image->size);
222 		for (i = 0; i < image->height;
223 		     i++, dest += linesize, source -= linesize)
224 			memcpy (dest, source, linesize);
225 
226 		free (temp);
227 	}
228 #ifdef ENABLE_ASCII_BANNERS
229 	printlogo_rgb (image->data, image->width, image->height);
230 #endif
231 
232 	fclose (file);
233 	return 0;
234 }
235 
image_free(image_t * image)236 void image_free (image_t * image)
237 {
238 	free (image->data);
239 	free (image->palette);
240 }
241 
image_rgb_to_yuyv(image_t * rgb_image,image_t * yuyv_image)242 int image_rgb_to_yuyv (image_t * rgb_image, image_t * yuyv_image)
243 {
244 	rgb_t *rgb_ptr = (rgb_t *) rgb_image->data;
245 	yuyv_t yuyv;
246 	unsigned short *dest;
247 	int count = 0;
248 
249 	yuyv_image->pixel_size = 2;
250 	yuyv_image->bpp = 16;
251 	yuyv_image->yuyv = 1;
252 	yuyv_image->width = rgb_image->width;
253 	yuyv_image->height = rgb_image->height;
254 	yuyv_image->pixels = yuyv_image->width * yuyv_image->height;
255 	yuyv_image->size = yuyv_image->pixels * yuyv_image->pixel_size;
256 	dest = (unsigned short *) (yuyv_image->data =
257 				   xmalloc (yuyv_image->size));
258 	yuyv_image->palette = 0;
259 	yuyv_image->palette_size = 0;
260 
261 	while ((count++) < rgb_image->pixels) {
262 		pixel_rgb_to_yuyv (rgb_ptr++, &yuyv);
263 
264 		if ((count & 1) == 0)	/* Was == 0 */
265 			memcpy (dest, ((void *) &yuyv) + 2, sizeof (short));
266 		else
267 			memcpy (dest, (void *) &yuyv, sizeof (short));
268 
269 		dest++;
270 	}
271 
272 #ifdef ENABLE_ASCII_BANNERS
273 	printlogo_yuyv (yuyv_image->data, yuyv_image->width,
274 			yuyv_image->height);
275 #endif
276 	return 0;
277 }
278 
image_rgb888_to_rgb565(image_t * rgb888_image,image_t * rgb565_image)279 int image_rgb888_to_rgb565(image_t *rgb888_image, image_t *rgb565_image)
280 {
281 	rgb_t *rgb_ptr = (rgb_t *) rgb888_image->data;
282 	unsigned short *dest;
283 	int count = 0;
284 
285 	rgb565_image->pixel_size = 2;
286 	rgb565_image->bpp = 16;
287 	rgb565_image->yuyv = 0;
288 	rgb565_image->width = rgb888_image->width;
289 	rgb565_image->height = rgb888_image->height;
290 	rgb565_image->pixels = rgb565_image->width * rgb565_image->height;
291 	rgb565_image->size = rgb565_image->pixels * rgb565_image->pixel_size;
292 	dest = (unsigned short *) (rgb565_image->data =
293 				   xmalloc(rgb565_image->size));
294 	rgb565_image->palette = 0;
295 	rgb565_image->palette_size = 0;
296 
297 	while ((count++) < rgb888_image->pixels) {
298 
299 		*dest++ = ((rgb_ptr->b & 0xF8) << 8) |
300 			((rgb_ptr->g & 0xFC) << 3) |
301 			(rgb_ptr->r >> 3);
302 		rgb_ptr++;
303 	}
304 
305 	return 0;
306 }
307 
308 enum comp_t {
309 	COMP_NONE,
310 	COMP_GZIP,
311 	COMP_LZMA,
312 };
313 static enum comp_t compression = COMP_NONE;
314 static bool bss_storage = false;
315 
image_save_header(image_t * image,char * filename,char * varname)316 int image_save_header (image_t * image, char *filename, char *varname)
317 {
318 	FILE *file = fopen (filename, "w");
319 	char app[256], str[256] = "", def_name[64];
320 	int count = image->size, col = 0;
321 	unsigned char *dataptr = image->data;
322 
323 	if (file == NULL)
324 		return -1;
325 
326 	/*  Author information */
327 	fprintf (file,
328 		 "/*\n * Generated by EasyLogo, (C) 2000 by Paolo Scaffardi\n *\n");
329 	fprintf (file,
330 		 " * To use this, include it and call: easylogo_plot(screen,&%s, width,x,y)\n *\n",
331 		 varname);
332 	fprintf (file,
333 		 " * Where:\t'screen'\tis the pointer to the frame buffer\n");
334 	fprintf (file, " *\t\t'width'\tis the screen width\n");
335 	fprintf (file, " *\t\t'x'\t\tis the horizontal position\n");
336 	fprintf (file, " *\t\t'y'\t\tis the vertical position\n */\n\n");
337 
338 	/* image compress */
339 	if (compression != COMP_NONE) {
340 		const char *errstr = NULL;
341 		unsigned char *compressed;
342 		const char *comp_name;
343 		struct stat st;
344 		FILE *compfp;
345 		size_t filename_len = strlen(filename);
346 		char *compfilename = xmalloc(filename_len + 20);
347 		char *compcmd = xmalloc(filename_len + 50);
348 
349 		sprintf(compfilename, "%s.bin", filename);
350 		switch (compression) {
351 		case COMP_GZIP:
352 			strcpy(compcmd, "gzip");
353 			comp_name = "GZIP";
354 			break;
355 		case COMP_LZMA:
356 			strcpy(compcmd, "lzma");
357 			comp_name = "LZMA";
358 			break;
359 		default:
360 			errstr = "\nerror: unknown compression method";
361 			goto done;
362 		}
363 		strcat(compcmd, " > ");
364 		strcat(compcmd, compfilename);
365 		compfp = popen(compcmd, "w");
366 		if (!compfp) {
367 			errstr = "\nerror: popen() failed";
368 			goto done;
369 		}
370 		if (fwrite(image->data, image->size, 1, compfp) != 1) {
371 			errstr = "\nerror: writing data to gzip failed";
372 			goto done;
373 		}
374 		if (pclose(compfp)) {
375 			errstr = "\nerror: gzip process failed";
376 			goto done;
377 		}
378 
379 		compfp = fopen(compfilename, "r");
380 		if (!compfp) {
381 			errstr = "\nerror: open() on gzip data failed";
382 			goto done;
383 		}
384 		if (stat(compfilename, &st)) {
385 			errstr = "\nerror: stat() on gzip file failed";
386 			goto done;
387 		}
388 		compressed = xmalloc(st.st_size);
389 		if (fread(compressed, st.st_size, 1, compfp) != 1) {
390 			errstr = "\nerror: reading gzip data failed";
391 			goto done;
392 		}
393 		fclose(compfp);
394 
395 		unlink(compfilename);
396 
397 		dataptr = compressed;
398 		count = st.st_size;
399 		fprintf(file, "#define EASYLOGO_ENABLE_%s %i\n\n", comp_name, count);
400 		if (bss_storage)
401 			fprintf (file, "static unsigned char EASYLOGO_DECOMP_BUFFER[%i];\n\n", image->size);
402 
403  done:
404 		free(compfilename);
405 		free(compcmd);
406 
407 		if (errstr) {
408 			perror (errstr);
409 			return -1;
410 		}
411 	}
412 
413 	/*	Headers */
414 	fprintf (file, "#include <video_easylogo.h>\n\n");
415 	/*	Macros */
416 	strcpy (def_name, varname);
417 	StringUpperCase (def_name);
418 	fprintf (file, "#define	DEF_%s_WIDTH\t\t%d\n", def_name,
419 		 image->width);
420 	fprintf (file, "#define	DEF_%s_HEIGHT\t\t%d\n", def_name,
421 		 image->height);
422 	fprintf (file, "#define	DEF_%s_PIXELS\t\t%d\n", def_name,
423 		 image->pixels);
424 	fprintf (file, "#define	DEF_%s_BPP\t\t%d\n", def_name, image->bpp);
425 	fprintf (file, "#define	DEF_%s_PIXEL_SIZE\t%d\n", def_name,
426 		 image->pixel_size);
427 	fprintf (file, "#define	DEF_%s_SIZE\t\t%d\n\n", def_name,
428 		 image->size);
429 	/*  Declaration */
430 	fprintf (file, "unsigned char DEF_%s_DATA[] = {\n",
431 		 def_name);
432 
433 	/*	Data */
434 	while (count)
435 		switch (col) {
436 		case 0:
437 			sprintf (str, " 0x%02x", *dataptr++);
438 			col++;
439 			count--;
440 			break;
441 
442 		case 16:
443 			fprintf (file, "%s", str);
444 			if (count > 0)
445 				fprintf (file, ",");
446 			fprintf (file, "\n");
447 
448 			col = 0;
449 			break;
450 
451 		default:
452 			strcpy (app, str);
453 			sprintf (str, "%s, 0x%02x", app, *dataptr++);
454 			col++;
455 			count--;
456 			break;
457 		}
458 
459 	if (col)
460 		fprintf (file, "%s\n", str);
461 
462 	/*	End of declaration */
463 	fprintf (file, "};\n\n");
464 	/*	Variable */
465 	fprintf (file, "fastimage_t %s = {\n", varname);
466 	fprintf (file, "		DEF_%s_DATA,\n", def_name);
467 	fprintf (file, "		DEF_%s_WIDTH,\n", def_name);
468 	fprintf (file, "		DEF_%s_HEIGHT,\n", def_name);
469 	fprintf (file, "		DEF_%s_BPP,\n", def_name);
470 	fprintf (file, "		DEF_%s_PIXEL_SIZE,\n", def_name);
471 	fprintf (file, "		DEF_%s_SIZE\n};\n", def_name);
472 
473 	fclose (file);
474 
475 	return 0;
476 }
477 
478 #define DEF_FILELEN	256
479 
usage(int exit_status)480 static void usage (int exit_status)
481 {
482 	puts (
483 		"EasyLogo 1.0 (C) 2000 by Paolo Scaffardi\n"
484 		"\n"
485 		"Syntax:	easylogo [options] inputfile [outputvar [outputfile]]\n"
486 		"\n"
487 		"Options:\n"
488 		"  -r     Output RGB888 instead of YUYV\n"
489 		"  -s     Output RGB565 instead of YUYV\n"
490 		"  -g     Compress with gzip\n"
491 		"  -l     Compress with lzma\n"
492 		"  -b     Preallocate space in bss for decompressing image\n"
493 		"  -h     Help output\n"
494 		"\n"
495 		"Where: 'inputfile'   is the TGA image to load\n"
496 		"       'outputvar'   is the variable name to create\n"
497 		"       'outputfile'  is the output header file (default is 'inputfile.h')"
498 	);
499 	exit (exit_status);
500 }
501 
main(int argc,char * argv[])502 int main (int argc, char *argv[])
503 {
504 	int c;
505 	bool use_rgb888 = false;
506 	bool use_rgb565 = false;
507 	char inputfile[DEF_FILELEN],
508 		outputfile[DEF_FILELEN], varname[DEF_FILELEN];
509 
510 	image_t rgb888_logo, rgb565_logo, yuyv_logo;
511 
512 	while ((c = getopt(argc, argv, "hrsglb")) > 0) {
513 		switch (c) {
514 		case 'h':
515 			usage (0);
516 			break;
517 		case 'r':
518 			use_rgb888 = true;
519 			puts("Using 24-bit RGB888 Output Fromat");
520 			break;
521 		case 's':
522 			use_rgb565 = true;
523 			puts("Using 16-bit RGB565 Output Fromat");
524 			break;
525 		case 'g':
526 			compression = COMP_GZIP;
527 			puts("Compressing with gzip");
528 			break;
529 		case 'l':
530 			compression = COMP_LZMA;
531 			puts("Compressing with lzma");
532 			break;
533 		case 'b':
534 			bss_storage = true;
535 			puts("Preallocating bss space for decompressing image");
536 			break;
537 		default:
538 			usage (1);
539 			break;
540 		}
541 	}
542 
543 	c = argc - optind;
544 	if (c > 4 || c < 1)
545 		usage (1);
546 
547 	strcpy (inputfile, argv[optind]);
548 
549 	if (c > 1)
550 		strcpy (varname, argv[optind + 1]);
551 	else {
552 		/* transform "input.tga" to just "input" */
553 		char *dot;
554 		strcpy (varname, inputfile);
555 		dot = strchr (varname, '.');
556 		if (dot)
557 			*dot = '\0';
558 	}
559 
560 	if (c > 2)
561 		strcpy (outputfile, argv[optind + 2]);
562 	else {
563 		/* just append ".h" to input file name */
564 		strcpy (outputfile, inputfile);
565 		strcat (outputfile, ".h");
566 	}
567 
568 	/* Make sure the output is sent as soon as we printf() */
569 	setbuf(stdout, NULL);
570 
571 	printf ("Doing '%s' (%s) from '%s'...",
572 		outputfile, varname, inputfile);
573 
574 	/* Import TGA logo */
575 
576 	printf ("L");
577 	if (image_load_tga(&rgb888_logo, inputfile) < 0) {
578 		printf ("input file not found!\n");
579 		exit (1);
580 	}
581 
582 	/* Convert, save, and free the image */
583 
584 	if (!use_rgb888 && !use_rgb565) {
585 		printf ("C");
586 		image_rgb_to_yuyv(&rgb888_logo, &yuyv_logo);
587 
588 		printf("S");
589 		image_save_header(&yuyv_logo, outputfile, varname);
590 		image_free(&yuyv_logo);
591 	} else if (use_rgb565) {
592 		printf("C");
593 		image_rgb888_to_rgb565(&rgb888_logo, &rgb565_logo);
594 
595 		printf("S");
596 		image_save_header(&rgb565_logo, outputfile, varname);
597 		image_free(&rgb565_logo);
598 	} else {
599 		printf("S");
600 		image_save_header(&rgb888_logo, outputfile, varname);
601 	}
602 
603 	/* Free original image and copy */
604 
605 	image_free(&rgb888_logo);
606 
607 	printf ("\n");
608 
609 	return 0;
610 }
611