1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
|
/*
* clone.c - start a forked instance of the current shell on a new terminal
*
* This file is part of zsh, the Z shell.
*
* Copyright (c) 1997 Zoltn Hidvgi
* All rights reserved.
*
* Permission is hereby granted, without written agreement and without
* license or royalty fees, to use, copy, modify, and distribute this
* software and to distribute modified versions of this software for any
* purpose, provided that the above copyright notice and the following
* two paragraphs appear in all copies of this software.
*
* In no event shall Zoltn Hidvgi or the Zsh Development Group be liable
* to any party for direct, indirect, special, incidental, or consequential
* damages arising out of the use of this software and its documentation,
* even if Zoltn Hidvgi and the Zsh Development Group have been advised of
* the possibility of such damage.
*
* Zoltn Hidvgi and the Zsh Development Group specifically disclaim any
* warranties, including, but not limited to, the implied warranties of
* merchantability and fitness for a particular purpose. The software
* provided hereunder is on an "as is" basis, and Zoltn Hidvgi and the
* Zsh Development Group have no obligation to provide maintenance,
* support, updates, enhancements, or modifications.
*
*/
/*
* The clone builtin can be used to start a forked instance of the current
* shell on a new terminal. The only argument to the builtin is the name
* of the new terminal. In the new shell the PID, PPID and TTY parameters
* are changed appropriately. $! is set to zero in the new instance of the
* shell and to the pid of the new instance in the original shell.
*
*/
#include "clone.mdh"
#include "clone.pro"
/**/
static int
bin_clone(char *nam, char **args, char *ops, int func)
{
int ttyfd, pid;
unmetafy(*args, NULL);
ttyfd = open(*args, O_RDWR|O_NOCTTY);
if (ttyfd < 0) {
zwarnnam(nam, "%s: %e", *args, errno);
return 1;
}
pid = fork();
if (!pid) {
clearjobtab();
ppid = getppid();
mypid = getpid();
#ifdef HAVE_SETSID
if (setsid() != mypid) {
zwarnnam(nam, "failed to create new session: %e", NULL, errno);
#endif
#ifdef TIOCNOTTY
if (ioctl(SHTTY, TIOCNOTTY, 0))
zwarnnam(nam, "%e", NULL, errno);
setpgrp(0L, mypid);
#endif
#ifdef HAVE_SETSID
}
#endif
if (ttyfd) {
close(0);
dup(ttyfd);
} else
ttyfd = -1;
close(1);
close(2);
dup(0);
dup(0);
closem(0);
close(coprocin);
close(coprocout);
init_io();
setsparam("TTY", ztrdup(ttystrname));
}
close(ttyfd);
if (pid < 0) {
zerrnam(nam, "fork failed: %e", NULL, errno);
return 1;
}
lastpid = pid;
return 0;
}
static struct builtin bintab[] = {
BUILTIN("clone", 0, bin_clone, 1, 1, 0, NULL, NULL),
};
/**/
int
setup_(Module m)
{
return 0;
}
/**/
int
boot_(Module m)
{
return !addbuiltins(m->nam, bintab, sizeof(bintab)/sizeof(*bintab));
}
/**/
int
cleanup_(Module m)
{
deletebuiltins(m->nam, bintab, sizeof(bintab)/sizeof(*bintab));
return 0;
}
/**/
int
finish_(Module m)
{
return 0;
}
|
