SPLASH.C

Go to the documentation of this file.

/* splash.c     Opening Splash Screen */

#include <stdlib.h>
#include <stdio.h>
#include <windows.h>
#include <commctrl.h>

#define X__Malloc(s)    LocalAlloc(LMEM_FIXED,s)
#define X__Free(p)      LocalFree((HLOCAL)p)

#if __ZTC__ || __SC__
#ifndef max
#define max(a,b)  ( ((a) > (b)) ? (a) : (b) )
#endif
#endif

#if __X__MIPS__
BOOL WINAPI _CRT_INIT(HINSTANCE ,DWORD , LPVOID );
#endif

static char IniFilename[256],
            IniSection[]  = "LOGON";
static HINSTANCE hDLLinstance=NULL;
static BITMAP    Bitmap;
static HBITMAP   hBitmap=NULL;
static BOOL      showanim=TRUE;
static HCURSOR   ghcurHand=NULL;
#include "splash.h"

#if __WATCOMC__
int APIENTRY LibMain(HANDLE hDLL, DWORD dwReason, LPVOID lpReserved){
#else
BOOL WINAPI DllMain(HANDLE hDLL, DWORD dwReason, LPVOID lpReserved){
#endif
  HANDLE ghMod;
  switch (dwReason) {
    case DLL_PROCESS_ATTACH:
#if __X__MIPS__
      if(!_CRT_INIT(hDLL,dwReason,lpReserved))return(int)FALSE;
#endif
      hDLLinstance = hDLL;  /* handle to DLL file */
      break;
    case DLL_PROCESS_DETACH:
#if __X__MIPS__
      if(!_CRT_INIT(hDLL,dwReason,lpReserved))return(int)FALSE;
#endif
      break;
  }
  return (int)TRUE;
}

#if __SC__
#pragma startaddress(DllMain)
#endif

static char WIN32_environment[512];

char *R_GetEnv(char const *aa){
 if(GetEnvironmentVariable((LPTSTR)aa,(LPTSTR)WIN32_environment,256) == 0)
   return NULL;
 return WIN32_environment;
}

static void CentreDialogOnScreen(HWND hwnd){
 RECT rcDlg;
 long Xres,Yres;
 Yres=GetSystemMetrics(SM_CYSCREEN);
 Xres=GetSystemMetrics(SM_CXSCREEN);
 GetWindowRect(hwnd,&rcDlg);
 OffsetRect(&rcDlg,-rcDlg.left,-rcDlg.top);
 OffsetRect(&rcDlg,(Xres-rcDlg.right)/2,(Yres-rcDlg.bottom)/2);
 SetWindowPos(hwnd,HWND_TOP,rcDlg.left,rcDlg.top,0,0,SWP_NOSIZE);
 return;
}

PSTR FileInPath(PSTR pstrPath){
 PSTR pstr;
 pstr = pstrPath + strlen(pstrPath);
 while (pstr > pstrPath) {
     pstr = (AnsiPrev(pstrPath, pstr));
     if (*pstr == '\\' || *pstr == ':' || *pstr == '/') {
         pstr = (AnsiNext(pstr));
         break;
     }
 }
 return pstr;
}

static int CALLBACK LogonDlgProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam);

int _PrgmLogon(HWND hwnd,int no_wait){
 int retval;
 // Get the INI file to use and working folder for temporary files
 {
  FILE *fini=NULL; int ix;
  char TempPath[256];
  GetModuleFileName(hDLLinstance,IniFilename,256);
  *FileInPath(IniFilename) = '\0';
  strcpy(TempPath,IniFilename);
  strcat(IniFilename,"OPENFX_.CFG");
  if((fini=fopen(IniFilename,"r")) != NULL){
    fscanf(fini,"%ld",&ix);
    strcpy(TempPath,"X");
    fscanf(fini," %[^\n]",TempPath);
    if(ix > 1){
      fscanf(fini," %[^\n]",IniFilename);
    }
    else  *FileInPath(IniFilename) = '\0';
    fclose(fini);
  }
  else {
    char *pE;
    pE=R_GetEnv("TEMP");
    if(pE != NULL){
      strcpy(TempPath,pE);  strcat(TempPath,"\\");
      strcpy(IniFilename,TempPath);
      *FileInPath(TempPath) = '\0';
    }
    *FileInPath(IniFilename) = '\0';
  }
  strcat(IniFilename,"OPENFX_.INI");
 }
 //
 retval=(int)DialogBoxParam(hDLLinstance,MAKEINTRESOURCE(DLG_LOGON),hwnd,
              (DLGPROC)LogonDlgProc,(LPARAM)no_wait);
 return retval;
}

