home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 15 / CD_ASCQ_15_070894.iso / vrac / wsftp2.zip / WS_DEBUG.INC < prev    next >
Text File  |  1994-04-06  |  3KB  |  95 lines
  1.         case CMD_CONNECT:
  2.           if(ctrl_socket==INVALID_SOCKET) {
  3.             FARPROC lpfnMsgProc;
  4.             int nRC;
  5.  
  6.             lpfnMsgProc=MakeProcInstance((FARPROC)WS_HostMsgProc,hInst);
  7.             nRC=DialogBox(hInst,(LPSTR)"DLG_HOST",hWnd,lpfnMsgProc);
  8.             FreeProcInstance(lpfnMsgProc);
  9.             if(nRC) {
  10.               ctrl_socket=(SOCKET)DoConnect(szRemoteHost);
  11.             }
  12.           } else
  13.             SendMessage(hTxtStatus,WM_SETTEXT,0,(LPARAM)"Already connected");
  14.           break;
  15.  
  16.         case CMD_LIST:
  17.           if(DoDirList((SOCKET)ctrl_socket,"LIST")==FTP_COMPLETE)
  18.           {
  19.             wsprintf(szMsgBuf,"%s %s",szViewer,szTmpFile);
  20.             WinExec(szMsgBuf,SW_SHOW);
  21.           }
  22.           break;
  23.  
  24.         case CMD_NLST:
  25.           if(DoDirList((SOCKET)ctrl_socket,"NLST")==FTP_COMPLETE) 
  26.           {
  27.             wsprintf(szMsgBuf,"%s %s",szViewer,szTmpFile);
  28.             WinExec(szMsgBuf,SW_SHOW);
  29.           }
  30.           break;
  31.  
  32.         case CMD_HELP:
  33.           command((SOCKET)ctrl_socket,"HELP");
  34.           break;
  35.  
  36.         case CMD_STATUS:
  37.           { FARPROC lpfnMsgProc;
  38.             lpfnMsgProc = MakeProcInstance((FARPROC)WS_StatMsgProc, hInst);
  39.             DialogBox(hInst, (LPSTR)"DLG_STATUS", hWnd, lpfnMsgProc);
  40.             FreeProcInstance(lpfnMsgProc);
  41.           }
  42.           break;
  43.  
  44.         case CMD_PWD:
  45.           DoPWD((SOCKET)ctrl_socket);
  46.           break;
  47.  
  48.        case CMD_RMD:
  49.        case CMD_MKD:
  50.          if(StdInput(NULL,"Enter remote directory name:")) {
  51.            if(wParam==CMD_RMD)
  52.              DoRMD(ctrl_socket,szDlgEdit);
  53.            else if(wParam==CMD_MKD)
  54.              DoMKD(ctrl_socket,szDlgEdit);
  55.          }
  56.          break;
  57.  
  58.         case CMD_RETR:
  59.           if(StdInput(NULL,"Enter remote file name:")) {
  60.             wsprintf(szDlgPrompt,"RETR %s",szDlgEdit);
  61.             RetrieveFile(ctrl_socket,szDlgPrompt,szDlgEdit,szDlgEdit,fType);
  62.           }
  63.           break;
  64.  
  65.         case CMD_STOR:
  66.           if(StdInput(NULL,"Enter local file name:")) {
  67.             wsprintf(szDlgPrompt,"STOR %s",szDlgEdit);
  68.             SendFile(ctrl_socket,szDlgPrompt,szDlgEdit,fType);
  69.           }
  70.           break;
  71.  
  72.         case CMD_TYPE_I:
  73.           fType=TYPE_I;
  74.           break;
  75.  
  76.         case CMD_TYPE_A:
  77.           fType=TYPE_A;
  78.           break;
  79.  
  80.         case CMD_QUOTE:
  81.           if(StdInput(NULL,"Enter command for remote host:")) 
  82.             DoQUOTE((SOCKET)ctrl_socket,szDlgEdit);
  83.           break;
  84.  
  85.         case CMD_CWD:
  86.           if(StdInput(NULL,"Enter remote directory name:"))
  87.             DoCWD((SOCKET)ctrl_socket,szDlgEdit);
  88.           break;
  89.  
  90.         case OPT_SETVIEWER:
  91.           StdInput(szViewer,"Enter viewer executable name:");
  92.           break;
  93.  
  94.         case CMD_CLOSE:
  95.