home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / compsrcs / misc / volume05 / kermit.hdb < prev    next >
Encoding:
Internet Message Format  |  1991-08-27  |  18.4 KB
  1. From decwrl!labrea!rutgers!ukma!cwjcc!hal!ncoast!allbery Thu Nov 24 00:04:32 PST 1988
  2. Article 732 of comp.sources.misc:
  3. Path: granite!decwrl!labrea!rutgers!ukma!cwjcc!hal!ncoast!allbery
  4. From: eric@snark.UUCP (Eric S. Raymond)
  5. Newsgroups: comp.sources.misc
  6. Subject: v05i055: Kermit patches to enable dial to use HDB database, like cu
  7. Message-ID: <8811200118.AA00922@snark.UUCP>
  8. Date: 22 Nov 88 03:25:44 GMT
  9. Sender: allbery@ncoast.UUCP
  10. Reply-To: eric@snark.UUCP (Eric S. Raymond)
  11. Lines: 603
  12. Approved: allbery@ncoast.UUCP
  13.  
  14. Posting-number: Volume 5, Issue 55
  15. Submitted-by: "Eric S. Raymond" <eric@snark.UUCP>
  16. Archive-name: kermit.hdb
  17.  
  18. [About gets():  anyone who'd use gets() with a *pointer* is begging for a
  19. fingerd botch; at least my patch would make it obvious a lot sooner.  I do
  20. concede that the trailing newline is something of a problem, though.  ++bsa]
  21.  
  22. This article is a patch set for the 4D release of C-Kermit.  The code changes
  23. fix some minor compilation glitches under SVr2 UNIX, but more importantly they
  24. enable the ckermit dial command to accept a system name agument (like cu) and
  25. use the information represented in the Basic Networking Utilities (HoneyDanBer
  26. UUCP) database to set line, speed and modem type for the dial out.
  27.  
  28. For this to work, the software must be compiled with -DSVR2 on. This can be
  29. accomplished via 'make hdbx'. See the patch to ckuker.doc (first in the set)
  30. for details.
  31.  
  32. These patches work, but they're a bit on the crude side (Dialcodes ought to
  33. be supported, and the code could be taught how to interpret the Dialers file).
  34. I hope the Kermit maintainers (wherever they are) will pick these up, polish
  35. them a bit and include them in the next release.
  36.  
  37. If you are a Kermit maintainer, please ACK by email -- it would be nice to know
  38. this posting hasn't just dropped into a void.
  39.  
  40. *** ckuker.doc-old    Sun Nov 20 00:37:52 1988
  41. --- ckuker.doc    Sun Nov 20 00:46:21 1988
  42. ***************
  43. *** 1284,1289 ****
  44. --- 1284,1297 ----
  45.   The device used for dialing out is the one selected in  the  most  recent  "set
  46.   line"  command  (or on a workstation, the default line if no "set line" command
  47.   was given).  The "dial" command calls locks the path (see the section  on  line
  48. + 
  49. + One special convenience feature is available in the dial command under SVR2 and
  50. + later UNIX systems using HoneyDanBer UUCP. If you give dial a system name
  51. + argument that it can find in the Systems file, it will search through the
  52. + Systems and Devices file and set the line, modem type and communication speed
  53. + in accordance with what it finds there. However, dial codes will *not* be
  54. + interpreted. Nor will the HDB modemcap be used; for now, the modem name in the
  55. + Devices file must match one of kermit's internally-supported types.
  56.   
  57.   
  58.   
  59. *** ckuker.mak-old    Thu Nov 17 16:32:09 1988
  60. --- ckuker.mak    Thu Nov 17 18:34:45 1988
  61. ***************
  62. *** 9,14 ****
  63. --- 9,15 ----
  64.   # for Berkeley Unix 2.9 (PDP-11), "make bsd29"
  65.   # for DEC Ultrix 1.1 or 1.2, "make bsd"
  66.   # for AT&T 3Bx systems, "make att3bx"
  67. + # for AT&T System V with HoneyDanBer UUCP, "make hdbx"
  68.   # for AT&T generic System III/System V, "make sys3" or "make sys3nid"
  69.   # for Bell Unix Version 7 (aka 7th Edition), "make v7" (but see below)
  70.   # for Microsoft Xenix (/286, PC/AT, etc), "make xenix"
  71. ***************
  72. *** 138,147 ****
  73.       @echo 'Make what?  You must tell which system to make C-Kermit for.'
  74.   
  75.   wermit: ckcmai.o ckucmd.o ckuusr.o ckuus2.o ckuus3.o ckcpro.o ckcfns.o \
  76. !          ckcfn2.o ckucon.o ckutio.o ckufio.o ckudia.o ckuscr.o
  77.       $(CC2) $(LNKFLAGS) -o wermit ckcmai.o ckutio.o ckufio.o ckcfns.o \
  78.            ckcfn2.o ckcpro.o ckucmd.o ckuus2.o ckuus3.o ckuusr.o \
  79. !          ckucon.o ckudia.o ckuscr.o
  80.   
  81.   ckcmai.o: ckcmai.c ckcker.h ckcdeb.h
  82.   
  83. --- 139,148 ----
  84.       @echo 'Make what?  You must tell which system to make C-Kermit for.'
  85.   
  86.   wermit: ckcmai.o ckucmd.o ckuusr.o ckuus2.o ckuus3.o ckcpro.o ckcfns.o \
  87. !          ckcfn2.o ckucon.o ckutio.o ckufio.o ckudia.o ckuscr.o ckubnu.o
  88.       $(CC2) $(LNKFLAGS) -o wermit ckcmai.o ckutio.o ckufio.o ckcfns.o \
  89.            ckcfn2.o ckcpro.o ckucmd.o ckuus2.o ckuus3.o ckuusr.o \
  90. !          ckucon.o ckudia.o ckuscr.o ckubnu.o
  91.   
  92.   ckcmai.o: ckcmai.c ckcker.h ckcdeb.h
  93.   
  94. ***************
  95. *** 175,181 ****
  96.   
  97.   ckudia.o: ckudia.c ckcker.h ckcdeb.h
  98.   
  99. ! ckuscr.o: ckuscr.c ckcker.h ckcdeb.h
  100.   #
  101.   ###########################################################################
  102.   #
  103. --- 176,184 ----
  104.   
  105.   ckudia.o: ckudia.c ckcker.h ckcdeb.h
  106.   
  107. ! ckuscr.o: ckuscr.c ckucmd.h ckcker.h ckcdeb.h
  108. ! 
  109. ! ckubnu.o: ckubnu.c ckcker.h ckcdeb.h
  110.   #
  111.   ###########################################################################
  112.   #
  113. ***************
  114. *** 208,222 ****
  115.       make wermit "CFLAGS = -DUXIII -DDEBUG -DTLOG -i -O" "LNKFLAGS = -i"
  116.   
  117.   
  118.   #Generic ATT System III or System V (no I&D space)
  119.   sys3nid:
  120.       make wermit "CFLAGS = -DUXIII -DDEBUG -DTLOG -O" "LNKFLAGS ="
  121.   
  122.   
  123.   #AT&T 3B-series computers running System V
  124. ! #  Only difference from sys3 is lock file stuff...
  125.   att3bx:
  126. !     make wermit "CFLAGS = -DUXIII -DATT3BX -DDEBUG -DTLOG -i -O" \
  127.           "LNKFLAGS = -i"
  128.   
  129.   
  130. --- 211,230 ----
  131.       make wermit "CFLAGS = -DUXIII -DDEBUG -DTLOG -i -O" "LNKFLAGS = -i"
  132.   
  133.   
  134. + #Generic ATT System V with HoneyDanBer
  135. + hdbx:
  136. +     make "CFLAGS = -DUXIII -DDEBUG -DTLOG -DSVR2 -O" "LNKFLAGS =" wermit
  137. + 
  138. + 
  139.   #Generic ATT System III or System V (no I&D space)
  140.   sys3nid:
  141.       make wermit "CFLAGS = -DUXIII -DDEBUG -DTLOG -O" "LNKFLAGS ="
  142.   
  143.   
  144.   #AT&T 3B-series computers running System V
  145. ! #  Only difference from sys3 is lock file stuff & SVR2 support...
  146.   att3bx:
  147. !     make wermit "CFLAGS = -DUXIII -DATT3BX -DDEBUG -DTLOG -DSVR2 -i -O" \
  148.           "LNKFLAGS = -i"
  149.   
  150.   
  151. ***************
  152. *** 281,283 ****
  153. --- 289,298 ----
  154.   #Mostly Berkeley-like, but with some ATTisms
  155.   c70:
  156.       make wermit "CFLAGS= -DBSD4 -DC70 -DDEBUG -DTLOG"
  157. + 
  158. + 
  159. + 
  160. + 
  161. + 
  162. + 
  163. + 
  164. *** ckcdeb.h-old    Thu Nov 17 11:09:19 1988
  165. --- ckcdeb.h    Thu Nov 17 17:10:27 1988
  166. ***************
  167. *** 102,113 ****
  168.   
  169.   
  170.   /* Some special includes for VAX/VMS */
  171. ! 
  172.   #ifdef vax11c
  173.   #include ssdef
  174.   #include stsdef
  175.   #endif
  176. ! 
  177.   /* Program return codes for VMS, DECUS C, and Unix */
  178.   
  179.   #ifdef vax11c
  180. --- 102,113 ----
  181.   
  182.   
  183.   /* Some special includes for VAX/VMS */
  184. ! /*
  185.   #ifdef vax11c
  186.   #include ssdef
  187.   #include stsdef
  188.   #endif
  189. ! */
  190.   /* Program return codes for VMS, DECUS C, and Unix */
  191.   
  192.   #ifdef vax11c
  193. *** ckcfn2.c-old    Thu Nov 17 18:00:53 1988
  194. --- ckcfn2.c    Thu Nov 17 18:02:48 1988
  195. ***************
  196. *** 298,304 ****
  197.         if (t == 3) cccount++;        /* Count any control-C's */
  198.   
  199.       if (t == eol) return('Q');
  200. !     *l = unchar(t);            /* Packet length */
  201.       debug(F101," pkt len","",*l);
  202.       if (*l + i + 2 > RBUFL) {     /* Sticks out too far? */
  203.           debug(F101," ** overrun","",i);
  204. --- 298,304 ----
  205.         if (t == 3) cccount++;        /* Count any control-C's */
  206.   
  207.       if (t == eol) return('Q');
  208. !     *l = todigit(t);            /* Packet length */
  209.       debug(F101," pkt len","",*l);
  210.       if (*l + i + 2 > RBUFL) {     /* Sticks out too far? */
  211.           debug(F101," ** overrun","",i);
  212. ***************
  213. *** 310,316 ****
  214.       if ((t = recpkt[i++]) == stchr) continue;
  215.       if (cccount && (t == 3)) { conoll("^C^C exit..."); doexit(0); }
  216.       if (t == eol) return('Q');
  217. !     *n = unchar(t);
  218.       debug(F101,"rpack: n","",*n);
  219.   
  220.   /* cont'd... */
  221. --- 310,316 ----
  222.       if ((t = recpkt[i++]) == stchr) continue;
  223.       if (cccount && (t == 3)) { conoll("^C^C exit..."); doexit(0); }
  224.       if (t == eol) return('Q');
  225. !     *n = todigit(t);
  226.       debug(F101,"rpack: n","",*n);
  227.   
  228.   /* cont'd... */
  229. *** ckcfns.c-old    Thu Nov 17 18:01:08 1988
  230. --- ckcfns.c    Thu Nov 17 18:02:41 1988
  231. ***************
  232. *** 139,145 ****
  233.       while ((a = *buf++) != '\0') {
  234.       if (rptflg) {            /* Repeat processing? */
  235.           if (a == rptq) {        /* Yes, got a repeat prefix? */
  236. !         rpt = unchar(*buf++);    /* Yes, get the repeat count, */
  237.           a = *buf++;        /* and get the prefixed character. */
  238.           }
  239.       }
  240. --- 139,145 ----
  241.       while ((a = *buf++) != '\0') {
  242.       if (rptflg) {            /* Repeat processing? */
  243.           if (a == rptq) {        /* Yes, got a repeat prefix? */
  244. !         rpt = todigit(*buf++);    /* Yes, get the repeat count, */
  245.           a = *buf++;        /* and get the prefixed character. */
  246.           }
  247.       }
  248. ***************
  249. *** 640,660 ****
  250.   
  251.       len = strlen(data);                /* Number of fields */
  252.   
  253. !     x = (len-- > 0) ? unchar(data[0]) : DSPSIZ;            /* Packet size */
  254.       if (spsizf == 0)
  255.       spsiz = (x < 10) ? DSPSIZ : x;
  256.   
  257. !     x = (len-- > 0) ? unchar(data[1]) : DMYTIM;        /* Timeout */
  258.       if (timef == 0)
  259.       timint = (x < 0) ? DMYTIM : x;
  260.   
  261.       npad = 0; padch = '\0';                        /* Padding */
  262.       if (len-- > 0) {
  263. !     npad = unchar(data[2]);
  264.       if (len-- > 0) padch = ctl(data[3]); else padch = 0;
  265.       }
  266.   
  267. !     seol = (len-- > 0) ? unchar(data[4]) : '\r';    /* Terminator  */
  268.       if ((seol < 2) || (seol > 037)) seol = '\r';
  269.   
  270.       ctlq = (len-- > 0) ? data[5] : CTLQ;                /* Control prefix */
  271. --- 640,660 ----
  272.   
  273.       len = strlen(data);                /* Number of fields */
  274.   
  275. !     x = (len-- > 0) ? todigit(data[0]) : DSPSIZ;            /* Packet size */
  276.       if (spsizf == 0)
  277.       spsiz = (x < 10) ? DSPSIZ : x;
  278.   
  279. !     x = (len-- > 0) ? todigit(data[1]) : DMYTIM;        /* Timeout */
  280.       if (timef == 0)
  281.       timint = (x < 0) ? DMYTIM : x;
  282.   
  283.       npad = 0; padch = '\0';                        /* Padding */
  284.       if (len-- > 0) {
  285. !     npad = todigit(data[2]);
  286.       if (len-- > 0) padch = ctl(data[3]); else padch = 0;
  287.       }
  288.   
  289. !     seol = (len-- > 0) ? todigit(data[4]) : '\r';    /* Terminator  */
  290.       if ((seol < 2) || (seol > 037)) seol = '\r';
  291.   
  292.       ctlq = (len-- > 0) ? data[5] : CTLQ;                /* Control prefix */
  293. ***************
  294. *** 905,911 ****
  295.   */
  296.   
  297.   cwd(vdir) char *vdir; {
  298. !     vdir[unchar(*vdir) + 1] = '\0';    /* End with a null */
  299.       if (zchdir(vdir+1)) {
  300.       encstr(vdir+1);
  301.       ack1(data);
  302. --- 905,911 ----
  303.   */
  304.   
  305.   cwd(vdir) char *vdir; {
  306. !     vdir[todigit(*vdir) + 1] = '\0';    /* End with a null */
  307.       if (zchdir(vdir+1)) {
  308.       encstr(vdir+1);
  309.       ack1(data);
  310. *** ckcker.h-old    Thu Nov 17 17:50:01 1988
  311. --- ckcker.h    Thu Nov 17 17:53:16 1988
  312. ***************
  313. *** 84,89 ****
  314.   /* Macros */
  315.   
  316.   #define tochar(ch)  ((ch) + SP )    /* Number to character */
  317. ! #define unchar(ch)  ((ch) - SP )    /* Character to number */
  318.   #define ctl(ch)     ((ch) ^ 64 )    /* Controllify/Uncontrollify */
  319.   #define unpar(ch)   ((ch) & 127)    /* Clear parity bit */
  320. --- 84,89 ----
  321.   /* Macros */
  322.   
  323.   #define tochar(ch)  ((ch) + SP )    /* Number to character */
  324. ! #define todigit(ch)  ((ch) - SP )    /* Character to number */
  325.   #define ctl(ch)     ((ch) ^ 64 )    /* Controllify/Uncontrollify */
  326.   #define unpar(ch)   ((ch) & 127)    /* Clear parity bit */
  327. *** ckcpro.w-old    Sun Nov 20 00:17:08 1988
  328. --- ckcpro.w    Sun Nov 20 00:17:56 1988
  329. ***************
  330. *** 113,119 ****
  331.                else { errpkt("Can't type file"); SERVE; } }
  332.   
  333.   <generic>U { x = *(srvcmd+1);            /* Disk Usage query */
  334. !              x = ((x == '\0') || (x == unchar(0)));
  335.            x = (x ? syscmd(SPACMD,"") : syscmd(SPACM2,srvcmd+2));
  336.                if (x) BEGIN ssinit; else { errpkt("Can't check space"); SERVE; }}
  337.   
  338. --- 113,119 ----
  339.                else { errpkt("Can't type file"); SERVE; } }
  340.   
  341.   <generic>U { x = *(srvcmd+1);            /* Disk Usage query */
  342. !              x = ((x == '\0') || (x == todigit(0)));
  343.            x = (x ? syscmd(SPACMD,"") : syscmd(SPACM2,srvcmd+2));
  344.                if (x) BEGIN ssinit; else { errpkt("Can't check space"); SERVE; }}
  345.   
  346. *** ckubnu.c-old    Sun Nov 20 00:46:58 1988
  347. --- ckubnu.c    Sat Nov 19 23:43:02 1988
  348. ***************
  349. *** 0 ****
  350. --- 1,153 ----
  351. + /*
  352. +  * ckubnu.c -- set call parameters from the SVR2 database files
  353. +  *
  354. +  * A quick hack to make the dial command more convenient on systems with the
  355. +  * HoneyDanBer UUCP database files available, by Eric S. Raymond (eric@snark).
  356. +  * This code is released to the public domain, do with it what ye will.
  357. +  *
  358. +  * Theory: call bnuset() on the argument of a dial command before doing
  359. +  * anything else. If the dial argument matches a system name in the UUCP
  360. +  * database, the code will try to set speed, line, and modem-type properly;
  361. +  * and bnuset() will modify its argument into the telephone number of the
  362. +  * calling system.
  363. +  *
  364. +  * Implementation: mine all the stuff out of the Systems and Devices files,
  365. +  * then write corresponding kermit commands to a disappearing take-file. This
  366. +  * way we get all of kermit's normal command checking and debug options for
  367. +  * free.
  368. +  *
  369. +  * Bugs: we don't interpret dialcodes. Nor do we use the Dialers file, which
  370. +  * would make us independent of the hardwired modem-type cruft in ckudia.c.
  371. +  * Like I said, this is a quick hack.
  372. +  */
  373. + #ifdef SVR2
  374. + #include "ckcdeb.h"
  375. + #include "ckcker.h"
  376. + #include "ckuusr.h"
  377. + #include <stdio.h>
  378. + #include <ctype.h>
  379. + #include <string.h>
  380. + 
  381. + #define SYSTEMS    "/usr/lib/uucp/Systems"
  382. + #define DEVICES    "/usr/lib/uucp/Devices"
  383. + #define WSPC    "\t\n "
  384. + 
  385. + static char *
  386. + findline(key, qual, file)
  387. + /* find a line in the given file beginning with the given word, if any */
  388. + char    *key;
  389. + char    *qual;
  390. + char    *file;
  391. + {
  392. +     char    buf[BUFSIZ], *cp;
  393. +     FILE    *fp;
  394. + 
  395. +     if ((fp = fopen(file, "r")) != (FILE *)NULL)
  396. +         while (fgets(buf, BUFSIZ, fp) != (char *)NULL)
  397. +         {
  398. +         char    *sys;
  399. +         int    foundqual = (qual == (char *)NULL);
  400. + 
  401. +         /* skip comments */
  402. +         if (cp = strchr(buf, '#'))
  403. +             *cp = '\0';
  404. + 
  405. +         /* check that qual is present somewhere on the line */
  406. +         if (!foundqual)
  407. +             for (cp = buf; *cp; cp++)
  408. +             if (*cp == *qual && !strncmp(cp, qual, strlen(qual)))
  409. +             {
  410. +                 foundqual = 1;
  411. +                 break;
  412. +             }
  413. + 
  414. +         /* if it is and the first token matches sys, jackpot! */
  415. +         sys = strtok(buf, "\t ");
  416. +         if (foundqual && (sys != (char *)NULL) && !strcmp(sys, key))
  417. +             return(buf);
  418. +         }
  419. + 
  420. +     return((char *)NULL);
  421. + }
  422. + 
  423. + bnuset(telnbr)
  424. + char *telnbr;
  425. + {
  426. +     char    *sysentry, *device, *cp, speedtok[BUFSIZ], devtok[BUFSIZ];
  427. +     int        nspeed;
  428. + 
  429. +     if (!isdigit(telnbr[0])
  430. +         && (sysentry = findline(telnbr, (char *)NULL, SYSTEMS)))
  431. +     {
  432. +         (void) strtok((char *)NULL, WSPC);    /* skip call time */
  433. +         if (device = strtok((char*)NULL, WSPC))
  434. +         {
  435. +         /* we'll deal with the device type below */
  436. +         (void) strcpy(devtok, device);
  437. + 
  438. +         /* look for the line speed field */
  439. +         if (cp = strtok((char*)NULL, WSPC))
  440. +         {
  441. +             /* set speed from this field */
  442. +             (void) strcpy(speedtok, cp);
  443. +             nspeed = atoi(cp);
  444. + 
  445. +             if (cp = strtok((char*)NULL, WSPC))
  446. +             {
  447. +             /*
  448. +              * Set phone number from this field.
  449. +              * Someday, do Dialcodes processing here.
  450. +              */
  451. +             (void) strcpy(telnbr, cp);
  452. + 
  453. +             /* feed the rest of the line to script, maybe? */
  454. +             }
  455. +         }
  456. + 
  457. +         /* O.K., look for a devtype/speed match in DEVICES */
  458. +         if ((device = findline(devtok,speedtok,DEVICES)) !=(char*)NULL)
  459. +         {
  460. +             /* look for the device field */
  461. +             if (cp = strtok((char*)NULL, WSPC))
  462. +             {
  463. +             extern char cmdbuf[], ttname[];
  464. +             extern int speed, local, mdmtyp;
  465. +             char fullname[BUFSIZ];
  466. +             int    x;
  467. + 
  468. +             /* it's field 2 */
  469. +             (void) sprintf(fullname, "/dev/%s", cp);
  470. +             if (ttopen(fullname,&x,mdmtyp) < 0 ) 
  471. +                 perror("Sorry, can't open line");
  472. +             else
  473. +             {
  474. +                 local = 1;
  475. +                 (void) strcpy(ttname,fullname);
  476. +                 debug(F111,"set line ",ttname,local);
  477. +                 /*
  478. +                  * Since we found a device, set speed too.
  479. +                  * We found it in Devices, so assume it's valid.
  480. +                  */
  481. +                 speed = nspeed;
  482. +             }
  483. + 
  484. +             /* skip field 3, don't know what it's good for */
  485. +             (void) strtok((char *)NULL, WSPC);
  486. + 
  487. +             /* skip field 4, it's just the speed qualifier */
  488. +             (void) strtok((char *)NULL, WSPC);
  489. + 
  490. +             /* now set the modem type from field 5 */
  491. +             if (cp = strtok((char *)NULL, WSPC))
  492. +             {
  493. +                 extern struct keytab mdmtab[];
  494. +                 extern int nmdm;
  495. + 
  496. +                 mdmtyp = lookup(mdmtab,cp,nmdm,&x);
  497. +             }
  498. +             }
  499. +         }
  500. +         }
  501. +     }
  502. + }
  503. + #endif /* SVR2 */
  504. *** ckucmd.h-old    Thu Nov 17 17:54:32 1988
  505. --- ckucmd.h    Thu Nov 17 17:58:38 1988
  506. ***************
  507. *** 9,14 ****
  508. --- 9,20 ----
  509.    copyright notice is retained.
  510.   */
  511.    
  512. + #ifdef SVR2
  513. + typedef void    catch_t;
  514. + #else
  515. + typedef int    catch_t;
  516. + #endif
  517. + 
  518.   /* Special getchars... */
  519.    
  520.   #ifdef vax11c
  521. *** ckudia.c-old    Thu Nov 17 11:33:43 1988
  522. --- ckudia.c    Sat Nov 19 21:50:38 1988
  523. ***************
  524. *** 441,448 ****
  525.   
  526.   static jmp_buf sjbuf;
  527.   
  528. ! static int (*savAlrm)();    /* for saving alarm handler */
  529. ! static int (*savInt)();        /* for saving interrupt handler */
  530.   
  531.   dialtime() {            /* timer interrupt handler */
  532.       longjmp( sjbuf, F_time );
  533. --- 441,448 ----
  534.   
  535.   static jmp_buf sjbuf;
  536.   
  537. ! static catch_t (*savAlrm)();    /* for saving alarm handler */
  538. ! static catch_t (*savInt)();    /* for saving interrupt handler */
  539.   
  540.   dialtime() {            /* timer interrupt handler */
  541.       longjmp( sjbuf, F_time );
  542. ***************
  543. *** 512,517 ****
  544. --- 512,521 ----
  545.       int n, n1;
  546.       char *pc;        /* pointer to a character */
  547.   
  548. + #ifdef SVR2
  549. +     bnuset(telnbr);    /* try to set parameters from the SVR2 files */
  550. + #endif /* SVR2 */
  551. + 
  552.       if (!mdmtyp) {
  553.           printf("Sorry, you must 'set modem' first\n");
  554.           return(-2);
  555. ***************
  556. *** 537,543 ****
  557.   
  558.                       /* interdigit waits for tone dial */
  559.   /* ...dial, cont'd */
  560. - 
  561.   
  562.       waitct = 1*strlen(telnbr) ;    /* compute time to dial worst case */
  563.       waitct += pmdminf->dial_time;    /* dialtone + completion wait times */
  564. --- 541,546 ----
  565. *** ckuscr.c-old    Thu Nov 17 11:09:45 1988
  566. --- ckuscr.c    Thu Nov 17 18:33:38 1988
  567. ***************
  568. *** 32,37 ****
  569. --- 32,38 ----
  570.   #include <signal.h>
  571.   #include <setjmp.h>
  572.   #include "ckcker.h"
  573. + #include "ckucmd.h"
  574.   
  575.   extern int local, speed, flow, seslog, mdmtyp;
  576.   extern char ttname[];
  577. ***************
  578. *** 217,223 ****
  579.   
  580.   login(cmdstr) char *cmdstr; {
  581.   
  582. !     int (*saveAlm)();    /* save incomming alarm function */
  583.       char *e;
  584.   
  585.       s = cmdstr;            /* make global to ckuscr.c */
  586. --- 218,224 ----
  587.   
  588.   login(cmdstr) char *cmdstr; {
  589.   
  590. !     catch_t (*saveAlm)();    /* save incoming alarm function */
  591.       char *e;
  592.   
  593.       s = cmdstr;            /* make global to ckuscr.c */
  594. *** ckuusr.c-old    Thu Nov 17 12:14:47 1988
  595. --- ckuusr.c    Thu Nov 17 20:51:16 1988
  596. ***************
  597. *** 1042,1048 ****
  598.       else {                /* Parent */
  599.    
  600.           int wstat;            /* Kermit must wait for child */
  601. !     int (*istat)(), (*qstat)();
  602.    
  603.       istat = signal(SIGINT,SIG_IGN);    /* Let the fork handle keyboard */
  604.       qstat = signal(SIGQUIT,SIG_IGN); /* interrupts itself... */
  605. --- 1042,1048 ----
  606.       else {                /* Parent */
  607.    
  608.           int wstat;            /* Kermit must wait for child */
  609. !     catch_t (*istat)(), (*qstat)();
  610.    
  611.       istat = signal(SIGINT,SIG_IGN);    /* Let the fork handle keyboard */
  612.       qstat = signal(SIGQUIT,SIG_IGN); /* interrupts itself... */
  613. -- 
  614.       Eric S. Raymond                     (the mad mastermind of TMN-Netnews)
  615.       Email: eric@snark.uu.net                       CompuServe: [72037,2306]
  616.       Post: 22 S. Warren Avenue, Malvern, PA 19355      Phone: (215)-296-5718
  617.  
  618.  
  619.