rev |
line source |
nuclear@0
|
1 /*
|
nuclear@3
|
2 Copyright 2004-2012 John Tsiombikas <nuclear@member.fsf.org>
|
nuclear@0
|
3
|
nuclear@1
|
4 This file is part of gbasys, a library for GameBoy Advance development.
|
nuclear@0
|
5
|
nuclear@0
|
6 This program is free software; you can redistribute it and/or modify
|
nuclear@0
|
7 it under the terms of the GNU General Public License as published by
|
nuclear@0
|
8 the Free Software Foundation; either version 2 of the License, or
|
nuclear@0
|
9 (at your option) any later version.
|
nuclear@0
|
10
|
nuclear@0
|
11 This program is distributed in the hope that it will be useful,
|
nuclear@0
|
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
|
nuclear@0
|
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
nuclear@0
|
14 GNU General Public License for more details.
|
nuclear@0
|
15
|
nuclear@0
|
16 You should have received a copy of the GNU General Public License
|
nuclear@0
|
17 along with this program; if not, write to the Free Software
|
nuclear@0
|
18 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
nuclear@0
|
19 */
|
nuclear@0
|
20
|
nuclear@1
|
21 #include "config.h"
|
nuclear@0
|
22
|
nuclear@0
|
23 #include <stdlib.h>
|
nuclear@3
|
24 #include <string.h>
|
nuclear@0
|
25 #include "gfx.h"
|
nuclear@0
|
26
|
nuclear@0
|
27 #define FRAME_SEL_BIT 0x10
|
nuclear@0
|
28
|
nuclear@0
|
29 #define H_BLANK_OAM 0x20
|
nuclear@0
|
30 #define OBJ_MAP_2D 0x0
|
nuclear@0
|
31 #define OBJ_MAP_1D 0x40
|
nuclear@0
|
32 #define FORCE_BLANK 0x80
|
nuclear@0
|
33 #define BG0_ENABLE 0x100
|
nuclear@0
|
34 #define BG1_ENABLE 0x200
|
nuclear@0
|
35 #define BG2_ENABLE 0x400
|
nuclear@0
|
36 #define BG3_ENABLE 0x800
|
nuclear@0
|
37
|
nuclear@0
|
38 static volatile unsigned short *reg_disp_ctl = (void*)0x4000000;
|
nuclear@0
|
39 static volatile unsigned short *reg_vcount = (void*)0x4000006;
|
nuclear@0
|
40
|
nuclear@6
|
41 static unsigned short *paladdr = (void*)0x5000000;
|
nuclear@6
|
42
|
nuclear@0
|
43 static int xres, yres;
|
nuclear@0
|
44 static int sizeof_pixel;
|
nuclear@0
|
45 static int page_flipping;
|
nuclear@0
|
46 static int allocated_back_buffer;
|
nuclear@0
|
47
|
nuclear@0
|
48 static struct pixel_buffer fbuf, bbuf;
|
nuclear@0
|
49 struct pixel_buffer *front_buffer = &fbuf;
|
nuclear@0
|
50 struct pixel_buffer *back_buffer = &bbuf;
|
nuclear@0
|
51
|
nuclear@0
|
52 #define show_page(n) ((n) ? (*reg_disp_ctl |= FRAME_SEL_BIT) : (*reg_disp_ctl &= ~FRAME_SEL_BIT))
|
nuclear@0
|
53 #define swap_page() (*reg_disp_ctl ^= FRAME_SEL_BIT)
|
nuclear@0
|
54
|
nuclear@0
|
55 int set_video_mode(int mode, int double_buffering) {
|
nuclear@0
|
56 if(mode < 3 || mode > 5) return -1;
|
nuclear@0
|
57
|
nuclear@0
|
58 /* mode 5: 160x128, otherwise: 240x160 */
|
nuclear@0
|
59 xres = (mode == 5) ? 160 : 240;
|
nuclear@0
|
60 yres = (mode == 5) ? 128 : 160;
|
nuclear@0
|
61
|
nuclear@0
|
62 sizeof_pixel = (mode == 4) ? 1 : 2;
|
nuclear@0
|
63
|
nuclear@0
|
64 *reg_disp_ctl = mode | BG2_ENABLE;
|
nuclear@0
|
65
|
nuclear@0
|
66 show_page(0);
|
nuclear@0
|
67
|
nuclear@0
|
68 if(allocated_back_buffer) {
|
nuclear@0
|
69 free(back_buffer->pixels);
|
nuclear@0
|
70 }
|
nuclear@0
|
71
|
nuclear@0
|
72 front_buffer->pixels = (void*)0x6000000;
|
nuclear@0
|
73 front_buffer->x = back_buffer->x = xres;
|
nuclear@0
|
74 front_buffer->y = back_buffer->y = yres;
|
nuclear@0
|
75 front_buffer->bpp = back_buffer->bpp = sizeof_pixel * 8;
|
nuclear@1
|
76
|
nuclear@0
|
77 if(mode > 3) {
|
nuclear@0
|
78 page_flipping = 1;
|
nuclear@0
|
79 back_buffer->pixels = (void*)0x600a000;
|
nuclear@0
|
80 } else {
|
nuclear@0
|
81 page_flipping = 0;
|
nuclear@0
|
82 if(double_buffering) {
|
nuclear@0
|
83 back_buffer->pixels = malloc(xres * yres * sizeof_pixel);
|
nuclear@0
|
84 }
|
nuclear@0
|
85 }
|
nuclear@0
|
86 }
|
nuclear@0
|
87
|
nuclear@0
|
88 void flip(void) {
|
nuclear@0
|
89 static void *tmp;
|
nuclear@1
|
90
|
nuclear@0
|
91 if(page_flipping) {
|
nuclear@0
|
92 swap_page();
|
nuclear@0
|
93 tmp = front_buffer->pixels;
|
nuclear@0
|
94 front_buffer->pixels = back_buffer->pixels;
|
nuclear@0
|
95 back_buffer->pixels = tmp;
|
nuclear@0
|
96 } else {
|
nuclear@0
|
97 /*dma_copy32(3, front_buffer->pixels, back_buffer->pixels, (xres * yres) >> 1);*/
|
nuclear@0
|
98 dma_copy32(3, front_buffer->pixels, back_buffer->pixels, 19200);
|
nuclear@0
|
99 }
|
nuclear@0
|
100 }
|
nuclear@0
|
101
|
nuclear@0
|
102 /* ------- pixel buffer operations ------- */
|
nuclear@0
|
103
|
nuclear@0
|
104 struct pixel_buffer *create_pixel_buffer(int x, int y, int bpp) {
|
nuclear@0
|
105 struct pixel_buffer *pbuf = malloc(sizeof(struct pixel_buffer));
|
nuclear@0
|
106 if(pbuf) {
|
nuclear@0
|
107 pbuf->pixels = malloc(x * y * bpp / 8);
|
nuclear@0
|
108 pbuf->x = x;
|
nuclear@0
|
109 pbuf->y = y;
|
nuclear@0
|
110 pbuf->bpp = bpp;
|
nuclear@0
|
111 }
|
nuclear@0
|
112 return pbuf;
|
nuclear@0
|
113 }
|
nuclear@0
|
114
|
nuclear@0
|
115 void destroy_pixel_buffer(struct pixel_buffer *pbuf) {
|
nuclear@0
|
116 free(pbuf->pixels);
|
nuclear@0
|
117 free(pbuf);
|
nuclear@0
|
118 }
|
nuclear@0
|
119
|
nuclear@0
|
120 void clear_buffer(struct pixel_buffer *pbuf, unsigned short color) {
|
nuclear@0
|
121 int sz = pbuf->x * pbuf->y;
|
nuclear@0
|
122
|
nuclear@0
|
123 if(pbuf->bpp == 8) {
|
nuclear@0
|
124 color |= color << 8;
|
nuclear@0
|
125 sz >>= 1;
|
nuclear@0
|
126 }
|
nuclear@1
|
127
|
nuclear@0
|
128 dma_fill16(3, pbuf->pixels, color, sz);
|
nuclear@0
|
129 }
|
nuclear@0
|
130
|
nuclear@0
|
131 void copy_buffer(const struct pixel_buffer *src, struct pixel_buffer *dst) {
|
nuclear@0
|
132 int words;
|
nuclear@1
|
133
|
nuclear@0
|
134 if(src->x != dst->x || src->y != dst->y || src->bpp != dst->bpp) return;
|
nuclear@0
|
135
|
nuclear@0
|
136 words = (src->x * src->y) >> (src->bpp == 16 ? 1 : 2);
|
nuclear@0
|
137 dma_copy32(3, dst->pixels, src->pixels, words);
|
nuclear@0
|
138 }
|
nuclear@0
|
139
|
nuclear@3
|
140 #define MIN(a, b) ((a) < (b) ? (a) : (b))
|
nuclear@3
|
141
|
nuclear@3
|
142 void blit(struct pixel_buffer *src, int src_x, int src_y, int src_w, int src_h,
|
nuclear@3
|
143 struct pixel_buffer *dst, int dst_x, int dst_y)
|
nuclear@3
|
144 {
|
nuclear@3
|
145 int i, pixsize, width, height, dstride, sstride;
|
nuclear@3
|
146 unsigned char *dptr, *sptr;
|
nuclear@3
|
147
|
nuclear@3
|
148 if(dst->bpp != src->bpp)
|
nuclear@3
|
149 return;
|
nuclear@3
|
150
|
nuclear@3
|
151 if(src_w <= 0)
|
nuclear@3
|
152 src_w = src->x;
|
nuclear@3
|
153 if(src_h <= 0)
|
nuclear@3
|
154 src_h = src->y;
|
nuclear@3
|
155
|
nuclear@3
|
156 width = MIN(src_w, MIN(src->x - src_x, dst->x - dst_x));
|
nuclear@3
|
157 height = MIN(src_h, MIN(src->y - src_y, dst->y - dst_y));
|
nuclear@3
|
158
|
nuclear@3
|
159 if(width <= 0 || height <= 0)
|
nuclear@3
|
160 return;
|
nuclear@3
|
161
|
nuclear@3
|
162 pixsize = dst->bpp / 8;
|
nuclear@3
|
163 dptr = (unsigned char*)dst->pixels + (dst_y * dst->x + dst_x) * pixsize;
|
nuclear@3
|
164 sptr = (unsigned char*)src->pixels + (src_y * src->x + src_x) * pixsize;
|
nuclear@3
|
165
|
nuclear@3
|
166 dstride = dst->x * pixsize;
|
nuclear@3
|
167 sstride = src->x * pixsize;
|
nuclear@3
|
168
|
nuclear@3
|
169 for(i=0; i<height; i++) {
|
nuclear@3
|
170 memcpy(dptr, sptr, width * pixsize);
|
nuclear@3
|
171 sptr += sstride;
|
nuclear@3
|
172 dptr += dstride;
|
nuclear@3
|
173 }
|
nuclear@3
|
174 }
|
nuclear@3
|
175
|
nuclear@6
|
176 void set_palette(int idx, int r, int g, int b)
|
nuclear@6
|
177 {
|
nuclear@6
|
178 paladdr[idx] = RGB(r, g, b);
|
nuclear@6
|
179 }
|
nuclear@0
|
180
|
nuclear@0
|
181 void draw_line(int x1, int y1, int x2, int y2, unsigned short col, struct pixel_buffer *pbuf) {
|
nuclear@0
|
182 int dx, dy, dx2, dy2;
|
nuclear@0
|
183 int x_inc, y_inc;
|
nuclear@0
|
184 int error;
|
nuclear@0
|
185 int i;
|
nuclear@0
|
186 unsigned short *ptr = pbuf->pixels;
|
nuclear@0
|
187
|
nuclear@0
|
188 ptr += y1 * pbuf->x + x1;
|
nuclear@0
|
189 dx = x2 - x1;
|
nuclear@0
|
190 dy = y2 - y1;
|
nuclear@1
|
191
|
nuclear@0
|
192 if(dx >= 0) {
|
nuclear@0
|
193 x_inc = 1;
|
nuclear@0
|
194 } else {
|
nuclear@0
|
195 x_inc = -1;
|
nuclear@0
|
196 dx = -dx;
|
nuclear@0
|
197 }
|
nuclear@1
|
198
|
nuclear@0
|
199 if(dy >= 0) {
|
nuclear@0
|
200 y_inc = pbuf->x;
|
nuclear@0
|
201 } else {
|
nuclear@0
|
202 y_inc = -pbuf->x;
|
nuclear@0
|
203 dy = -dy;
|
nuclear@0
|
204 }
|
nuclear@1
|
205
|
nuclear@0
|
206 dx2 = dx << 1;
|
nuclear@0
|
207 dy2 = dy << 1;
|
nuclear@0
|
208
|
nuclear@0
|
209 if(dx > dy) {
|
nuclear@0
|
210 error = dy2 - dx;
|
nuclear@0
|
211 for(i=0; i<=dx; i++) {
|
nuclear@0
|
212 *ptr = col;
|
nuclear@0
|
213 if(error >= 0) {
|
nuclear@0
|
214 error -= dx2;
|
nuclear@0
|
215 ptr += y_inc;
|
nuclear@0
|
216 }
|
nuclear@0
|
217 error += dy2;
|
nuclear@0
|
218 ptr += x_inc;
|
nuclear@0
|
219 }
|
nuclear@0
|
220 } else {
|
nuclear@0
|
221 error = dx2 - dy;
|
nuclear@0
|
222 for(i=0;i<=dy;i++) {
|
nuclear@0
|
223 *ptr = col;
|
nuclear@0
|
224 if(error >= 0) {
|
nuclear@0
|
225 error -= dy2;
|
nuclear@0
|
226 ptr += x_inc;
|
nuclear@0
|
227 }
|
nuclear@0
|
228 error += dx2;
|
nuclear@0
|
229 ptr += y_inc;
|
nuclear@0
|
230 }
|
nuclear@0
|
231 }
|
nuclear@0
|
232 }
|