Return to iniedit.c CVS log

Up to [OS/2 SDKs] / pmsdk / samples / iniedit

Annotation of pmsdk/samples/iniedit/iniedit.c, revision 1.1

1.1     ! root        1: /******************************* Module Header ******************************\
        !             2: * Module Name: IniEdit.c
        !             3: *
        !             4: *
        !             5: * PM OS2.ini Editor
        !             6: *
        !             7: * Allows adding, deleting and modifying of os2.ini entries through PM
        !             8: * interface
        !             9: *
        !            10: *
        !            11: \***************************************************************************/
        !            12: 
        !            13: 
        !            14: #define LINT_ARGS                           // Include needed parts of PM
        !            15: #define INCL_WININPUT                       //    definitions
        !            16: #define INCL_WINSYS
        !            17: #define INCL_WINMESSAGEMGR
        !            18: #define INCL_WINBUTTONS
        !            19: #define INCL_WINPOINTERS
        !            20: #define INCL_WINHEAP
        !            21: #define INCL_WINSHELLDATA
        !            22: #define INCL_WINMENUS
        !            23: #define INCL_WINFRAMEMGR
        !            24: #define INCL_WINDIALOGS
        !            25: #define INCL_WINLISTBOXES
        !            26: #define INCL_WINENTRYFIELDS
        !            27: #define INCL_DOSMEMMGR
        !            28: #define INCL_WINSWITCHLIST
        !            29: #define INCL_DOSPROCESS
        !            30: #define INCL_GPIBITMAPS
        !            31: #define INCL_GPIREGIONS
        !            32: #define INCL_GPILCIDS
        !            33: #define INCL_GPIPRIMITIVES
        !            34: #define INCL_DEV
        !            35: 
        !            36: #include <string.h>
        !            37: #include <stdio.h>
        !            38: 
        !            39: #include <os2.h>
        !            40: 
        !            41: #include "IniEdit.h"
        !            42: 
        !            43: 
        !            44: /******************************* Constants **********************************/
        !            45: 
        !            46: #define STACK_SIZE            0x2000        // Stack size for second thread
        !            47: #define UPPER_SEGMENT_LIMIT   0xFD00        // Amount of Segment used
        !            48: 
        !            49: /******************************** Globals **********************************/
        !            50: 
        !            51: char szIniEdit[] = "IniEdit";               // App String Name
        !            52: 
        !            53: HAB       habIniEdit;                       // Handle Anchor Block
        !            54: HMQ       hmqIniEdit;                       // Handle Message Queue
        !            55: HWND      hwndIniEdit;                      // Main Client Window
        !            56: HWND      hwndIniEditFrame;                 // Frame Window
        !            57: HDC       hdcScreen;                        // DC for Client Window
        !            58: HPS       hpsScreen;                        // PS for Client Window
        !            59: 
        !            60: 
        !            61: USHORT    cAppNames = 0;                    // Count of App names in os2.ini
        !            62: USHORT    usShift = 0;                      // DosHugeAlloc segment offsets
        !            63: HWND      FocusWindow = (HWND)NULL;         // Focus of Dialog Box
        !            64: 
        !            65: USHORT    usFormat = APP_FORM;              // Current Display format
        !            66: USHORT    usPrintFormat = APP_FORM;         // Format for Printing
        !            67: USHORT    usLineHeight = 12;                // Current font Height
        !            68: HWND      hwndList = (HWND)NULL;            // Handle of Main ListBox
        !            69: HWND      hwndMenu = (HWND)NULL;            // Handle of Main Menu
        !            70: 
        !            71: PGROUPSTRUCT  pGroups;                      // Pointer to String Groups
        !            72: PPAIRSTRUCT   pPairsBase;                   // Pointer to Key-Value Pairs
        !            73: PPAIRSTRUCT   pPairsAlloc;                  // Pointer to next Avail Memory
        !            74: PBYTE         pPrintStack;                  // Pointer to Print Thread Stack
        !            75: 
        !            76: #define        HOLD_LEN 4096
        !            77: CHAR         achNames[HOLD_LEN];           // Array of Character from Query
        !            78: CHAR          szBuf[MAX_STRING_LEN];       // Character buffer for Pairs
        !            79: 
        !            80: 
        !            81: /***************************** Function Decls ******************************/
        !            82: 
        !            83: VOID    ProcessMenuItem( HWND hwnd, USHORT msg, MPARAM mp1, MPARAM mp2 );
        !            84: VOID    cdecl main( VOID );
        !            85: VOID    IniEditPaint( VOID );
        !            86: VOID    ReadIni( VOID );
        !            87: VOID    OldProfilePrint( VOID );
        !            88: VOID    UpdateListBox( BOOL fRead, USHORT usForm );
        !            89: 
        !            90: MRESULT CALLBACK IniEditWndProc(HWND, USHORT, MPARAM, MPARAM);
        !            91: 
        !            92: 
        !            93: /***************************** Function Header *****************************\
        !            94: *
        !            95: * main
        !            96: *
        !            97: *
        !            98: * Do initialization then do a message loop
        !            99: *
        !           100: \***************************************************************************/
        !           101: 
        !           102: VOID cdecl main()
        !           103: {
        !           104: 
        !           105:     QMSG         qmsg;                      // Current Queue Message
        !           106:     ULONG        fcf;                       // Frame Control Flags
        !           107:     SIZEL        sizel;                     // Size of PS
        !           108:     RECTL        rclWindow;                 // Size Rect for ListBox Window
        !           109:     SEL          sel;                       // Selector of allocated segments
        !           110:     SWCNTRL      swcntrl;                   // Switch Control Block
        !           111:     FONTMETRICS  fmetrics;                  // FontMetrics of current font
        !           112: 
        !           113: 
        !           114:     /*** Set up and Initialization ***/
        !           115: 
        !           116:     /* Initialize the anchor block handle */
        !           117:     habIniEdit = WinInitialize(NULL);
        !           118: 
        !           119:     /* Create the message queue */
        !           120:     hmqIniEdit = WinCreateMsgQueue(habIniEdit, 0);
        !           121: 
        !           122:     /* Register the window class for the IniEdit window */
        !           123:     WinRegisterClass(habIniEdit, (PCH)szIniEdit, IniEditWndProc,
        !           124:             CS_SIZEREDRAW, 0);
        !           125: 
        !           126:     /* Create the window for IniEdit */
        !           127:     fcf = FCF_TITLEBAR | FCF_MINMAX | FCF_SYSMENU | FCF_SIZEBORDER | FCF_MENU
        !           128:         | FCF_SHELLPOSITION | FCF_ACCELTABLE | FCF_ICON;
        !           129: 
        !           130:     hwndIniEditFrame = WinCreateStdWindow( HWND_DESKTOP, WS_VISIBLE,
        !           131:         (PVOID)&fcf, (PSZ)szIniEdit, (PSZ)szIniEdit, WS_VISIBLE,
        !           132:         (HMODULE)NULL, IDI_INIEDIT, (PHWND)&hwndIniEdit);
        !           133: 
        !           134:     /* Create a DC for the IniEdit window */
        !           135:     hdcScreen = WinOpenWindowDC(hwndIniEdit);
        !           136: 
        !           137:     /* also create a screen PS */
        !           138: 
        !           139:     sizel.cx= 0L;   // To use the default screen page size.
        !           140:     sizel.cy= 0L;
        !           141: 
        !           142:     if( (hpsScreen = GpiCreatePS( habIniEdit, hdcScreen, &sizel,
        !           143:             (PU_PELS | GPIF_DEFAULT | GPIT_MICRO | GPIA_ASSOC ))) == (HPS)NULL )
        !           144:         {
        !           145:                ;
        !           146:         }
        !           147: 
        !           148: 
        !           149:     /* Initially set the keyboard focus to us */
        !           150:     WinSetFocus(HWND_DESKTOP, hwndIniEdit);
        !           151: 
        !           152:     /* get the font size */
        !           153:     GpiQueryFontMetrics( hpsScreen, (LONG)sizeof( FONTMETRICS ), &fmetrics );
        !           154:     usLineHeight = (USHORT)(fmetrics.lMaxDescender + fmetrics.lMaxBaselineExt);
        !           155: 
        !           156:     /* this menu handle is often used */
        !           157:     hwndMenu = WinWindowFromID( hwndIniEditFrame, FID_MENU );
        !           158: 
        !           159:     /* add program to switch list */
        !           160:     swcntrl.hwnd             = hwndIniEditFrame;
        !           161:     swcntrl.hwndIcon         = NULL;
        !           162:     swcntrl.hprog            = NULL;
        !           163:     swcntrl.idProcess        = NULL;
        !           164:     swcntrl.idSession        = NULL;
        !           165:     swcntrl.uchVisibility    = NULL;
        !           166:     swcntrl.fbJump           = NULL;
        !           167:     strcpy( swcntrl.szSwtitle, szIniEdit);
        !           168:     swcntrl.fReserved        = NULL;
        !           169: 
        !           170:     WinAddSwitchEntry( &swcntrl );
        !           171: 
        !           172:     /* Create main list box in main window */
        !           173:     WinQueryWindowRect( hwndIniEdit, &rclWindow);
        !           174:     rclWindow.yTop -= usLineHeight;
        !           175:     hwndList = WinCreateWindow( hwndIniEdit,            // parent
        !           176:                                 WC_LISTBOX,             // class
        !           177:                                 (PSZ)"Scroll",          // name
        !           178:                                 LS_NOADJUSTPOS,         // style
        !           179:                                 0, 0,                   // position
        !           180:                                 (USHORT)rclWindow.xRight,
        !           181:                                 (USHORT)rclWindow.yTop,
        !           182:                                 hwndIniEditFrame,       // Owner
        !           183:                                 HWND_TOP,               // InsertBehind
        !           184:                                 IDI_LIST,               // ID
        !           185:                                 (PVOID)NULL,            // pCtlData,
        !           186:                                 (PVOID)NULL);
        !           187: 
        !           188: 
        !           189:     /*** Memory Allocation ***/
        !           190: 
        !           191:     /* Alloc the needed space for the groups */
        !           192:     if( DosAllocSeg( 32000, &sel, 0) )
        !           193:         ErrMessage( "main: DosAlloc for pGroup failed" );
        !           194:     pGroups = MAKEP( sel, 0);
        !           195: 
        !           196:     if( DosAllocHuge( 4, 0, &sel, 0, 0) )
        !           197:         ErrMessage( "main: DosAlloc for pPairs failed" );
        !           198:     pPairsAlloc = pPairsBase = MAKEP( sel, 0);
        !           199: 
        !           200:     /* create a stack for second thread */
        !           201:     if( DosAllocSeg( STACK_SIZE, &sel, 0) )
        !           202:         ErrMessage( "main: DosAlloc for Stack failed" );
        !           203:     pPrintStack = MAKEP( sel, 0);
        !           204: 
        !           205:     DosGetHugeShift( &usShift );
        !           206: 
        !           207:     /* read in os2.ini and fill in list box */
        !           208:     UpdateListBox( TRUE, APP_FORM );
        !           209: 
        !           210:     WinShowWindow( hwndList, TRUE );
        !           211: 
        !           212:     /* Process messages for the window */
        !           213:     while ( WinGetMsg(habIniEdit, (PQMSG)&qmsg, (HWND)NULL, 0, 0 ) )
        !           214:         {
        !           215: 
        !           216:         /* Dispatch the message */
        !           217:         WinDispatchMsg(habIniEdit, (PQMSG)&qmsg);
        !           218:         }
        !           219: 
        !           220: 
        !           221:     /*** CleanUp ***/
        !           222: 
        !           223:     /* Destroy the IniEdit window and message queue */
        !           224:     GpiDestroyPS( hpsScreen );
        !           225:     WinDestroyWindow(hwndIniEditFrame);
        !           226:     WinDestroyMsgQueue(hmqIniEdit);
        !           227: 
        !           228:     /* Exit PM */
        !           229:     WinTerminate( habIniEdit );
        !           230:     DosExit( EXIT_PROCESS, 0 );
        !           231: 
        !           232: }  /* main */
        !           233: 
        !           234: 
        !           235: /****************************** Function Header ****************************\
        !           236: *
        !           237: * ReadIni
        !           238: *
        !           239: *
        !           240: * Reads in OS2.ini
        !           241: *
        !           242: \***************************************************************************/
        !           243: 
        !           244: VOID ReadIni()
        !           245: {
        !           246: //    CHAR      achNames[HOLD_LEN];           // Array of Character from Query
        !           247:     USHORT    cchNames;                     // Count of Character from Query
        !           248:     USHORT    Index[MAX_APP_NAMES];         // Index of Names into achNames
        !           249:     USHORT    cPairs;                       // Count of pairs in current AppName
        !           250:     INT       i,j;                          // Loop Counters
        !           251: 
        !           252: 
        !           253:     /* Reset Count of App Names */
        !           254:     cAppNames = 0;
        !           255: 
        !           256:     /* Reset memory available pointer to Base */
        !           257:     pPairsAlloc = pPairsBase;
        !           258: 
        !           259:     /* Determine number of characters in app Names Strings */
        !           260:     WinQueryProfileSize( habIniEdit, NULL, NULL, &cchNames );
        !           261: 
        !           262:     /* Read in the App Name strings */
        !           263:     WinQueryProfileString( habIniEdit, NULL, NULL, " ", achNames, cchNames );
        !           264: 
        !           265:     /*** Find the starting index of each App ***/
        !           266: 
        !           267:     /* step through each string in set of app characters
        !           268:      * adding length of current string to find begining of next string
        !           269:      * also store each App Name into szAppName element of Group
        !           270:      */
        !           271:     for( i=0; i<cchNames; i += (strlen(pGroups[cAppNames-1].szAppName)+1) )
        !           272:         {
        !           273:         if( achNames[i] != (char)0 )
        !           274:             {
        !           275:             strcpy( pGroups[cAppNames++].szAppName, &achNames[i]);
        !           276:             }  /* if */
        !           277:         else
        !           278:             if( achNames[i+1] == (char)0 )
        !           279:                 break;
        !           280:         }  /* for */
        !           281: 
        !           282: 
        !           283:     /*** Read elements of each App Name ***/
        !           284:     for( i=0; i<cAppNames; i++ )
        !           285:         {
        !           286:         /* Get number of Character Associated with App Name */
        !           287:         WinQueryProfileSize( habIniEdit, pGroups[i].szAppName, NULL, &cchNames );
        !           288: 
        !           289:         /* Enumerate all KeyNames for this app name */
        !           290:         WinQueryProfileString( habIniEdit, pGroups[i].szAppName, NULL, " ", achNames, HOLD_LEN );
        !           291: 
        !           292:         /* Count the number of key Names */
        !           293:         cPairs = 0;
        !           294:         for( j=0; j<cchNames; j++)
        !           295:             if( achNames[j] != (CHAR)0 )
        !           296:                 {
        !           297:                 Index[cPairs++] = j;
        !           298:                 j += strlen( &achNames[j] );
        !           299:                 }
        !           300: 
        !           301:         pGroups[i].cKeys = cPairs;
        !           302: 
        !           303:         /* Allocate the number of pair structures for the current group */
        !           304:         pGroups[i].pPairs = pPairsAlloc;
        !           305: 
        !           306:         pPairsAlloc += sizeof(PAIRSTRUCT)*cPairs;
        !           307: 
        !           308:         /* Step to next segment if near end of current segment */
        !           309:         if( LOUSHORT(pPairsAlloc) > UPPER_SEGMENT_LIMIT)
        !           310:             {
        !           311:             pPairsAlloc = MAKEP( (HIUSHORT(pPairsAlloc)+(1<<usShift)), 0);
        !           312:             }
        !           313: 
        !           314:         /* Store the KeyName into the pair structure */
        !           315:         for( j=0; j<cPairs; j++ )
        !           316:             {
        !           317:             strcpy( pGroups[i].pPairs[j].szKey, &achNames[Index[j]] );
        !           318: 
        !           319:             /* store the key value */
        !           320:             WinQueryProfileString( habIniEdit, pGroups[i].szAppName,
        !           321:                     pGroups[i].pPairs[j].szKey, " ",
        !           322:                     pGroups[i].pPairs[j].szValue, MAX_STRING_LEN );
        !           323: 
        !           324:             }
        !           325:         }  /* each App Name */
        !           326: 
        !           327: }  /* ReadIni */
        !           328: 
        !           329: 
        !           330: /****************************** Function Header ****************************\
        !           331: *
        !           332: * ProcessMenuItem
        !           333: *
        !           334: *
        !           335: * Act on the corresponding Menu Item Choosen
        !           336: *
        !           337: \***************************************************************************/
        !           338: 
        !           339: VOID ProcessMenuItem( HWND hwnd, USHORT msg, MPARAM mp1, MPARAM mp2 )
        !           340: {
        !           341:     TID  Tid;                               // ID of new thread; Not used
        !           342: 
        !           343: 
        !           344:     /* Switch on the Menu Item choosen */
        !           345:     switch( LOUSHORT( mp1 ) )
        !           346:         {
        !           347:         case IDMI_SHOW_ALL:
        !           348:         case IDMI_SHOW_APPNAMES:
        !           349:             usFormat = (LOUSHORT(mp1) == IDMI_SHOW_ALL);
        !           350:             UpdateListBox( FALSE, usFormat ? ALL_FORM : APP_FORM );
        !           351:             break;
        !           352: 
        !           353:         case IDM_SEARCH:
        !           354:             WinDlgBox(HWND_DESKTOP, hwndIniEditFrame, (PFNWP)SearchWndProc,
        !           355:                             (HMODULE)NULL, IDD_SEARCH, (PVOID)NULL);
        !           356:             break;
        !           357: 
        !           358:         case IDMI_EDIT_DELETE_KEY:
        !           359:             WinDlgBox(HWND_DESKTOP, hwndIniEditFrame, (PFNWP)DelKeyWndProc,
        !           360:                             (HMODULE)NULL, IDD_DEL_KEY, (PVOID)NULL);
        !           361:             UpdateListBox( TRUE, usFormat ? ALL_FORM : APP_FORM );
        !           362:             break;
        !           363: 
        !           364:         case IDMI_EDIT_DELETE_APP:
        !           365:             WinDlgBox(HWND_DESKTOP, hwndIniEditFrame, (PFNWP)DelAppWndProc,
        !           366:                             (HMODULE)NULL, IDD_DEL_APP, (PVOID)NULL);
        !           367:             UpdateListBox( TRUE, usFormat ? ALL_FORM : APP_FORM );
        !           368:             break;
        !           369: 
        !           370:         case IDMI_EDIT_ADD_KEY:
        !           371:             WinDlgBox(HWND_DESKTOP, hwndIniEditFrame, (PFNWP)AddKeyWndProc,
        !           372:                             (HMODULE)NULL, IDD_ADD_KEY, (PVOID)NULL);
        !           373:             UpdateListBox( TRUE, usFormat ? ALL_FORM : APP_FORM );
        !           374:             break;
        !           375: 
        !           376:         case IDMI_EDIT_CHANGE:
        !           377:             WinDlgBox(HWND_DESKTOP, hwndIniEditFrame, (PFNWP)ChangeKeyWndProc,
        !           378:                             (HMODULE)NULL, IDD_CHANGE_KEY, (PVOID)NULL);
        !           379:             UpdateListBox( TRUE, usFormat ? ALL_FORM : APP_FORM );
        !           380:             break;
        !           381: 
        !           382:         case IDMI_PRINT_ALL:
        !           383:         case IDMI_PRINT_APP:
        !           384:             usPrintFormat = LOUSHORT(mp1) == IDMI_PRINT_ALL ? ALL_FORM : APP_FORM;
        !           385:             if( DosCreateThread( PrintThread, &Tid, ((PBYTE)(pPrintStack)+STACK_SIZE) ) )
        !           386:                 ErrMessage("StartThread2: DosCreateThread Failed");
        !           387:             break;
        !           388: 
        !           389:         case IDMI_REFRESH:
        !           390:             UpdateListBox( TRUE, usFormat );
        !           391:             break;
        !           392: 
        !           393:         case IDMI_ABOUT:
        !           394:             WinDlgBox(HWND_DESKTOP, hwndIniEditFrame, (PFNWP)DelAppWndProc,
        !           395:                             (HMODULE)NULL, IDD_ABOUT, (PVOID)NULL);
        !           396:             break;
        !           397: 
        !           398:         default:
        !           399:             WinDefWindowProc(hwnd, msg, mp1, mp2);
        !           400: 
        !           401:             break;
        !           402: 
        !           403:         }  /* switch */
        !           404: 
        !           405: }  /* ProcessMenuItem */
        !           406: 
        !           407: 
        !           408: /****************************** Function Header ****************************\
        !           409: *
        !           410: * UpdateListBox
        !           411: *
        !           412: *
        !           413: * Update Main List Box to correct state
        !           414: *    May Also:
        !           415: *    - Check correct menu item
        !           416: *    - Repaint title of List Box
        !           417: *    - ReRead os2.ini file
        !           418: *
        !           419: \***************************************************************************/
        !           420: 
        !           421: VOID UpdateListBox( BOOL fReadIni, USHORT usNewFormat )
        !           422: {
        !           423:     INT       i,j;                          // Loop Counters
        !           424:     USHORT    Index;                        // Index into ListBox
        !           425:     static    USHORT    usLastFormat = -1;  // Last displayed format
        !           426: 
        !           427: 
        !           428:     /* Check the correct item if format changed */
        !           429:     if( usLastFormat != usNewFormat )
        !           430:         {
        !           431:         WinSendMsg( hwndMenu, MM_SETITEMATTR, MPFROM2SHORT(IDMI_SHOW_ALL, TRUE),
        !           432:                 MPFROM2SHORT(MIA_CHECKED, usFormat ? MIA_CHECKED:FALSE));
        !           433: 
        !           434:         WinSendMsg( hwndMenu, MM_SETITEMATTR, MPFROM2SHORT(IDMI_SHOW_APPNAMES, TRUE),
        !           435:                 MPFROM2SHORT(MIA_CHECKED, (!usFormat) ? MIA_CHECKED:FALSE));
        !           436:         usLastFormat = usNewFormat;
        !           437: 
        !           438:         WinSendMsg( hwndIniEdit, WM_PAINT, (MPARAM)NULL, (MPARAM)NULL );
        !           439:         }
        !           440: 
        !           441: 
        !           442:     /* Turn off list box updates */
        !           443:     WinEnableWindowUpdate( hwndList, FALSE );
        !           444: 
        !           445:     /* Remove all items from list box */
        !           446:     WinSendMsg( hwndList, LM_DELETEALL, (MPARAM)0, (MPARAM)0 );
        !           447: 
        !           448:     /* ReRead os2.ini if needed */
        !           449:     if( fReadIni )
        !           450:         ReadIni();
        !           451: 
        !           452:     /* Add elements to listbox */
        !           453:     if( usNewFormat == ALL_FORM )
        !           454:         {
        !           455: 
        !           456:         /* Insert all app Names */
        !           457:         for( i=0; i<cAppNames; i++ )
        !           458:             {
        !           459:             Index = (USHORT)WinSendMsg( hwndList, LM_INSERTITEM,
        !           460:                     MPFROM2SHORT(LIT_END, NULL),
        !           461:                     MPFROMP(pGroups[i].szAppName) );
        !           462: 
        !           463:             WinSendMsg( hwndList, LM_SETITEMHANDLE,
        !           464:                     MPFROMSHORT(Index),
        !           465:                     MPFROMSHORT(i) );
        !           466: 
        !           467:             /* Insert Key Value Pairs for App Name */
        !           468:             for( j=0; j<pGroups[i].cKeys; j++ )
        !           469:                 {
        !           470:                 sprintf( szBuf, "     %s: %s", pGroups[i].pPairs[j].szKey,
        !           471:                         pGroups[i].pPairs[j].szValue );
        !           472:                 Index = (USHORT)WinSendMsg( hwndList, LM_INSERTITEM,
        !           473:                         MPFROM2SHORT(LIT_END, NULL),
        !           474:                         MPFROMP(szBuf) );
        !           475: 
        !           476:                 WinSendMsg( hwndList, LM_SETITEMHANDLE,
        !           477:                         MPFROMSHORT(Index),
        !           478:                         MPFROM2SHORT(i,j) );
        !           479: 
        !           480:                 }
        !           481:             }
        !           482:         }  /* if */
        !           483:     else
        !           484:         {
        !           485:         /* Insert all app Names */
        !           486:         for( i=0; i<cAppNames; i++ )
        !           487:             {
        !           488:             WinSendMsg( hwndList, LM_INSERTITEM,
        !           489:                     MPFROM2SHORT(LIT_SORTASCENDING, NULL),
        !           490:                     MPFROMP(pGroups[i].szAppName) );
        !           491:             }
        !           492:         }  /* else */
        !           493: 
        !           494:     /* Do All repainting of ListBox */
        !           495:     WinEnableWindowUpdate( hwndList, TRUE );
        !           496: 
        !           497: }  /* UpdateListBox */
        !           498: 
        !           499: 
        !           500: /****************************** Function Header ****************************\
        !           501: *
        !           502: * IniEditPaint
        !           503: *
        !           504: *
        !           505: * Window Paint Routine
        !           506: *
        !           507: \***************************************************************************/
        !           508: 
        !           509: VOID IniEditPaint()
        !           510: {
        !           511:     RECTL     rclWindow;                    // Current size of Main Window
        !           512:     RECTL     rclBlit;                      // Size of Area to Blank for Title
        !           513:     CHAR      szShowMode[MAX_STRING_LEN];   // String Description of mode
        !           514: 
        !           515: 
        !           516:     /* Get the size of the whole window */
        !           517:     WinQueryWindowRect( hwndIniEdit, &rclWindow );
        !           518: 
        !           519:     /* Paint the window Title Area */
        !           520:     rclBlit = rclWindow;
        !           521:     rclBlit.yBottom = rclBlit.yTop - usLineHeight;
        !           522: 
        !           523:     GpiBitBlt( hpsScreen, (HPS)NULL, 2L, (PPOINTL)&rclBlit, ROP_ONE, (LONG)NULL);
        !           524: 
        !           525:     /* Write the Title */
        !           526:     strcpy( szShowMode, usFormat == APP_FORM ? SZAPP : SZALL );
        !           527:     WinDrawText( hpsScreen, strlen(szShowMode), szShowMode, &rclWindow,
        !           528:             CLR_BLUE, CLR_WHITE, DT_CENTER|DT_TOP);
        !           529: 
        !           530: }  /* IniEditPaint */
        !           531: 
        !           532: 
        !           533: /****************************** Function Header ****************************\
        !           534: *
        !           535: * IniEditWndProc
        !           536: *
        !           537: *
        !           538: * Window Proc for IniEdit
        !           539: *
        !           540: \***************************************************************************/
        !           541: 
        !           542: MRESULT CALLBACK IniEditWndProc(HWND hwnd, USHORT msg, MPARAM mp1, MPARAM mp2)
        !           543: {
        !           544: 
        !           545:     CHAR      szBuf[MAX_STRING_LEN];        // Input character Buffer
        !           546:     CHAR      szBuf2[MAX_STRING_LEN];       // Second Input Character Buffer
        !           547:     USHORT    Index;                        // Index of Current ListBox Item
        !           548:     USHORT    TopIndex;                     // Current Top Item in ListBox
        !           549:     ULONG     Handle;                       // ListBox Item Handle Info
        !           550:     HWND      hwndDialog;                   // Window handle of Dailog Box
        !           551:     HWND      hwndText;                     // Handle of current text window
        !           552:     HPS       hpsPaint;                     // PS to Paint
        !           553:     RECTL     rclPaint;                     // Rect in hpsPaint to Paint
        !           554:     BOOL      fScroll = FALSE;              // Scroll List Box Flag
        !           555: 
        !           556: 
        !           557:     /* Switch on message being processed */
        !           558:     switch( msg )
        !           559:         {
        !           560:         case WM_PAINT:
        !           561:             /* Paint the IniEdit window portion not covered by List Box */
        !           562:             hpsPaint = WinBeginPaint(hwnd, (HPS)NULL, &rclPaint);
        !           563:             IniEditPaint();
        !           564:             WinEndPaint(hpsPaint);
        !           565:             break;
        !           566: 
        !           567:         case WM_COMMAND:
        !           568:             /* If menu item call Processing Routine */
        !           569:             if( LOUSHORT( mp2 ) == CMDSRC_MENU )
        !           570:                 ProcessMenuItem( hwnd, msg, mp1, mp2 );
        !           571: 
        !           572:             /* If accelorator call appropriate routine */
        !           573:             if( LOUSHORT( mp2 ) == CMDSRC_ACCELERATOR )
        !           574:                 {
        !           575:                 switch( LOUSHORT( mp1 ) )
        !           576:                     {
        !           577:                     case IDDI_SEARCH_NEXT:
        !           578:                         FindNext();
        !           579:                         break;
        !           580:                     }
        !           581:                 }
        !           582:             break;
        !           583: 
        !           584:         case WM_SIZE:
        !           585:             /* Put the list box in the correct location of the window */
        !           586:             if( hwndList != (HWND)NULL )
        !           587:                 WinSetWindowPos( hwndList, HWND_TOP, 0, 0,
        !           588:                         SHORT1FROMMP(mp2), SHORT2FROMMP(mp2)-usLineHeight, SWP_SIZE );
        !           589:             break;
        !           590: 
        !           591:         case WM_CONTROL:
        !           592:             /* Switch on Control activated */
        !           593:             switch( SHORT1FROMMP(mp1) )
        !           594:                 {
        !           595: 
        !           596:                 /*** Process List Box Activity ***/
        !           597:                 case IDI_LIST:
        !           598:                     /* was it a double click? */
        !           599:                     if( SHORT2FROMMP(mp1) == LN_ENTER )
        !           600:                         {
        !           601:                         /* get the item clicked on */
        !           602:                         Index = (USHORT)WinSendMsg( hwndList, LM_QUERYSELECTION,
        !           603:                                 (MPARAM)0, (MPARAM)0 );
        !           604: 
        !           605:                         /* grab its text */
        !           606:                         WinSendMsg( hwndList, LM_QUERYITEMTEXT,
        !           607:                                 MPFROM2SHORT(Index, MAX_STRING_LEN), MPFROMP(szBuf) );
        !           608: 
        !           609:                         /* if in APP form toggle to ALL form */
        !           610:                         if( usFormat == APP_FORM )
        !           611:                             {
        !           612:                             usFormat = ALL_FORM;
        !           613:                             fScroll = TRUE;
        !           614:                             }
        !           615:                         else
        !           616:                             {
        !           617:                             /* if an App name was choosen then go to APP form */
        !           618:                             if( szBuf[0] != ' ')
        !           619:                                 {
        !           620:                                 usFormat = APP_FORM;
        !           621:                                 fScroll = TRUE;
        !           622:                                 }
        !           623:                             else
        !           624:                                 /* A Key Value Pair was double clicked
        !           625:                                  * allow editing of key Value
        !           626:                                  */
        !           627:                                 {
        !           628: 
        !           629:                                 FocusWindow = (HWND)1;
        !           630: 
        !           631:                                 hwndDialog = WinLoadDlg( HWND_DESKTOP,
        !           632:                                     hwndIniEditFrame, ChangeKeyWndProc,
        !           633:                                     (HMODULE)NULL, IDD_CHANGE_KEY, NULL);
        !           634: 
        !           635:                                 Handle = (ULONG)WinSendMsg( hwndList, LM_QUERYITEMHANDLE,
        !           636:                                     MPFROMSHORT(Index), (MPARAM)NULL );
        !           637: 
        !           638:                                 hwndText = WinWindowFromID( hwndDialog, IDDI_CHANGE_KEY_TEXT_APP );
        !           639:                                 WinSetWindowText( hwndText, pGroups[LOUSHORT(Handle)].szAppName);
        !           640: 
        !           641:                                 /* note bug in PMWin GPs if full segment */
        !           642:                                 hwndText = WinWindowFromID( hwndDialog, IDDI_CHANGE_KEY_TEXT_KEY );
        !           643:                                 strcpy( szBuf2, pGroups[LOUSHORT(Handle)].pPairs[HIUSHORT(Handle)].szKey );
        !           644:                                 WinSetWindowText( hwndText, szBuf2 );
        !           645: 
        !           646:                                 hwndText = WinWindowFromID( hwndDialog, IDDI_CHANGE_KEY_TEXT_VAL );
        !           647:                                 strcpy( szBuf2, pGroups[LOUSHORT(Handle)].pPairs[HIUSHORT(Handle)].szValue );
        !           648:                                 WinSetWindowText( hwndText, szBuf2 );
        !           649: 
        !           650:                                 WinPostMsg( hwndText, EM_SETSEL,
        !           651:                                         MPFROM2SHORT(0, strlen(szBuf2)), (MPARAM)0 );
        !           652: 
        !           653:                                 if( WinProcessDlg( hwndDialog ) == IDDI_CHANGE_KEY_OK )
        !           654:                                     {
        !           655:                                     TopIndex = (USHORT)WinSendMsg( hwndList, LM_QUERYTOPINDEX,
        !           656:                                          (MPARAM)NULL, (MPARAM)NULL );
        !           657: 
        !           658:                                     UpdateListBox( TRUE, usFormat );
        !           659: 
        !           660:                                     /* scroll to top */
        !           661:                                     WinSendMsg( hwndList, LM_SETTOPINDEX,
        !           662:                                          MPFROMSHORT(TopIndex), (MPARAM)NULL );
        !           663: 
        !           664:                                     /* make the item selected */
        !           665:                                     WinSendMsg( hwndList, LM_SELECTITEM,
        !           666:                                             MPFROMSHORT(Index), MPFROMSHORT(TRUE) );
        !           667: 
        !           668:                                     /* make selected */
        !           669:                                     }
        !           670: 
        !           671:                                 WinDestroyWindow( hwndDialog );
        !           672:                                 }
        !           673:                             }
        !           674: 
        !           675:                         /* Make the double clicked item selected in new form */
        !           676:                         if( fScroll )
        !           677:                             {
        !           678:                             /* put in correct form */
        !           679:                             UpdateListBox( FALSE, usFormat );
        !           680: 
        !           681:                             /* get the index of the item clicked on */
        !           682:                             Index = (USHORT)WinSendMsg( hwndList, LM_SEARCHSTRING,
        !           683:                                     MPFROM2SHORT(LSS_SUBSTRING, LIT_FIRST),
        !           684:                                     MPFROMP(szBuf) );
        !           685: 
        !           686:                             /* scroll that item to the top */
        !           687:                             WinSendMsg( hwndList, LM_SETTOPINDEX,
        !           688:                                     MPFROMSHORT(Index), (MPARAM)NULL );
        !           689: 
        !           690:                             /* make the item selected */
        !           691:                             WinSendMsg( hwndList, LM_SELECTITEM,
        !           692:                                     MPFROMSHORT(Index), MPFROMSHORT(TRUE) );
        !           693:                             }
        !           694:                         }  /* if ENTER */
        !           695:                 }
        !           696:             break;
        !           697: 
        !           698:         default:
        !           699:             return WinDefWindowProc(hwnd, msg, mp1, mp2);
        !           700:             break;
        !           701:         }
        !           702: 
        !           703:     return 0L;
        !           704: 
        !           705: }  /* IniEditWndProc */

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.