ws2_32: Test GetAddrInfo with zero port.
[wine] / 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 (LOWORD(wParam) < PM_FIRST_CHILD){
184         MAIN_MenuCommand(hWnd, LOWORD(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_OVERLAP:
300       SendMessageW(Globals.hMDIWnd, WM_MDICASCADE, 0, 0);
301       break;
302
303     case PM_SIDE_BY_SIDE:
304       SendMessageW(Globals.hMDIWnd, WM_MDITILE, MDITILE_VERTICAL, 0);
305       break;
306
307     case PM_ARRANGE:
308
309       if (hActiveGroupWnd && !IsIconic(hActiveGroupWnd))
310         ArrangeIconicWindows(hActiveGroupWnd);
311       else
312         SendMessage(Globals.hMDIWnd, WM_MDIICONARRANGE, 0, 0);
313       break;
314
315       /* Menu Help */
316     case PM_CONTENTS:
317       if (!WinHelp(Globals.hMainWnd, "progman.hlp", HELP_CONTENTS, 0))
318         MAIN_MessageBoxIDS(IDS_WINHELP_ERROR, IDS_ERROR, MB_OK);
319       break;
320
321     case PM_ABOUT_WINE:
322       ShellAbout(hWnd, "WINE", "Program Manager", 0);
323       break;
324
325     default:
326         MAIN_MessageBoxIDS(IDS_NOT_IMPLEMENTED, IDS_ERROR, MB_OK);
327       break;
328     }
329 }
330
331 /***********************************************************************
332  *
333  *           MAIN_RegisterMainWinClass
334  */
335
336 static ATOM MAIN_RegisterMainWinClass(void)
337 {
338   WNDCLASS class;
339
340   class.style         = CS_HREDRAW | CS_VREDRAW;
341   class.lpfnWndProc   = MAIN_MainWndProc;
342   class.cbClsExtra    = 0;
343   class.cbWndExtra    = 0;
344   class.hInstance     = Globals.hInstance;
345   class.hIcon         = Globals.hMainIcon;
346   class.hCursor       = LoadCursor (0, IDC_ARROW);
347   class.hbrBackground = GetStockObject (NULL_BRUSH);
348   class.lpszMenuName  = 0;
349   class.lpszClassName = STRING_MAIN_WIN_CLASS_NAME;
350
351   return RegisterClass(&class);
352 }
353
354 /***********************************************************************
355  *
356  *           MAIN_CreateMainWindow
357  */
358
359 static VOID MAIN_CreateMainWindow(void)
360 {
361   INT  left , top, right, bottom, width, height, show;
362   CHAR buffer[100];
363
364   Globals.hMDIWnd   = 0;
365   Globals.hMainMenu = 0;
366
367   /* Get the geometry of the main window */
368   GetPrivateProfileString("Settings", "Window", "",
369                           buffer, sizeof(buffer), Globals.lpszIniFile);
370   if (5 == sscanf(buffer, "%d %d %d %d %d", &left, &top, &right, &bottom, &show))
371   {
372     width  = right - left;
373     height = bottom - top;
374   }
375   else
376   {
377     left = top = width = height = CW_USEDEFAULT;
378     show = SW_SHOWNORMAL;
379   }
380
381   /* Create main Window */
382   Globals.hMainWnd =
383     CreateWindow (STRING_MAIN_WIN_CLASS_NAME, "",
384                   WS_OVERLAPPEDWINDOW, left, top, width, height,
385                   0, 0, Globals.hInstance, 0);
386
387   ShowWindow (Globals.hMainWnd, show);
388   UpdateWindow (Globals.hMainWnd);
389 }
390
391 /***********************************************************************
392  *
393  *           MAIN_CreateMDIWindow
394  */
395
396 static VOID MAIN_CreateMDIWindow(void)
397 {
398   CLIENTCREATESTRUCT ccs;
399   RECT rect;
400
401   /* Get the geometry of the MDI window */
402   GetClientRect(Globals.hMainWnd, &rect);
403
404   ccs.hWindowMenu  = Globals.hWindowsMenu;
405   ccs.idFirstChild = PM_FIRST_CHILD;
406
407   /* Create MDI Window */
408   Globals.hMDIWnd =
409     CreateWindow (STRING_MDI_WIN_CLASS_NAME, "",
410                   WS_CHILD, rect.left, rect.top,
411                   rect.right - rect.left, rect.bottom - rect.top,
412                   Globals.hMainWnd, 0,
413                   Globals.hInstance, &ccs);
414
415   ShowWindow (Globals.hMDIWnd, SW_SHOW);
416   UpdateWindow (Globals.hMDIWnd);
417 }
418
419 /**********************************************************************/
420 /***********************************************************************
421  *
422  *           MAIN_MessageBoxIDS
423  */
424 INT MAIN_MessageBoxIDS(UINT ids_text, UINT ids_title, WORD type)
425 {
426   CHAR text[MAX_STRING_LEN];
427   CHAR title[MAX_STRING_LEN];
428
429   LoadString(Globals.hInstance, ids_text, text, sizeof(text));
430   LoadString(Globals.hInstance, ids_title, title, sizeof(title));
431
432   return(MessageBox(Globals.hMainWnd, text, title, type));
433 }
434
435 /***********************************************************************
436  *
437  *           MAIN_MessageBoxIDS_s
438  */
439 INT MAIN_MessageBoxIDS_s(UINT ids_text, LPCSTR str, UINT ids_title, WORD type)
440 {
441   CHAR text[MAX_STRING_LEN];
442   CHAR title[MAX_STRING_LEN];
443   CHAR newtext[MAX_STRING_LEN + MAX_PATHNAME_LEN];
444
445   LoadString(Globals.hInstance, ids_text, text, sizeof(text));
446   LoadString(Globals.hInstance, ids_title, title, sizeof(title));
447   wsprintf(newtext, text, str);
448
449   return(MessageBox(Globals.hMainWnd, newtext, title, type));
450 }
451
452 /***********************************************************************
453  *
454  *           MAIN_ReplaceString
455  */
456
457 VOID MAIN_ReplaceString(HLOCAL *handle, LPSTR replace)
458 {
459   HLOCAL newhandle = LocalAlloc(LMEM_FIXED, strlen(replace) + 1);
460   if (newhandle)
461     {
462       LPSTR  newstring = LocalLock(newhandle);
463       lstrcpy(newstring, replace);
464       LocalFree(*handle);
465       *handle = newhandle;
466     }
467   else MAIN_MessageBoxIDS(IDS_OUT_OF_MEMORY, IDS_ERROR, MB_OK);
468 }
469
470 /* Local Variables:    */
471 /* c-file-style: "GNU" */
472 /* End:                */