开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 通讯/手机编程 > Modem编程 > 查看源码
sysdep1.c
资源名称：minicom-1.83.tar.gz　[点击查看]
上传用户：tianjinjs
上传日期：2007-01-05
资源大小：309k
文件大小：10k
源码类别：

Modem编程

开发平台：

Unix_Linux

sysdep1.c：源码内容
  1. /*
  2.  * sysdep1.c system dependant routines.
  3.  *
  4.  *  $Id: sysdep1.c,v 1.2 1999/09/03 12:25:24 walker Exp $
  5.  *
  6.  * m_dtrtoggle - dropt dtr and raise it again
  7.  * m_break - send BREAK signal
  8.  * m_getdcd - get modem dcd status
  9.  * m_setdcd - set modem dcd status
  10.  * m_savestate - save modem state
  11.  * m_restorestate - restore saved modem state
  12.  * m_nohang - tell driver not to hang up at DTR drop
  13.  * m_hupcl - set hangup on close on/off
  14.  * m_setparms - set baudrate, parity and number of bits.
  15.  * m_readchk - see if there is input waiting.
  16.  * m_wait - wait for child to finish. Sysdep. too.
  17.  *
  18.  * If it's possible, Posix termios are preferred.
  19.  *
  20.  * This file is part of the minicom communications package,
  21.  * Copyright 1991-1995 Miquel van Smoorenburg.
  22.  *
  23.  * This program is free software; you can redistribute it and/or
  24.  * modify it under the terms of the GNU General Public License
  25.  * as published by the Free Software Foundation; either version
  26.  * 2 of the License, or (at your option) any later version.
  27.  *
  28.  *   jl  23.06.97  adjustable DTR downtime
  29.  */
  30. #include "sysdep.h"
  33. /* Set hardware flow control. */
  34. void m_sethwf(fd, on)
  35. int fd, on;
  36. {
  37. #ifdef _DGUX_SOURCE
  38.   struct termiox x;
  39. #endif
  40. #ifdef _POSIX
  41.   struct termios tty;
  43.   tcgetattr(fd, &tty);
  44.   if (on)
  45. tty.c_cflag |= CRTSCTS;
  46.   else
  47. tty.c_cflag &= ~CRTSCTS;
  48.   tcsetattr(fd, TCSANOW, &tty);
  49. #endif
  51. #ifdef _DGUX_SOURCE
  52.   if (ioctl(fd, TCGETX, &x) < 0) {
  53. fprintf(stderr, "can't get termiox attr.n");
  54. return;
  55.   }
  56.   x.x_hflag = on ? RTSXOFF|CTSXON : 0;
  58.   if (ioctl(fd, TCSETX, &x) < 0) {
  59. fprintf(stderr, "can't set termiox attr.n");
  60. return;
  61.   }
  62. #endif
  63. }
  65. /* Set RTS line. Sometimes dropped. Linux specific? */
  66. void m_setrts(fd)
  67. int fd;
  68. {
  69. #if defined(TIOCM_RTS) && defined(TIOCMODG)
  70.   int mcs;
  72.   ioctl(fd, TIOCMODG, &mcs);
  73.   mcs |= TIOCM_RTS;
  74.   ioctl(fd, TIOCMODS, &mcs);
  75. #endif
  76. #ifdef _COHERENT
  77.   ioctl(fd, TIOCSRTS, 0);
  78. #endif
  79. }
  81. /*
  82.  * Drop DTR line and raise it again.
  83.  */
  84. void m_dtrtoggle(fd,sec) 
  85. int fd;
  86. int sec;
  87. {
  88. #ifdef TIOCSDTR
  90.   /* Use the ioctls meant for this type of thing. */
  91.   ioctl(fd, TIOCCDTR, 0);
  92.   if (sec>0) {
  93.     sleep(sec);
  94.     ioctl(fd, TIOCSDTR, 0);
  95.   }
  97. #else /* TIOCSDTR */
  98. #  if defined (_POSIX) && !defined(_HPUX_SOURCE)
  100.   /* Posix - set baudrate to 0 and back */
  101.   struct termios tty, old;
  103.   tcgetattr(fd, &tty);
  104.   tcgetattr(fd, &old);
  105.   cfsetospeed(&tty, B0);
  106.   cfsetispeed(&tty, B0);
  107.   tcsetattr(fd, TCSANOW, &tty);
  108.   if (sec>0) {
  109.     sleep(sec);
  110.     tcsetattr(fd, TCSANOW, &old);
  111.   }
  113. #  else /* POSIX */
  114. #    ifdef _V7
  116.   /* Just drop speed to 0 and back to normal again */
  117.   struct sgttyb sg, ng;
  118.   
  119.   ioctl(fd, TIOCGETP, &sg);
  120.   ioctl(fd, TIOCGETP, &ng);
  121.   
  122.   ng.sg_ispeed = ng.sg_ospeed = 0;
  123.   ioctl(fd, TIOCSETP, &ng);
  124.   if (sec>0) {
  125.     sleep(sec);
  126.     ioctl(fd, TIOCSETP, &sg);
  127.   }
  129. #    endif /* _V7 */
  130. #    ifdef _HPUX_SOURCE
  131.   unsigned long mflag = 0L;
  133.   ioctl(fd, MCSETAF, &mflag);
  134.   ioctl(fd, MCGETA, &mflag);
  135.   mflag = MRTS | MDTR;
  136.   if (sec>0) {
  137.     sleep(sec);
  138.     ioctl(fd, MCSETAF, &mflag);
  139.   }
  140. #    endif /* _HPUX_SOURCE */
  141. #  endif /* POSIX */
  142. #endif /* TIOCSDTR */
  143. }
  145. /*
  146.  * Send a break
  147.  */
  148. void m_break(fd)
  149. int fd;
  150. { 
  151. #ifdef _POSIX
  152.   tcsendbreak(fd, 0);
  153. #else
  154. #  ifdef _V7
  155. #    ifndef TIOCSBRK
  156.   struct sgttyb sg, ng;
  158.   ioctl(fd, TIOCGETP, &sg);
  159.   ioctl(fd, TIOCGETP, &ng);
  160.   ng.sg_ispeed = ng.sg_ospeed = B110;
  161.   ng.sg_flags = BITS8 | RAW;
  162.   ioctl(fd, TIOCSETP, &ng);
  163.   write(fd, "", 10);
  164.   ioctl(fd, TIOCSETP, &sg);
  165. #    else
  166.   ioctl(fd, TIOCSBRK, 0);
  167.   sleep(1);
  168.   ioctl(fd, TIOCCBRK, 0);
  169. #    endif
  170. #  endif
  171. #endif
  172. }
  174. /*
  175.  * Get the dcd status
  176.  */
  177. int m_getdcd(fd)
  178. int fd;
  179. {
  180. #ifdef TIOCMODG
  181.   int mcs;
  182.    
  183.   ioctl(fd, TIOCMODG, &mcs);
  184.   return(mcs & TIOCM_CAR ? 1 : 0);
  185. #else
  186.   (void)fd;
  187.   return(0); /* Impossible!! (eg. Coherent) */
  188. #endif
  189. }
  191. /* Variables to save states in */
  192. #ifdef _POSIX
  193. static struct termios savetty;
  194. static int m_word;
  195. #else
  196. #  if defined (_BSD43) || defined (_V7)
  197. static struct sgttyb sg;
  198. static struct tchars tch;
  199. static int lsw;
  200. static int m_word;
  201. #  endif
  202. #endif
  204. /*
  205.  * Save the state of a port
  206.  */
  207. void m_savestate(fd)
  208. int fd;
  209. {
  210. #ifdef _POSIX
  211.   tcgetattr(fd, &savetty);
  212. #else
  213. #  if defined(_BSD43) || defined(_V7)
  214.   ioctl(fd, TIOCGETP, &sg);
  215.   ioctl(fd, TIOCGETC, &tch);
  216. #  endif
  217. #  ifdef _BSD43
  218.   ioctl(fd, TIOCLGET, &lsw);
  219. #  endif
  220. #endif
  221. #ifdef TIOCMODG
  222.   ioctl(fd, TIOCMODG, &m_word);
  223. #endif
  224. }
  226. /*
  227.  * Restore the state of a port
  228.  */
  229. void m_restorestate(fd)
  230. int fd;
  231. {
  232. #ifdef _POSIX
  233.   tcsetattr(fd, TCSANOW, &savetty);
  234. #else
  235. #  if defined(_BSD43) || defined(_V7)
  236.   ioctl(fd, TIOCSETP, &sg);
  237.   ioctl(fd, TIOCSETC, &tch);
  238. #  endif
  239. #  ifdef _BSD43  
  240.   ioctl(fd, TIOCLSET, &lsw);
  241. #  endif
  242. #endif
  243. #ifdef TIOCMODS
  244.   ioctl(fd, TIOCMODS, &m_word);
  245. #endif
  246. }
  248. /*
  249.  * Set the line status so that it will not kill our process
  250.  * if the line hangs up.
  251.  */
  252. /*ARGSUSED*/ 
  253. void m_nohang(fd)
  254. int fd;
  255. {
  256. #ifdef _POSIX
  257.   struct termios sgg;
  258.   
  259.   tcgetattr(fd, &sgg);
  260.   sgg.c_cflag |= CLOCAL;
  261.   tcsetattr(fd, TCSANOW, &sgg);
  262. #else
  263. #  if defined (_BSD43) && defined(LNOHANG)
  264.   int lsw;
  265.   
  266.   ioctl(fd, TIOCLGET, &lsw);
  267.   lsw |= LNOHANG;
  268.   ioctl(fd, TIOCLSET, &lsw);
  269. #  endif
  270. #  ifdef _COHERENT
  271.   /* Doesn't know about this either, me thinks. */
  272. #  endif
  273. #endif
  274. }
  276. /*
  277.  * Set hangup on close on/off.
  278.  */
  279. void m_hupcl(fd, on)
  280. int fd;
  281. int on;
  282. {
  283.   /* Eh, I don't know how to do this under BSD (yet..) */
  284. #ifdef _POSIX
  285.   struct termios sgg;
  286.   
  287.   tcgetattr(fd, &sgg);
  288.   if (on)
  289.    sgg.c_cflag |= HUPCL;
  290.   else
  291. sgg.c_cflag &= ~HUPCL;
  292.   tcsetattr(fd, TCSANOW, &sgg);
  293. #endif
  294. }
  296. /*
  297.  * Flush the buffers
  298.  */
  299. void m_flush(fd)
  300. int fd;
  301. {
  302. /* Should I Posixify this, or not? */
  303. #ifdef TCFLSH
  304.   ioctl(fd, TCFLSH, 2);
  305. #endif
  306. #ifdef TIOCFLUSH
  307. #ifdef _COHERENT
  308.   ioctl(fd, TIOCFLUSH, 0);
  309. #else
  310.   ioctl(fd, TIOCFLUSH, (void *)0);
  311. #endif
  312. #endif
  313. }
  315. /*
  316.  * See if there is input waiting.
  317.  * returns: 0=nothing, >0=something, -1=can't.
  318.  */
  319. int m_readchk(fd)
  320. int fd;
  321. {
  322. #ifdef FIONREAD
  323.   long i = -1;
  325.   (void) ioctl(fd, FIONREAD, &i);
  326.   return((int)i);
  327. #else
  328. #  if defined(F_GETFL) && defined(O_NDELAY)
  329.   int i, old;
  330.   char c;
  332.   old = fcntl(fd, F_GETFL, 0);
  333.   (void) fcntl(fd, F_SETFL, old | O_NDELAY);
  334.   i = read(fd, &c, 1);
  335.   (void) fcntl(fd, F_SETFL, old);
  337.   return(i);
  338. #  else
  339.   return(-1);
  340. #  endif
  341. #endif
  342. }
  344. /*
  345.  * Get maximum speed.
  346.  * Returns maximum speed / 100. (192-1152)
  347.  */
  348. int m_getmaxspd()
  349. {
  350. #ifdef B230400
  351.   return(2304);
  352. #elif defined(B115200)
  353.   return(1152);
  354. #elif defined(B57600)
  355.   return(576);
  356. #elif defined(B38400)
  357.   return(384);
  358. #elif defined(EXTB)
  359.   return(384);
  360. #elif defined(B19200)
  361.   return(192);
  362. #elif defined(EXTA)
  363.   return(192);
  364. #else
  365.   return(96);
  366. #endif
  367. }
  369. /*
  370.  * Set baudrate, parity and number of bits.
  371.  */
  372. void m_setparms(fd, baudr, par, bits, hwf, swf)
  373. int fd;
  374. char *baudr;
  375. char *par;
  376. char *bits;
  377. int hwf;
  378. int swf;
  379. {
  380.   int spd = -1;
  381.   int newbaud;
  382.   int bit = bits[0];
  384. #ifdef _POSIX
  385.   struct termios tty;
  387.   tcgetattr(fd, &tty);
  388. #else /* _POSIX */
  389.   struct sgttyb tty;
  391.   ioctl(fd, TIOCGETP, &tty);
  392. #endif /* _POSIX */
  394.   /* We generate mark and space parity ourself. */
  395.   if (bit == '7' && (par[0] == 'M' || par[0] == 'S'))
  396. bit = '8';
  398.   /* Check if 'baudr' is really a number */
  399.   if ((newbaud = (atol(baudr) / 100)) == 0 && baudr[0] != '0') newbaud = -1;
  401.   switch(newbaud) {
  402.    case 0:
  403. #ifdef B0
  404. spd = B0; break;
  405. #else
  406. spd = 0; break;
  407. #endif
  408.    case 3: spd = B300; break;
  409.    case 6: spd = B600; break;
  410.    case 12: spd = B1200; break;
  411.    case 24: spd = B2400; break;
  412.    case 48: spd = B4800; break;
  413.    case 96: spd = B9600; break;
  414. #ifdef B19200
  415.    case 192: spd = B19200; break;
  416. #else /* B19200 */
  417. #  ifdef EXTA
  418. case 192: spd = EXTA; break;
  419. #   else /* EXTA */
  420. case 192: spd = B9600; break;
  421. #   endif /* EXTA */
  422. #endif  /* B19200 */
  423. #ifdef B38400
  424.    case 384: spd = B38400; break;
  425. #else /* B38400 */
  426. #  ifdef EXTB
  427. case 384: spd = EXTB; break;
  428. #   else /* EXTB */
  429. case 384: spd = B9600; break;
  430. #   endif /* EXTB */
  431. #endif  /* B38400 */
  432. #ifdef B57600
  433. case 576: spd = B57600; break;
  434. #endif
  435. #ifdef B115200
  436. case 1152: spd = B115200; break;
  437. #endif
  438. #ifdef B230400
  439. case 2304: spd = B230400; break;
  440. #endif
  441.   }
  442.   
  443. #if defined (_BSD43) && !defined(_POSIX)
  444.   if (spd != -1) tty.sg_ispeed = tty.sg_ospeed = spd;
  445.   /* Number of bits is ignored */
  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;
  455.   ioctl(fd, TIOCSETP, &tty);
  457. #  ifdef TIOCSDTR
  458.   /* FIXME: huh? - MvS */
  459.   ioctl(fd, TIOCSDTR, 0);
  460. #  endif
  461. #endif /* _BSD43 && !_POSIX */
  463. #if defined (_V7) && !defined(_POSIX)
  464.   if (spd != -1) tty.sg_ispeed = tty.sg_ospeed = spd;
  465.   tty.sg_flags = RAW;
  466.   if (par[0] == 'E')
  467. tty.sg_flags |= EVENP;
  468.   else if (par[0] == 'O')
  469. tty.sg_flags |= ODDP;
  471.   ioctl(fd, TIOCSETP, &tty);
  472. #endif /* _V7 && !POSIX */
  474. #ifdef _POSIX
  476.   if (spd != -1) {
  477. cfsetospeed(&tty, (speed_t)spd);
  478. cfsetispeed(&tty, (speed_t)spd);
  479.   }
  481.   switch (bit) {
  482.    case '5':
  483.    tty.c_cflag = (tty.c_cflag & ~CSIZE) | CS5;
  484.    break;
  485.    case '6':
  486.    tty.c_cflag = (tty.c_cflag & ~CSIZE) | CS6;
  487.    break;
  488.    case '7':
  489.    tty.c_cflag = (tty.c_cflag & ~CSIZE) | CS7;
  490.    break;
  491.    case '8':
  492. default:
  493.    tty.c_cflag = (tty.c_cflag & ~CSIZE) | CS8;
  494.    break;
  495.   }
  496.   /* Set into raw, no echo mode */
  497.   tty.c_iflag =  IGNBRK;
  498.   tty.c_lflag = 0;
  499.   tty.c_oflag = 0;
  500.   tty.c_cflag |= CLOCAL | CREAD;
  501. #ifdef _DCDFLOW
  502.   tty.c_cflag &= ~CRTSCTS;
  503. #endif
  504.   tty.c_cc[VMIN] = 1;
  505.   tty.c_cc[VTIME] = 5;
  507.   if (swf)
  508. tty.c_iflag |= IXON | IXOFF;
  509.   else
  510. tty.c_iflag &= ~(IXON|IXOFF|IXANY);
  512.   tty.c_cflag &= ~(PARENB | PARODD);
  513.   if (par[0] == 'E')
  514. tty.c_cflag |= PARENB;
  515.   else if (par[0] == 'O')
  516. tty.c_cflag |= (PARENB | PARODD);
  518.   tcsetattr(fd, TCSANOW, &tty);
  520.   m_setrts(fd);
  521. #endif /* _POSIX */
  523. #ifndef _DCDFLOW
  524.   m_sethwf(fd, hwf);
  525. #endif
  526. }
  528. /*
  529.  * Wait for child and return pid + status
  530.  */
  531. int m_wait(stt)
  532. int *stt;
  533. {
  534. #if defined (_BSD43) && !defined(_POSIX)
  535.   int pid;
  536.   union wait st1;
  537.   
  538.   pid = wait((void *)&st1);
  539.   *stt = (unsigned)st1.w_retcode + 256 * (unsigned)st1.w_termsig;
  540.   return(pid);
  541. #else
  542.   int pid;
  543.   int st1;
  544.   
  545.   pid = wait(&st1);
  546.   *stt = (unsigned)WEXITSTATUS(st1) + 256 * (unsigned)WTERMSIG(st1);
  547.   return(pid);
  548. #endif
  549. }