window(1): Remove __RCSID & friends.
[dragonfly.git] / usr.bin / window / wwenviron.c
1 /*      @(#)wwenviron.c 8.1 (Berkeley) 6/6/93   */
2 /*      $NetBSD: wwenviron.c,v 1.9 2003/08/07 11:17:39 agc Exp $        */
3
4 /*
5  * Copyright (c) 1983, 1993
6  *      The Regents of the University of California.  All rights reserved.
7  *
8  * This code is derived from software contributed to Berkeley by
9  * Edward Wang at The University of California, Berkeley.
10  *
11  * Redistribution and use in source and binary forms, with or without
12  * modification, are permitted provided that the following conditions
13  * are met:
14  * 1. Redistributions of source code must retain the above copyright
15  *    notice, this list of conditions and the following disclaimer.
16  * 2. Redistributions in binary form must reproduce the above copyright
17  *    notice, this list of conditions and the following disclaimer in the
18  *    documentation and/or other materials provided with the distribution.
19  * 3. Neither the name of the University nor the names of its contributors
20  *    may be used to endorse or promote products derived from this software
21  *    without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  */
35
36 #include <sys/types.h>
37 #if !defined(OLD_TTY) && !defined(TIOCSCTTY) && !defined(TIOCNOTTY)
38 #include <sys/ioctl.h>
39 #endif
40 #include <fcntl.h>
41 #include <signal.h>
42 #include <stdio.h>
43 #include <stdlib.h>
44 #include <unistd.h>
45 #include "ww.h"
46
47 /*
48  * Set up the environment of this process to run in window 'wp'.
49  */
50 int
51 wwenviron(struct ww *wp)
52 {
53         int i;
54 #ifndef TIOCSCTTY
55         int pgrp = getpid();
56 #endif
57         char buf[1024];
58         sigset_t nsigset;
59
60 #ifndef TIOCSCTTY
61         if ((i = open("/dev/tty", 0)) < 0)
62                 goto bad;
63         if (ioctl(i, TIOCNOTTY, (char *)0) < 0)
64                 goto bad;
65         (void) close(i);
66 #endif
67         if ((i = wp->ww_socket) < 0) {
68                 if ((i = open(wp->ww_ttyname, 2)) < 0)
69                         goto bad;
70                 if (wwsettty(i, &wwwintty) < 0)
71                         goto bad;
72                 if (wwsetttysize(i, wp->ww_w.nr, wp->ww_w.nc) < 0)
73                         goto bad;
74         }
75         (void) dup2(i, 0);
76         (void) dup2(i, 1);
77         (void) dup2(i, 2);
78         (void) close(i);
79 #ifdef TIOCSCTTY
80         (void) setsid();
81         (void) ioctl(0, TIOCSCTTY, 0);
82 #else
83         (void) ioctl(0, TIOCSPGRP, (char *)&pgrp);
84         (void) setpgid(pgrp, pgrp);
85 #endif
86         /* SIGPIPE is the only one we ignore */
87         (void) signal(SIGPIPE, SIG_DFL);
88         sigemptyset(&nsigset);
89         sigprocmask(SIG_SETMASK, &nsigset, (sigset_t *)0);
90         /*
91          * Two conditions that make destructive setenv ok:
92          * 1. setenv() copies the string,
93          * 2. we've already called tgetent which copies the termcap entry.
94          */
95         (void) sprintf(buf, "%sco#%d:li#%d:%s",
96                 WWT_TERMCAP, wp->ww_w.nc, wp->ww_w.nr, wwwintermcap);
97         (void) setenv("TERMCAP", buf, 1);
98         (void) sprintf(buf, "%d", wp->ww_id + 1);
99         (void) setenv("WINDOW_ID", buf, 1);
100         return 0;
101 bad:
102         wwerrno = WWE_SYS;
103         return -1;
104 }