home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / ocl150a.zip / OCL / Samples / GTakPM / Source / GTPMWin.cpp < prev    next >
C/C++ Source or Header  |  1996-08-12  |  12KB  |  388 lines
  1. // GTakPM
  2. // (c) Benjamin Stein 1994
  3. // All Rights Reserved
  4. // GTPMWin.cpp
  5.  
  6. // $Header: W:/Projects/OCL/Samples/GTakPM/Source/rcs/GTPMWin.cpp 1.50 1996/08/11 23:48:08 B.STEIN Release $
  7.  
  8.  
  9. #include "..\Source\GTakPM.hpp"
  10.  
  11.  
  12. GTPMWin::GTPMWin()
  13.  : OFrame(GTPM_ICO, 
  14.           FCF_SIZEBORDER | 
  15.           FCF_ICON | 
  16.           FCF_TASKLIST | 
  17.           FCF_SYSMENU | 
  18.           FCF_MINMAX | 
  19.           FCF_TITLEBAR | 
  20.           FCF_SHELLPOSITION,
  21.           CS_SIZEREDRAW | CS_HITTEST),
  22.    wasOutOfContainer(TRUE),
  23.    showMonitor(FALSE),
  24.    processing (FALSE),
  25.    toolbar    (NULL),
  26.    tapebar    (NULL),
  27.    monitor    (NULL),
  28.    Drives     (NULL),
  29.    Files      (NULL),
  30.    statline   (NULL),
  31.    frameMenu  (NULLHANDLE),
  32.    expander   (this, >PMWin::expandFolder, 65536), 
  33.    backupThr  (this, >PMWin::backup, 65536), 
  34.    restoreThr (this, >PMWin::restore, 65536), 
  35.    pmpipe     ((PSZ)NULL, (PSZ)NULL),
  36.    bmp_monitor   (HWND_DESKTOP, CMD_MONITOR,       NULLHANDLE, 32, 32),
  37.    bmp_rescan    (HWND_DESKTOP, CMD_RESCAN,        NULLHANDLE, 32, 32),
  38.    bmp_procedures(HWND_DESKTOP, CMD_PROCEDURES,    NULLHANDLE, 32, 32),
  39.    bmp_tape      (HWND_DESKTOP, CMD_TAPE,          NULLHANDLE, 32, 32),
  40.    bmp_backup    (HWND_DESKTOP, CMD_BACKUP,        NULLHANDLE, 32, 32),
  41.    bmp_restore   (HWND_DESKTOP, CMD_RESTORE,       NULLHANDLE, 32, 32),
  42.    bmp_compare   (HWND_DESKTOP, CMD_COMPARE,       NULLHANDLE, 32, 32),
  43.    bmp_settings  (HWND_DESKTOP, CMD_SETTINGS,      NULLHANDLE, 32, 32),
  44.    bmp_quit      (HWND_DESKTOP, CMD_QUIT,          NULLHANDLE, 32, 32),
  45.    bmp_load      (HWND_DESKTOP, TAPEBAR_LOAD,      NULLHANDLE, 32, 32),
  46.    bmp_unload    (HWND_DESKTOP, TAPEBAR_UNLOAD,    NULLHANDLE, 32, 32),
  47.    bmp_rewind    (HWND_DESKTOP, TAPEBAR_REWIND,    NULLHANDLE, 32, 32),
  48.    bmp_erase     (HWND_DESKTOP, TAPEBAR_ERASE,     NULLHANDLE, 32, 32),
  49.    bmp_eraseq    (HWND_DESKTOP, TAPEBAR_ERASEQ,    NULLHANDLE, 32, 32),
  50.    bmp_lock      (HWND_DESKTOP, TAPEBAR_LOCK,      NULLHANDLE, 32, 32),
  51.    bmp_unlock    (HWND_DESKTOP, TAPEBAR_UNLOCK,    NULLHANDLE, 32, 32),
  52.    bmp_stop_asap (HWND_DESKTOP, TAPEBAR_STOP_ASAP, NULLHANDLE, 32, 32),
  53.    btn_monitor   (CMD_MONITOR,       this, &bmp_monitor,    "Monitor on/off"),
  54.    btn_rescan    (CMD_RESCAN,        this, &bmp_rescan,     "Rescan Drives"),
  55.    btn_procedures(CMD_PROCEDURES,    this, &bmp_procedures, "Procedures"),
  56.    btn_tape      (CMD_TAPE,          this, &bmp_tape,       "Device Information"),
  57.    btn_backup    (CMD_BACKUP,        this, &bmp_backup,     "Backup"),
  58.    btn_restore   (CMD_RESTORE,       this, &bmp_restore,    "Restore"),
  59.    btn_compare   (CMD_COMPARE,       this, &bmp_compare,    "Compare"),
  60.    btn_settings  (CMD_SETTINGS,      this, &bmp_settings,   "Settings"),
  61.    btn_quit      (CMD_QUIT,          this, &bmp_quit,       "Quit"),
  62.    btn_load      (TAPEBAR_LOAD,      this, &bmp_load,       "Load"),
  63.    btn_unload    (TAPEBAR_UNLOAD,    this, &bmp_unload,     "Unload"),
  64.    btn_rewind    (TAPEBAR_REWIND,    this, &bmp_rewind,     "Rewind"),
  65.    btn_erase     (TAPEBAR_ERASE,     this, &bmp_erase,      "Erase"),
  66.    btn_eraseq    (TAPEBAR_ERASEQ,    this, &bmp_eraseq,     "Erase Quick"),
  67.    btn_lock      (TAPEBAR_LOCK,      this, &bmp_lock,       "Lock"),
  68.    btn_unlock    (TAPEBAR_UNLOCK,    this, &bmp_unlock,     "Unlock"),
  69.    btn_stop_asap (TAPEBAR_STOP_ASAP, this, &bmp_stop_asap,  "Stop current operation!")
  70. {
  71. #ifdef __TK21__
  72.  PSZ   tapeEnv;
  73. #else
  74.  PCSZ  tapeEnv;
  75. #endif 
  76.  
  77.  DosError(FERR_DISABLEHARDERR);
  78.  
  79.  if (!DosScanEnv("TAPE", &tapeEnv))
  80.    tape = new Tape(&pmpipe, (PSZ)tapeEnv, 0);
  81.  else
  82.    tape = new Tape(&pmpipe, "C:\\GTAKPM.TAR", 0);
  83.    
  84.  createFrame("GTakPM Develop");
  85.  
  86.  frameMenu = WinLoadMenu(frame, NULLHANDLE, GTPM_MENU);
  87.  if (!frameMenu)
  88.    throwGTPM(ERROR_LOAD_MENU);
  89.  
  90.  // setup toolbar
  91.  toolbar = new OButtonBar(GTPM_TOOLBAR, this);
  92.  toolbar->setButtonDimensions(40, 40); // set size of buttons
  93.  toolbar->setPicSize(32);              // set size of button pictures
  94.  toolbar->buttons.add(btn_monitor);
  95.  toolbar->buttons.add(btn_rescan);   
  96.  toolbar->buttons.add(btn_procedures);
  97.  toolbar->buttons.add(btn_tape);      
  98.  toolbar->buttons.add(btn_backup);    
  99.  toolbar->buttons.add(btn_restore);   
  100.  toolbar->buttons.add(btn_compare);   
  101.  toolbar->buttons.add(btn_settings);  
  102.  toolbar->createButtonBar();
  103.  
  104.  // setup tapebar
  105.  tapebar = new OButtonBar(GTPM_TAPEBAR, this);
  106.  tapebar->setButtonDimensions(40, 40); // set size of buttons
  107.  tapebar->setPicSize(32);              // set size of button pictures
  108.  tapebar->buttons.add(btn_quit);      
  109.  tapebar->buttons.add(btn_load);      
  110.  tapebar->buttons.add(btn_unload);    
  111.  tapebar->buttons.add(btn_rewind);    
  112.  tapebar->buttons.add(btn_erase);     
  113.  tapebar->buttons.add(btn_eraseq);    
  114.  tapebar->buttons.add(btn_lock);      
  115.  tapebar->buttons.add(btn_unlock);    
  116.  tapebar->buttons.add(btn_stop_asap); 
  117.  tapebar->createButtonBar();
  118.  
  119.  
  120. // setup statuslines
  121.  statline = new OStatusLine(GTPM_STATLINE, this, TRUE); 
  122.  statline->style |= FCF_BORDER;
  123.  statline->createStatusLine();
  124.  
  125. // setup listboxes
  126.  
  127.  Excludes = new OListBox(GTPM_EX, this, LS_NOADJUSTPOS | LS_HORZSCROLL);
  128.  Excludes->createListBox(0,0,0,0);
  129.  Excludes->setBackColor(SYSCLR_WINDOW); 
  130.  Excludes->setForeColor(SYSCLR_WINDOWTEXT);
  131.  Excludes->setFont("8.Helv");
  132.  
  133.  Includes = new OListBox(GTPM_INC, this, LS_NOADJUSTPOS | LS_HORZSCROLL);
  134.  Includes->createListBox(0,0,0,0);
  135.  Includes->setBackColor(SYSCLR_WINDOW);
  136.  Includes->setForeColor(SYSCLR_WINDOWTEXT);
  137.  Includes->setFont("8.Helv");
  138.  
  139.  monitor  = new OListBox(GTPM_MON, this, LS_NOADJUSTPOS | LS_HORZSCROLL, TRUE);
  140.  monitor->createListBox(0,0,0,0);
  141.  monitor->setBackColor(SYSCLR_WINDOW);
  142.  monitor->setForeColor(SYSCLR_WINDOWTEXT);
  143.  monitor->setFont("8.Helv");
  144.  
  145. // setup containers
  146.  
  147.  Drives = new DrivesCnr(this);
  148.  Drives->winText << ("Drives");
  149.  Drives->createContainer();
  150.  Drives->setBackColor(SYSCLR_WINDOW);
  151.  Drives->setForeColor(SYSCLR_WINDOWTEXT);
  152.  Drives->setFont("8.Helv");
  153.  
  154.  Files = new FilesCnr(this);
  155.  Files->winText << ("Files");
  156.  Files->createContainer();
  157.  Files->setBackColor(SYSCLR_WINDOW);
  158.  Files->setForeColor(SYSCLR_WINDOWTEXT);
  159.  Files->setFont("8.Helv");
  160.  
  161.  pmpipe.setNotify(this);
  162.  
  163. // ready
  164.  statline->setText("Ready");
  165. }
  166.  
  167.  
  168.  
  169. GTPMWin::~GTPMWin()
  170. {
  171.  if (Drives) delete Drives;
  172.  if (Files) delete Files;
  173.  if (toolbar) delete toolbar;
  174.  if (tapebar) delete tapebar;
  175.  if (statline) delete statline;
  176.  if (tape) delete tape;
  177.  if (monitor) delete monitor;
  178. } 
  179.    
  180.  
  181. void GTPMWin::resizeClients(MPARAM sizeparms)
  182. {
  183.  ULONG width      = SHORT1FROMMP(sizeparms);
  184.  ULONG height     = SHORT2FROMMP(sizeparms);
  185.  ULONG lineHeight, cnrHeight;
  186.  
  187.  if ((!statline) || (!toolbar) || 
  188.      (!Drives) || (!Files) || (!monitor) ||
  189.      (!Includes) || (!Excludes) || (!tapebar))
  190.     return;   // please don't trap!
  191.  
  192.  lineHeight = statline->getHeight();
  193.  cnrHeight = lineHeight + 3*tapebar->getHeight();
  194.  
  195. // set toolbar
  196.  WinSetWindowPos(toolbar->frame, HWND_TOP,
  197.                  0,
  198.                  height - toolbar->getHeight(),
  199.                  width, 
  200.                  toolbar->getHeight(),
  201.                  SWP_SIZE | SWP_MOVE);
  202.  
  203. // set tapebar
  204.  WinSetWindowPos(tapebar->frame, HWND_TOP,
  205.                  0,
  206.                  lineHeight,
  207.                  width, 
  208.                  tapebar->getHeight(),
  209.                  SWP_SIZE | SWP_MOVE);
  210.  
  211. // set includes LB
  212.  WinSetWindowPos(Includes->hwnd, HWND_TOP,
  213.                  0,
  214.                  lineHeight + tapebar->getHeight(),
  215.                  width/2, 
  216.                  2*tapebar->getHeight(),
  217.                  SWP_SIZE | SWP_MOVE);
  218.  
  219. // set excludes LB
  220.  WinSetWindowPos(Excludes->hwnd, HWND_TOP,
  221.                  width/2,
  222.                  lineHeight + tapebar->getHeight(),
  223.                  width/2, 
  224.                  2*tapebar->getHeight(),
  225.                  SWP_SIZE | SWP_MOVE);
  226.  
  227. // set statline
  228.  WinSetWindowPos(statline->frame, HWND_TOP, 
  229.                  0, 
  230.                  0,
  231.                  width,
  232.                  lineHeight,
  233.                  SWP_SIZE | SWP_MOVE);
  234. if ((!processing) && (!showMonitor)) {
  235.   // set Drives
  236.    WinSetWindowPos(Drives->hwnd, HWND_TOP,
  237.                    0,
  238.                    cnrHeight,
  239.                    width/2,
  240.                    height - toolbar->getHeight() - cnrHeight,
  241.                    SWP_SIZE | SWP_MOVE);
  242.   // set Files
  243.    WinSetWindowPos(Files->hwnd, HWND_TOP,
  244.                    width/2,
  245.                    cnrHeight,
  246.                    width/2,
  247.                    height - toolbar->getHeight() - cnrHeight,
  248.                    SWP_SIZE | SWP_MOVE);
  249.   // set monitor LB
  250.    WinSetWindowPos(monitor->hwnd, HWND_TOP,
  251.                    0, 0, 0, 0,
  252.                    SWP_SIZE | SWP_MOVE); }
  253.  else {
  254.   // set Drives
  255.    WinSetWindowPos(Drives->hwnd, HWND_TOP,
  256.                    0, 0, 0, 0,
  257.                    SWP_SIZE | SWP_MOVE);
  258.   // set Files
  259.    WinSetWindowPos(Files->hwnd, HWND_TOP,
  260.                    0, 0, 0, 0,
  261.                    SWP_SIZE | SWP_MOVE);
  262.   // set monitor LB
  263.    WinSetWindowPos(monitor->hwnd, HWND_TOP,
  264.                    0,
  265.                    cnrHeight,
  266.                    width, 
  267.                    height - toolbar->getHeight() - cnrHeight,
  268.                    SWP_SIZE | SWP_MOVE); }
  269. }
  270.  
  271.  
  272. BOOL GTPMWin::OCommand(ULONG msg, MPARAM mp1, MPARAM mp2)
  273. {
  274.  switch(msg)
  275.   {
  276.    case WM_SIZE:
  277.     resizeClients(mp2);
  278.     break;
  279.  
  280.    case WM_COMMAND:
  281.      return(command(mp1, mp2));
  282.  
  283.    case WM_CONTROL:
  284.      return(control(mp1, mp2));
  285.  
  286.    case WM_HITTEST:
  287.      if ((wasOutOfContainer) && (statline) && (tapebar))
  288.       {
  289.        ULONG  topControls, bottomControls;
  290.  
  291.        WinQueryWindowPos(Files->hwnd, &sizepos);
  292.        bottomControls = statline->getHeight() + tapebar->getHeight();
  293.        topControls = bottomControls + sizepos.cy;
  294.        if ((SHORT2FROMMP(mp1) < topControls) &&
  295.            (SHORT2FROMMP(mp1) > bottomControls))
  296.       {
  297.          statline->setText("File Selection");
  298.          wasOutOfContainer = FALSE; }
  299.       }
  300.      break;
  301.  
  302.    case WM_APPTERMINATENOTIFY: {
  303.     CHAR    retMsg[25];
  304.     ULONG   rc = SHORT1FROMMP(mp2);
  305.  
  306.     processing = FALSE;
  307.     if (rc != 0)
  308.       sprintf(retMsg, "Error! rc = %ld", rc);
  309.     else
  310.       sprintf(retMsg, "Done.");
  311.     if (!pmpipe.printer.isRunning())
  312.       pmpipe.printer.stop();
  313.     monitor->insertItem(retMsg);
  314.     break; }
  315.  
  316.    case WM_CLOSE:
  317.     OFrame::OCommand(msg, mp1, mp2);
  318.     GTPMApp::GTakPM->forceQuit();
  319.     delete this;
  320.     break;
  321.  
  322.    default:
  323.     return(OFrame::OCommand(msg, mp1, mp2));
  324.   } 
  325.  return(TRUE); 
  326. } 
  327.  
  328.  
  329. void GTPMWin::expandFolder()
  330. {
  331.  pDirInfo record = Drives->queryEmphasis();
  332.  
  333.  if(record)
  334.    Drives->recurse(record, FALSE, record->selected);
  335. }
  336.  
  337.  
  338. void GTPMWin::addExclude(PSZ str)
  339. {
  340.  OString  string("- ");
  341.  
  342.  string + str;
  343.  Excludes->insertItem(string, LIT_SORTASCENDING);
  344. }
  345.  
  346. void GTPMWin::addInclude(PSZ str)
  347. {
  348.  OString  string("+ ");
  349.  
  350.  string + str;
  351.  Includes->insertItem(string, LIT_SORTASCENDING);
  352. }
  353.  
  354.  
  355. void GTPMWin::updateListbox(PSZ str)
  356. {
  357.  ULONG     item;
  358.  
  359.  while ((item = Includes->searchString(str, 
  360.                           LIT_FIRST, 
  361.                           LSS_SUBSTRING | LSS_CASESENSITIVE)) != LIT_NONE)
  362.    Includes->deleteItem(item);
  363.  while ((item = Excludes->searchString(str, 
  364.                           LIT_FIRST, 
  365.                           LSS_SUBSTRING | LSS_CASESENSITIVE)) != LIT_NONE)
  366.    Excludes->deleteItem(item);
  367. }
  368.  
  369.  
  370. void GTPMWin::printout()
  371. {
  372.  OPMinit     init;
  373.  
  374.  while(pmpipe.pipe)
  375.   {
  376.    if (pmpipe.pipe.getline(pmpipe.readBuffer, pmpipe.bufferSize))
  377.     {
  378.      pmpipe.readBuffer.rightCut('\r');
  379.      if (!monitor->insertItem(pmpipe.readBuffer)) {
  380.        monitor->deleteAll();
  381.        monitor->insertItem(pmpipe.readBuffer); }
  382.     }
  383.   }
  384. }
  385.  
  386.  
  387. // end of source
  388.