git.sur5r.net Git - cc65/blob - src/sp65/lynxsprite.c

   1 /*****************************************************************************/
   2 /*                                                                           */
   3 /*                               lynxsprite.c                                */
   4 /*                                                                           */
   5 /*    Lynx sprite format backend for the sp65 sprite and bitmap utility      */
   6 /*                                                                           */
   7 /*                                                                           */
   8 /*                                                                           */
   9 /* (C) 2012,      Ullrich von Bassewitz                                      */
  10 /*                Roemerstrasse 52                                           */
  11 /*                D-70794 Filderstadt                                        */
  12 /* EMail:         uz@cc65.org                                                */
  13 /*                                                                           */
  14 /*                                                                           */
  15 /* This software is provided 'as-is', without any expressed or implied       */
  16 /* warranty.  In no event will the authors be held liable for any damages    */
  17 /* arising from the use of this software.                                    */
  18 /*                                                                           */
  19 /* Permission is granted to anyone to use this software for any purpose,     */
  20 /* including commercial applications, and to alter it and redistribute it    */
  21 /* freely, subject to the following restrictions:                            */
  22 /*                                                                           */
  23 /* 1. The origin of this software must not be misrepresented; you must not   */
  24 /*    claim that you wrote the original software. If you use this software   */
  25 /*    in a product, an acknowledgment in the product documentation would be  */
  26 /*    appreciated but is not required.                                       */
  27 /* 2. Altered source versions must be plainly marked as such, and must not   */
  28 /*    be misrepresented as being the original software.                      */
  29 /* 3. This notice may not be removed or altered from any source              */
  30 /*    distribution.                                                          */
  31 /*                                                                           */
  32 /*****************************************************************************/
  33
  34
  35
  36 /* common */
  37 #include "attrib.h"
  38 #include "print.h"
  39
  40 /* sp65 */
  41 #include "attr.h"
  42 #include "error.h"
  43 #include "lynxsprite.h"
  44
  45
  46
  47 /*****************************************************************************/
  48 /*                                   Data                                    */
  49 /*****************************************************************************/
  50
  51
  52
  53 /* Sprite mode */
  54 enum Mode {
  55     smAuto,
  56     smLiteral,
  57     smPacked
  58 };
  59
  60 /* Screen size of a koala picture */
  61 #define WIDTH_HR        24U
  62 #define WIDTH_MC        12U
  63 #define HEIGHT          21U
  64
  65
  66
  67 /*****************************************************************************/
  68 /*                                   Code                                    */
  69 /*****************************************************************************/
  70
  71
  72
  73 static enum Mode GetMode (const Collection* A)
  74 /* Return the sprite mode from the attribute collection A */
  75 {
  76     /* Check for a mode attribute */
  77     const char* Mode = GetAttrVal (A, "mode");
  78     if (Mode) {
  79         if (strcmp (Mode, "literal") == 0) {
  80             return smLiteral;
  81         } else if (strcmp (Mode, "packed") == 0) {
  82             return smPacked;
  83         } else {
  84             Error ("Invalid value for attribute `mode'");
  85         }
  86     } else {
  87         return smAuto;
  88     }
  89 }
  90
  91
  92
  93 StrBuf* GenLynxSprite (const Bitmap* B, const Collection* A)
  94 /* Generate binary output in Lynx sprite format for the bitmap B. The output
  95  * is stored in a string buffer (which is actually a dynamic char array) and
  96  * returned.
  97  */
  98 {
  99     enum Mode M;
 100     StrBuf* D;
 101     unsigned X, Y;
 102
 103
 104     /* Output the image properties */
 105     Print (stdout, 1, "Image is %ux%u with %u colors%s\n",
 106            GetBitmapWidth (B), GetBitmapHeight (B), GetBitmapColors (B),
 107            BitmapIsIndexed (B)? " (indexed)" : "");
 108
 109     /* Get the sprite mode */
 110     M = GetMode (A);
 111
 112     /* Check the height of the bitmap */
 113     if (GetBitmapHeight (B) != HEIGHT) {
 114         Error ("Invalid bitmap height (%u) for conversion to vic2 sprite",
 115                GetBitmapHeight (B));
 116     }
 117
 118     /* If the mode wasn't given, fallback to packed */
 119     if (M == smAuto) {
 120         M = smPacked;
 121     }
 122
 123     /* Now check if bitmap indexes are ok */
 124     if (GetBitmapColors (B) > 16) {
 125         Error ("Too many colors for a Lynx sprite");
 126     }
 127
 128     /* Create the output buffer and resize it to the required size. */
 129     D = NewStrBuf ();
 130     SB_Realloc (D, 63);
 131
 132     /* Convert the image */
 133     for (Y = 0; Y < HEIGHT; ++Y) {
 134         unsigned char V = 0;
 135         if (M == smLiteral) {
 136             for (X = 0; X < WIDTH_HR; ++X) {
 137
 138                 /* Fetch next bit into byte buffer */
 139                 V = (V << 1) | (GetPixel (B, X, Y).Index & 0x01);
 140
 141                 /* Store full bytes into the output buffer */
 142                 if ((X & 0x07) == 0x07) {
 143                     SB_AppendChar (D, V);
 144                     V = 0;
 145                 }
 146             }
 147         } else {
 148             for (X = 0; X < WIDTH_MC; ++X) {
 149
 150                 /* Fetch next bit into byte buffer */
 151                 V = (V << 2) | (GetPixel (B, X, Y).Index & 0x03);
 152
 153                 /* Store full bytes into the output buffer */
 154                 if ((X & 0x03) == 0x03) {
 155                     SB_AppendChar (D, V);
 156                     V = 0;
 157                 }
 158             }
 159         }
 160     }
 161
 162     /* Return the converted bitmap */
 163     return D;
 164 }
 165
 166
 167