home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / SLIDCO.ZIP / SLIDCOM.C < prev    next >
C/C++ Source or Header  |  1993-02-02  |  8KB  |  306 lines
  1. #define INCL_PM
  2. #define INCL_DOS
  3. #define  INCL_WINSYS
  4. #define INCL_DOSDEVIOCTL
  5.  
  6. #include <os2.h>
  7. #include "protype.h"
  8. #include "sliddlg.h"
  9.  
  10. #define RETURN_SUCCESS      0            /* successful return in DosExit */
  11. #define RETURN_ERROR        1            /* error return in DosExit      */
  12. #define BEEP_WARN_FREQ      60           /* frequency of warning beep    */
  13. #define BEEP_WARN_DUR      100           /* duration of warning beep     */
  14.  
  15. CHAR PrintBuf[80];
  16.  
  17. HAB           hab;
  18. HMQ           hmq;
  19. HWND           hwndMainFrame;
  20. HWND           hwndMain;
  21. HWND           hwndDlg;
  22. QMSG           qmsg;
  23.  
  24. HFILE         HandleComm;
  25.  
  26. CHAR szClientClass1[MAXNAMEL];
  27.  
  28. ULONG flFrameFlags = FCF_TITLEBAR | FCF_SYSMENU      |
  29.                      FCF_SIZEBORDER | FCF_MINMAX |
  30.                      FCF_SHELLPOSITION | FCF_TASKLIST |
  31.                             FCF_MENU;
  32.  
  33. /****************************************************************************
  34.                       M A I N
  35. ****************************************************************************/
  36.  
  37. int main(VOID)
  38. {
  39.    ULONG ulCtlData;      /* frame control data */
  40.  
  41.    hab = WinInitialize(0);
  42.    if(!hab)
  43.    {
  44.       DosBeep(BEEP_WARN_FREQ, BEEP_WARN_DUR);
  45.       return(RETURN_ERROR);
  46.    }
  47.  
  48.    hmq = WinCreateMsgQueue(hab, 0);
  49.    if(!hmq)
  50.    {
  51.       DosBeep(BEEP_WARN_FREQ, BEEP_WARN_DUR);
  52.       WinTerminate(hab);
  53.       return(RETURN_ERROR);
  54.    }
  55.  
  56.  
  57.     if ( DosExitList(EXLST_ADD, (PFNEXITLIST)ExitProc) )
  58.         {
  59.       MessageBox(HWND_DESKTOP,
  60.                    IDMSG_CANNOTLOADEXITLIST,
  61.                    MB_OK | MB_ERROR,
  62.                    TRUE);
  63.       
  64.         DosExit(EXIT_PROCESS, RETURN_ERROR);
  65.         }
  66.  
  67.  
  68.     if( !WinLoadString(hab, (HMODULE)0, IDS_CLIENT1CLASS,
  69.                               MAXNAMEL, szClientClass1))
  70.        {
  71.       MessageBox(HWND_DESKTOP,
  72.                    IDMSG_TEST,
  73.                    MB_OK | MB_ERROR,
  74.                    TRUE);
  75.  
  76.        return (0);
  77.     }
  78.     
  79.  
  80.     if ( !WinRegisterClass ( hab,
  81.                     (PSZ)szClientClass1,
  82.                     (PFNWP)ClientWndProc,
  83.                     CS_SIZEREDRAW | CS_CLIPCHILDREN,
  84.                     0) )
  85.        {
  86.       MessageBox(HWND_DESKTOP,
  87.                    IDMSG_TEST,
  88.                    MB_OK | MB_ERROR,
  89.                    TRUE);
  90.  
  91.        return (0);
  92.        }
  93.    
  94.    ulCtlData = FCF_STANDARD;
  95.  
  96.  
  97.     hwndMainFrame = WinCreateStdWindow( HWND_DESKTOP,
  98.                                    WS_VISIBLE,
  99.                                    (PVOID)&ulCtlData,
  100.                                    (PSZ)szClientClass1,
  101.                                    (PSZ)NULL,
  102.                                    WS_VISIBLE,
  103.                                    (HMODULE)NULL,
  104.                                    IDR_MAIN_MENU_WIN1,
  105.                                    (PHWND)&hwndMain);
  106.     if (hwndMainFrame == 0)
  107.         {
  108.     
  109.       MessageBox(HWND_DESKTOP,
  110.                    IDMSG_TEST,
  111.                    MB_OK | MB_ERROR,
  112.                    TRUE);
  113.         return(0);
  114.         }
  115.    
  116.    WinSetWindowText(hwndMainFrame, szClientClass1);
  117.  
  118.    HandleComm = 0;
  119.  
  120.    InitTermDriver();
  121.  
  122.    while(WinGetMsg(hmq, (PQMSG)&qmsg, 0, 0, 0))
  123.        WinDispatchMsg(hmq, (PQMSG)&qmsg);
  124.  
  125.     WinDestroyMsgQueue(hmq);
  126.     WinTerminate(hab);
  127.     return 0;
  128.  
  129. }
  130.  
  131. /****************************************************************************
  132.  
  133. ****************************************************************************/
  134. MRESULT EXPENTRY ClientWndProc (HWND hwnd,USHORT msg, MPARAM mp1 ,MPARAM mp2)
  135. {
  136.  
  137.     switch (msg)
  138.         {
  139.         case WM_PAINT:
  140.                MainPaint(CLR_BLUE,hwnd);
  141.                break;
  142.         
  143.       case WM_COMMAND:
  144.             MainCommand(mp1, mp2);
  145.                break;
  146.  
  147.         default:
  148.             return(WinDefWindowProc(hwnd, msg, mp1, mp2));
  149.             break;
  150.  
  151.    }
  152.    return (MRESULT)0;
  153. }
  154.  
  155. /****************************************************************************
  156.  
  157. ****************************************************************************/
  158. VOID MainPaint(ULONG color, HWND hwnd)
  159. {
  160.     RECTL rclUpdate;
  161.     HPS hps;
  162.  
  163.     hps = WinBeginPaint(hwnd, NULLHANDLE, (PRECTL)&rclUpdate);
  164.  
  165.     WinFillRect(hps, (PRECTL)&rclUpdate, color);
  166.  
  167.     WinEndPaint(hps);
  168. } 
  169.  
  170.  
  171. /*****************************************************************************
  172.  
  173. *****************************************************************************/
  174.  
  175. VOID APIENTRY ExitProc(USHORT usTermCode)
  176. {
  177.  
  178.     WinDestroyMsgQueue(hmq);
  179.  
  180.     WinTerminate(hab);
  181.  
  182.     DosExitList(EXLST_EXIT, (PFNEXITLIST)ExitProc);
  183.  
  184.     usTermCode;
  185. } 
  186.  
  187.  
  188. /*****************************************************************************
  189. *****************************************************************************/
  190. SHORT MessageBox(HWND hwndOwner, SHORT idMsg, SHORT fsStyle, BOOL fBeep)
  191. {
  192.    CHAR szText[MESSAGELEN];
  193.  
  194.    if(!WinLoadMessage(hab, (HMODULE)NULL, idMsg, MESSAGELEN, (PSZ)szText))
  195.    {
  196.       WinAlarm(HWND_DESKTOP, WA_ERROR);
  197.       return MBID_ERROR;
  198.    }
  199.  
  200.    if(fBeep)
  201.       WinAlarm(HWND_DESKTOP, WA_ERROR);
  202.  
  203.    return(WinMessageBox(HWND_DESKTOP, hwndOwner, szText, (PSZ)NULL,
  204.           IDD_MSGBOX, fsStyle));
  205.  
  206. } 
  207.  
  208. /****************************************************************************
  209.  
  210. ****************************************************************************/
  211.  
  212. VOID WinDebugMsg(char *DebugMsg,HWND hwnd)
  213. {
  214.  
  215.    char *StrBuf;
  216.  
  217.    int end_of_line,insert_pos,start_of_filename;
  218.  
  219.    StrBuf = DebugMsg;
  220.  
  221.    end_of_line = 0;
  222.    while (StrBuf[end_of_line++] != '\0');
  223.    end_of_line--;
  224.  
  225.    insert_pos = 0;
  226.    while (StrBuf[insert_pos++] != '\\');
  227.    insert_pos -= 3;
  228.  
  229.    start_of_filename = end_of_line;
  230.    while (StrBuf[start_of_filename--] != '\\');
  231.    start_of_filename++;
  232.  
  233.    while (StrBuf[start_of_filename++] != '\0')
  234.       {
  235.       StrBuf[insert_pos++] = StrBuf[start_of_filename];
  236.       }
  237.  
  238.    StrBuf[insert_pos] = '\0';
  239.  
  240.    WinMessageBox(HWND_DESKTOP, hwnd, DebugMsg, "Debug Message",
  241.                      0, MB_NOICON | MB_OK  );
  242.  
  243. }
  244.  
  245. /****************************************************************************
  246.  
  247. ****************************************************************************/
  248. BOOL CommPortOpen(HWND hwnd)
  249. {
  250.  
  251.    if (HandleComm == 0)
  252.       {
  253.        MessageBox(HWND_DESKTOP,
  254.                    IDMSG_NOCOMMPORTSELECTED,
  255.                    MB_OK | MB_ERROR,
  256.                    TRUE);
  257.  
  258.       return FALSE;
  259.       }
  260.    else
  261.       return TRUE;
  262.  
  263. }
  264.  
  265. /****************************************************************************
  266.  
  267. ****************************************************************************/
  268. VOID MainCommand(MPARAM mp1, MPARAM mp2)
  269. {
  270.    static SHORT sIdDlg;
  271.    SHORT sOptions, sIdText;
  272.    APIRET  rc;
  273.  
  274.    switch(SHORT1FROMMP(mp1))
  275.       {
  276.         case IDM_PORT_SELECTION:      //Menu selection ID
  277.             sIdDlg = IDD_PORT_SELECT;  //Dialog selection ID
  278.                rc = WinDlgBox(HWND_DESKTOP, hwndMain,
  279.                             (PFNWP)ComSelectDlgProc,
  280.                             (HMODULE)0, sIdDlg, 
  281.                      (PVOID)&sIdDlg); 
  282.                break;
  283.  
  284.         case IDM_PORT_INIT:      //Menu selection ID
  285.             sIdDlg = IDD_PORT_INIT;  //Dialog selection ID
  286.                rc = WinDlgBox(HWND_DESKTOP, hwndMain,
  287.                             (PFNWP)ComInitDlgProc,
  288.                             (HMODULE)0, sIdDlg, 
  289.                      (PVOID)&sIdDlg); 
  290.                break;
  291.  
  292.         case IDM_SLIDER_CONTROL:      //Menu selection ID
  293.             sIdDlg = IDD_SLIDER_CONTROL;  //Dialog selection ID
  294.                rc = WinDlgBox(HWND_DESKTOP, hwndMain,
  295.                             (PFNWP)SliderDlgProc,
  296.                             (HMODULE)0, sIdDlg, 
  297.                      (PVOID)&sIdDlg); 
  298.                break;
  299.  
  300.        default:
  301.             break;
  302.    }
  303. } 
  304.  
  305.  
  306.