pc/drive.c

   1 /* Ch-Drive command for Windows NT and OS/2
   2
   3    This program is free software; you can redistribute it and/or modify
   4    it under the terms of the GNU General Public License as published by
   5    the Free Software Foundation; either version 2 of the License, or
   6    (at your option) any later version.
   7
   8    This program is distributed in the hope that it will be useful,
   9    but WITHOUT ANY WARRANTY; without even the implied warranty of
  10    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11    GNU General Public License for more details.
  12
  13    You should have received a copy of the GNU General Public License
  14    along with this program; if not, write to the Free Software
  15    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  16
  17    Bug:
  18         the code will not work if you have more drives than those that
  19         can fit in a panel.
  20    */
  21
  22 #include <config.h>
  23 #ifdef _OS_NT
  24 #include <windows.h>
  25 #include "util_win32.h"
  26 #endif
  27 #include <string.h>
  28 #include <stdio.h>
  29 #include <stdlib.h>
  30 #include <ctype.h>
  31 #include "../src/tty.h"
  32 #include "../src/mad.h"
  33 #include "../src/util.h"
  34 #include "../src/win.h"
  35 #include "../src/color.h"
  36 #include "../src/dlg.h"
  37 #include "../src/widget.h"
  38 #include "../src/dialog.h"
  39 #include "../src/dir.h"
  40 #include "../src/panel.h"
  41 #include "../src/main.h"
  42 #include "../src/cmd.h"
  43
  44 struct Dlg_head *drive_dlg;
  45 WPanel *this_panel;
  46
  47 static int drive_dlg_callback (Dlg_head *h, int Par, int Msg);
  48 static void drive_dlg_refresh (void);
  49 static void drive_cmd(void);
  50
  51 #define B_DRIVE_BASE 100
  52 #define MAX_LGH 13              /* Length for drives */
  53
  54 static void drive_cmd()
  55 {
  56     int  i, nNewDrive, nDrivesAvail;
  57     char szTempBuf[7], szDrivesAvail[27*4], *p;
  58
  59         /* Dialogbox position */
  60         int  x_pos;
  61         int  y_pos = (LINES-6)/2-3;
  62         int  y_height;
  63         int  x_width;
  64
  65         int  m_drv;
  66
  67     /* Get drives name and count */
  68 #ifdef _OS_NT
  69     GetLogicalDriveStrings (255, szDrivesAvail);
  70     for (nDrivesAvail = 0, p = szDrivesAvail; *p; nDrivesAvail++)
  71         p+=4;
  72 #else
  73     unsigned long uDriveNum, uDriveMap;
  74     nDrivesAvail = 0;
  75     p = szDrivesAvail;
  76     DosQueryCurrentDisk(&uDriveNum, &uDriveMap);
  77     for (i = 0; i < 26; i++) {
  78       if ( uDriveMap & (1 << i) ) {
  79         *p = 'A' + i;
  80         p += 4;
  81         nDrivesAvail++;
  82       }
  83     }
  84     *p = 0;
  85 #endif
  86
  87     /* Create Dialog */
  88     do_refresh ();
  89
  90     m_drv = ((nDrivesAvail > MAX_LGH) ? MAX_LGH: nDrivesAvail);
  91     /* Center on x, relative to panel */
  92     x_pos = this_panel->widget.x + (this_panel->widget.cols - m_drv*3)/2 + 2;
  93
  94     if (nDrivesAvail > MAX_LGH) {
  95         y_height = 8;
  96         x_width  = 33;
  97     } else {
  98         y_height = 6;
  99         x_width  = (nDrivesAvail - 1) * 2 + 9;
 100     }
 101
 102     drive_dlg = create_dlg (y_pos, x_pos, y_height, x_width, dialog_colors,
 103         drive_dlg_callback, "[ChDrive]", "drive", DLG_NONE);
 104
 105     x_set_dialog_title (drive_dlg, "Change Drive");
 106
 107         if (nDrivesAvail>MAX_LGH) {
 108             for (i = 0; i < nDrivesAvail - MAX_LGH; i++) {
 109                 p -= 4;
 110                 sprintf(szTempBuf, "&%c", *p);
 111                 add_widget (drive_dlg,
 112                     button_new (5,
 113                         (m_drv-i-1)*2+4 - (MAX_LGH*2 - nDrivesAvail) * 2,
 114                         B_DRIVE_BASE + nDrivesAvail - i - 1,
 115                         HIDDEN_BUTTON,
 116                         szTempBuf, 0, NULL, NULL));
 117                 }
 118         }
 119
 120     /* Add a button for each drive */
 121     for (i = 0; i < m_drv; i++) {
 122         p -= 4;
 123         sprintf (szTempBuf, "&%c", *p);
 124             add_widget (drive_dlg,
 125                 button_new (3, (m_drv-i-1)*2+4, B_DRIVE_BASE+m_drv-i-1,
 126                 HIDDEN_BUTTON, szTempBuf, 0, NULL, NULL));
 127     }
 128
 129     run_dlg(drive_dlg);
 130
 131     /* do action */
 132     if (drive_dlg->ret_value != B_CANCEL) {
 133         int  errocc = 0; /* no error */
 134         int  rtn;
 135         char drvLetter;
 136
 137         nNewDrive = drive_dlg->ret_value - B_DRIVE_BASE;
 138         drvLetter =  (char) *(szDrivesAvail + (nNewDrive*4));
 139 #ifdef _OS_NT
 140         if (win32_GetPlatform() == OS_WinNT) {  /* Windows NT */
 141                 rtn = _chdrive(drvLetter - 'A' + 1);
 142         } else {                                /* Windows 95 */
 143                 rtn = 1;
 144                 SetCurrentDirectory(szDrivesAvail+(nNewDrive*4));
 145         }
 146 #else
 147         rtn = DosSetDefaultDisk(nNewDrive + 1);
 148 #endif
 149         if (rtn == -1)
 150                 errocc = 1;
 151         else {
 152                 getcwd (this_panel->cwd, sizeof (this_panel->cwd)-2);
 153                 if (toupper(drvLetter) == toupper(*(this_panel->cwd))) {
 154                         clean_dir (&this_panel->dir, this_panel->count);
 155                         this_panel->count = do_load_dir(&this_panel->dir,
 156                                 this_panel->sort_type,
 157                                 this_panel->reverse,
 158                                 this_panel->case_sensitive,
 159                                 this_panel->filter);
 160                         this_panel->top_file = 0;
 161                         this_panel->selected = 0;
 162                         this_panel->marked = 0;
 163                         this_panel->total = 0;
 164                         show_dir(this_panel);
 165                         reread_cmd();
 166                 } else
 167                         errocc = 1;
 168         }
 169     if (errocc)
 170             message (1, " Error ", " Cannot access drive %c: ",
 171                 *(szDrivesAvail+(nNewDrive*4)) );
 172     }
 173     destroy_dlg (drive_dlg);
 174     repaint_screen ();
 175 }
 176
 177 void drive_cmd_a()
 178 {
 179     this_panel = left_panel;
 180     drive_cmd();
 181 }
 182
 183 void drive_cmd_b()
 184 {
 185     this_panel = right_panel;
 186     drive_cmd();
 187 }
 188
 189 void drive_chg(WPanel *panel)
 190 {
 191     this_panel  = panel;
 192     drive_cmd();
 193 }
 194
 195 static int drive_dlg_callback (Dlg_head *h, int Par, int Msg)
 196 {
 197     switch (Msg) {
 198     case DLG_DRAW:
 199         drive_dlg_refresh ();
 200         break;
 201     }
 202     return 0;
 203 }
 204
 205 static void drive_dlg_refresh (void)
 206 {
 207     attrset (dialog_colors[0]);
 208     dlg_erase (drive_dlg);
 209     draw_box (drive_dlg, 1, 1, drive_dlg->lines-2, drive_dlg->cols-2);
 210
 211     attrset (dialog_colors[2]);
 212     dlg_move (drive_dlg, 1, drive_dlg->cols/2 - 7);
 213     addstr (" Change Drive ");
 214 }