home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #31 / NN_1992_31.iso / spool / alt / sources / 2907 < prev    next >
Encoding:
Text File  |  1993-01-01  |  14.2 KB  |  498 lines
  1. Newsgroups: alt.sources
  2. Path: sparky!uunet!zaphod.mps.ohio-state.edu!rpi!batcomputer!reed!henson!news.u.washington.edu!raven.alaska.edu!acad2.alaska.edu!axlas
  3. From: axlas@acad2.alaska.edu (Leif A Sawyer)
  4. Subject: PATCH: add auto-zmodem to XC
  5. Message-ID: <1993Jan1.030343.1@acad2.alaska.edu>
  6. Lines: 487
  7. Sender: news@raven.alaska.edu (USENET News System)
  8. Nntp-Posting-Host: acad2.alaska.edu
  9. Organization: Bit for Tat Consulting
  10. Date: Fri, 1 Jan 1993 07:03:43 GMT
  11.  
  12. #define BEGIN_LEGALEEZE
  13. /*
  14.  * This is an unoffical patch to XC 30b-L1.5.  It is not supported
  15.  * by the author or the maintainer of XC.  No guarantees are offered
  16.  * nor is the author of the code responsible for any mishaps caused
  17.  * by mis-installation, or other inherent risks caused by using this
  18.  * patch.
  19. * / 
  20. #define END_LEGALEEZE
  21.  
  22. This is a patch to allow automatic ZModem downloading from within
  23. XC.  It also adds another feature, rts/cts flow control.  There
  24. is some menu reordering to make things a bit more 'intuitive'.
  25.  
  26. Just feed this (via patch) to a virgin copy of xc30b-L1.5, available 
  27. at most archive sites.
  28. (or call toll-free, 1-900-USE-UNIX, $3.95 a minute, must be over 21 :-)
  29.  
  30. <-------------------->8 Snip, Snip 8<----------------------->  
  31. diff -c xc30b-L1.5/CHANGES.readme zxc/CHANGES.readme
  32. *** xc30b-L1.5/CHANGES.readme    Mon Oct 26 19:30:24 1992
  33. --- zxc/CHANGES.readme    Sat Dec 19 15:52:58 1992
  34. ***************
  35. *** 1,3 ****
  36. --- 1,20 ----
  37. + Changes for ZXC 1.0 for Linux 25 December 92
  38. + 
  39. + 1) RTS/CTS flow control option added to main menu.
  40. + 
  41. + 2) AutoMagic ZModem downloading available, thanks to M. Saggaf
  42. +    for the actual engine.  The command used to call rz
  43. +    can be configured either in the xc.init file, or at the
  44. +    main menu.  In both cases, the rz used should be able
  45. +    to use stdin/stdout for communications, since zxc will
  46. +    redirect the modem.
  47. + 
  48. + 3) Made some minor menu changes for easier readability.
  49. + 
  50. + 4) Added the 'Z' in front of XC to distinguish this version
  51. +    from other versions which don't have auto-ZModem capabilities,
  52. +    and reset the version number back to 1.0.
  53. + 
  54.   
  55.   Changes for KI4N patch level 5 of XC for LINUX  15 October 92 
  56. diff -c xc30b-L1.5/xcmain.c zxc/xcmain.c
  57. *** xc30b-L1.5/xcmain.c    Mon Oct 26 19:59:36 1992
  58. --- zxc/xcmain.c    Sat Dec 19 15:57:29 1992
  59. ***************
  60. *** 14,20 ****
  61.   #include "xc.h"
  62.   
  63.   
  64. ! static char version[]="@(#)JPR XC 3.0bL |     KI4N Lpatch 1.5 -- 16 Oct 92 ";
  65.   
  66.   #define Resume_Not_Allowed    1
  67.   #define PAUZ  1
  68. --- 14,20 ----
  69.   #include "xc.h"
  70.   
  71.   
  72. ! static char version[]= "@(#)JPR ZXC 1.0  | based on XC 3.0bL1.5  --  25 Dec 92 ";
  73.   
  74.   #define Resume_Not_Allowed    1
  75.   #define PAUZ  1
  76. ***************
  77. *** 22,46 ****
  78.   void pauz(void);        /* used to help clean up screen after error messages */
  79.   
  80.   jmp_buf erret;            /* non-local error return */
  81.   short
  82.       autoflag = FALSE,    /* Flag for automatic capturing */
  83.       badline = FALSE,    /* Bad telephone line? */
  84.       cismode = FALSE,    /* Respond to CIS "ENQ" */
  85.       cr_add = TRUE,        /* Add carriage returns for B+ uploads */
  86. !     delmode = TRUE,     /* Trap DEL and map to backspace */ 
  87. !     dosmode = TRUE,     /* Flag for DOS character translation */
  88.       hdplxflag = FALSE,    /* Flag for half-duplex mode */
  89.       nlmode = TRUE,        /* Map newlines to carriage returns */
  90.       reterm = FALSE,        /* No jumping into terminal mode */
  91.       stat_flag = FALSE,    /* Flag for status display */
  92.       eof_flag = FALSE,    /* Flag to quit a script */
  93. !     first_sete = TRUE,  /* Flag for pauz() so as not to pause during startup */
  94. !     nowait = FALSE,     /* When TRUE this will disable call waiting */
  95. !     tone = TRUE;        /* Flag for pulse or touch tone dialing */
  96.    
  97.   int s_cis(), s_set(), s_shell(), s_exit() ; 
  98.   
  99.   char Msg[SM_BUFF];
  100.   
  101.   FILE *tfp;
  102.   
  103. --- 22,50 ----
  104.   void pauz(void);        /* used to help clean up screen after error messages */
  105.   
  106.   jmp_buf erret;            /* non-local error return */
  107. + 
  108.   short
  109.       autoflag = FALSE,    /* Flag for automatic capturing */
  110.       badline = FALSE,    /* Bad telephone line? */
  111.       cismode = FALSE,    /* Respond to CIS "ENQ" */
  112. +     rtscts = TRUE,        /* RTS/CTS flow control */
  113. +     Auto_ZM = TRUE,        /* Allow Automagic ZModem downloads */
  114.       cr_add = TRUE,        /* Add carriage returns for B+ uploads */
  115. !     delmode = TRUE,        /* Trap DEL and map to backspace */ 
  116. !     dosmode = TRUE,        /* Flag for DOS character translation */
  117.       hdplxflag = FALSE,    /* Flag for half-duplex mode */
  118.       nlmode = TRUE,        /* Map newlines to carriage returns */
  119.       reterm = FALSE,        /* No jumping into terminal mode */
  120.       stat_flag = FALSE,    /* Flag for status display */
  121.       eof_flag = FALSE,    /* Flag to quit a script */
  122. !     first_sete = TRUE,    /* Flag for pauz() so as not to pause during startup */
  123. !     nowait = FALSE,        /* When TRUE this will disable call waiting */
  124. !     tone = TRUE;        /* Flag for pulse or touch tone dialing */
  125.    
  126.   int s_cis(), s_set(), s_shell(), s_exit() ; 
  127.   
  128.   char Msg[SM_BUFF];
  129. + char rzcmd[SM_BUFF];
  130.   
  131.   FILE *tfp;
  132.   
  133. ***************
  134. *** 47,62 ****
  135.   struct termio newmode, oldmode, sigmode;
  136.   
  137.   static char    *statfmt = "\t\t%-8s %25s %s\n",
  138.               oldshell[SM_BUFF];
  139.   
  140.   static s_script(), s_xmodem(), s_term(), s_help(), s_dial(), puttake(),
  141.           SET_7bit(), SET_cr(), SET_cis(), SET_nl(), SET_purge(), SET_xoff(),
  142. !                 SET_dos(), SET_del(),
  143.           SET_halfdplx(), SET_bps(), SET_autocapt(), SET_cfile(), SET_pfile();
  144.   
  145.   extern short scriptflag;
  146.   extern void B_Transfer(), dbglog(), mattach(), terminal(), xreceive(), xsend(),
  147. !             get_ttype();
  148.   
  149.   static char    *babble[] = {
  150.       "Usage: xc [-l device] [-t] [-g file]",
  151. --- 51,67 ----
  152.   struct termio newmode, oldmode, sigmode;
  153.   
  154.   static char    *statfmt = "\t\t%-8s %25s %s\n",
  155. +         *statfmt2 = "\t\t%-8s %25s '%s'\n",
  156.               oldshell[SM_BUFF];
  157.   
  158.   static s_script(), s_xmodem(), s_term(), s_help(), s_dial(), puttake(),
  159.           SET_7bit(), SET_cr(), SET_cis(), SET_nl(), SET_purge(), SET_xoff(),
  160. !                 SET_dos(), SET_del(), SET_rtscts(), SET_AZM(), SET_ZMcmd(),
  161.           SET_halfdplx(), SET_bps(), SET_autocapt(), SET_cfile(), SET_pfile();
  162.   
  163.   extern short scriptflag;
  164.   extern void B_Transfer(), dbglog(), mattach(), terminal(), xreceive(), xsend(),
  165. !             get_ttype(), set_rtscts();
  166.   
  167.   static char    *babble[] = {
  168.       "Usage: xc [-l device] [-t] [-g file]",
  169. ***************
  170. *** 120,138 ****
  171.   }
  172.   
  173.   static struct kw setlist[] = {
  174. -     {"7bit",    SET_7bit},
  175. -     {"auto",    SET_autocapt},
  176.       {"bps",        SET_bps},
  177. !     {"cfile",    SET_cfile},
  178. !     {"cis",        SET_cis},
  179.       {"cr",        SET_cr},
  180. -     {"dos_mode",SET_dos},
  181. -     {"halfdplx",SET_halfdplx},
  182.       {"nl",        SET_nl},
  183.       {"pfile",    SET_pfile},
  184. -     {"purge",    SET_purge},
  185. -     {"xoff",    SET_xoff},
  186. -     {"trap_del",SET_del},
  187.       {NULLS,        0}
  188.   };
  189.   
  190. --- 125,146 ----
  191.   }
  192.   
  193.   static struct kw setlist[] = {
  194.       {"bps",        SET_bps},
  195. !     {"rtscts",    SET_rtscts},
  196. !     {"xoff",    SET_xoff},
  197. !     {"halfdplx",    SET_halfdplx},
  198. !     {"7bit",    SET_7bit},
  199. !     {"purge",    SET_purge},
  200. !     {"trap_del",    SET_del},
  201. !         {"dos_mode",    SET_dos},
  202.       {"cr",        SET_cr},
  203.       {"nl",        SET_nl},
  204. +     {"cis",        SET_cis},
  205. +     {"autozm",    SET_AZM},
  206. +     {"zmcmd",    SET_ZMcmd},
  207. +     {"auto",    SET_autocapt},
  208. +     {"cfile",    SET_cfile},
  209.       {"pfile",    SET_pfile},
  210.       {NULLS,        0}
  211.   };
  212.   
  213. ***************
  214. *** 163,169 ****
  215.               (*fct)();
  216.           }
  217.   
  218. !     ttgoto(18, 25);
  219.       show(1,"Type \"help\" or ? for help");
  220.       stat_flag = FALSE;
  221.       cur_on();
  222. --- 171,177 ----
  223.               (*fct)();
  224.           }
  225.   
  226. !     ttgoto(22, 25);
  227.       show(1,"Type \"help\" or ? for help");
  228.       stat_flag = FALSE;
  229.       cur_on();
  230. ***************
  231. *** 209,214 ****
  232. --- 217,224 ----
  233.       signal(SIGINT,catch);    /* catch break & quit signals/keys */
  234.       signal(SIGQUIT,catch);
  235.   
  236. +     strcpy(rzcmd,"rz -v\0");
  237. +     
  238.       while ((c = getopt(argc, argv, "s:l:pwt")) != -1)
  239.           switch (c) {
  240.           case 'l':    /* set modem port name */
  241. ***************
  242. *** 437,450 ****
  243.       "\tset bps <value>\t\tSet Bits/Second to <value>\n",
  244.       "\tset cfile name\t\tChange name of capture file\n",
  245.       "\tset cis on|off\t\tSet/Reset CIS <ENQ> mode (Auto up/download)\n",
  246.       "\tset cr on|off\t\tSet/Reset Carriage Return Injection mode\n",
  247. !     "\tset dos_mode on|off\tSet/Reset DOS Character Translation\n",  
  248.       "\tset halfdplx on|off\tSet/reset half-duplex terminal mode\n",
  249.       "\tset nl on|off\t\tSet/Reset newline translation\n",
  250.       "\tset pfile name\t\tChange name of phonelist file\n",
  251.       "\tset purge on|off\tSet/Reset bad phone line mode\n",
  252.       "\tset xoff on|off\t\tSet/Reset XON/XOFF flow control\n",
  253. !     "\tset trap_del on|off\tSet/Reset DEL to Backspace translation\n",
  254.       "",
  255.       "\tESCAPE sequences in TERMINAL mode:\n\n",
  256.       "\t",ESC_STR," b\tSend modem break\n",
  257. --- 447,463 ----
  258.       "\tset bps <value>\t\tSet Bits/Second to <value>\n",
  259.       "\tset cfile name\t\tChange name of capture file\n",
  260.       "\tset cis on|off\t\tSet/Reset CIS <ENQ> mode (Auto up/download)\n",
  261. +     "\tset autozm on|off\t\tSet/Reset Automatic ZModem download\n",
  262. +     "\tset zmcmd command\t\tSet command used to invoke ZModem Receive\n",
  263.       "\tset cr on|off\t\tSet/Reset Carriage Return Injection mode\n",
  264. !     "\tset dos_mode on|off\tSet/Reset DOS Character Translation\n",  
  265.       "\tset halfdplx on|off\tSet/reset half-duplex terminal mode\n",
  266.       "\tset nl on|off\t\tSet/Reset newline translation\n",
  267.       "\tset pfile name\t\tChange name of phonelist file\n",
  268.       "\tset purge on|off\tSet/Reset bad phone line mode\n",
  269.       "\tset xoff on|off\t\tSet/Reset XON/XOFF flow control\n",
  270. !     "\tset rtscts on|off\t\tSet/Reset RTS/CTS flow control\n",
  271. !     "\tset trap_del on|off\tSet/Reset DEL to Backspace translation\n",
  272.       "",
  273.       "\tESCAPE sequences in TERMINAL mode:\n\n",
  274.       "\t",ESC_STR," b\tSend modem break\n",
  275. ***************
  276. *** 599,604 ****
  277. --- 612,669 ----
  278.           }
  279.   }
  280.   
  281. + static SET_AZM()
  282. + {
  283. +         if (stat_flag) {
  284. +                 fprintf(tfp, statfmt, "autozm", "Automatic ZModem Download",
  285. +                         Auto_ZM ? "ON" : "OFF" );
  286. +                 return ;    
  287. +                 }                    
  288. + 
  289. +         set_onoff(&Auto_ZM);
  290. +         if (!scriptflag) {
  291. +                 sprintf(Msg,"Automatic ZModem Downloads are  %s", Auto_ZM ? "ON" : "OFF" ),
  292. +                 S;
  293. +                 pauz();
  294. +                 }
  295. +         
  296. + }
  297. + 
  298. + static SET_ZMcmd()
  299. + {
  300. +     char tmp[SM_BUFF];
  301. +     
  302. +     if (stat_flag) {
  303. +         fprintf(tfp,statfmt2,"zmcmd", "Automatic rz command", rzcmd);
  304. +         return;
  305. +     }
  306. + 
  307. +     getword();
  308. +     if (word[0] == '\0') {
  309. +         show(1,"Set ZMCMD must have a command");
  310. +         eof_flag++;
  311. +         return;
  312. +     }
  313. + 
  314. +     strcpy(tmp,word);
  315. +     getword();
  316. +         
  317. +     while(word[0] != '\0') {
  318. +         strcat(tmp," ");
  319. +         strcat(tmp,word);
  320. +         getword();
  321. +     }
  322. + 
  323. +     strcat(tmp,"\0");
  324. +     strcpy(rzcmd, tmp);
  325. + 
  326. +     if (!scriptflag){
  327. +         sprintf(Msg,"rz command set to '%s'", rzcmd),
  328. +         S;
  329. +         pauz();
  330. +         }
  331. + }
  332. + 
  333.   static SET_del()
  334.   {
  335.       if (stat_flag) {
  336. ***************
  337. *** 673,678 ****
  338. --- 738,760 ----
  339.           }
  340.   }
  341.   
  342. + static SET_rtscts()
  343. + {
  344. +   if (stat_flag) {
  345. +     fprintf(tfp, statfmt, "rtscts", "Hardware Flow Control",
  346. +             rtscts?"ON":"OFF");
  347. +     fflush(tfp);
  348. +     return;
  349. +   }
  350. + 
  351. +   set_onoff(&rtscts);
  352. +   set_rtscts();
  353. + 
  354. +   if (!scriptflag)
  355. +     fprintf(tfp, "<<Hardware Flow control is %s>>\r\n",rtscts?"ON":"OFF"),
  356. +     fflush(tfp);
  357. + }
  358. + 
  359.   static SET_bps()
  360.   {
  361.       if (stat_flag) {
  362. ***************
  363. *** 733,739 ****
  364.   static SET_cfile()
  365.   {
  366.       if (stat_flag) {
  367. !         fprintf(tfp, statfmt, "cfile", "Capture file", captfile);
  368.           return;
  369.       }
  370.   
  371. --- 815,821 ----
  372.   static SET_cfile()
  373.   {
  374.       if (stat_flag) {
  375. !         fprintf(tfp, statfmt2, "cfile", "Capture file", captfile);
  376.           return;
  377.       }
  378.   
  379. ***************
  380. *** 756,762 ****
  381.   static SET_pfile()
  382.   {
  383.       if (stat_flag) {
  384. !         fprintf(tfp, statfmt, "pfile", "Phone number file", phonefile);
  385.           return;
  386.       }
  387.   
  388. --- 838,844 ----
  389.   static SET_pfile()
  390.   {
  391.       if (stat_flag) {
  392. !         fprintf(tfp, statfmt2, "pfile", "Phone number file", phonefile);
  393.           return;
  394.       }
  395.   
  396. diff -c xc30b-L1.5/xcport.c zxc/xcport.c
  397. *** xc30b-L1.5/xcport.c    Sat Dec 12 21:12:58 1992
  398. --- zxc/xcport.c    Sat Dec 19 15:33:15 1992
  399. ***************
  400. *** 55,60 ****
  401. --- 55,73 ----
  402.   static char port[SM_BUFF],    /* modem port device file string */
  403.           lckname[SM_BUFF];    /* lockfile string */
  404.   
  405. + extern short rtscts;
  406. + 
  407. + set_rtscts()
  408. + {
  409. +   if (rtscts)
  410. +     pmode.c_cflag |= CRTSCTS;
  411. +   else
  412. +     pmode.c_cflag &= ~CRTSCTS;
  413. +   
  414. +   if (mfd != -1)
  415. +     ioctl(mfd, TCSETAW, &pmode);
  416. + }
  417. + 
  418.   void xc_setflow(flow)
  419.   short flow;
  420.   {
  421. diff -c xc30b-L1.5/xcterm.c zxc/xcterm.c
  422. *** xc30b-L1.5/xcterm.c    Mon Oct 26 19:59:37 1992
  423. --- zxc/xcterm.c    Sat Dec 19 15:37:23 1992
  424. ***************
  425. *** 37,45 ****
  426.   char    ddsname[SM_BUFF];
  427.   short    s_flag, capture = FALSE;
  428.   
  429. - extern short delmode ;
  430.   extern char *strstr();
  431. ! extern short autoflag, hdplxflag, nlmode;
  432.   
  433.   static int  get_script(void);
  434.   static int  getconchr(void);
  435. --- 37,45 ----
  436.   char    ddsname[SM_BUFF];
  437.   short    s_flag, capture = FALSE;
  438.   
  439.   extern char *strstr();
  440. ! extern char rzcmd[SM_BUFF];
  441. ! extern short autoflag, hdplxflag, nlmode, delmode, Auto_ZM;
  442.   
  443.   static int  get_script(void);
  444.   static int  getconchr(void);
  445. ***************
  446. *** 157,162 ****
  447. --- 157,165 ----
  448.           extern short dosmode ;
  449.       register c;
  450.        
  451. +     short auto_zm_flag = FALSE, auto_zm_index = 1;
  452. +     static char auto_zm_string[] = "**\030B00000000000000\r";
  453. +      
  454.       doneyet_dd = FALSE;
  455.       intdel(FALSE);
  456.   Reterm:
  457. ***************
  458. *** 218,223 ****
  459. --- 221,251 ----
  460.               }
  461.               else
  462.                   fputc(c,tfp);
  463. + 
  464. +                   if (Auto_ZM) {
  465. +                     if (auto_zm_flag) {
  466. +                       if (c != auto_zm_string[auto_zm_index++])
  467. +                         auto_zm_flag = FALSE;
  468. +                       else if (auto_zm_index == strlen(auto_zm_string)) {
  469. +                         auto_zm_flag = FALSE;
  470. +                         show(2,"<< ZMODEM Autodownload >>");
  471. +                         strcpy(word,"$\0"); /* let s_shell know we need to redirect the modem */
  472. +                         strcpy(lptr,rzcmd); 
  473. +                         if  (s_shell()) {
  474. +                             show(1,"<< ZMODEM Download Failed! >>");
  475. +                             beep();
  476. +                         } else {
  477. +                             show(2,"<< ZMODEM Download succeded! >>");
  478. +                             beep(); beep(); beep();
  479. +                         }
  480. +                       }
  481. +                     }
  482. +                     else if (c == auto_zm_string[0]) {
  483. +                       auto_zm_flag = TRUE;
  484. +                       auto_zm_index = 1;
  485. +                     }
  486. +                 }
  487. + 
  488.               if (capture && c != '\r')
  489.                   fputc(c,cfp);
  490.           }
  491. -- 
  492. =*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=
  493. | Leif Sawyer -= AXLAS@acad2.alaska.edu | WWIVNet (The Patroler) -= 27@9702 |
  494. | Try these also -= ASLAS@acad3.alaska.edu | BITNET -= AXLAS@alaska.BITNET  |
  495. | USnail -= 3631 E. 42nd Circle #7 Anch, AK 99508 |  #define FLAME /dev/nul |
  496. | "Views expressed by moi are not necessarily those Defined by my employer" |
  497. =*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=
  498.