compat/forkpty-sunos.c

   1 /*
   2  * Copyright (c) 2008 Nicholas Marriott <nicholas.marriott@gmail.com>
   3  *
   4  * Permission to use, copy, modify, and distribute this software for any
   5  * purpose with or without fee is hereby granted, provided that the above
   6  * copyright notice and this permission notice appear in all copies.
   7  *
   8  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
   9  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  10  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  11  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  12  * WHATSOEVER RESULTING FROM LOSS OF MIND, USE, DATA OR PROFITS, WHETHER
  13  * IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
  14  * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  15  */
  16
  17 #include <sys/types.h>
  18 #include <sys/ioctl.h>
  19
  20 #include <fcntl.h>
  21 #include <stdlib.h>
  22 #include <strings.h>
  23 #include <stropts.h>
  24 #include <termios.h>
  25 #include <unistd.h>
  26
  27 #include "compat.h"
  28
  29 void fatal(const char *, ...);
  30 void fatalx(const char *, ...);
  31
  32 pid_t
  33 forkpty(int *master, char *name, struct termios *tio, struct winsize *ws)
  34 {
  35         int     slave = -1;
  36         char   *path;
  37         pid_t   pid;
  38
  39         if ((*master = open("/dev/ptmx", O_RDWR|O_NOCTTY)) == -1)
  40                 return (-1);
  41         if (grantpt(*master) != 0)
  42                 goto out;
  43         if (unlockpt(*master) != 0)
  44                 goto out;
  45
  46         if ((path = ptsname(*master)) == NULL)
  47                 goto out;
  48         if (name != NULL)
  49                 strlcpy(name, path, TTY_NAME_MAX);
  50         if ((slave = open(path, O_RDWR|O_NOCTTY)) == -1)
  51                 goto out;
  52
  53         switch (pid = fork()) {
  54         case -1:
  55                 goto out;
  56         case 0:
  57                 close(*master);
  58
  59                 setsid();
  60 #ifdef TIOCSCTTY
  61                 if (ioctl(slave, TIOCSCTTY, NULL) == -1)
  62                         fatal("ioctl failed");
  63 #endif
  64
  65                 if (ioctl(slave, I_PUSH, "ptem") == -1)
  66                         fatal("ioctl failed");
  67                 if (ioctl(slave, I_PUSH, "ldterm") == -1)
  68                         fatal("ioctl failed");
  69
  70                 if (tio != NULL && tcsetattr(slave, TCSAFLUSH, tio) == -1)
  71                         fatal("tcsetattr failed");
  72                 if (ioctl(slave, TIOCSWINSZ, ws) == -1)
  73                         fatal("ioctl failed");
  74
  75                 dup2(slave, 0);
  76                 dup2(slave, 1);
  77                 dup2(slave, 2);
  78                 if (slave > 2)
  79                         close(slave);
  80                 return (0);
  81         }
  82
  83         close(slave);
  84         return (pid);
  85
  86 out:
  87         if (*master != -1)
  88                 close(*master);
  89         if (slave != -1)
  90                 close(slave);
  91         return (-1);
  92 }