home *** CD-ROM | disk | FTP | other *** search
/ High Voltage Shareware / high1.zip / high1 / DIR10 / MINCOM15.ZIP / SYSDEP1.C < prev    next >
C/C++ Source or Header  |  1993-10-16  |  10KB  |  546 lines
  1. /*
  2.  * This file is part of the Minicom Communications Program,
  3.  * written by Miquel van Smoorenburg 1991/1992/1993.
  4.  *
  5.  * sysdep1.c       - system dependant routines.
  6.  *
  7.  * m_dtrtoggle      - dropt dtr and raise it again
  8.  * m_break      - send BREAK signal
  9.  * m_getdcd      - get modem dcd status
  10.  * m_setdcd      - set modem dcd status
  11.  * m_savestate      - save modem state
  12.  * m_restorestate - restore saved modem state
  13.  * m_nohang      - tell driver not to hang up at DTR drop
  14.  * m_hupcl      - set hangup on close on/off (for Quit without reset)
  15.  * m_setparms      - set baudrate, parity and number of bits.
  16.  * m_wait      - wait for child to finish. System dependant too.
  17.  *
  18.  *  If it's possible, Posix termios are preferred.
  19.  */
  20. #include <sys/types.h>
  21. #if defined (_POSIX_SOURCE) || defined(_BSD43)
  22. #  include <stdlib.h>
  23. #  include <unistd.h>
  24. #endif
  25. #ifdef _NO_TERMIOS
  26. #  undef _POSIX_SOURCE
  27. #endif
  28. #ifndef _COH3
  29. #  include <sys/wait.h>
  30. #endif
  31. #if defined (_V7) && !defined(_POSIX_SOURCE)
  32. #  include <sgtty.h>
  33. #endif
  34. #if defined (_SYSV) && !defined(_POSIX_SOURCE)
  35. #  include <termio.h>
  36. #endif
  37. #ifdef _POSIX_SOURCE
  38. #  include <termios.h>
  39. #endif
  40. #ifdef _HPUX_SOURCE
  41. #  include <sys/modem.h>
  42. #endif
  43. #if defined(_BSD43) || defined (_SYSV)
  44. #  include <sys/ioctl.h>
  45. #endif
  46. #include <stdio.h>
  47. #include <setjmp.h>
  48. #include "window.h"
  49. #include "minicom.h"
  50.  
  51. /* Be sure we know WEXITSTATUS and WTERMSIG */
  52. #if !defined(_BSD43)
  53. #  ifndef WEXITSTATUS
  54. #    define WEXITSTATUS(s) (((s) >> 8) & 0377)
  55. #  endif
  56. #  ifndef WTERMSIG
  57. #    define WTERMSIG(s) ((s) & 0177)
  58. #  endif
  59. #endif
  60.  
  61. /* Some ancient SysV systems don't define these */
  62. #ifndef VMIN
  63. #  define VMIN 4
  64. #endif
  65. #ifndef VTIME
  66. #  define VTIME 5
  67. #endif
  68. #ifndef IUCLC
  69. #  define IUCLC 0
  70. #endif
  71. #ifndef IXANY
  72. #  define IXANY 0
  73. #endif
  74.  
  75. /* Different names for the same beast. */
  76. #ifndef TIOCMODG            /* BSD 4.3 */
  77. #  ifdef TIOCMGET
  78. #    define TIOCMODG TIOCMGET        /* Posix */
  79. #  else
  80. #    ifdef MCGETA
  81. #      define TIOCMODG MCGETA        /* HP/UX */
  82. #    endif
  83. #  endif
  84. #endif
  85.  
  86. #ifndef TIOCMODS
  87. #  ifdef TIOCMSET
  88. #    define TIOCMODS TIOCMSET
  89. #  else
  90. #    ifdef MCSETA
  91. #      define TIOCMODS MCSETA
  92. #    endif
  93. #  endif
  94. #endif
  95.  
  96. #ifndef TIOCM_CAR            /* BSD + Posix */
  97. #  ifdef MDCD
  98. #    define TIOCM_CAR MDCD        /* HP/UX */
  99. #  endif
  100. #endif
  101.  
  102. /* Define some thing that might not be there */
  103. #ifndef TANDEM
  104. #  define TANDEM 0
  105. #endif
  106. #ifndef BITS8
  107. #  define BITS8 0
  108. #endif
  109. #ifndef PASS8
  110. #  ifdef LLITOUT
  111. #  define PASS8 LLITOUT
  112. #  else
  113. #  define PASS8 0
  114. #  endif
  115. #endif
  116. #ifndef CRTSCTS
  117. #  define CRTSCTS 0
  118. #endif
  119.  
  120. /* If this is SysV without Posix, emulate Posix. */
  121. #if defined(_SYSV) && !defined(_POSIX_SOURCE)
  122. #  define termio termios
  123. #  define _POSIX_SOURCE
  124. #  ifndef TCSANOW
  125. #    define TCSANOW 0
  126. #  endif
  127. #  define tcgetattr(fd, tty)        ioctl(fd, TCGETA, tty)
  128. #  define tcsetattr(fd, flags, tty) ioctl(fd, TCSETA, tty)
  129. #  define tcsendbreak(fd, len)      ioctl(fd, TCSBRK, 0)
  130. #  define speed_t int
  131. #  define cfsetispeed(xtty, xspd) \
  132.         ((xtty)->c_cflag = ((xtty)->c_cflag & ~CBAUD) | (xspd))
  133. #  define cfsetospeed(tty, spd)
  134. #endif
  135.  
  136. /*
  137.  * Drop DTR line and raise it again.
  138.  */
  139. void m_dtrtoggle(fd) 
  140. int fd;
  141. {
  142. #if defined (_POSIX_SOURCE) && !defined(_HPUX_SOURCE)
  143.   struct termios tty, old;
  144.  
  145.   tcgetattr(fd, &tty);
  146.   tcgetattr(fd, &old);
  147.   cfsetospeed(&tty, B0);
  148.   cfsetispeed(&tty, B0);
  149.   tcsetattr(fd, TCSANOW, &tty);
  150.   sleep(1);
  151.   tcsetattr(fd, TCSANOW, &old);
  152. #else
  153. #  ifdef _V7
  154. #    ifndef TIOCCDTR
  155.   /* Just drop speed to 0 and back to normal again */
  156.   struct sgttyb sg, ng;
  157.   
  158.   ioctl(fd, TIOCGETP, &sg);
  159.   ioctl(fd, TIOCGETP, &ng);
  160.   
  161.   ng.sg_ispeed = ng.sg_ospeed = 0;
  162.   ioctl(fd, TIOCSETP, &ng);
  163.   sleep(1);
  164.   ioctl(fd, TIOCSETP, &sg);
  165. #    else
  166.   /* Use the ioctls meant for this type of thing. */
  167.   ioctl(fd, TIOCCDTR, 0);
  168.   sleep(1);
  169.   ioctl(fd, TIOCSDTR, 0);
  170. #    endif
  171. #  endif
  172. #  ifdef _HPUX_SOURCE
  173.   unsigned long mflag = 0L;
  174.  
  175.   ioctl(fd, MCSETAF, &mflag);
  176.   ioctl(fd, MCGETA, &mflag);
  177.   mflag = MRTS | MDTR;
  178.   sleep(1);
  179.   ioctl(fd, MCSETAF, &mflag);
  180. #  endif
  181. #endif
  182. }
  183.  
  184. /*
  185.  * Send a break
  186.  */
  187. void m_break(fd)
  188. int fd;
  189. { 
  190. #ifdef _POSIX_SOURCE
  191. #  ifdef linux
  192.   /* Linux kernels < .99pl8 don't support tcsendbreak() yet.. */
  193.   ioctl(fd, TCSBRK, 0);
  194. #  else
  195.   tcsendbreak(fd, 0);
  196. #  endif
  197. #else
  198. #  ifdef _V7
  199. #    ifndef TIOCSBRK
  200.   struct sgttyb sg, ng;
  201.  
  202.   ioctl(fd, TIOCGETP, &sg);
  203.   ioctl(fd, TIOCGETP, &ng);
  204.   ng.sg_ispeed = ng.sg_ospeed = B110;
  205.   ng.sg_flags = BITS8 | RAW;
  206.   ioctl(fd, TIOCSETP, &ng);
  207.   write(fd, "\0\0\0\0\0\0\0\0\0\0", 10);
  208.   ioctl(fd, TIOCSETP, &sg);
  209. #    else
  210.   ioctl(fd, TIOCSBRK, 0);
  211.   sleep(1);
  212.   ioctl(fd, TIOCCBRK, 0);
  213. #    endif
  214. #  endif
  215. #endif
  216. }
  217.  
  218. /*
  219.  * Get the dcd status
  220.  */
  221. int m_getdcd(fd)
  222. int fd;
  223. {
  224. #ifdef _MINIX
  225.   struct sgttyb sg;
  226.   
  227.   ioctl(fd, TIOCGETP, &sg);
  228.   return(sg.sg_flags & DCD ? 1 : 0);
  229. #else
  230. #  ifdef TIOCMODG
  231.   int mcs;
  232.    
  233.   ioctl(fd, TIOCMODG, &mcs);
  234.   return(mcs & TIOCM_CAR ? 1 : 0);
  235. #  else
  236.   return(0); /* Impossible!! */
  237. #  endif
  238. #endif
  239. }
  240.  
  241. /*
  242.  * Set the DCD status
  243.  */
  244. /*ARGSUSED*/
  245. void m_setdcd(fd, what)
  246. int fd, what;
  247. {
  248. #ifdef _MINIX
  249.   /* Just a kludge for my Minix rs 232 driver */
  250.   struct sgttyb sg;
  251.   
  252.   ioctl(fd, TIOCGETP, &sg);
  253.   if (what)
  254.       sg.sg_flags |= DCD;
  255.   else
  256.       sg.sg_flags &= ~DCD;
  257.   ioctl(fd, TIOCSETP, &sg);
  258. #endif
  259. }
  260.  
  261. /* Variables to save states in */
  262. #ifdef _POSIX_SOURCE
  263. static struct termios savetty;
  264. static int m_word;
  265. #else
  266. #  if defined (_BSD43) || defined (_V7)
  267. static struct sgttyb sg;
  268. static struct tchars tch;
  269. static int lsw;
  270. static int m_word;
  271. #  endif
  272. #endif
  273.  
  274. /*
  275.  * Save the state of a port
  276.  */
  277. void m_savestate(fd)
  278. int fd;
  279. {
  280. #ifdef _POSIX_SOURCE
  281.   tcgetattr(fd, &savetty);
  282. #else
  283. #  if defined(_BSD43) || defined(_V7)
  284.   ioctl(fd, TIOCGETP, &sg);
  285.   ioctl(fd, TIOCGETC, &tch);
  286. #  endif
  287. #  ifdef _BSD43
  288.   ioctl(fd, TIOCLGET, &lsw);
  289. #  endif
  290. #endif
  291. #ifdef TIOCMODG
  292.   ioctl(fd, TIOCMODG, &m_word);
  293. #endif
  294. }
  295.  
  296. /*
  297.  * Restore the state of a port
  298.  */
  299. void m_restorestate(fd)
  300. int fd;
  301. {
  302. #ifdef _POSIX_SOURCE
  303.   tcsetattr(fd, TCSANOW, &savetty);
  304. #else
  305. #  if defined(_BSD43) || defined(_V7)
  306.   ioctl(fd, TIOCSETP, &sg);
  307.   ioctl(fd, TIOCSETC, &tch);
  308. #  endif
  309. #  ifdef _BSD43  
  310.   ioctl(fd, TIOCLSET, &lsw);
  311. #  endif
  312. #endif
  313. #ifdef TIOCMODS
  314.   ioctl(fd, TIOCMODS, &m_word);
  315. #endif
  316. }
  317.  
  318. /*
  319.  * Set the line status so that it will not kill our process
  320.  * if the line hangs up.
  321.  */
  322. /*ARGSUSED*/ 
  323. void m_nohang(fd)
  324. int fd;
  325. {
  326. #ifdef _POSIX_SOURCE
  327.   struct termios sgg;
  328.   
  329.   tcgetattr(fd, &sgg);
  330.   sgg.c_cflag |= CLOCAL;
  331.   tcsetattr(fd, TCSANOW, &sgg);
  332. #else
  333. #  if defined (_BSD43) && defined(LNOHANG)
  334.   int lsw;
  335.   
  336.   ioctl(fd, TIOCLGET, &lsw);
  337.   lsw |= LNOHANG;
  338.   ioctl(fd, TIOCLSET, &lsw);
  339. #  endif
  340. #  ifdef _MINIX
  341.   /* So? What about 1.6 ? */
  342. #  endif
  343. #  ifdef _COHERENT
  344.   /* Doesn't know about this either, me thinks. */
  345. #  endif
  346. #endif
  347. }
  348.  
  349. /*
  350.  * Set hangup on close on/off.
  351.  */
  352. void m_hupcl(fd, on)
  353. int fd;
  354. int on;
  355. {
  356.   /* Eh, I don't know how to do this under BSD (yet..) */
  357. #ifdef _POSIX_SOURCE
  358.   struct termios sgg;
  359.   
  360.   tcgetattr(fd, &sgg);
  361.   if (on)
  362.       sgg.c_cflag |= HUPCL;
  363.   else
  364.     sgg.c_cflag &= ~HUPCL;
  365.   tcsetattr(fd, TCSANOW, &sgg);
  366. #endif
  367. }
  368.  
  369. /*
  370.  * Flush the buffers
  371.  */
  372. void m_flush(fd)
  373. int fd;
  374. {
  375. /* Should I Posixify this, or not? */
  376. #ifdef TCFLSH
  377.   ioctl(fd, TCFLSH, 2);
  378. #endif
  379. #ifdef TIOCFLUSH
  380. #ifdef _COHERENT
  381.   ioctl(fd, TIOCFLUSH, 0);
  382. #else
  383.   ioctl(fd, TIOCFLUSH, (void *)0);
  384. #endif
  385. #endif
  386. }
  387.  
  388. /*
  389.  * Set baudrate, parity and number of bits.
  390.  */
  391. void m_setparms(fd, baudr, par, bits)
  392. int fd;
  393. char *baudr;
  394. char *par;
  395. char *bits;
  396. {
  397.   int spd = -1;
  398.  
  399. #ifdef _POSIX_SOURCE
  400.   struct termios tty;
  401.  
  402.   tcgetattr(fd, &tty);
  403. #else
  404.   struct sgttyb tty;
  405.  
  406.   ioctl(fd, TIOCGETP, &tty);
  407. #endif
  408.  
  409.   switch(atoi(baudr)) {
  410.       case 0:
  411. #ifdef B0
  412.             spd = B0;    break;
  413. #else
  414.             spd = 0;    break;
  415. #endif
  416.       case 300:    spd = B300;    break;
  417.       case 600:    spd = B600;    break;
  418.       case 1200:    spd = B1200;    break;
  419.       case 2400:    spd = B2400;    break;
  420.       case 4800:    spd = B4800;    break;
  421.       case 9600:    spd = B9600;    break;
  422. #ifdef B19200
  423.       case 19200:    spd = B19200;    break;
  424. #else
  425. #  ifdef EXTA
  426.     case 19200:    spd = EXTA;    break;
  427. #   else
  428.     case 19200:    spd = B9600;    break;
  429. #   endif    
  430. #endif    
  431. #ifdef B38400
  432.       case 38400:    spd = B38400;    break;
  433. #else
  434. #  ifdef EXTA
  435.     case 38400:    spd = EXTA;    break;
  436. #   else
  437.     case 38400:    spd = B9600;    break;
  438. #   endif
  439. #endif    
  440.  
  441.   }
  442.   
  443. #if defined (_BSD43) && !defined(_POSIX_SOURCE)
  444.   if (spd != -1) tty.sg_ispeed = tty.sg_ospeed = spd;
  445.   /* Number of bits is ignored */
  446.  
  447.   tty.sg_flags = RAW | TANDEM;
  448.   if (par[0] == 'E')
  449.     tty.sg_flags |= EVENP;
  450.   else if (par[0] == 'O')
  451.     tty.sg_flags |= ODDP;
  452.   else
  453.       tty.sg_flags |= PASS8 | ANYP;
  454.  
  455.   ioctl(fd, TIOCSETP, &tty);
  456.  
  457. #  ifdef TIOCSDTR
  458.   ioctl(fd, TIOCSDTR, 0);
  459. #  endif
  460. #endif
  461.  
  462. #if defined (_V7) && !defined(_POSIX_SOURCE)
  463.   if (spd != -1) tty.sg_ispeed = tty.sg_ospeed = spd;
  464. #ifdef _MINIX
  465.   switch(bits[0]) {
  466.       case '5' : spd = BITS5; break;
  467.       case '6' : spd = BITS6; break;
  468.       case '7' : spd = BITS7; break;
  469.       case '8' :
  470.       default: spd = BITS8; break;
  471.   }
  472.   tty.sg_flags = RAW | spd;
  473. #else
  474.   tty.sg_flags = RAW;
  475. #endif
  476.   if (par[0] == 'E')
  477.     tty.sg_flags |= EVENP;
  478.   else if (par[0] == 'O')
  479.     tty.sg_flags |= ODDP;
  480.  
  481.   ioctl(fd, TIOCSETP, &tty);
  482. #endif
  483.  
  484. #ifdef _POSIX_SOURCE
  485.  
  486.   cfsetospeed(&tty, (speed_t)spd);
  487.   cfsetispeed(&tty, (speed_t)spd);
  488.  
  489.   switch (bits[0]) {
  490.       case '5':
  491.           tty.c_cflag = (tty.c_cflag & ~CSIZE) | CS5;
  492.           break;
  493.       case '6':
  494.           tty.c_cflag = (tty.c_cflag & ~CSIZE) | CS6;
  495.           break;
  496.       case '7':
  497.           tty.c_cflag = (tty.c_cflag & ~CSIZE) | CS7;
  498.           break;
  499.       case '8':
  500.     default:
  501.           tty.c_cflag = (tty.c_cflag & ~CSIZE) | CS8;
  502.           break;
  503.   }        
  504.   /* Set into raw, no echo mode */
  505.   tty.c_iflag &= ~(IGNBRK | IGNCR | INLCR | ICRNL | IUCLC | 
  506.       IXANY | IXON | IXOFF | INPCK | ISTRIP);
  507.   tty.c_iflag |= (BRKINT | IGNPAR);
  508.   tty.c_oflag &= ~OPOST;
  509.   tty.c_lflag = ~(ICANON | ISIG | ECHO | ECHONL | ECHOE | ECHOK);
  510.   tty.c_cflag |= CREAD | CRTSCTS;
  511.   tty.c_cc[VMIN] = 1;
  512.   tty.c_cc[VTIME] = 5;
  513.  
  514.   tty.c_cflag &= ~(PARENB | PARODD);
  515.   if (par[0] == 'E')
  516.     tty.c_cflag |= PARENB;
  517.   else if (par[0] == 'O')
  518.     tty.c_cflag |= PARODD;
  519.  
  520.   tcsetattr(fd, TCSANOW, &tty);
  521. #endif
  522. }
  523.  
  524. /*
  525.  * Wait for child and return pid + status
  526.  */
  527. int m_wait(stt)
  528. int *stt;
  529. {
  530. #if defined (_BSD43) && !defined(_POSIX_SOURCE)
  531.   int pid;
  532.   union wait st1;
  533.   
  534.   pid = wait((void *)&st1);
  535.   *stt = (unsigned)st1.w_retcode + 256 * (unsigned)st1.w_termsig;
  536.   return(pid);
  537. #else
  538.   int pid;
  539.   int st1;
  540.   
  541.   pid = wait(&st1);
  542.   *stt = (unsigned)WEXITSTATUS(st1) + 256 * (unsigned)WTERMSIG(st1);
  543.   return(pid);
  544. #endif
  545. }
  546.