X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?p=picodrive.git;a=blobdiff_plain;f=pico%2F32x%2Fdraw.c;h=f80215024af8135a9f228e0defcfaf19ae53a58d;hp=e59fabbfa8a910aab22bf29c81e72c762fee6e93;hb=e0bcb7a90d06b295b1ca989b6ad70412912cca5b;hpb=c987bb5c36d92c1441e4dcfd9bded3e5dc1f1ff6 diff --git a/pico/32x/draw.c b/pico/32x/draw.c index e59fabb..f802150 100644 --- a/pico/32x/draw.c +++ b/pico/32x/draw.c @@ -1,5 +1,16 @@ +/* + * PicoDrive + * (C) notaz, 2009,2010 + * + * This work is licensed under the terms of MAME license. + * See COPYING file in the top-level directory. + */ #include "../pico_int.h" +int (*PicoScan32xBegin)(unsigned int num); +int (*PicoScan32xEnd)(unsigned int num); +int Pico32xDrawMode; + static void convert_pal555(int invert_prio) { unsigned int *ps = (void *)Pico32xMem->pal; @@ -22,49 +33,81 @@ static void convert_pal555(int invert_prio) Pico32x.dirty_pal = 0; } -void FinalizeLine32xRGB555(int sh, int line) -{ - unsigned short *pd = DrawLineDest; - unsigned short *pal = Pico32xMem->pal_native; - unsigned char *pb = HighCol + 8; - unsigned short *dram, *ps, cram0; - int i; +// direct color mode +#define do_line_dc(pd, p32x, pmd, inv, pmd_draw_code) \ +{ \ + const unsigned int m1 = 0x001f; \ + const unsigned int m2 = 0x03e0; \ + const unsigned int m3 = 0x7c00; \ + int i; \ + \ + for (i = 320; i > 0; i--, pd++, p32x++, pmd++) { \ + unsigned short t = *p32x; \ + if ((*pmd & 0x3f) != mdbg && !((t ^ inv) & 0x8000)) { \ + pmd_draw_code; \ + continue; \ + } \ + \ + *pd = ((t & m1) << 11) | ((t & m2) << 1) | ((t & m3) >> 10); \ + } \ +} - // this is a bit hackish: - // we swap cram color 0 with color that is used for background, - // as bg is forced to 0 when we do 32X - cram0 = Pico.cram[0]; - Pico.cram[0] = Pico.cram[Pico.video.reg[7] & 0x3f]; +// packed pixel mode +#define do_line_pp(pd, p32x, pmd, pmd_draw_code) \ +{ \ + unsigned short t; \ + int i; \ + for (i = 320; i > 0; i--, pd++, p32x++, pmd++) { \ + t = pal[*(unsigned char *)((long)p32x ^ 1)]; \ + if ((t & 0x20) || (*pmd & 0x3f) == mdbg) \ + *pd = t; \ + else \ + pmd_draw_code; \ + } \ +} - FinalizeLineRGB555(sh, line); - Pico.cram[0] = cram0; +// run length mode +#define do_line_rl(pd, p32x, pmd, pmd_draw_code) \ +{ \ + unsigned short len, t; \ + int i; \ + for (i = 320; i > 0; p32x++) { \ + t = pal[*p32x & 0xff]; \ + for (len = (*p32x >> 8) + 1; len > 0 && i > 0; len--, i--, pd++, pmd++) { \ + if ((*pmd & 0x3f) == mdbg || (t & 0x20)) \ + *pd = t; \ + else \ + pmd_draw_code; \ + } \ + } \ +} - if ((Pico32x.vdp_regs[0] & P32XV_Mx) == 0) - return; // blanking +// this is almost never used (Wiz and menu bg gen only) +void FinalizeLine32xRGB555(int sh, int line, struct PicoEState *est) +{ + unsigned short *pd = est->DrawLineDest; + unsigned short *pal = Pico32xMem->pal_native; + unsigned char *pmd = est->HighCol + 8; + unsigned short *dram, *p32x; + unsigned char mdbg; - // XXX: how is 32col mode hadled by real hardware? - if (!(Pico.video.reg[12] & 1)) - return; + FinalizeLine555(sh, line, est); - if (!(PicoDrawMask & PDRAW_32X_ON)) + if ((Pico32x.vdp_regs[0] & P32XV_Mx) == 0 || // 32x blanking + // XXX: how is 32col mode hadled by real hardware? + !(Pico.video.reg[12] & 1) || // 32col mode + (Pico.video.debug_p & PVD_KILL_32X)) + { return; + } dram = (void *)Pico32xMem->dram[Pico32x.vdp_regs[0x0a/2] & P32XV_FS]; - ps = dram + dram[line]; + p32x = dram + dram[line]; + mdbg = Pico.video.reg[7] & 0x3f; if ((Pico32x.vdp_regs[0] & P32XV_Mx) == 2) { // Direct Color Mode - int inv = (Pico32x.vdp_regs[0] & P32XV_PRI) ? 0x8000 : 0; - unsigned int m1 = 0x001f001f; - unsigned int m2 = 0x03e003e0; - unsigned int m3 = 0xfc00fc00; - - for (i = 320; i > 0; i--, ps++, pd++, pb++) { - unsigned short t = *ps; - if (*pb != 0 && !((t ^ inv) & 0x8000)) - continue; - - *pd = ((t & m1) << 11) | ((t & m2) << 1) | ((t & m3) >> 10); - } + int inv_bit = (Pico32x.vdp_regs[0] & P32XV_PRI) ? 0x8000 : 0; + do_line_dc(pd, p32x, pmd, inv_bit,); return; } @@ -72,24 +115,215 @@ void FinalizeLine32xRGB555(int sh, int line) convert_pal555(Pico32x.vdp_regs[0] & P32XV_PRI); if ((Pico32x.vdp_regs[0] & P32XV_Mx) == 1) { // Packed Pixel Mode - unsigned short t; - for (i = 320/2; i > 0; i--, ps++, pd += 2, pb += 2) { - t = pal[*ps >> 8]; - if (pb[0] == 0 || (t & 0x20)) - pd[0] = t; - t = pal[*ps & 0xff]; - if (pb[1] == 0 || (t & 0x20)) - pd[1] = t; - } + unsigned char *p32xb = (void *)p32x; + if (Pico32x.vdp_regs[2 / 2] & P32XV_SFT) + p32xb++; + do_line_pp(pd, p32xb, pmd,); } else { // Run Length Mode - unsigned short len, t; - for (i = 320; i > 0; ps++) { - t = pal[*ps & 0xff]; - for (len = (*ps >> 8) + 1; len > 0 && i > 0; len--, i--, pd++, pb++) - if (*pb == 0 || (t & 0x20)) - *pd = t; + do_line_rl(pd, p32x, pmd,); + } +} + +#define MD_LAYER_CODE \ + *dst = palmd[*pmd] + +#define PICOSCAN_PRE \ + PicoScan32xBegin(l + (lines_sft_offs & 0xff)); \ + dst = Pico.est.DrawLineDest; \ + +#define PICOSCAN_POST \ + PicoScan32xEnd(l + (lines_sft_offs & 0xff)); \ + +#define make_do_loop(name, pre_code, post_code, md_code) \ +/* Direct Color Mode */ \ +static void do_loop_dc##name(unsigned short *dst, \ + unsigned short *dram, int lines_sft_offs, int mdbg) \ +{ \ + int inv_bit = (Pico32x.vdp_regs[0] & P32XV_PRI) ? 0x8000 : 0; \ + unsigned char *pmd = Pico.est.Draw2FB + \ + 328 * (lines_sft_offs & 0xff) + 8; \ + unsigned short *palmd = Pico.est.HighPal; \ + unsigned short *p32x; \ + int lines = lines_sft_offs >> 16; \ + int l; \ + (void)palmd; \ + for (l = 0; l < lines; l++, pmd += 8) { \ + pre_code; \ + p32x = dram + dram[l]; \ + do_line_dc(dst, p32x, pmd, inv_bit, md_code); \ + post_code; \ + } \ +} \ + \ +/* Packed Pixel Mode */ \ +static void do_loop_pp##name(unsigned short *dst, \ + unsigned short *dram, int lines_sft_offs, int mdbg) \ +{ \ + unsigned short *pal = Pico32xMem->pal_native; \ + unsigned char *pmd = Pico.est.Draw2FB + \ + 328 * (lines_sft_offs & 0xff) + 8; \ + unsigned short *palmd = Pico.est.HighPal; \ + unsigned char *p32x; \ + int lines = lines_sft_offs >> 16; \ + int l; \ + (void)palmd; \ + for (l = 0; l < lines; l++, pmd += 8) { \ + pre_code; \ + p32x = (void *)(dram + dram[l]); \ + p32x += (lines_sft_offs >> 8) & 1; \ + do_line_pp(dst, p32x, pmd, md_code); \ + post_code; \ + } \ +} \ + \ +/* Run Length Mode */ \ +static void do_loop_rl##name(unsigned short *dst, \ + unsigned short *dram, int lines_sft_offs, int mdbg) \ +{ \ + unsigned short *pal = Pico32xMem->pal_native; \ + unsigned char *pmd = Pico.est.Draw2FB + \ + 328 * (lines_sft_offs & 0xff) + 8; \ + unsigned short *palmd = Pico.est.HighPal; \ + unsigned short *p32x; \ + int lines = lines_sft_offs >> 16; \ + int l; \ + (void)palmd; \ + for (l = 0; l < lines; l++, pmd += 8) { \ + pre_code; \ + p32x = dram + dram[l]; \ + do_line_rl(dst, p32x, pmd, md_code); \ + post_code; \ + } \ +} + +#ifdef _ASM_32X_DRAW +#undef make_do_loop +#define make_do_loop(name, pre_code, post_code, md_code) \ +extern void do_loop_dc##name(unsigned short *dst, \ + unsigned short *dram, int lines_offs, int mdbg); \ +extern void do_loop_pp##name(unsigned short *dst, \ + unsigned short *dram, int lines_offs, int mdbg); \ +extern void do_loop_rl##name(unsigned short *dst, \ + unsigned short *dram, int lines_offs, int mdbg); +#endif + +make_do_loop(,,,) +make_do_loop(_md, , , MD_LAYER_CODE) +make_do_loop(_scan, PICOSCAN_PRE, PICOSCAN_POST, ) +make_do_loop(_scan_md, PICOSCAN_PRE, PICOSCAN_POST, MD_LAYER_CODE) + +typedef void (*do_loop_func)(unsigned short *dst, unsigned short *dram, int lines, int mdbg); +enum { DO_LOOP, DO_LOOP_MD, DO_LOOP_SCAN, DO_LOOP_MD_SCAN }; + +static const do_loop_func do_loop_dc_f[] = { do_loop_dc, do_loop_dc_md, do_loop_dc_scan, do_loop_dc_scan_md }; +static const do_loop_func do_loop_pp_f[] = { do_loop_pp, do_loop_pp_md, do_loop_pp_scan, do_loop_pp_scan_md }; +static const do_loop_func do_loop_rl_f[] = { do_loop_rl, do_loop_rl_md, do_loop_rl_scan, do_loop_rl_scan_md }; + +void PicoDraw32xLayer(int offs, int lines, int md_bg) +{ + int have_scan = PicoScan32xBegin != NULL && PicoScan32xEnd != NULL; + const do_loop_func *do_loop; + unsigned short *dram; + int lines_sft_offs; + int which_func; + + Pico.est.DrawLineDest = (char *)DrawLineDestBase + offs * DrawLineDestIncrement; + dram = Pico32xMem->dram[Pico32x.vdp_regs[0x0a/2] & P32XV_FS]; + + if (Pico32xDrawMode == PDM32X_BOTH) { + if (Pico.m.dirtyPal) + PicoDrawUpdateHighPal(); + } + + if ((Pico32x.vdp_regs[0] & P32XV_Mx) == 2) + { + // Direct Color Mode + do_loop = do_loop_dc_f; + goto do_it; + } + + if (Pico32x.dirty_pal) + convert_pal555(Pico32x.vdp_regs[0] & P32XV_PRI); + + if ((Pico32x.vdp_regs[0] & P32XV_Mx) == 1) + { + // Packed Pixel Mode + do_loop = do_loop_pp_f; + } + else + { + // Run Length Mode + do_loop = do_loop_rl_f; + } + +do_it: + if (Pico32xDrawMode == PDM32X_BOTH) + which_func = have_scan ? DO_LOOP_MD_SCAN : DO_LOOP_MD; + else + which_func = have_scan ? DO_LOOP_SCAN : DO_LOOP; + lines_sft_offs = (lines << 16) | offs; + if (Pico32x.vdp_regs[2 / 2] & P32XV_SFT) + lines_sft_offs |= 1 << 8; + + do_loop[which_func](Pico.est.DrawLineDest, dram, lines_sft_offs, md_bg); +} + +// mostly unused, games tend to keep 32X layer on +void PicoDraw32xLayerMdOnly(int offs, int lines) +{ + int have_scan = PicoScan32xBegin != NULL && PicoScan32xEnd != NULL; + unsigned short *dst = (void *)((char *)DrawLineDestBase + offs * DrawLineDestIncrement); + unsigned char *pmd = Pico.est.Draw2FB + 328 * offs + 8; + unsigned short *pal = Pico.est.HighPal; + int poffs = 0, plen = 320; + int l, p; + + if (!(Pico.video.reg[12] & 1)) { + // 32col mode + poffs = 32; + plen = 256; + } + + if (Pico.m.dirtyPal) + PicoDrawUpdateHighPal(); + + dst += poffs; + for (l = 0; l < lines; l++) { + if (have_scan) { + PicoScan32xBegin(l + offs); + dst = Pico.est.DrawLineDest + poffs; + } + for (p = 0; p < plen; p += 4) { + dst[p + 0] = pal[*pmd++]; + dst[p + 1] = pal[*pmd++]; + dst[p + 2] = pal[*pmd++]; + dst[p + 3] = pal[*pmd++]; } + dst = (void *)((char *)dst + DrawLineDestIncrement); + pmd += 328 - plen; + if (have_scan) + PicoScan32xEnd(l + offs); } } +void PicoDrawSetOutFormat32x(pdso_t which, int use_32x_line_mode) +{ +#ifdef _ASM_32X_DRAW + extern void *Pico32xNativePal; + Pico32xNativePal = Pico32xMem->pal_native; +#endif + + if (which == PDF_RGB555 && use_32x_line_mode) { + // we'll draw via FinalizeLine32xRGB555 (rare) + PicoDrawSetInternalBuf(NULL, 0); + Pico32xDrawMode = PDM32X_OFF; + return; + } + + // use the same layout as alt renderer + PicoDrawSetInternalBuf(Pico.est.Draw2FB, 328); + Pico32xDrawMode = (which == PDF_RGB555) ? PDM32X_32X_ONLY : PDM32X_BOTH; +} + +// vim:shiftwidth=2:ts=2:expandtab