1 | /*****************************************************************************/ |
2 | /* */ |
3 | /* geosicon.c */ |
4 | /* */ |
5 | /* GEOS icon 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 "geosicon.h" |
44 | |
45 | |
46 | |
47 | /*****************************************************************************/ |
48 | /* Data */ |
49 | /*****************************************************************************/ |
50 | |
51 | |
52 | |
53 | /* Screen size of geos icon */ |
54 | #define WIDTH 24U |
55 | #define HEIGHT 21U |
56 | |
57 | |
58 | |
59 | /*****************************************************************************/ |
60 | /* Code */ |
61 | /*****************************************************************************/ |
62 | |
63 | |
64 | |
65 | StrBuf* GenGeosIcon (const Bitmap* B, const Collection* A attribute ((unused))) |
66 | /* Generate binary output in GEOS icon format for the bitmap B. The output |
67 | ** is stored in a string buffer (which is actually a dynamic char array) and |
68 | ** returned. |
69 | */ |
70 | { |
71 | StrBuf* D; |
72 | unsigned X, Y; |
73 | |
74 | |
75 | /* Output the image properties */ |
76 | Print (stdout, 1, "Image is %ux%u with %u colors%s\n" , |
77 | GetBitmapWidth (B), GetBitmapHeight (B), GetBitmapColors (B), |
78 | BitmapIsIndexed (B)? " (indexed)" : "" ); |
79 | |
80 | /* Check the bitmap properties */ |
81 | if (!BitmapIsIndexed (B) || |
82 | GetBitmapHeight (B) != HEIGHT || |
83 | GetBitmapWidth (B) != WIDTH || |
84 | GetBitmapColors (B) > 2) { |
85 | Error ("Invalid bitmap properties for conversion to GEOS icon" ); |
86 | } |
87 | |
88 | /* Create the output buffer and resize it to the required size. */ |
89 | D = NewStrBuf (); |
90 | SB_Realloc (D, 63); |
91 | |
92 | /* Convert the image */ |
93 | for (Y = 0; Y < HEIGHT; ++Y) { |
94 | unsigned char V = 0; |
95 | for (X = 0; X < WIDTH; ++X) { |
96 | |
97 | /* Fetch next bit into byte buffer */ |
98 | V = (V << 1) | (GetPixel (B, X, Y).Index & 0x01); |
99 | |
100 | /* Store full bytes into the output buffer */ |
101 | if ((X & 0x07) == 0x07) { |
102 | SB_AppendChar (D, V); |
103 | V = 0; |
104 | } |
105 | } |
106 | } |
107 | |
108 | /* Return the converted bitmap */ |
109 | return D; |
110 | } |
111 | |