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

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > Telnet服务器 > 查看源码
tty.c
资源名称：3.0-20000220-SNAP.tar.gz　[点击查看]
上传用户：minyiyu
上传日期：2018-12-24
资源大小：864k
文件大小：13k
源码类别：

Telnet服务器

开发平台：

Unix_Linux

tty.c：源码内容
  1. /* $Id: tty.c,v 1.1 2000/01/15 01:45:37 edwardc Exp $ */
  3. /*
  4.  * TTY.C ------ Routines for pseudo terminal allocation.
  5.  * Various platforms are supported.
  6.  *
  7.  * Copyright (C) 1992, 1993  Yongguang Zhang
  8.  * All right reserved. (ygz@cs.purdue.edu)
  9.  */
  11. #ifndef lint
  12. static char *rcs_id="$Id: tty.c,v 1.1 2000/01/15 01:45:37 edwardc Exp $";
  13. #endif /* lint */
  15. #include "config.h"
  17. /* 
  18.  * Functions get_pty() and pty_search() in this file are adopted from
  19.  * X11R5 xterm, copyrighted by DEC & MIT.
  20.  */ 
  22. #ifdef hpux
  23. # define PTYCHAR1 "zyxwvutsrqp"
  24. # define PTYCHAR2 "fedcba9876543210"
  25. # define PTYDEV "/dev/ptym/ptyxx"
  26. # define TTYDEV "/dev/pty/ttyxx"
  27. #else   /* !hpux */
  28. # define PTYCHAR1 "pqrstuvwxyzPQRSTUVWXYZ"
  29. # define PTYCHAR2 "0123456789abcdef"
  30. # define PTYDEV "/dev/ptyxx"
  31. # define TTYDEV "/dev/ttyxx"
  32. #endif  /* !hpux */
  34. #ifdef SYSV
  35. extern char *ptsname();
  36. #endif
  38. #ifdef hpux
  39. # include <sys/utsname.h>
  40. #endif
  42. static char ptydev[32];
  43. static char ttydev[32];
  44. static int pty_search();
  46. /* This function opens up a pty master and stuffs its value into pty.
  47.  * If it finds one, it returns a value of 0.  If it does not find one,
  48.  * it returns a value of !0.  This routine is designed to be re-entrant,
  49.  * so that if a pty master is found and later, we find that the slave
  50.  * has problems, we can re-enter this function and get another one.
  51.  */
  53. int get_pty (pty)
  54.     int *pty;
  55. {
  56. strcpy (ptydev, PTYDEV);
  57. strcpy (ttydev, TTYDEV);
  59. #if defined(SYSV) && defined(SYSV386)
  60.         if (pty_search(pty) == 0)
  61.     return 0;
  62. #endif /* SYSV && SYSV386 */
  64. #if (defined(att) || defined(ATT)) && (!defined(_SEQUENT_))
  65. {
  66.     if ((*pty = open ("/dev/ptmx", O_RDWR)) < 0)
  67. return 1;
  68. # if defined(SVR4) || defined(SYSV386)
  69.     strcpy(ttydev, ptsname(*pty));
  70. # endif
  71.     return 0;
  72. }
  73. # define GET_PTY_DONE
  74. #endif /* ATT */
  76. #if defined(AIXV3) || defined(_IBMR2)
  77. {
  78.     if ((*pty = open ("/dev/ptc", O_RDWR)) < 0) 
  79. return 1;
  80.     strcpy(ttydev, (char *)ttyname(*pty));
  81.     return 0;
  82. }
  83. # define GET_PTY_DONE
  84. #endif
  86. #if defined(sgi) && defined(IRIX4)
  87. {
  88.     char    *tty_name;
  90.     tty_name = _getpty (pty, O_RDWR, 0622, 0);
  91.     if (tty_name == 0)
  92. return 1;
  93.     strcpy (ttydev, tty_name);
  94.     return 0;
  95. }
  96. # define GET_PTY_DONE
  97. #endif
  99. #ifdef __convex__
  100.         {
  101.     char *pty_name, *getpty();
  103.     while ((pty_name = getpty()) != NULL) {
  104. if ((*pty = open (pty_name, O_RDWR)) >= 0) {
  105.     strcpy(ptydev, pty_name);
  106.     strcpy(ttydev, pty_name);
  107.     ttydev[5] = 't';
  108.     return 0;
  109. }
  110.     }
  111.     return 1;
  112. }
  113. # define GET_PTY_DONE
  114. #endif /* __convex__ */
  116. #if defined(sequent) || defined(_SEQUENT_)
  117. {
  118.     char *sl[2], *ms[2];
  119.     *pty = getpseudotty (sl, ms);
  120.     strcpy(ptydev, ms[0]);
  121.     strcpy(ttydev, sl[0]);
  122.     return (*pty >= 0 ? 0 : 1);
  123. }
  124. # define GET_PTY_DONE
  125. #endif /* sequent */
  127. #if (defined(sgi) && defined(IRIX3)) || (defined(umips) && defined (SYSTYPE_SYSV))
  128. {
  129.     struct stat fstat_buf;
  130.     int tty;
  132.     *pty = open ("/dev/ptc", O_RDWR);
  133.     if (*pty < 0 || (fstat (*pty, &fstat_buf)) < 0) {
  134.       return(1);
  135.     }
  136.     sprintf (ttydev, "/dev/ttyq%d", minor(fstat_buf.st_rdev));
  137. # ifndef sgi
  138.     sprintf (ptydev, "/dev/ptyq%d", minor(fstat_buf.st_rdev));
  139.     if ((*tty = open (ttydev, O_RDWR)) < 0) {
  140.       close (*pty);
  141.       return(1);
  142.     }
  143. # endif /* !sgi */
  144.     /* got one! */
  145.     return(0);
  146. }
  147. # define GET_PTY_DONE
  148. #endif /* sgi or umips */
  150. #ifndef GET_PTY_DONE
  151. return pty_search(pty);
  152. #endif
  154. }
  156. /*
  157.  * Called from get_pty to iterate over likely pseudo terminals
  158.  * we might allocate.  Used on those systems that do not have
  159.  * a functional interface for allocating a pty.
  160.  * Returns 0 if found a pty, 1 if fails.
  161.  */
  162. static int pty_search(pty)
  163.     int *pty;
  164. {
  165.     static int devindex, letter = 0;
  167. #ifdef O_NOCTTY
  168. # define O_RDWRPTY (O_RDWR | O_NOCTTY)
  169. #else
  170. # define O_RDWRPTY (O_RDWR)
  171. #endif
  173. #ifdef CRAY
  174.     for (; devindex < 256; devindex++) {
  175. sprintf (ttydev, "/dev/ttyp%03d", devindex);
  176. sprintf (ptydev, "/dev/pty/%03d", devindex);
  178. if ((*pty = open (ptydev, O_RDWRPTY)) >= 0) {
  179.     /* We need to set things up for our next entry
  180.      * into this function!
  181.      */
  182.     (void) devindex++;
  183. # ifdef TIOCEXCL
  184.     ioctl (*pty, TIOCEXCL, (char *)0);
  185. # endif
  186.     return 0;
  187. }
  188.     }
  189. #else /* CRAY */
  190.     while (PTYCHAR1[letter]) {
  191. ttydev [strlen(ttydev) - 2] = PTYCHAR1 [letter];
  192. ptydev [strlen(ptydev) - 2] = PTYCHAR1 [letter];
  194. while (PTYCHAR2[devindex]) {
  195.     ttydev [strlen(ttydev) - 1] = PTYCHAR2 [devindex];
  196.     ptydev [strlen(ptydev) - 1] = PTYCHAR2 [devindex];
  198.     if ((*pty = open (ptydev, O_RDWRPTY)) >= 0) {
  199. /* We need to set things up for our next entry
  200.  * into this function!
  201.  */
  202. # ifdef sun
  203. int dummy;
  205. ptydev[5] = 't';
  206. chown(ptydev, 0, 0);
  207. chmod(ptydev, 0600);
  208. ptydev[5] = 'p';
  209. if ((ioctl(*pty, TIOCGPGRP, &dummy) == -1) && errno == EIO) {
  210.     (void) devindex++;
  211.     return 0;
  212. }
  213. close(*pty);
  214. # else
  215. (void) devindex++;
  216. #  ifdef TIOCEXCL
  217. ioctl (*pty, TIOCEXCL, (char *)0);
  218. #  endif
  219. return 0;
  220. # endif
  221.     }
  222.     devindex++;
  223. }
  224. devindex = 0;
  225. letter++;
  226.     }
  227. #endif /* CRAY else */
  228.     /*
  229.      * We were unable to allocate a pty master!  Return an error
  230.      * condition and let our caller terminate cleanly.
  231.      */
  232.     return 1;
  233. }
  235. /* given master fildes, get the slave side tty */
  236. int get_tty (master, tty)
  237.     int master;
  238.     int *tty;
  239. {
  240.   int t;
  241. #if defined(POSIX) || defined(SVR4) || defined(__convex__)
  242.   int pgrp = setsid();
  243. #else
  244.   int pgrp = getpid();
  245. #endif
  247. #ifdef USE_PTYS
  249. setpgrp();
  250. grantpt (master);
  251. unlockpt (master);
  252. if ((*tty = open (ptsname(master), O_RDWR)) < 0)
  253. return 1; /* error */
  255. if (ioctl (*tty, I_PUSH, "ptem") < 0)
  256. return 1; /* error */
  257. # if !defined(SVR4) && !defined(SYSV386)
  258. if (!getenv("CONSEM") && ioctl (*tty, I_PUSH, "consem") < 0) {
  259. return 1;
  260. # endif
  261. if (ioctl (*tty, I_PUSH, "ldterm") < 0)
  262. return 1;
  263. # ifdef SVR4
  264. if (ioctl (*tty, I_PUSH, "ttcompat") < 0)
  265. return 1;
  266. # endif
  268. #else /* ! USE_PTYS */
  270. # ifdef TIOCNOTTY
  271. t = open ("/dev/tty", O_RDWR);
  272. if (t >= 0) {
  273. (void) ioctl(t, TIOCNOTTY, (char *)0);
  274. (void) close(t);
  275. }
  276. # endif
  278. *tty = open(ttydev, O_RDWR);
  279. if (*tty < 0) {
  280. perror(ttydev);
  281. return 1;
  282. }
  284. # ifdef SYSV
  285. setpgrp();
  286. # else
  287. #  ifdef TIOCSCTTY
  288. (void) setsid();
  289. (void) ioctl (*tty, TIOCSCTTY, 0);
  290. #  endif
  291. #  ifdef TIOCSPGRP
  292. (void) ioctl (*tty, TIOCSPGRP, (char *)&pgrp);
  293. #  endif
  294. setpgrp (0, 0);
  295. close (open (ttydev, O_WRONLY, 0));
  296. setpgrp (0, pgrp);
  297. # endif /* SYSV */
  299. #endif /* USE_PTYS */
  301. return 0; /* OK */
  302. }
  305. /**************************** TTY MODE stuffs ****************************/
  307. void get_term_mode(tty, termptr)
  308.      int tty;
  309.      struct term_mode *termptr;
  310. {
  311. #ifdef TIOCSLTC
  312. (void) ioctl (tty, TIOCGLTC, (char *)&(termptr->ltc));
  313. #endif
  314. #ifdef   TIOCLSET
  315. (void) ioctl (tty, TIOCLGET, (char *)&(termptr->lmode));
  316. #endif
  317. #ifdef USE_SYSV_TERMIO
  318. (void) ioctl (tty, TCGETA,   (char *)&(termptr->tio));
  319. #else /* USE_SYSV_TERMIO */
  320. (void) ioctl (tty, TIOCGETP, (char *)&(termptr->sb));
  321. (void) ioctl (tty, TIOCGETC, (char *)&(termptr->tc));
  322. (void) ioctl (tty, TIOCGETD, (char *)&(termptr->ldis));
  323. #endif /* USE_SYSV_TERMIO */
  324. }
  326. void set_term_mode(tty, termptr)
  327.      int tty;
  328.      struct term_mode *termptr;
  329. {
  330. #ifdef TIOCSLTC
  331. (void) ioctl (tty, TIOCSLTC, (char *)&(termptr->ltc));
  332. #endif
  333. #ifdef   TIOCLSET
  334. (void) ioctl (tty, TIOCLSET, (char *)&(termptr->lmode));
  335. #endif
  336. #ifdef USE_SYSV_TERMIO
  337. # ifdef POSIX
  338. (void) tcsetattr (fd, TCSAFLUSH, (char *)&(termptr->tio));
  339. # else
  340. (void) ioctl (tty, TCSETA,   (char *)&(termptr->tio));
  341. # endif
  342. #else /* USE_SYSV_TERMIO */
  343. (void) ioctl (tty, TIOCSETP, (char *)&(termptr->sb));
  344. (void) ioctl (tty, TIOCSETC, (char *)&(termptr->tc));
  345. (void) ioctl (tty, TIOCSETD, (char *)&(termptr->ldis));
  346. #endif /* USE_SYSV_TERMIO */
  347. }
  349. void make_raw(oldtermptr, newtermptr)
  350.      struct term_mode *oldtermptr, *newtermptr;
  351. {
  352. *newtermptr = *oldtermptr;
  354. #ifdef TIOCSLTC
  355. newtermptr->ltc.t_suspc = 0377;
  356. newtermptr->ltc.t_dsuspc = 0377;
  357. newtermptr->ltc.t_flushc = 0377;
  358. newtermptr->ltc.t_lnextc = 0377;
  359. #endif
  360. #if  defined(TIOCLSET) && defined(LPASS8)
  361. newtermptr->lmode |= LPASS8;
  362. #endif
  364. #ifdef USE_SYSV_TERMIO
  366. newtermptr->tio.c_iflag &= ~(ICRNL|IXON);
  367. # ifdef ISTRIP
  368. newtermptr->tio.c_iflag &= ~ISTRIP;
  369. # endif
  370. # ifdef ONLCR
  371. newtermptr->tio.c_oflag &= ~ONLCR;
  372. # endif
  373. newtermptr->tio.c_cflag |= CS8;
  374. newtermptr->tio.c_cflag &= ~(PARENB);
  375. newtermptr->tio.c_lflag &= ~(ICANON|ISIG|ECHO);
  376. newtermptr->tio.c_cc[VMIN] = 1;
  377. newtermptr->tio.c_cc[VTIME] = 0;
  378. newtermptr->tio.c_cc[VINTR] = 0377;
  379. newtermptr->tio.c_cc[VQUIT] = 0377;
  380. newtermptr->tio.c_cc[VINTR] = 0377;
  381. # ifdef VSTART
  382. newtermptr->tio.c_cc[VSTART] = 0377;
  383. # endif
  384. # ifdef VSTOP
  385. newtermptr->tio.c_cc[VSTOP] = 0377;
  386. # endif
  387. # ifdef VDISCARD
  388. newtermptr->tio.c_cc[VDISCARD] = 0377;
  389. # endif
  390. # ifdef VSUSP
  391.   newtermptr->tio.c_cc[VSUSP] = 0377;
  392. # endif
  393. # ifdef VDSUSP
  394. newtermptr->tio.c_cc[VDSUSP] = 0377;
  395. # endif
  397. #else /* USE_SYSV_TERMIO */
  399. newtermptr->sb.sg_flags &= ~(CRMOD | ECHO);
  400. newtermptr->sb.sg_flags |= CBREAK;
  401. newtermptr->tc.t_quitc = 0377;
  402. newtermptr->tc.t_intrc = 0377;
  403. newtermptr->tc.t_startc = 0377;
  404. newtermptr->tc.t_stopc = 0377;
  406. #endif /* USE_SYSV_TERMIO */
  407. }
  409. /******************************* UTMP stuffs *******************************/
  411. #include <utmp.h>
  412. #ifdef HAS_UTMPX
  414. # include <utmpx.h>
  415. # define USE_SYSV_UTMP
  417.   /* utmpx is very similar to utmp */
  418. # define utmp utmpx
  419. # define ut_time ut_xtime
  420. # define setutent setutxent
  421. # define endutent endutxent
  422. # define getutid getutxid
  423. # define pututline pututxline
  425. #endif
  427. #ifdef USE_SYSV_UTMP
  429. # ifndef SVR4 /* otherwise declared in utmp.h */
  430. extern struct utmp *getutid();
  431. extern void pututline();
  432. extern void setutent();
  433. extern void endutent();
  434. # endif /* !SVR4 */
  436. # ifndef SYSV386
  437. extern struct passwd *getpwuid();
  438. # endif
  440. extern time_t time();
  442. #else   /* not USE_SYSV_UTMP */
  444. # define UTMP_FILENAME "/etc/utmp"
  446. #endif
  448. #ifdef CRAY
  449. # define PTYCHLEN 4
  450. #else
  451. # define PTYCHLEN 2
  452. #endif
  454. /*
  455.  * addutmp() and rmutmp() will run in different processes --
  456.  * one in subsubprocess, and the other in subprocess.  There is no way to
  457.  * pass values or the status to each other by means of global variables.
  458.  */
  460. /* addutmp() -- add a record to the utmp file */
  461. void addutmp()
  462. {
  463.   struct utmp utmp;
  464.   struct passwd *pw;
  465. #ifndef USE_SYSV_UTMP
  466.   int utmpf;
  467.   int tslot;
  468. #endif
  470. pw = getpwuid(getuid());
  472. #ifdef USE_SYSV_UTMP
  474. (void) setutent ();
  476. /* set up entry to search for */
  477. (void) bzero ((char *)&utmp, sizeof(struct utmp));
  478. utmp.ut_type = DEAD_PROCESS;
  479. (void) strncpy ((char *)utmp.ut_id, ttydev + strlen(ttydev) - PTYCHLEN,
  480. sizeof (utmp.ut_id));
  482. /* position to entry in utmp file */
  483. (void) getutid(&utmp);
  485. /* set up the new entry */
  486. (void) bzero ((char *)&utmp, sizeof(struct utmp));
  487. utmp.ut_type = USER_PROCESS;
  488. # ifdef HAS_UTMPX
  489. utmpx.ut_exit.e_exit = 0;
  490. utmpx.ut_exit.e_termination = 0;
  491. # else
  492. utmp.ut_exit.e_exit = 2;
  493. # endif
  494. (void) strncpy ((char *)utmp.ut_user,
  495. (pw && pw->pw_name) ? pw->pw_name : "???",
  496. sizeof(utmp.ut_user));
  497. (void) strncpy ((char *)utmp.ut_id, ttydev + strlen(ttydev) - PTYCHLEN,
  498. sizeof(utmp.ut_id));
  499. utmp.ut_pid = getpid();
  501. # ifdef HAS_UTMPX
  502. utmpx.ut_syslen = 1;
  503. utmpx.ut_session = getsid(0);
  504. utmpx.ut_tv.tv_usec = 0;
  505. # endif
  507. #else /* USE_SYSV_UTMP */
  509. # ifndef apollo
  510. tslot = ttyslot();
  511. # else
  512. tslot = 1;
  513. # endif
  515. utmpf = open (UTMP_FILENAME, O_WRONLY);
  516. if (utmpf < 0)
  517. return;
  518. bzero((char *)&utmp, sizeof(struct utmp));
  519. #endif /* USE_SYSV_UTMP */
  521. /* common utmp fields */
  522. (void) strncpy (utmp.ut_line, ttydev + strlen("/dev/"),
  523. sizeof (utmp.ut_line));
  524. (void) strncpy (utmp.ut_name,
  525. (pw && pw->pw_name) ? pw->pw_name : "???",
  526. sizeof(utmp.ut_name));
  527. utmp.ut_time = time ((time_t *) 0);
  529. #ifdef USE_SYSV_UTMP
  530. (void) pututline(&utmp);
  531. (void) endutent();
  532. #else
  533. lseek (utmpf, (long)(tslot * sizeof(struct utmp)), 0);
  534. write (utmpf, (char *)&utmp, sizeof(struct utmp));
  535. close (utmpf);
  536. #endif
  537. }
  539. void rmutmp(child_pid)
  540.      int child_pid;
  541. {
  542.   struct utmp utmp;
  543. #ifdef USE_SYSV_UTMP
  544.   struct utmp *utptr;
  545. #else
  546.   int utmpf;
  547.   int tslot;
  548. #endif
  550. #ifdef USE_SYSV_UTMP
  551. (void) setutent();
  553. utmp.ut_type = USER_PROCESS;
  554. (void) bzero (utmp.ut_id, sizeof(utmp.ut_id));
  555. (void) strncpy ((char *)utmp.ut_id, ttydev + strlen(ttydev) - PTYCHLEN,
  556. sizeof(utmp.ut_id));
  557. utptr = getutid(&utmp);
  559. /* write it out only if it exists, and the pid's match */
  560. if (utptr && (utptr->ut_pid == child_pid)) {
  561. utptr->ut_type = DEAD_PROCESS;
  562. utptr->ut_time = time ((time_t *) 0);
  563. (void) pututline(utptr);
  564. }
  565. (void) endutent();
  567. #else /* USE_SYSV_UTMP */
  569. utmpf = open (UTMP_FILENAME, O_RDWR);
  570. if (utmpf < 0)
  571. return;
  572. tslot = 0;
  573. while (read(utmpf, (char *)&utmp, sizeof (utmp)) == sizeof (utmp)) {
  574. if (strncmp (utmp.ut_line, ttydev + strlen("/dev/"),
  575. sizeof (utmp.ut_line)) != 0) {
  576. tslot ++;
  577. continue;
  578. }
  580. /* find the right slot */
  581. utmp.ut_name[0] = '';
  582. utmp.ut_time = time ((time_t *) 0);
  583. lseek (utmpf, (long)(tslot * sizeof(struct utmp)), 0);
  584. write (utmpf, (char *)&utmp, sizeof(struct utmp));
  585. close (utmpf);
  586. break;
  587. }
  589. #endif /* USE_SYSV_UTMP */
  590. return;
  591. }