From 33dfea1c74749124379ef8052f0689577ebe68ff Mon Sep 17 00:00:00 2001
From: Ian C <ianc@noddybox.co.uk>
Date: Tue, 23 Dec 2003 23:33:02 +0000
Subject: This commit was generated by cvs2svn to compensate for changes in r2,
 which included commits to RCS files with non-trunk default branches.

---
 src/gfx.c | 395 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 395 insertions(+)
 create mode 100644 src/gfx.c

(limited to 'src/gfx.c')

diff --git a/src/gfx.c b/src/gfx.c
new file mode 100644
index 0000000..a77c496
--- /dev/null
+++ b/src/gfx.c
@@ -0,0 +1,395 @@
+/*
+
+    espec - Sinclair Spectrum emulator
+
+    Copyright (C) 2003  Ian Cowburn (ianc@noddybox.demon.co.uk)
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+    -------------------------------------------------------------------------
+
+    Wrapper to SDL
+
+*/
+static const char ident[]="$Id$";
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <stdarg.h>
+
+#include "gfx.h"
+#include "exit.h"
+#include "config.h"
+
+#include "font.h"
+
+static const char ident_h[]=ESPEC_GFX_H;
+static const char ident_fh[]=ESPEC_FONT_H;
+
+
+/* ---------------------------------------- MACROS
+*/
+#ifndef TRUE
+#define TRUE 1
+#endif
+
+#ifndef FALSE
+#define FALSE 0
+#endif
+
+#define SCR_W	320
+#define SCR_H	200
+
+#define LOCK	do							\
+		{							\
+		    if (SDL_MUSTLOCK(surface))				\
+		    	if (SDL_LockSurface(surface)<0)			\
+			    Exit("Failed to lock surface: %s\n",	\
+			    		SDL_GetError());		\
+		} while(0)
+
+#define UNLOCK	do							\
+		{							\
+		    if (SDL_MUSTLOCK(surface))				\
+		    	SDL_UnlockSurface(surface);			\
+		} while(0)
+
+
+/* ---------------------------------------- STATICS
+*/
+static SDL_Surface	*surface;
+static Uint32		ticks;
+static Uint32		frame;
+static int		scale;
+
+static void		(*putpixel)(int x, int y, Uint32 col);
+
+
+/* ---------------------------------------- PRIVATE FUNCTIONS
+*/
+
+/* Taken from SDL documentation
+*/
+static void normal_putpixel(int x, int y, Uint32 pixel)
+{
+    int bpp;
+    Uint8 *p;
+
+    bpp=surface->format->BytesPerPixel;
+    p=(Uint8 *)surface->pixels+y*surface->pitch+x*bpp;
+
+    switch(bpp)
+    {
+	case 1:
+	    *p=pixel;
+	    break;
+
+	case 2:
+	    *(Uint16 *)p=pixel;
+	    break;
+
+	case 3:
+	    if(SDL_BYTEORDER==SDL_BIG_ENDIAN)
+	    {
+		p[0]=(pixel>>16)&0xff;
+		p[1]=(pixel>>8)&0xff;
+		p[2]=pixel&0xff;
+	    } else
+	    {
+		p[0]=pixel&0xff;
+		p[1]=(pixel>>8)&0xff;
+		p[2]=(pixel>>16)&0xff;
+	    }
+	    break;
+
+	case 4:
+	    *(Uint32 *)p=pixel;
+	    break;
+    }
+}
+
+
+static void scale_putpixel(int x, int y, Uint32 pixel)
+{
+    int sx,sy;
+
+    x*=scale;
+    y*=scale;
+
+    for(sx=0;sx<scale;sx++)
+	for(sy=0;sy<scale;sy++)
+	    normal_putpixel(x+sx,y+sy,pixel);
+}
+
+
+static void DoHLine(int x1, int x2, int y, Uint32 col)
+{
+    for(;x1<=x2;x1++)
+    	putpixel(x1,y,col);
+}
+
+
+static void DoVLine(int x, int y1, int y2, Uint32 col)
+{
+    for(;y1<=y2;y1++)
+    	putpixel(x,y1,col);
+}
+
+
+/* ---------------------------------------- EXPORTED INTERFACES
+*/
+void GFXInit(void)
+{
+    if (IConfig(CONF_FULLSCREEN))
+	scale=1;
+    else
+	scale=IConfig(CONF_SCALE);
+
+    if (scale<0)
+    	scale=1;
+
+    if (scale>1)
+    	putpixel=scale_putpixel;
+    else
+    	putpixel=normal_putpixel;
+
+    frame=1000/IConfig(CONF_FRAMES_PER_SEC);
+
+    if (SDL_Init(SDL_INIT_TIMER|SDL_INIT_VIDEO))
+	Exit("Failed to init SDL: %s\n",SDL_GetError());
+
+    if (!(surface=SDL_SetVideoMode(SCR_W*scale,
+				   SCR_H*scale,
+				   0,
+				   IConfig(CONF_FULLSCREEN) ?
+				   		SDL_FULLSCREEN : 0)))
+    {
+	Exit("Failed to open video: %s\n",SDL_GetError());
+    }
+
+    SDL_ShowCursor(SDL_DISABLE);
+    SDL_WM_SetCaption("eSPEC","eSPEC");
+}
+
+
+SDL_Surface *GFXGetSurface(void)
+{
+    return surface;
+}
+
+
+Uint32 GFXRGB(Uint8 r, Uint8 g, Uint8 b)
+{
+    return SDL_MapRGB(surface->format,r,g,b);
+}
+
+
+void GFXClear(Uint32 col)
+{
+    SDL_FillRect(surface,NULL,col);
+}
+
+
+void GFXStartFrame(void)
+{
+    ticks=SDL_GetTicks();
+}
+
+
+void GFXEndFrame(int delay)
+{
+    SDL_UpdateRect(surface,0,0,0,0);
+
+    if (delay)
+    {
+	Uint32 diff;
+
+	diff=SDL_GetTicks()-ticks;
+
+	if (diff<frame)
+	    SDL_Delay(frame-diff);
+    }
+}
+
+
+void GFXKeyRepeat(int repeat)
+{
+    if (repeat)
+    	SDL_EnableKeyRepeat(SDL_DEFAULT_REPEAT_DELAY,
+			    SDL_DEFAULT_REPEAT_INTERVAL);
+    else
+    	SDL_EnableKeyRepeat(0,0);
+}
+
+
+SDL_Event *GFXGetKey(void)
+{
+    static SDL_Event e;
+
+    while(SDL_PollEvent(&e))
+    {
+    	if (e.type==SDL_KEYUP || e.type==SDL_KEYDOWN)
+	    return &e;
+    }
+
+    return NULL;
+}
+
+
+SDL_Event *GFXWaitKey(void)
+{
+    static SDL_Event e;
+
+    do
+    {
+    	SDL_WaitEvent(&e);
+    } while (e.type!=SDL_KEYDOWN);
+
+    return &e;
+}
+
+
+void GFXPlot(int x, int y, Uint32 col)
+{
+    LOCK;
+
+    putpixel(x,y,col);
+
+    UNLOCK;
+}
+
+
+void GFXRect(int x, int y, int w, int h, Uint32 col, int solid)
+{
+    LOCK;
+
+    if (solid)
+    {
+	SDL_Rect r;
+
+	r.x=x*scale;
+	r.y=y*scale;
+	r.w=w*scale;
+	r.h=h*scale;
+
+	SDL_FillRect(surface,&r,col);
+    }
+    else
+    {
+	DoHLine(x,x+w-1,y,col);
+	DoHLine(x,x+w-1,y+h-1,col);
+	DoVLine(x,y,y+h-1,col);
+	DoVLine(x+w-1,y,y+h-1,col);
+    }
+
+    UNLOCK;
+}
+
+
+void GFXHLine(int x1, int x2, int y, Uint32 col)
+{
+    LOCK;
+    DoHLine(x1,x2,y,col);
+    UNLOCK;
+}
+
+
+void GFXVLine(int x, int y1, int y2, Uint32 col)
+{
+    LOCK;
+    DoVLine(x,y1,y2,col);
+    UNLOCK;
+}
+
+
+void GFXPrint(int x, int y, Uint32 col, const char *format, ...)
+{
+    char buff[257];
+    va_list va;
+    char *p;
+    int sx,sy;
+
+    va_start(va,format);
+    vsprintf(buff,format,va);
+    va_end(va);
+
+    p=buff;
+
+    LOCK;
+
+    while(*p)
+    {
+	for(sy=0;sy<8;sy++)
+	{
+	    if (y+sy<SCR_H && x<SCR_W)
+	    {
+		for(sx=0;sx<8;sx++)
+		{
+		    if (font[(int)*p][sx+sy*8] && x+sx<SCR_W)
+			putpixel(x+sx,y+sy,col);
+		}
+	    }
+	}
+
+	p++;
+	x+=8;
+    }
+
+    UNLOCK;
+}
+
+
+void GFXPrintPaper(int x, int y, Uint32 col, Uint32 paper,
+		   const char *format, ...)
+{
+    char buff[257];
+    va_list va;
+    char *p;
+    int sx,sy;
+
+    va_start(va,format);
+    vsprintf(buff,format,va);
+    va_end(va);
+
+    p=buff;
+
+    LOCK;
+
+    while(*p)
+    {
+	for(sy=0;sy<8;sy++)
+	{
+	    if (y+sy<SCR_H && x<SCR_W)
+	    {
+		for(sx=0;sx<8;sx++)
+		{
+		    if (font[(int)*p][sx+sy*8] && x+sx<SCR_W)
+			putpixel(x+sx,y+sy,col);
+		    else
+			putpixel(x+sx,y+sy,paper);
+		}
+	    }
+	}
+
+	p++;
+	x+=8;
+    }
+
+    UNLOCK;
+}
+
+
+/* END OF FILE */
-- 
cgit v1.2.3