programs/progman/main.c

   1 /*
   2  * Program Manager
   3  *
   4  * Copyright 1996 Ulrich Schmid <uschmid@mail.hh.provi.de>
   5  */
   6
   7 #include <stdio.h>
   8 #include <string.h>
   9 #include "windows.h"
  10 #include "windowsx.h"
  11 #include "license.h"
  12 #include "progman.h"
  13
  14 #ifdef WINELIB
  15 #include "options.h"
  16 #endif
  17
  18 GLOBALS Globals;
  19
  20 VOID WINAPI WriteOutProfiles16(void);
  21
  22 static VOID MAIN_CreateGroups(void);
  23 static VOID MAIN_MenuCommand(HWND hWnd, WPARAM wParam, LPARAM lParam);
  24 static ATOM MAIN_RegisterMainWinClass(void);
  25 static VOID MAIN_CreateMainWindow(void);
  26 static VOID MAIN_CreateMDIWindow(void);
  27 static VOID MAIN_AutoStart(void);
  28
  29 #define BUFFER_SIZE 1000
  30
  31 /***********************************************************************
  32  *
  33  *           WinMain
  34  */
  35
  36 int PASCAL WinMain (HANDLE hInstance, HANDLE prev, LPSTR cmdline, int show)
  37 {
  38   MSG      msg;
  39
  40 #ifndef WINELIB
  41   Globals.lpszIniFile         = "progman.ini";
  42   Globals.lpszIcoFile         = "progman.ico";
  43 #else /* Configuration in `wine.ini' */
  44   {
  45     CHAR buffer[MAX_PATHNAME_LEN], *p;
  46
  47     /* Redirect `progman.ini' */
  48     PROFILE_GetWineIniString("progman", "progman.ini", "progman.ini",
  49                              buffer, sizeof(buffer));
  50     Globals.lpszIniFile = p = LocalLock(LocalAlloc(LMEM_FIXED, lstrlen(buffer)+1));
  51     hmemcpy16(p, buffer, 1 + lstrlen(buffer));
  52
  53     /* Redirect `progman.ico' */
  54     PROFILE_GetWineIniString("progman", "progman.ico", "progman.ico",
  55                              buffer, sizeof(buffer));
  56     Globals.lpszIcoFile = p = LocalLock(LocalAlloc(LMEM_FIXED, lstrlen(buffer)+1));
  57     hmemcpy16(p, buffer, 1 + lstrlen(buffer));
  58   }
  59 #endif
  60
  61   /* Select Language */
  62 #ifdef WINELIB
  63   Globals.lpszLanguage = Languages[Options.language].name;
  64 #else
  65   Globals.lpszLanguage = "En";
  66 #endif
  67
  68   Globals.hInstance           = hInstance;
  69   Globals.hGroups             = 0;
  70   Globals.hActiveGroup        = 0;
  71
  72   /* Read Options from `progman.ini' */
  73   Globals.bAutoArrange =
  74     GetPrivateProfileInt("Settings", "AutoArrange", 0, Globals.lpszIniFile);
  75   Globals.bMinOnRun =
  76     GetPrivateProfileInt("Settings", "MinOnRun", 0, Globals.lpszIniFile);
  77   Globals.bSaveSettings =
  78     GetPrivateProfileInt("Settings", "SaveSettings", 0, Globals.lpszIniFile);
  79
  80   /* Load default icons */
  81   Globals.hMainIcon    = ExtractIcon(Globals.hInstance, Globals.lpszIcoFile, 0);
  82   Globals.hGroupIcon   = ExtractIcon(Globals.hInstance, Globals.lpszIcoFile, 0);
  83   Globals.hDefaultIcon = ExtractIcon(Globals.hInstance, Globals.lpszIcoFile, 0);
  84   if (!Globals.hMainIcon)    Globals.hMainIcon = LoadIcon(0, MAKEINTRESOURCE(DEFAULTICON));
  85   if (!Globals.hGroupIcon)   Globals.hGroupIcon = LoadIcon(0, MAKEINTRESOURCE(DEFAULTICON));
  86   if (!Globals.hDefaultIcon) Globals.hDefaultIcon = LoadIcon(0, MAKEINTRESOURCE(DEFAULTICON));
  87
  88   /* Register classes */
  89   if (!prev)
  90     {
  91       if (!MAIN_RegisterMainWinClass()) return(FALSE);
  92       if (!GROUP_RegisterGroupWinClass()) return(FALSE);
  93       if (!PROGRAM_RegisterProgramWinClass()) return(FALSE);
  94     }
  95
  96   /* Create main window */
  97   MAIN_CreateMainWindow();
  98   Globals.hAccel = LoadAccelerators(Globals.hInstance, STRING_ACCEL);
  99
 100   /* Setup menu, stringtable and resourcenames */
 101   STRING_SelectLanguageByName(Globals.lpszLanguage);
 102
 103   MAIN_CreateMDIWindow();
 104
 105   /* Initialize groups */
 106   MAIN_CreateGroups();
 107
 108   /* Start initial applications */
 109   MAIN_AutoStart();
 110
 111   /* Message loop */
 112   while (GetMessage (&msg, 0, 0, 0))
 113     if (!TranslateAccelerator(Globals.hMainWnd, Globals.hAccel, &msg))
 114       {
 115         TranslateMessage (&msg);
 116         DispatchMessage (&msg);
 117       }
 118   return 0;
 119 }
 120
 121 /***********************************************************************
 122  *
 123  *           MAIN_CreateGroups
 124  */
 125
 126 static VOID MAIN_CreateGroups()
 127 {
 128   CHAR buffer[BUFFER_SIZE];
 129   CHAR szPath[MAX_PATHNAME_LEN];
 130   CHAR key[20], *ptr;
 131
 132   /* Initialize groups according the `Order' entry of `progman.ini' */
 133   GetPrivateProfileString("Settings", "Order", "", buffer, sizeof(buffer), Globals.lpszIniFile);
 134   ptr = buffer;
 135   while (ptr < buffer + sizeof(buffer))
 136     {
 137       int num, skip, ret;
 138       ret = sscanf(ptr, "%d%n", &num, &skip);
 139       if (ret == 0)
 140         MAIN_MessageBoxIDS_s(IDS_FILE_READ_ERROR_s, Globals.lpszIniFile, IDS_ERROR, MB_OK);
 141       if (ret != 1) break;
 142
 143       sprintf(key, "Group%d", num);
 144       GetPrivateProfileString("Groups", key, "", szPath,
 145                               sizeof(szPath), Globals.lpszIniFile);
 146       if (!szPath[0]) continue;
 147
 148       GRPFILE_ReadGroupFile(szPath);
 149
 150       ptr += skip;
 151     }
 152   /* FIXME initialize other groups, not enumerated by `Order' */
 153 }
 154
 155 /***********************************************************************
 156  *
 157  *           MAIN_AutoStart
 158  */
 159
 160 VOID MAIN_AutoStart()
 161 {
 162   CHAR buffer[BUFFER_SIZE];
 163   HLOCAL hGroup, hProgram;
 164
 165   GetPrivateProfileString("Settings", "AutoStart", "Autostart", buffer,
 166                           sizeof(buffer), Globals.lpszIniFile);
 167
 168   for (hGroup = GROUP_FirstGroup(); hGroup; hGroup = GROUP_NextGroup(hGroup))
 169     if (!lstrcmp(buffer, GROUP_GroupName(hGroup)))
 170       for (hProgram = PROGRAM_FirstProgram(hGroup); hProgram;
 171            hProgram = PROGRAM_NextProgram(hProgram))
 172         PROGRAM_ExecuteProgram(hProgram);
 173 }
 174
 175 /***********************************************************************
 176  *
 177  *           MAIN_MainWndProc
 178  */
 179
 180 static LRESULT MAIN_MainWndProc (HWND hWnd, UINT msg,
 181                                  WPARAM wParam, LPARAM lParam)
 182 {
 183 #if 0
 184   printf("M %4.4x %4.4x\n", msg, wParam);
 185 #endif
 186   switch (msg)
 187     {
 188     case WM_INITMENU:
 189       CheckMenuItem(Globals.hOptionMenu, PM_AUTO_ARRANGE,
 190                     MF_BYCOMMAND | (Globals.bAutoArrange ? MF_CHECKED : MF_UNCHECKED));
 191       CheckMenuItem(Globals.hOptionMenu, PM_MIN_ON_RUN,
 192                     MF_BYCOMMAND | (Globals.bMinOnRun ? MF_CHECKED : MF_UNCHECKED));
 193       CheckMenuItem(Globals.hOptionMenu, PM_SAVE_SETTINGS,
 194                     MF_BYCOMMAND | (Globals.bSaveSettings ? MF_CHECKED : MF_UNCHECKED));
 195       break;
 196
 197     case WM_COMMAND:
 198       if (wParam < PM_FIRST_CHILD)
 199         MAIN_MenuCommand(hWnd, wParam, lParam);
 200       break;
 201
 202     case WM_DESTROY:
 203       PostQuitMessage (0);
 204       break;
 205     }
 206   return(DefFrameProc(hWnd, Globals.hMDIWnd, msg, wParam, lParam));
 207 }
 208
 209 /***********************************************************************
 210  *
 211  *           MAIN_MenuCommand
 212  */
 213
 214 static VOID MAIN_MenuCommand(HWND hWnd, WPARAM wParam, LPARAM lParam)
 215 {
 216   HLOCAL hActiveGroup    = GROUP_ActiveGroup();
 217   HLOCAL hActiveProgram  = PROGRAM_ActiveProgram(hActiveGroup);
 218   HWND   hActiveGroupWnd = GROUP_GroupWnd(hActiveGroup);
 219
 220   switch(wParam)
 221     {
 222       /* Menu File */
 223     case PM_NEW:
 224       switch (DIALOG_New((hActiveGroupWnd && !IsIconic(hActiveGroupWnd)) ?
 225                          PM_NEW_PROGRAM : PM_NEW_GROUP))
 226       {
 227       case PM_NEW_PROGRAM:
 228         if (hActiveGroup) PROGRAM_NewProgram(hActiveGroup);
 229         break;
 230
 231       case PM_NEW_GROUP:
 232         GROUP_NewGroup();
 233         break;
 234       }
 235       break;
 236
 237     case PM_OPEN:
 238       if (hActiveProgram)
 239         PROGRAM_ExecuteProgram(hActiveProgram);
 240       else if (hActiveGroupWnd)
 241         OpenIcon(hActiveGroupWnd);
 242       break;
 243
 244     case PM_MOVE:
 245     case PM_COPY:
 246       if (hActiveProgram)
 247         PROGRAM_CopyMoveProgram(hActiveProgram, wParam == PM_MOVE);
 248       break;
 249
 250     case PM_DELETE:
 251       if (hActiveProgram)
 252         {
 253         if (DIALOG_Delete(IDS_DELETE_PROGRAM_s, PROGRAM_ProgramName(hActiveProgram)))
 254           PROGRAM_DeleteProgram(hActiveProgram, TRUE);
 255         }
 256       else if (hActiveGroup)
 257         {
 258         if (DIALOG_Delete(IDS_DELETE_GROUP_s, GROUP_GroupName(hActiveGroup)))
 259           GROUP_DeleteGroup(hActiveGroup);
 260         }
 261       break;
 262
 263     case PM_ATTRIBUTES:
 264       if (hActiveProgram)
 265         PROGRAM_ModifyProgram(hActiveProgram);
 266       else if (hActiveGroup)
 267         GROUP_ModifyGroup(hActiveGroup);
 268       break;
 269
 270     case PM_EXECUTE:
 271       DIALOG_Execute();
 272       break;
 273
 274     case PM_EXIT:
 275       PostQuitMessage(0);
 276       break;
 277
 278       /* Menu Options */
 279     case PM_AUTO_ARRANGE:
 280       Globals.bAutoArrange = !Globals.bAutoArrange;
 281       CheckMenuItem(Globals.hOptionMenu, PM_AUTO_ARRANGE,
 282                     MF_BYCOMMAND | (Globals.bAutoArrange ?
 283                                     MF_CHECKED : MF_UNCHECKED));
 284       WritePrivateProfileString("Settings", "AutoArrange",
 285                                 Globals.bAutoArrange ? "1" : "0",
 286                                 Globals.lpszIniFile);
 287       WriteOutProfiles16();
 288       break;
 289
 290     case PM_MIN_ON_RUN:
 291       Globals.bMinOnRun = !Globals.bMinOnRun;
 292       CheckMenuItem(Globals.hOptionMenu, PM_MIN_ON_RUN,
 293                     MF_BYCOMMAND | (Globals.bMinOnRun ?
 294                                     MF_CHECKED : MF_UNCHECKED));
 295       WritePrivateProfileString("Settings", "MinOnRun",
 296                                 Globals.bMinOnRun ? "1" : "0",
 297                                 Globals.lpszIniFile);
 298       WriteOutProfiles16();
 299       break;
 300
 301     case PM_SAVE_SETTINGS:
 302       Globals.bSaveSettings = !Globals.bSaveSettings;
 303       CheckMenuItem(Globals.hOptionMenu, PM_SAVE_SETTINGS,
 304                     MF_BYCOMMAND | (Globals.bSaveSettings ?
 305                                     MF_CHECKED : MF_UNCHECKED));
 306       WritePrivateProfileString("Settings", "SaveSettings",
 307                                 Globals.bSaveSettings ? "1" : "0",
 308                                 Globals.lpszIniFile);
 309       WriteOutProfiles16();
 310       break;
 311
 312       /* Menu Windows */
 313     case PM_ARRANGE:
 314       if (hActiveGroupWnd && !IsIconic(hActiveGroupWnd))
 315         ArrangeIconicWindows(hActiveGroupWnd);
 316       else
 317         SendMessage(Globals.hMDIWnd, WM_MDIICONARRANGE, 0, 0);
 318       break;
 319
 320       /* Menu Help */
 321     case PM_CONTENTS:
 322       if (!WinHelp(Globals.hMainWnd, "progman.hlp", HELP_INDEX, 0))
 323         MAIN_MessageBoxIDS(IDS_WINHELP_ERROR, IDS_ERROR, MB_OK);
 324       break;
 325
 326     case PM_HELPONHELP:
 327       if (!WinHelp(Globals.hMainWnd, "progman.hlp", HELP_HELPONHELP, 0))
 328         MAIN_MessageBoxIDS(IDS_WINHELP_ERROR, IDS_ERROR, MB_OK);
 329       break;
 330
 331     case PM_TUTORIAL:
 332       WinExec("wintutor.exe", SW_SHOWNORMAL);
 333       break;
 334
 335     case PM_LICENSE:
 336       WineLicense(Globals.hMainWnd, Globals.lpszLanguage);
 337       break;
 338
 339     case PM_NO_WARRANTY:
 340       WineWarranty(Globals.hMainWnd, Globals.lpszLanguage);
 341       break;
 342
 343     case PM_ABOUT_WINE:
 344       ShellAbout(hWnd, "WINE", "Program Manager", 0);
 345       break;
 346
 347     default:
 348       if (wParam >= PM_FIRST_LANGUAGE && wParam <= PM_LAST_LANGUAGE)
 349         STRING_SelectLanguageByNumber(wParam - PM_FIRST_LANGUAGE);
 350       else
 351         MAIN_MessageBoxIDS(IDS_NOT_IMPLEMENTED, IDS_ERROR, MB_OK);
 352       break;
 353     }
 354 }
 355
 356 /***********************************************************************
 357  *
 358  *           MAIN_RegisterMainWinClass
 359  */
 360
 361 static ATOM MAIN_RegisterMainWinClass()
 362 {
 363   WNDCLASS class;
 364
 365   class.style         = CS_HREDRAW | CS_VREDRAW;
 366   class.lpfnWndProc   = MAIN_MainWndProc;
 367   class.cbClsExtra    = 0;
 368   class.cbWndExtra    = 0;
 369   class.hInstance     = Globals.hInstance;
 370   class.hIcon         = Globals.hMainIcon;
 371   class.hCursor       = LoadCursor (0, IDC_ARROW);
 372   class.hbrBackground = GetStockObject (NULL_BRUSH);
 373   class.lpszMenuName  = 0;
 374   class.lpszClassName = STRING_MAIN_WIN_CLASS_NAME;
 375
 376   return RegisterClass(&class);
 377 }
 378
 379 /***********************************************************************
 380  *
 381  *           MAIN_CreateMainWindow
 382  */
 383
 384 static VOID MAIN_CreateMainWindow()
 385 {
 386   INT  left , top, right, bottom, width, height, show;
 387   CHAR buffer[100];
 388
 389   Globals.hMDIWnd   = 0;
 390   Globals.hMainMenu = 0;
 391
 392   /* Get the geometry of the main window */
 393   GetPrivateProfileString("Settings", "Window", "",
 394                           buffer, sizeof(buffer), Globals.lpszIniFile);
 395   if (5 == sscanf(buffer, "%d %d %d %d %d", &left, &top, &right, &bottom, &show))
 396   {
 397     width  = right - left;
 398     height = bottom - top;
 399   }
 400   else
 401   {
 402     left = top = width = height = CW_USEDEFAULT;
 403     show = SW_SHOWNORMAL;
 404   }
 405
 406   /* Create main Window */
 407   Globals.hMainWnd =
 408     CreateWindow (STRING_MAIN_WIN_CLASS_NAME, "",
 409                   WS_OVERLAPPEDWINDOW, left, top, width, height,
 410                   0, 0, Globals.hInstance, 0);
 411
 412   ShowWindow (Globals.hMainWnd, show);
 413   UpdateWindow (Globals.hMainWnd);
 414 }
 415
 416 /***********************************************************************
 417  *
 418  *           MAIN_CreateMDIWindow
 419  */
 420
 421 static VOID MAIN_CreateMDIWindow()
 422 {
 423   CLIENTCREATESTRUCT ccs;
 424   RECT rect;
 425
 426   /* Get the geometry of the MDI window */
 427   GetClientRect(Globals.hMainWnd, &rect);
 428
 429   ccs.hWindowMenu  = Globals.hWindowsMenu;
 430   ccs.idFirstChild = PM_FIRST_CHILD;
 431
 432   /* Create MDI Window */
 433   Globals.hMDIWnd =
 434     CreateWindow (STRING_MDI_WIN_CLASS_NAME, "",
 435                   WS_CHILD, rect.left, rect.top,
 436                   rect.right - rect.left, rect.bottom - rect.top,
 437                   Globals.hMainWnd, 0,
 438                   Globals.hInstance, &ccs);
 439
 440   ShowWindow (Globals.hMDIWnd, SW_SHOW);
 441   UpdateWindow (Globals.hMDIWnd);
 442 }
 443
 444 /**********************************************************************/
 445 /***********************************************************************
 446  *
 447  *           MAIN_MessageBoxIDS
 448  */
 449 INT MAIN_MessageBoxIDS(UINT ids_text, UINT ids_title, WORD type)
 450 {
 451   CHAR text[MAX_STRING_LEN];
 452   CHAR title[MAX_STRING_LEN];
 453
 454   LoadString(Globals.hInstance, ids_text, text, sizeof(text));
 455   LoadString(Globals.hInstance, ids_title, title, sizeof(title));
 456
 457   return(MessageBox(Globals.hMainWnd, text, title, type));
 458 }
 459
 460 /***********************************************************************
 461  *
 462  *           MAIN_MessageBoxIDS_s
 463  */
 464 INT MAIN_MessageBoxIDS_s(UINT ids_text, LPCSTR str, UINT ids_title, WORD type)
 465 {
 466   CHAR text[MAX_STRING_LEN];
 467   CHAR title[MAX_STRING_LEN];
 468   CHAR newtext[MAX_STRING_LEN + MAX_PATHNAME_LEN];
 469
 470   LoadString(Globals.hInstance, ids_text, text, sizeof(text));
 471   LoadString(Globals.hInstance, ids_title, title, sizeof(title));
 472   wsprintf(newtext, text, str);
 473
 474   return(MessageBox(Globals.hMainWnd, newtext, title, type));
 475 }
 476
 477 /***********************************************************************
 478  *
 479  *           MAIN_ReplaceString
 480  */
 481
 482 VOID MAIN_ReplaceString(HLOCAL *handle, LPSTR replace)
 483 {
 484   HLOCAL newhandle = LocalAlloc(LMEM_FIXED, strlen(replace) + 1);
 485   if (newhandle)
 486     {
 487       LPSTR  newstring = LocalLock(newhandle);
 488       lstrcpy(newstring, replace);
 489       LocalFree(*handle);
 490       *handle = newhandle;
 491     }
 492   else MAIN_MessageBoxIDS(IDS_OUT_OF_MEMORY, IDS_ERROR, MB_OK);
 493 }
 494
 495 /* Local Variables:    */
 496 /* c-file-style: "GNU" */
 497 /* End:                */