misc/user.c

   1 /*
   2  * Misc. USER functions
   3  *
   4  * Copyright 1993 Robert J. Amstadt
   5  *           1996 Alex Korobka
   6  */
   7
   8 #include <stdio.h>
   9 #include <stdlib.h>
  10 #include "windows.h"
  11 #include "gdi.h"
  12 #include "user.h"
  13 #include "task.h"
  14 #include "queue.h"
  15 #include "win.h"
  16 #include "hook.h"
  17 #include "debug.h"
  18 #include "toolhelp.h"
  19 #include "message.h"
  20
  21 WORD USER_HeapSel = 0;
  22
  23
  24 extern HTASK    TASK_GetNextTask(HTASK);
  25 extern BOOL32   MENU_SwitchTPWndTo(HTASK);
  26
  27 /***********************************************************************
  28  *           GetFreeSystemResources   (USER.284)
  29  */
  30 WORD GetFreeSystemResources( WORD resType )
  31 {
  32     int userPercent, gdiPercent;
  33
  34     switch(resType)
  35     {
  36     case GFSR_USERRESOURCES:
  37         userPercent = (int)LOCAL_CountFree( USER_HeapSel ) * 100 /
  38                                LOCAL_HeapSize( USER_HeapSel );
  39         gdiPercent  = 100;
  40         break;
  41
  42     case GFSR_GDIRESOURCES:
  43         gdiPercent  = (int)LOCAL_CountFree( GDI_HeapSel ) * 100 /
  44                                LOCAL_HeapSize( GDI_HeapSel );
  45         userPercent = 100;
  46         break;
  47
  48     case GFSR_SYSTEMRESOURCES:
  49         userPercent = (int)LOCAL_CountFree( USER_HeapSel ) * 100 /
  50                                LOCAL_HeapSize( USER_HeapSel );
  51         gdiPercent  = (int)LOCAL_CountFree( GDI_HeapSel ) * 100 /
  52                                LOCAL_HeapSize( GDI_HeapSel );
  53         break;
  54
  55     default:
  56         return 0;
  57     }
  58     return (WORD)MIN( userPercent, gdiPercent );
  59 }
  60
  61
  62 /***********************************************************************
  63  *           SystemHeapInfo   (TOOLHELP.71)
  64  */
  65 BOOL16 SystemHeapInfo( SYSHEAPINFO *pHeapInfo )
  66 {
  67     pHeapInfo->wUserFreePercent = GetFreeSystemResources( GFSR_USERRESOURCES );
  68     pHeapInfo->wGDIFreePercent  = GetFreeSystemResources( GFSR_GDIRESOURCES );
  69     pHeapInfo->hUserSegment = USER_HeapSel;
  70     pHeapInfo->hGDISegment  = GDI_HeapSel;
  71     return TRUE;
  72 }
  73
  74
  75 /***********************************************************************
  76  *           TimerCount   (TOOLHELP.80)
  77  */
  78 BOOL16 TimerCount( TIMERINFO *pTimerInfo )
  79 {
  80     /* FIXME
  81      * In standard mode, dwmsSinceStart = dwmsThisVM
  82      *
  83      * I tested this, under Windows in enhanced mode, and
  84      * if you never switch VM (ie start/stop DOS) these
  85      * values should be the same as well.
  86      *
  87      * Also, Wine should adjust for the hardware timer
  88      * to reduce the amount of error to ~1ms.
  89      * I can't be bothered, can you?
  90      */
  91     pTimerInfo->dwmsSinceStart = pTimerInfo->dwmsThisVM = GetTickCount();
  92     return TRUE;
  93 }
  94
  95
  96 /**********************************************************************
  97  *                                      USER_InitApp
  98  */
  99 int USER_InitApp(HINSTANCE hInstance)
 100 {
 101     int queueSize;
 102
 103       /* Create task message queue */
 104     queueSize = GetProfileInt( "windows", "DefaultQueueSize", 8 );
 105     if (!SetMessageQueue( queueSize )) return 0;
 106
 107     return 1;
 108 }
 109
 110 /**********************************************************************
 111  *                                      USER_AppExit
 112  */
 113 void USER_AppExit( HTASK16 hTask, HINSTANCE16 hInstance, HQUEUE16 hQueue )
 114 {
 115     /* FIXME: flush send messages (which are not implemented yet),
 116      *        empty clipboard if needed, maybe destroy menus (Windows
 117      *        only complains about them but does nothing);
 118      */
 119
 120     WND* desktop = WIN_GetDesktop();
 121
 122     /* Patch desktop window */
 123     if( desktop->hmemTaskQ == hQueue )
 124         desktop->hmemTaskQ = GetTaskQueue(TASK_GetNextTask(hTask));
 125
 126     /* Patch resident popup menu window */
 127     MENU_SwitchTPWndTo(0);
 128
 129     /* Nuke timers */
 130
 131     TIMER_RemoveQueueTimers( hQueue );
 132
 133     HOOK_FreeQueueHooks( hQueue );
 134
 135     QUEUE_SetDoomedQueue( hQueue );
 136
 137     /* Nuke orphaned windows */
 138
 139     WIN_DestroyQueueWindows( desktop->child, hQueue );
 140
 141     QUEUE_SetDoomedQueue( 0 );
 142
 143     /* Free the message queue */
 144
 145     QUEUE_DeleteMsgQueue( hQueue );
 146 }
 147