tools/easylogo/easylogo.c

   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 **
   7 ** This is still under construction!
   8 */
   9
  10 #include <stdio.h>
  11 #include <stdlib.h>
  12 #include <string.h>
  13
  14 #pragma pack(1)
  15
  16 /*#define ENABLE_ASCII_BANNERS */
  17
  18 typedef struct {
  19         unsigned char   id;
  20         unsigned char   ColorMapType;
  21         unsigned char   ImageTypeCode;
  22         unsigned short  ColorMapOrigin;
  23         unsigned short  ColorMapLenght;
  24         unsigned char   ColorMapEntrySize;
  25         unsigned short  ImageXOrigin;
  26         unsigned short  ImageYOrigin;
  27         unsigned short  ImageWidth;
  28         unsigned short  ImageHeight;
  29         unsigned char   ImagePixelSize;
  30         unsigned char   ImageDescriptorByte;
  31 } tga_header_t;
  32
  33 typedef struct {
  34         unsigned char r,g,b ;
  35 } rgb_t ;
  36
  37 typedef struct {
  38         unsigned char b,g,r ;
  39 } bgr_t ;
  40
  41 typedef struct {
  42         unsigned char   Cb,y1,Cr,y2;
  43 } yuyv_t ;
  44
  45 typedef struct {
  46         void                            *data,
  47                                         *palette ;
  48         int                             width,
  49                                         height,
  50                                         pixels,
  51                                         bpp,
  52                                         pixel_size,
  53                                         size,
  54                                         palette_size,
  55                                         yuyv;
  56 } image_t ;
  57
  58 void StringUpperCase (char *str)
  59 {
  60     int count = strlen(str);
  61     char c ;
  62
  63     while(count--)
  64     {
  65         c=*str;
  66         if ((c >= 'a')&&(c<='z'))
  67             *str = 'A' + (c-'a');
  68         str++ ;
  69     }
  70 }
  71
  72 void StringLowerCase (char *str)
  73 {
  74     int count = strlen(str);
  75     char c ;
  76
  77     while(count--)
  78     {
  79         c=*str;
  80         if ((c >= 'A')&&(c<='Z'))
  81             *str = 'a' + (c-'A');
  82         str++ ;
  83     }
  84 }
  85 void pixel_rgb_to_yuyv (rgb_t *rgb_pixel, yuyv_t *yuyv_pixel)
  86 {
  87     unsigned int pR, pG, pB ;
  88
  89     /* Transform (0-255) components to (0-100) */
  90     pR = rgb_pixel->r * 100 / 255 ;
  91     pG = rgb_pixel->g * 100 / 255 ;
  92     pB = rgb_pixel->b * 100 / 255 ;
  93
  94     /* Calculate YUV values (0-255) from RGB beetween 0-100 */
  95     yuyv_pixel->y1 = yuyv_pixel->y2     = 209 * (pR + pG + pB) / 300 + 16  ;
  96     yuyv_pixel->Cb                      = pB - (pR/4)   - (pG*3/4)   + 128 ;
  97     yuyv_pixel->Cr                      = pR - (pG*3/4) - (pB/4)     + 128 ;
  98
  99     return ;
 100 }
 101
 102 void printlogo_rgb (rgb_t       *data, int w, int h)
 103 {
 104     int x,y;
 105     for (y=0; y<h; y++)
 106     {
 107         for (x=0; x<w; x++, data++)
 108             if ((data->r < 30)/*&&(data->g == 0)&&(data->b == 0)*/)
 109                 printf(" ");
 110             else
 111                 printf("X");
 112         printf("\n");
 113     }
 114 }
 115
 116 void printlogo_yuyv (unsigned short *data, int w, int h)
 117 {
 118     int x,y;
 119     for (y=0; y<h; y++)
 120     {
 121         for (x=0; x<w; x++, data++)
 122             if (*data == 0x1080)    /* Because of inverted on i386! */
 123                 printf(" ");
 124             else
 125                 printf("X");
 126         printf("\n");
 127     }
 128 }
 129
 130 static inline unsigned short le16_to_cpu (unsigned short val)
 131 {
 132     union {
 133         unsigned char pval[2];
 134         unsigned short val;
 135     } swapped;
 136     swapped.val = val;
 137     return (swapped.pval[1] << 8) + swapped.pval[0];
 138 }
 139
 140 int image_load_tga (image_t *image, char *filename)
 141 {
 142     FILE *file ;
 143     tga_header_t header ;
 144     int i;
 145     unsigned char app ;
 146     rgb_t *p ;
 147
 148     if( ( file = fopen( filename, "rb" ) ) == NULL )
 149         return -1;
 150
 151     fread(&header, sizeof(header), 1, file);
 152
 153     /* byte swap: tga is little endian, host is ??? */
 154     header.ColorMapOrigin = le16_to_cpu (header.ColorMapOrigin);
 155     header.ColorMapLenght = le16_to_cpu (header.ColorMapLenght);
 156     header.ImageXOrigin = le16_to_cpu (header.ImageXOrigin);
 157     header.ImageYOrigin = le16_to_cpu (header.ImageYOrigin);
 158     header.ImageWidth = le16_to_cpu (header.ImageWidth);
 159     header.ImageHeight = le16_to_cpu (header.ImageHeight);
 160
 161     image->width        = header.ImageWidth ;
 162     image->height       = header.ImageHeight ;
 163
 164     switch (header.ImageTypeCode){
 165         case 2: /* Uncompressed RGB */
 166                         image->yuyv = 0 ;
 167                         image->palette_size = 0 ;
 168                         image->palette = NULL ;
 169             break;
 170
 171         default:
 172             printf("Format not supported!\n");
 173             return -1 ;
 174     }
 175
 176     image->bpp                  = header.ImagePixelSize ;
 177     image->pixel_size           = ((image->bpp-1) / 8) + 1 ;
 178     image->pixels               = image->width * image->height;
 179     image->size                 = image->pixels * image->pixel_size ;
 180     image->data                 = malloc(image->size) ;
 181
 182     if (image->bpp != 24)
 183     {
 184         printf("Bpp not supported: %d!\n", image->bpp);
 185         return -1 ;
 186     }
 187
 188     fread(image->data, image->size, 1, file);
 189
 190 /* Swapping R and B values */
 191
 192     p = image->data ;
 193     for(i=0; i < image->pixels; i++, p++)
 194     {
 195         app = p->r ;
 196         p->r = p->b ;
 197         p->b = app ;
 198     }
 199
 200 /* Swapping image */
 201
 202     if(!(header.ImageDescriptorByte & 0x20))
 203     {
 204         unsigned char *temp = malloc(image->size);
 205         int linesize = image->pixel_size * image->width ;
 206         void    *dest = image->data,
 207                 *source = temp + image->size - linesize ;
 208
 209         printf("S");
 210         if (temp == NULL)
 211         {
 212             printf("Cannot alloc temp buffer!\n");
 213             return -1;
 214         }
 215
 216         memcpy(temp, image->data, image->size);
 217         for(i = 0; i<image->height; i++, dest+=linesize, source-=linesize)
 218             memcpy(dest, source, linesize);
 219
 220         free( temp );
 221     }
 222
 223 #ifdef ENABLE_ASCII_BANNERS
 224     printlogo_rgb (image->data,image->width, image->height);
 225 #endif
 226
 227     fclose (file);
 228     return 0;
 229 }
 230
 231 int image_free (image_t *image)
 232 {
 233     if(image->data != NULL)
 234                 free(image->data);
 235
 236     if(image->palette != NULL)
 237                 free(image->palette);
 238
 239         return 0;
 240 }
 241
 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     = malloc(yuyv_image->size)) ;
 257         yuyv_image->palette             = 0 ;
 258         yuyv_image->palette_size= 0 ;
 259
 260         while((count++) < rgb_image->pixels)
 261         {
 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, yuyv_image->height);
 274 #endif
 275         return 0 ;
 276 }
 277
 278 int image_save_header (image_t *image, char *filename, char *varname)
 279 {
 280         FILE    *file = fopen (filename, "w");
 281         char    app[256], str[256]="", def_name[64] ;
 282         int     count = image->size, col=0;
 283         unsigned char *dataptr = image->data ;
 284         if (file==NULL)
 285                 return -1 ;
 286
 287 /*  Author information */
 288         fprintf(file, "/*\n * Generated by EasyLogo, (C) 2000 by Paolo Scaffardi\n *\n");
 289         fprintf(file, " * To use this, include it and call: easylogo_plot(screen,&%s, width,x,y)\n *\n", varname);
 290         fprintf(file, " * Where:\t'screen'\tis the pointer to the frame buffer\n");
 291         fprintf(file, " *\t\t'width'\tis the screen width\n");
 292         fprintf(file, " *\t\t'x'\t\tis the horizontal position\n");
 293         fprintf(file, " *\t\t'y'\t\tis the vertical position\n */\n\n");
 294
 295 /*      Headers */
 296         fprintf(file, "#include <video_easylogo.h>\n\n");
 297 /*      Macros */
 298         strcpy(def_name, varname);
 299         StringUpperCase (def_name);
 300         fprintf(file, "#define  DEF_%s_WIDTH\t\t%d\n", def_name, image->width);
 301         fprintf(file, "#define  DEF_%s_HEIGHT\t\t%d\n", def_name, image->height);
 302         fprintf(file, "#define  DEF_%s_PIXELS\t\t%d\n", def_name, image->pixels);
 303         fprintf(file, "#define  DEF_%s_BPP\t\t%d\n", def_name, image->bpp);
 304         fprintf(file, "#define  DEF_%s_PIXEL_SIZE\t%d\n", def_name, image->pixel_size);
 305         fprintf(file, "#define  DEF_%s_SIZE\t\t%d\n\n", def_name, image->size);
 306 /*  Declaration */
 307         fprintf(file, "unsigned char DEF_%s_DATA[DEF_%s_SIZE] = {\n", def_name, def_name);
 308
 309 /*      Data */
 310         while(count)
 311                 switch (col){
 312                         case 0:
 313                                 sprintf(str, " 0x%02x", *dataptr++);
 314                                 col++;
 315                                 count-- ;
 316                                 break;
 317
 318                         case 16:
 319                                 fprintf(file, "%s", str);
 320                                 if (count > 0)
 321                                     fprintf(file,",");
 322                                 fprintf(file, "\n");
 323
 324                                 col = 0 ;
 325                                 break;
 326
 327                         default:
 328                                 strcpy(app, str);
 329                                 sprintf(str, "%s, 0x%02x", app, *dataptr++);
 330                                 col++ ;
 331                                 count-- ;
 332                                 break;
 333                 }
 334
 335         if (col)
 336                 fprintf(file, "%s\n", str);
 337
 338 /*      End of declaration */
 339         fprintf(file, "};\n\n");
 340 /*      Variable */
 341         fprintf(file, "fastimage_t %s = {\n", varname);
 342         fprintf(file, "         DEF_%s_DATA,\n", def_name);
 343         fprintf(file, "         DEF_%s_WIDTH,\n", def_name);
 344         fprintf(file, "         DEF_%s_HEIGHT,\n", def_name);
 345         fprintf(file, "         DEF_%s_BPP,\n", def_name);
 346         fprintf(file, "         DEF_%s_PIXEL_SIZE,\n", def_name);
 347         fprintf(file, "         DEF_%s_SIZE\n};\n", def_name);
 348
 349         fclose (file);
 350
 351         return 0 ;
 352 }
 353
 354 #define DEF_FILELEN     256
 355
 356 int main (int argc, char *argv[])
 357 {
 358     char
 359         inputfile[DEF_FILELEN],
 360         outputfile[DEF_FILELEN],
 361         varname[DEF_FILELEN];
 362
 363     image_t             rgb_logo, yuyv_logo ;
 364
 365     switch (argc){
 366     case 2:
 367     case 3:
 368     case 4:
 369         strcpy (inputfile,      argv[1]);
 370
 371         if (argc > 2)
 372             strcpy (varname,    argv[2]);
 373         else
 374         {
 375             char *dot = strchr(inputfile, '.');
 376             int pos = dot - inputfile;
 377
 378             if (dot)
 379             {
 380                 strncpy (varname, inputfile, pos);
 381                 varname[pos] = 0 ;
 382             }
 383         }
 384
 385         if (argc > 3)
 386             strcpy (outputfile, argv[3]);
 387         else
 388         {
 389             char *dot = strchr (varname, '.');
 390             int pos = dot - varname;
 391
 392             if (dot)
 393             {
 394                 char app[DEF_FILELEN] ;
 395
 396                 strncpy(app, varname, pos);
 397                 app[pos] = 0;
 398                 sprintf(outputfile, "%s.h", app);
 399             }
 400         }
 401         break;
 402
 403     default:
 404         printf("EasyLogo 1.0 (C) 2000 by Paolo Scaffardi\n\n");
 405
 406         printf("Syntax: easylogo inputfile [outputvar {outputfile}] \n");
 407         printf("\n");
 408         printf("Where:  'inputfile'     is the TGA image to load\n");
 409         printf("        'outputvar'     is the variable name to create\n");
 410         printf("        'outputfile'    is the output header file (default is 'inputfile.h')\n");
 411
 412         return -1 ;
 413     }
 414
 415     printf("Doing '%s' (%s) from '%s'...",
 416         outputfile, varname, inputfile);
 417
 418 /* Import TGA logo */
 419
 420     printf("L");
 421     if (image_load_tga (&rgb_logo, inputfile)<0)
 422     {
 423         printf("input file not found!\n");
 424         exit(1);
 425     }
 426
 427 /* Convert it to YUYV format */
 428
 429     printf("C");
 430     image_rgb_to_yuyv (&rgb_logo, &yuyv_logo) ;
 431
 432 /* Save it into a header format */
 433
 434     printf("S");
 435     image_save_header (&yuyv_logo, outputfile, varname) ;
 436
 437 /* Free original image and copy */
 438
 439     image_free (&rgb_logo);
 440     image_free (&yuyv_logo);
 441
 442     printf("\n");
 443
 444     return 0 ;
 445 }