gbasys

annotate src/gfx.c @ 6:f77381b12726

find changesets by author, revision, files, or words in the commit message
palette
author John Tsiombikas <nuclear@member.fsf.org>
date Tue, 04 Sep 2012 05:05:50 +0300
parents 06726f0b8cd3
children 72c6429ae953 047c61960005
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 }