BSD 4_4 release

[unix-history] / usr / src / usr.bin / window / wwenviron.c

diff --git a/usr/src/usr.bin/window/wwenviron.c b/usr/src/usr.bin/window/wwenviron.c
index 9efb943..2b5d82c 100644 (file)
--- a/usr/src/usr.bin/window/wwenviron.c
+++ b/usr/src/usr.bin/window/wwenviron.c
@@ -1,69 +1,102 @@
+/*
+ * Copyright (c) 1983, 1993
+ *     The Regents of the University of California.  All rights reserved.
+ *
+ * This code is derived from software contributed to Berkeley by
+ * Edward Wang at The University of California, Berkeley.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+

 #ifndef lint
 #ifndef lint

-static char *sccsid = "@(#)wwenviron.c 3.5 83/12/01";
-#endif
+static char sccsid[] = "@(#)wwenviron.c        8.1 (Berkeley) 6/6/93";
+#endif /* not lint */

 
 #include "ww.h"
 
 #include "ww.h"

+#if !defined(OLD_TTY) && !defined(TIOCSCTTY) && !defined(TIOCNOTTY)
+#include <sys/ioctl.h>
+#endif
+#include <sys/signal.h>

 
 /*
  * Set up the environment of this process to run in window 'wp'.
 
 /*
  * Set up the environment of this process to run in window 'wp'.

- * Can't report errors in any intelligent way, because the parent
- * hangs in vfork() until we die, but we can't die until output
- * drains (i.e. deadlock).  So don't say anything.

  */
 wwenviron(wp)
 register struct ww *wp;
 {
  */
 wwenviron(wp)
 register struct ww *wp;
 {

-       static char **termcap = 0;
-       static char *tbuf;

        register i;
        register i;

+#ifndef TIOCSCTTY
+       int pgrp = getpid();
+#endif
+       char buf[1024];

 
 

-       i = open("/dev/tty", 0);
-       if (i < 0)
-               return;
-       if (ioctl(i, (int)TIOCNOTTY, (char *)0) < 0)
-               return;
+#ifndef TIOCSCTTY
+       if ((i = open("/dev/tty", 0)) < 0)
+               goto bad;
+       if (ioctl(i, TIOCNOTTY, (char *)0) < 0)
+               goto bad;

        (void) close(i);
        (void) close(i);

-       if ((i = open(wp->ww_ttyname, 2)) < 0)
-               return;
+#endif
+       if ((i = wp->ww_socket) < 0) {
+               if ((i = open(wp->ww_ttyname, 2)) < 0)
+                       goto bad;
+               if (wwsettty(i, &wwwintty) < 0)
+                       goto bad;
+               if (wwsetttysize(i, wp->ww_w.nr, wp->ww_w.nc) < 0)
+                       goto bad;
+       }

        (void) dup2(i, 0);
        (void) dup2(i, 1);
        (void) dup2(i, 2);
        (void) dup2(i, 0);
        (void) dup2(i, 1);
        (void) dup2(i, 2);

-       for (i = wwdtablesize - 1; i > 2; i--)
-               (void) close(i);
-
+       (void) close(i);
+#ifdef TIOCSCTTY
+       (void) setsid();
+       (void) ioctl(0, TIOCSCTTY, 0);
+#else
+       (void) ioctl(0, TIOCSPGRP, (char *)&pgrp);
+       (void) setpgrp(pgrp, pgrp);
+#endif
+       /* SIGPIPE is the only one we ignore */
+       (void) signal(SIGPIPE, SIG_DFL);
+       (void) sigsetmask(0);

        /*
        /*

-        * Do this only once if vfork().
+        * Two conditions that make destructive setenv ok:
+        * 1. setenv() copies the string,
+        * 2. we've already called tgetent which copies the termcap entry.

         */
         */

-       if (termcap == 0) {
-               extern char **environ;
-               static char **env;
-               register char **p, **q;
-
-               for (i = 0, p = environ; *p; p++, i++)
-                       ;
-               env = (char **)malloc((unsigned)(i + 3) * sizeof (char *));
-               if (env == 0)
-                       return;
-               if ((tbuf = malloc((unsigned) 1024)) == 0)
-                       return;
-               for (p = environ, q = env; *p; p++, q++) {
-                       if (strncmp(*p, "TERM=", 5) == 0)
-                               *q = WWT_TERM;
-                       else if (strncmp(*p, "TERMCAP=", 8) == 0)
-                               termcap = q;
-                       else
-                               *q = *p;
-               }
-               if (termcap == 0)
-                       termcap = q++;
-               *q = 0;
-               environ = env;
-       }
-       *termcap = sprintf(tbuf, "TERMCAP=%sco#%d:li#%d:",
-               WWT_TERMCAP, wp->ww_w.nc, wp->ww_w.nr);
-       if (wwavailmodes & WWM_REV)
-               (void) strcat(tbuf, WWT_REV);
-       if (wwavailmodes & WWM_UL)
-               (void) strcat(tbuf, WWT_UL);
-       (void) strcat(tbuf, wwkeys);
+       (void) sprintf(buf, "%sco#%d:li#%d:%s",
+               WWT_TERMCAP, wp->ww_w.nc, wp->ww_w.nr, wwwintermcap);
+       (void) setenv("TERMCAP", buf, 1);
+       (void) sprintf(buf, "%d", wp->ww_id + 1);
+       (void) setenv("WINDOW_ID", buf, 1);
+       return 0;
+bad:
+       wwerrno = WWE_SYS;
+       return -1;

 }
 }