diff options
Diffstat (limited to 'smelt/w32/sys_w32.cpp')
| -rw-r--r-- | smelt/w32/sys_w32.cpp | 355 |
1 files changed, 355 insertions, 0 deletions
diff --git a/smelt/w32/sys_w32.cpp b/smelt/w32/sys_w32.cpp new file mode 100644 index 0000000..716a039 --- /dev/null +++ b/smelt/w32/sys_w32.cpp @@ -0,0 +1,355 @@ +// -*- C++ -*- +/* + * Simple MultimEdia LiTerator(SMELT) + * by Chris Xiong 2015 + * SMELT system implementation + * + * WARNING: This library is in development and interfaces would be very + * unstable. + * + */ +#include "smelt_internal.hpp" +static const char* SYS_SDL_SRCFN="smelt/sdl/sys_w32.cpp"; +int refcnt=0; +SMELT_IMPL *pSM=0; + +SMELT* smGetInterface(int apilevel) +{ + if(apilevel==SMELT_APILEVEL) + return(SMELT*)SMELT_IMPL::getInterface(); + else return 0; +} + +SMELT_IMPL* SMELT_IMPL::getInterface() +{ + if(!pSM)pSM=new SMELT_IMPL(); + ++refcnt;return pSM; +} + +void SMELT_IMPL::smRelease() +{ + --refcnt; + if(!refcnt) + { + if(pSM->hwnd)pSM->smFinale(); + delete pSM;pSM=0; + } +} + +bool SMELT_IMPL::smInit() +{ + smLog("%s:" SLINE ": Initalizing SMELT...\n",SYS_SDL_SRCFN); + smLog("%s:" SLINE ": SMELT api version %d\n",SYS_SDL_SRCFN,SMELT_APILEVEL); + time_t t=time(NULL); + smLog("%s:" SLINE ": Date %s",SYS_SDL_SRCFN,asctime(localtime(&t))); +#ifdef WIN32 + OSVERSIONINFO os_ver; MEMORYSTATUS mem_st; + os_ver.dwOSVersionInfoSize=sizeof(os_ver); + GetVersionEx(&os_ver); + smLog("%s:" SLINE ": OS: Windows %ld.%ld.%ld\n", SYS_SDL_SRCFN,os_ver.dwMajorVersion,os_ver.dwMinorVersion,os_ver.dwBuildNumber); + + int CPUInfo[4]={-1}; + __cpuid(CPUInfo,0x80000000); + unsigned int nExIds=CPUInfo[0]; + char *cpuName,*loced;cpuName=calloc(0x40,sizeof(char));loced=cpuName; + for(unsigned int i=0x80000000;i<=nExIds;++i) + { + __cpuid(CPUInfo, i); + if(i==0x80000002) + memcpy(cpuName,CPUInfo,sizeof(CPUInfo)); + else if(i==0x80000003) + memcpy(cpuName+16,CPUInfo,sizeof(CPUInfo)); + else if(i==0x80000004) + memcpy(cpuName+32, CPUInfo, sizeof(CPUInfo)); + } + while(*cpuName=' ')++cpuName; + smLog("%s:" SLINE ": CPU: %s\n", SYS_SDL_SRCFN,cpuName); + free(loced); + + GlobalMemoryStatus(&mem_st); + smLog("%s:" SLINE ": Memory: %ldK total, %ldK free\n", SYS_SDL_SRCFN,mem_st.dwTotalPhys/1024L,mem_st.dwAvailPhys/1024L); +#else + system("uname -svm > /tmp/os.out"); + char osv[100];FILE* a=fopen("/tmp/os.out","r");fgets(osv,100,a);fclose(a); + osv[strlen(osv)-1]='\0'; + smLog("%s:" SLINE ": OS: %s\n",SYS_SDL_SRCFN,osv); + system("rm /tmp/os.out"); + + system("cat /proc/cpuinfo | grep name -m 1 > /tmp/cpu.out"); + a=fopen("/tmp/cpu.out","r");fgets(osv,100,a);fclose(a); + osv[strlen(osv)-1]='\0';char *ptr=osv;while(*ptr!=':')++ptr;ptr+=2; + smLog("%s:" SLINE ": CPU: %s\n",SYS_SDL_SRCFN,osv); + system("rm /tmp/cpu.out"); + + a=fopen("/proc/meminfo","r"); + unsigned totalm,freem; + fscanf(a,"MemTotal: %u kB\n",&totalm); + fscanf(a,"MemFree: %u kB\n",&freem); + smLog("%s:" SLINE ": RAM: %ukB installed, %ukB free\n",SYS_SDL_SRCFN,totalm,freem); + fclose(a); +#endif + if(SDL_Init(SDL_INIT_VIDEO)==-1) + { + smLog("%s:" SLINE ": SDL_Init() failed with error %s\n",SYS_SDL_SRCFN,SDL_GetError()); + return false; + } + if(SDL_GL_LoadLibrary(NULL)==-1) + { + smLog("%s:" SLINE ": SDL_GL_LoadLibrary() failed with error %s\n",SYS_SDL_SRCFN,SDL_GetError()); + return false; + } + SDL_DisplayMode vidinfo; + if(SDL_GetDesktopDisplayMode(0,&vidinfo)) + { + smLog("%s:" SLINE ": SDL_GetDesktopDisplayMode() failed with error %s\n",SYS_SDL_SRCFN,SDL_GetError()); + SDL_Quit(); + return false; + } + dispw=vidinfo.w;disph=vidinfo.h; + smLog("%s:" SLINE ": Screen: %d x %d\n",SYS_SDL_SRCFN,dispw,disph); + Uint32 flags=SDL_WINDOW_OPENGL; + if(!windowed)flags|=SDL_WINDOW_FULLSCREEN; + SDL_Window *screen=SDL_CreateWindow(winTitle,SDL_WINDOWPOS_UNDEFINED,SDL_WINDOWPOS_UNDEFINED,scrw,scrh,flags); + hwnd=(void*)screen; + glContext=SDL_GL_CreateContext(screen); + SDL_GL_SetAttribute(SDL_GL_RED_SIZE,8); + SDL_GL_SetAttribute(SDL_GL_GREEN_SIZE,8); + SDL_GL_SetAttribute(SDL_GL_BLUE_SIZE,8); + SDL_GL_SetAttribute(SDL_GL_ALPHA_SIZE,8); + SDL_GL_SetAttribute(SDL_GL_DEPTH_SIZE,16); + SDL_GL_SetAttribute(SDL_GL_ACCELERATED_VISUAL,1); + SDL_GL_SetAttribute(SDL_GL_DOUBLEBUFFER,1); + SDL_GL_SetSwapInterval(vsync?1:0); + if(!hwnd) + { + smLog("%s:" SLINE ": SDL_CreateWindow() failed with error %s\n",SYS_SDL_SRCFN,SDL_GetError()); + SDL_Quit(); + return false; + } + if(!windowed) + { + mouseOver=true; + if(!pSM->Active)pSM->focusChange(true); + } + SDL_ShowCursor(hideMouse?SDL_DISABLE:SDL_ENABLE); + initInput(); + if(!initOGL()){smFinale();return false;} + if(!initOAL()){smFinale();return false;} + t0=SDL_GetTicks();dt=fcnt=0;fps=.0; + updateFPSDelay=.0; + return true; +} + +void SMELT_IMPL::smFinale() +{ + smLog("%s:" SLINE ": Cleaning up...\n",SYS_SDL_SRCFN); + clearQueue();finiOAL();finiOGL(); + SDL_GL_UnloadLibrary();SDL_Quit();hwnd=0; +} + +void SMELT_IMPL::smMainLoop() +{ + if(!hwnd)return smLog("%s:" SLINE ": Error: SMELT is not initialized.\n",SYS_SDL_SRCFN); + if(!pUpdateFunc&&!updateHandler) return smLog("%s:" SLINE ": UpdateFunc is not defined.\n",SYS_SDL_SRCFN); + Active=true; + for(;;) + { + SDL_Event e; + bool loopcont=true; + while(SDL_PollEvent(&e)&&loopcont)loopcont=procSDLEvent(e); + if(!loopcont)break; + if(Active||noSuspend) + { + Uint32 sdlticks; + do{sdlticks=SDL_GetTicks();dt=sdlticks-t0;}while(dt<1); + if(dt>=fixDelta) + { + timeDelta=dt/1000.; + if(timeDelta>0.2)timeDelta=fixDelta?fixDelta/1000.:.01; + ++fcnt;updateFPSDelay+=timeDelta;t0=sdlticks;timeS+=timeDelta; + if(updateFPSDelay>1){fps=fcnt/updateFPSDelay;updateFPSDelay=.0;fcnt=0;} + if(pUpdateFunc){if(pUpdateFunc())break;} + if(updateHandler){if(updateHandler->handlerFunc())break;} + for(int i=1;i<=255;++i)keylst[i]=((keyz[i]&4)!=0); + clearQueue(); + } + else + if(fixDelta&&dt+3<fixDelta)SDL_Delay(1); + }else SDL_Delay(1); + } + clearQueue();Active=false; +} +void SMELT_IMPL::smUpdateFunc(smHook func){pUpdateFunc=func;} +void SMELT_IMPL::smUpdateFunc(smHandler* h){updateHandler=h;} +void SMELT_IMPL::smUnFocFunc(smHook func){pUnFocFunc=func;} +void SMELT_IMPL::smUnFocFunc(smHandler* h){unFocHandler=h;} +void SMELT_IMPL::smFocFunc(smHook func){pFocFunc=func;} +void SMELT_IMPL::smFocFunc(smHandler* h){focHandler=h;} +void SMELT_IMPL::smQuitFunc(smHook func){pQuitFunc=func;} +void SMELT_IMPL::smQuitFunc(smHandler* h){quitHandler=h;} +void SMELT_IMPL::smWinTitle(const char *title){strcpy(winTitle,title);} +bool SMELT_IMPL::smIsActive(){return Active;} +void SMELT_IMPL::smNoSuspend(bool para){noSuspend=para;} +void SMELT_IMPL::smVidMode(int resX,int resY,bool _windowed) +{ + if(vertexArray)return; + if(!pOpenGLDevice)scrw=resX,scrh=resY,windowed=_windowed; + else if(windowed!=_windowed) + { + windowed=_windowed; + Uint32 flags=SDL_WINDOW_OPENGL; + if(!windowed)flags|=SDL_WINDOW_FULLSCREEN; + SDL_SetWindowFullscreen((SDL_Window*)hwnd,flags); + restOGL(); + if(!windowed){mouseOver=true;if(!pSM->Active)pSM->focusChange(true);} + } +} +void SMELT_IMPL::smLogFile(const char* path) +{ + strcpy(logFile,path); + FILE *tf=fopen(logFile,"w"); + if(!tf)*logFile=0;else fclose(tf); +} +void SMELT_IMPL::smLog(const char* format,...) +{ + va_list ap; + va_start(ap,format);vfprintf(stderr,format,ap);va_end(ap); + FILE *logf=fopen(logFile,"a");if(!logf)return; + va_start(ap,format);vfprintf(logf,format,ap);va_end(ap); + fclose(logf); +} +void SMELT_IMPL::smScreenShot(const char* path) +{ + if(pOpenGLDevice) + { + #if SDL_BYTEORDER==SDL_BIG_ENDIAN + const Uint32 rmask=0xFF0000; + const Uint32 gmask=0x00FF00; + const Uint32 bmask=0x0000FF; + #else + const Uint32 rmask=0x0000FF; + const Uint32 gmask=0x00FF00; + const Uint32 bmask=0xFF0000; + #endif + pOpenGLDevice->glFinish(); + SDL_Surface *screen=SDL_GetWindowSurface((SDL_Window*)hwnd); + SDL_Surface *surface=SDL_CreateRGBSurface(SDL_SWSURFACE,screen->w,screen->h,24,rmask,gmask,bmask,0); + pOpenGLDevice->glReadPixels(0,0,screen->w,screen->h,GL_RGB,GL_UNSIGNED_BYTE,surface->pixels); + flipSDLSurface(surface->pitch,surface->h,surface->pixels); + SDL_SaveBMP(surface,path); + SDL_FreeSurface(surface); + } +} +void SMELT_IMPL::smSetFPS(int fps) +{ + vsync=(fps==FPS_VSYNC); + if(pOpenGLDevice)SDL_GL_SetSwapInterval(vsync?1:0); + if(fps>0)fixDelta=1000./fps;else fixDelta=0; +} +float SMELT_IMPL::smGetFPS(){return fps;} +float SMELT_IMPL::smGetDelta(){return timeDelta;} +float SMELT_IMPL::smGetTime(){return timeS;} + +SMELT_IMPL::SMELT_IMPL() +{ + hwnd=NULL;Active=false;memset(curError,0,sizeof(curError)); + pUpdateFunc=pUnFocFunc=pFocFunc=pQuitFunc=NULL; + updateHandler=unFocHandler=focHandler=quitHandler=NULL; + Icon=NULL;strcpy(winTitle,"untitled");scrw=dispw=800;scrh=disph=600; + windowed=vsync=false;memset(logFile,0,sizeof(logFile)); + limfps=0;hideMouse=true;noSuspend=false; + pOpenGLDevice=NULL;targets=NULL;curTarget=NULL; + textures=NULL;vertexArray=NULL;vertexBuf=NULL;indexBuf=NULL;primTex=0; + pOpenALDevice=NULL;mute=false;inpQueue=NULL;posz=0;posx=posy=.0; + mouseOver=true;captured=false;keymods=KMOD_NONE;zbufenabled=false; + timeDelta=updateFPSDelay=fps=.0;fcnt=dt=fixDelta=0; +} +void SMELT_IMPL::focusChange(bool actif) +{ + Active=actif; + if(actif){pFocFunc?pFocFunc():0;focHandler?focHandler->handlerFunc():0;} + else {pUnFocFunc?pUnFocFunc():0;unFocHandler?unFocHandler->handlerFunc():0;}; +} +bool SMELT_IMPL::procSDLEvent(const SDL_Event &e) +{ + switch(e.type) + { + case SDL_WINDOWEVENT: + switch(e.window.event) + { + case SDL_WINDOWEVENT_EXPOSED: + //redraw, omitted. + break; + case SDL_WINDOWEVENT_FOCUS_GAINED: + pSM->focusChange(true); + break; + case SDL_WINDOWEVENT_FOCUS_LOST: + pSM->focusChange(false); + break; + case SDL_WINDOWEVENT_ENTER: + mouseOver=true; + break; + case SDL_WINDOWEVENT_LEAVE: + mouseOver=false; + break; + } + break; + case SDL_QUIT: + { + bool accepted=true; + if(pSM->pQuitFunc&&pSM->pQuitFunc())accepted=false; + if(pSM->quitHandler&&quitHandler->handlerFunc())accepted=false; + if(accepted)return false; + } + break; + case SDL_KEYDOWN: + keymods=(SDL_Keymod)e.key.keysym.mod; + if((keymods&KMOD_ALT)&&((e.key.keysym.sym==SDLK_RETURN)||(e.key.keysym.sym==SDLK_KP_ENTER))) + {smVidMode(scrw,scrh,!windowed);break;} + pSM->buildEvent(INPUT_KEYDOWN,e.key.keysym.scancode,0,0,-1,-1); + break; + case SDL_KEYUP: + keymods=(SDL_Keymod)e.key.keysym.mod; + pSM->buildEvent(INPUT_KEYUP,e.key.keysym.scancode,0,0,-1,-1); + break; + case SDL_MOUSEBUTTONDOWN: + if(e.button.button==SDL_BUTTON_LEFT) + pSM->buildEvent(INPUT_MBUTTONDOWN,SMK_LBUTTON,0,0,e.button.x,e.button.y); + if(e.button.button==SDL_BUTTON_RIGHT) + pSM->buildEvent(INPUT_MBUTTONDOWN,SMK_RBUTTON,0,0,e.button.x,e.button.y); + if(e.button.button==SDL_BUTTON_MIDDLE) + pSM->buildEvent(INPUT_MBUTTONDOWN,SMK_MBUTTON,0,0,e.button.x,e.button.y); + break; + case SDL_MOUSEBUTTONUP: + if(e.button.button==SDL_BUTTON_LEFT) + pSM->buildEvent(INPUT_MBUTTONUP,SMK_LBUTTON,0,0,e.button.x,e.button.y); + if(e.button.button==SDL_BUTTON_RIGHT) + pSM->buildEvent(INPUT_MBUTTONUP,SMK_RBUTTON,0,0,e.button.x,e.button.y); + if(e.button.button==SDL_BUTTON_MIDDLE) + pSM->buildEvent(INPUT_MBUTTONUP,SMK_MBUTTON,0,0,e.button.x,e.button.y); + break; + case SDL_MOUSEWHEEL: + if(e.wheel.y>0)pSM->buildEvent(INPUT_MOUSEWHEEL,1,0,0,e.button.x,e.button.y); + if(e.wheel.y<0)pSM->buildEvent(INPUT_MOUSEWHEEL,-1,0,0,e.button.x,e.button.y); + break; + case SDL_MOUSEMOTION: + pSM->buildEvent(INPUT_MOUSEMOVE,0,0,0,e.motion.x,e.motion.y); + break; + } + return true; +} +void SMELT_IMPL::flipSDLSurface(int p,int h,void* px) +{ + void* temp_row; + int height_div_2; + temp_row=(void*)malloc(p); + //assert(temp_row); + height_div_2=(int)(h*.5); + for(int i=0;i<height_div_2;++i) + { + memcpy((Uint8*)temp_row,(Uint8*)(px)+p*i,p); + memcpy((Uint8*)(px)+p*i,(Uint8*)(px)+p*(h-i-1),p); + memcpy((Uint8*)(px)+p*(h-i-1),temp_row,p); + } + free(temp_row); +} |