git.oblomov.eu Git - wine/blob - programs/progman/main.c

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