From ed37b5ee621a8c90ff08cb63038c6799642748fd Mon Sep 17 00:00:00 2001
From: pancake <pancake@dazo>
Date: Sat, 5 May 2007 03:04:52 +0200
Subject: * Enhacements and fixups for logotool

* Add support for RGBA raw images (New flag -a)
* Autodetect RGBA images
* Fix endianness stuff when writting the logo header
---
 logotool/compress.c | 114 +++++++++++++++++++++++++++++++++++++++++++---------
 1 file changed, 94 insertions(+), 20 deletions(-)

(limited to 'logotool/compress.c')

diff --git a/logotool/compress.c b/logotool/compress.c
index 327d50e..e2a6975 100644
--- a/logotool/compress.c
+++ b/logotool/compress.c
@@ -28,45 +28,119 @@
 #include <sys/stat.h>
 #include <fcntl.h>
 
+extern int rgba;
+
+int isbe()
+{
+	int a=1; char *b=(char *)&a;
+	return (int)b[0];
+}
+
+void ememcpy(char *dst, char *src)
+{
+	char buffer[4];
+	memcpy(buffer, src, 4);
+	dst[0] = buffer[3]; dst[1] = buffer[2];
+	dst[2] = buffer[1]; dst[3] = buffer[0];
+}
+
 int compress_image(char *srcf, char *dstf, int w, int h)
 {
 	char buf[256];
 	char tmp[256];
-	int fd, fdout;
+	int fdout;
+	FILE *fd;
 	int i,ret;
 
-	fd = open(srcf, O_RDONLY);
-	if (fd == -1) {
+	fd = fopen(srcf, "rb");
+	if (fd == NULL) {
 		printf("Cannot open file '%s' \n", srcf);
 		return 1;
 	}
 
-	fdout  = open( dstf, O_CREAT | O_WRONLY , 0660 );
+	fdout  = open( dstf, O_TRUNC | O_CREAT | O_WRONLY , 0660 );
 	if (fdout == -1) {
 		printf("Cannot open file '%s' for writing\n", dstf);
 		return 1;
 	}
 
-	// TODO: force little endian!! (not safe for big endian)
-	write(fdout, &w, 4);
-	write(fdout, &h, 4);
+	if (isbe()) {
+		char oop[4];
+		ememcpy((char *)&oop, (char *)&w);
+		write(fdout, &oop, 4);
+		ememcpy((char *)&oop, (char *)&h);
+		write(fdout, &oop, 4);
+	} else {
+		write(fdout, &w, 4);
+		write(fdout, &h, 4);
+	}
 
-	for(;;) {
-		unsigned char c;
-		ret = read(fd, buf, 3*80);
-		c = (int)((2*ret/3)>>1);
-		write(fdout,&c, 1);
-		if (ret <= 0) break;
-		for(i=0;i<ret;i+=3) {
-			tmp[0]  = buf[i+0]&0xf8;
-			tmp[0] |= buf[i+1]&0x07;
-			tmp[1]  = buf[i+1]&0xe0;
-			tmp[1] |= buf[i+1]&0x1f;
-			write(fdout, tmp, 2);
+	fseek(fd, 0, SEEK_END);
+	if (!rgba && ftell(fd)%3) {
+		fprintf(stderr, "Oops..looks like RGBA..forcing -a\n");
+		rgba = 1;
+	}
+	fseek(fd, 0, SEEK_SET);
+
+#define MAX 3*80
+	if (rgba) {
+		for(;;) {
+			unsigned char c;
+			ret = fread(&buf, 1, MAX, fd);
+			if (ret <= 0) break;
+			c = ret/4;
+			write(fdout,&c, 1);
+			for(i=0;i<ret;i+=4) {
+				tmp[0]  = buf[i+0]&0xf8;
+				tmp[0] |= buf[i+1]&0x07;
+				tmp[1]  = buf[i+1]&0xe0;
+				tmp[1] |= buf[i+2]&0x1f;
+				write(fdout, tmp, 2);
+			}
+		}
+	} else {
+		for(;;) {
+			unsigned char c;
+			ret = fread(buf, 1, MAX, fd);
+			if (ret <= 0) break;
+			c = ret/3;
+			write(fdout,&c, 1);
+			for(i=0;i<ret;i+=3) {
+				tmp[0]  = buf[i+0]&0xf8;
+				tmp[0] |= buf[i+1]&0x07;
+				tmp[1]  = buf[i+1]&0xe0;
+				tmp[1] |= buf[i+2]&0x1f;
+				write(fdout, tmp, 2);
+			}
 		}
 	}
-	close(fd);
+	fclose(fd);
 	close(fdout);
 	printf("eval PATH=$PWD:$PATH logotool -u %s\n", dstf);
 	return 1;
 }
+#if 0
+// TODO: compression stuff
+		/* is a repeated block? */
+		c = buf[0];
+		for(i=1;i<MAX&&buf[i]==c&&buf[i+1]==c;i+=2);
+printf("memcpy %d -> %d (ret %d)\n",i,ret-i, ret);
+for(i=0;i<ret-i;i++)
+printf(" %02x ", (unsigned char)buf[i]);
+printf("\n");
+		if (i>5) {
+//		if (i==MAX) {
+			if (0x80>ret) printf("PRON\n");
+			c = 0x80 | ret; //(int)((2*ret/3)>>1);
+			write(fdout,&c, 1);
+			tmp[0]  = buf[i+0]&0xf8;
+			tmp[0] |= buf[i+1]&0x07;
+			tmp[1]  = buf[i+1]&0xe0;
+			tmp[1] |= buf[i+1]&0x1f;
+			write(fdout, tmp, 2);
+			// restore state
+			memcpy(buf,buf+i,ret-i);
+			ret -= i;
+		}
+		
+#endif
-- 
cgit v1.2.3