static int CALLBACK LogonDlgProc(HWND hwnd,UINT msg,WPARAM wparam,
                                 LPARAM lparam){
 static int ilist[3]={DLG_LOGON_IMAGE_NEW,
                      DLG_LOGON_IMAGE_DESIGN,
                      DLG_LOGON_IMAGE_HELP};
 static UINT StartupTimer=0;
 char str[32];
 char ttt[256],name[256];
 char text0[256],text1[256],text2[256],text3[256],text4[256];
 int DisplayBits,bm;
 HDC hDCcaps;
 HWND hDesktopWnd;
 HANDLE hfbm;
 DWORD version;
 switch( msg ) {
   case WM_INITDIALOG:
     hDesktopWnd=GetDesktopWindow();
     hDCcaps=GetDC(hDesktopWnd);
     DisplayBits=GetDeviceCaps(hDCcaps,BITSPIXEL);
     ReleaseDC(hDesktopWnd,hDCcaps);
     version=GetVersion();
     if((version & 0x80000000) == 0x80000000){ /* Not Windows NT */
         if(LOBYTE(LOWORD(version)) < 4){
           showanim=0;
         }
     }
     strcpy(ttt,text3);
     GetPrivateProfileString(IniSection,"USERID","$$$",
                   str,sizeof(str),IniFilename);
     if(strncmp(str,"$$$",3) == 0){
       strcpy(ttt,text4);
     }
     else strcat(ttt,str);
     ghcurHand=LoadCursor(hDLLinstance,MAKEINTRESOURCE(IDC_PAN));
     CentreDialogOnScreen(hwnd);
     StartupTimer=SetTimer(hwnd,1,8000,NULL);
     {
       HWND pw;
       RECT rect;
       POINT p1,p2;
       pw=GetDlgItem(hwnd,DLG_LOGON_IMAGE_DESIGN);
       if(pw != NULL){
         GetWindowRect(pw,&rect);
         p1.x=rect.left;
         p1.y=rect.top;
         p2.x=rect.right;
         p2.y=rect.bottom;
         ScreenToClient(hwnd,&p1);
         ScreenToClient(hwnd,&p2);
         rect.left=p1.x;
         rect.top=p1.y;
         rect.right=p2.x;
         rect.bottom=p2.y;
         OffsetRect(&rect,0,-1);
         MoveWindow(pw,rect.left,rect.top,
                    rect.right-rect.left,
                    rect.bottom-rect.top,FALSE);
       }
       pw=GetDlgItem(hwnd,DLG_LOGON_IMAGE_NEW);
       if(pw != NULL){
         GetWindowRect(pw,&rect);
         p1.x=rect.left;
         p1.y=rect.top;
         p2.x=rect.right;
         p2.y=rect.bottom;
         ScreenToClient(hwnd,&p1);
         ScreenToClient(hwnd,&p2);
         rect.left=p1.x;
         rect.top=p1.y;
         rect.right=p2.x;
         rect.bottom=p2.y;
         OffsetRect(&rect,1,1);
         MoveWindow(pw,rect.left,rect.top,
                    rect.right-rect.left,
                    rect.bottom-rect.top,FALSE);
       }
     }
     return TRUE;
   case WM_DESTROY:
     if(StartupTimer > 0)KillTimer(hwnd,StartupTimer);
     if(hBitmap != NULL)DeleteObject(hBitmap); hBitmap=NULL;
     break;
   case WM_TIMER:
     switch(wparam){
       case 1:
         EndDialog(hwnd,1);
         return(TRUE);
         break;
       case 2:
         EndDialog(hwnd,1);
         return(TRUE);
         break;
       default: break;
     }
     break;
   case WM_LBUTTONDOWN:{
       HWND pw;
       RECT rect;
       POINT p1,p2,pm;
       int i;
       pm.x=LOWORD(lparam);
       pm.y=HIWORD(lparam);
       for(i=0;i<3;i++){
         pw=GetDlgItem(hwnd,ilist[i]);
         if(pw != NULL){
           GetWindowRect(pw,&rect);
           p1.x=rect.left;
           p1.y=rect.top;
           p2.x=rect.right;
           p2.y=rect.bottom;
           ScreenToClient(hwnd,&p1);
           ScreenToClient(hwnd,&p2);
           rect.left=p1.x;
           rect.top=p1.y;
           rect.right=p2.x;
           rect.bottom=p2.y;
           if(PtInRect(&rect,pm)){
             if(i == 0){
               EndDialog(hwnd,1);
               return(TRUE);
             }
             else if(i == 1){
               EndDialog(hwnd,5);
               return(TRUE);
             }
             else if(i == 2){
               EndDialog(hwnd,4);
               return(TRUE);
             }
           }
         }
       }
     }
     break;
   case WM_MOUSEMOVE:{
       HWND pw;
       RECT rect;
       POINT p1,p2,pm;
       int i,cf=0;
       pm.x=LOWORD(lparam);
       pm.y=HIWORD(lparam);
       for(i=0;i<3;i++){
         pw=GetDlgItem(hwnd,ilist[i]);
         if(pw != NULL){
           GetWindowRect(pw,&rect);
           p1.x=rect.left;
           p1.y=rect.top;
           p2.x=rect.right;
           p2.y=rect.bottom;
           ScreenToClient(hwnd,&p1);
           ScreenToClient(hwnd,&p2);
           rect.left=p1.x;
           rect.top=p1.y;
           rect.right=p2.x;
           rect.bottom=p2.y;
           if(PtInRect(&rect,pm)){
             cf=1;
             if(StartupTimer > 0){
               KillTimer(hwnd,StartupTimer);
               StartupTimer=0;
             }
             ShowWindow(pw,SW_SHOW);
           }
           else{
             ShowWindow(pw,SW_HIDE);
           }
           if(cf == 1)SetCursor(ghcurHand);
           else SetCursor(LoadCursor(NULL,IDC_ARROW));
         }
       }
     }
     break;
   case WM_COMMAND:
     switch(LOWORD(wparam)){
        case IDCANCEL:
        case DLG_LOGON_CANCEL:
          EndDialog(hwnd,-1);
          return(TRUE);
        case DLG_LOGON_NEW:
          EndDialog(hwnd,1);
          return(TRUE);
        case DLG_LOGON_LOAD:
          EndDialog(hwnd,2);
          return(TRUE);
        case DLG_LOGON_TEMPLATE:
          EndDialog(hwnd,3);
          return(TRUE);
        case DLG_LOGON_HELP:
          EndDialog(hwnd,4);
          return(TRUE);
        case DLG_LOGON_MODELER:
          EndDialog(hwnd,5);
          return(TRUE);
        default:
          break;
      }
      break;
    default: break;
 }
 return FALSE;
}