hyung-hwan/hio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

added hio_dev_pty_killchild()

Browse Source 
enhanced other parts of pty with more options and child tracking
This commit is contained in:
hyung-hwan 2022-02-14 16:57:17 +00:00
parent ee89bb90c8
commit d2367b5b26
4 changed files with 230 additions and 45 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hio/bin/t05.c
View File

@ -62,6 +62,8 @@ int main (int argc, char* argv[])
hio_setoption (hio, HIO_LOG_TARGET_BCSTR, "/dev/stderr");
memset (&pi, 0, HIO_SIZEOF(pi));
pi.cmd = "/bin/ls -laF /etc";
pi.flags = HIO_DEV_PTY_SHELL;
pi.on_write = pty_on_write;
pi.on_read = pty_on_read;
pi.on_close = pty_on_close;

31
hio/lib/hio-pty.h
View File

@ -45,28 +45,53 @@ typedef void (*hio_dev_pty_on_close_t) (
hio_dev_pty_t* dev
);
typedef int (*hio_dev_pty_on_fork_t) (
hio_dev_pty_t* dev,
void* fork_ctx
);
struct hio_dev_pty_t
{
HIO_DEV_HEADER;
hio_syshnd_t pfd;
hio_intptr_t child_pid;
int flags;
hio_dev_pty_on_read_t on_read;
hio_dev_pty_on_write_t on_write;
hio_dev_pty_on_close_t on_close;
};
enum hio_dev_pty_make_flag_t
{
HIO_DEV_PTY_SHELL = (1 << 13),
/* perform no waitpid() on a child process upon device destruction.
* you should set this flag if your application has automatic child
* process reaping enabled. for instance, SIGCHLD is set to SIG_IGN
* on POSIX.1-2001 compliant systems */
HIO_DEV_PTY_FORGET_CHILD = (1 << 14),
HIO_DEV_PTY_FORGET_DIEHARD_CHILD = (1 << 15)
};
typedef enum hio_dev_pty_make_flag_t hio_dev_pty_make_flag_t;
typedef struct hio_dev_pty_make_t hio_dev_pty_make_t;
struct hio_dev_pty_make_t
{
int flags; /**< bitwise-ORed of hio_dev_pty_make_flag_t enumerators */
const void* cmd;
hio_dev_pty_on_write_t on_write; /* mandatory */
hio_dev_pty_on_read_t on_read; /* mandatory */
hio_dev_pty_on_close_t on_close; /* optional */
hio_dev_pty_on_fork_t on_fork; /* optional */
void* fork_ctx;
};
enum hio_dev_pty_ioctl_cmd_t
{
HIO_DEV_PTY_CLOSE
HIO_DEV_PTY_CLOSE,
HIO_DEV_PTY_KILL_CHILD
};
typedef enum hio_dev_pty_ioctl_cmd_t hio_dev_pty_ioctl_cmd_t;
@ -130,6 +155,10 @@ HIO_EXPORT int hio_dev_pty_close (
hio_dev_pty_t* pty
);
HIO_EXPORT int hio_dev_pty_killchild (
hio_dev_pty_t* pro
);
#if defined(__cplusplus)
}
#endif

17
hio/lib/pro.c
View File

@ -279,16 +279,11 @@ static int dev_pro_make_master (hio_dev_t* dev, void* ctx)
}
if (make_param(hio, info->cmd, info->flags, &param) <= -1) goto oops;
/* TODO: more advanced fork and exec .. */
pid = standard_fork_and_exec(rdev, pfds, info, &param);
if (pid <= -1)
{
free_param (hio, &param);
goto oops;
}
free_param (hio, &param);
if (pid <= -1) goto oops;
rdev->child_pid = pid;
/* this is the parent process */
@ -427,11 +422,11 @@ static int dev_pro_kill_master (hio_dev_t* dev, int force)
{
hio_t* hio = dev->hio;
hio_dev_pro_t* rdev = (hio_dev_pro_t*)dev;
int i, status;
pid_t wpid;
if (rdev->slave_count > 0)
{
hio_oow_t i;
for (i = 0; i < HIO_COUNTOF(rdev->slave); i++)
{
if (rdev->slave[i])
@ -454,6 +449,8 @@ static int dev_pro_kill_master (hio_dev_t* dev, int force)
if (!(rdev->flags & HIO_DEV_PRO_FORGET_CHILD))
{
int killed = 0;
int status;
pid_t wpid;
await_child:
wpid = waitpid(rdev->child_pid, &status, WNOHANG);
@ -483,7 +480,7 @@ static int dev_pro_kill_master (hio_dev_t* dev, int force)
*/
}
HIO_DEBUG1 (hio, ">>>>>>>>>>>>>>>>>>> REAPED CHILD %d\n", (int)rdev->child_pid);
HIO_DEBUG1 (hio, "PRO >>>>>>>>>>>>>>>>>>> REAPED CHILD %d\n", (int)rdev->child_pid);
rdev->child_pid = -1;
}

225
hio/lib/pty.c
View File

@ -27,10 +27,12 @@
#include <unistd.h>
#include <errno.h>
#include <sys/wait.h>
#include <sys/uio.h>
#include <stdlib.h>
#include <fcntl.h>
#include <signal.h>
#if defined(HAVE_PTY_H)
# include <pty.h>
@ -38,6 +40,131 @@
/* ========================================================================= */
struct param_t
{
hio_bch_t* mcmd;
hio_bch_t* fixed_argv[4];
hio_bch_t** argv;
};
typedef struct param_t param_t;
static void free_param (hio_t* hio, param_t* param)
{
if (param->argv && param->argv != param->fixed_argv)
hio_freemem (hio, param->argv);
if (param->mcmd) hio_freemem (hio, param->mcmd);
HIO_MEMSET (param, 0, HIO_SIZEOF(*param));
}
static int make_param (hio_t* hio, const hio_bch_t* cmd, int flags, param_t* param)
{
int fcnt = 0;
hio_bch_t* mcmd = HIO_NULL;
HIO_MEMSET (param, 0, HIO_SIZEOF(*param));
if (flags & HIO_DEV_PTY_SHELL)
{
mcmd = (hio_bch_t*)cmd;
param->argv = param->fixed_argv;
param->argv[0] = "/bin/sh";
param->argv[1] = "-c";
param->argv[2] = mcmd;
param->argv[3] = HIO_NULL;
}
else
{
int i;
hio_bch_t** argv;
hio_bch_t* mcmdptr;
mcmd = hio_dupbcstr(hio, cmd, HIO_NULL);
if (HIO_UNLIKELY(!mcmd)) goto oops;
fcnt = hio_split_bcstr(mcmd, "", '\"', '\"', '\\');
if (fcnt <= 0)
{
/* no field or an error */
hio_seterrnum (hio, HIO_EINVAL);
goto oops;
}
if (fcnt < HIO_COUNTOF(param->fixed_argv))
{
param->argv = param->fixed_argv;
}
else
{
param->argv = hio_allocmem(hio, (fcnt + 1) * HIO_SIZEOF(argv[0]));
if (HIO_UNLIKELY(!param->argv)) goto oops;
}
mcmdptr = mcmd;
for (i = 0; i < fcnt; i++)
{
param->argv[i] = mcmdptr;
while (*mcmdptr != '\0') mcmdptr++;
mcmdptr++;
}
param->argv[i] = HIO_NULL;
}
if (mcmd && mcmd != (hio_bch_t*)cmd) param->mcmd = mcmd;
return 0;
oops:
if (mcmd && mcmd != cmd) hio_freemem (hio, mcmd);
return -1;
}
static pid_t standard_fork_and_exec (hio_dev_pty_t* dev, int pfds[], hio_dev_pty_make_t* mi, param_t* param)
{
hio_t* hio = dev->hio;
pid_t pid;
pid = fork();
if (pid == -1)
{
hio_seterrwithsyserr (hio, 0, errno);
return -1;
}
if (pid == 0)
{
/* slave process */
/* child */
close (pfds[0]); /* close the pty master */
pfds[0] = HIO_SYSHND_INVALID;
/*TODO: close all open file descriptors */
if (mi->on_fork) mi->on_fork (dev, mi->fork_ctx);
setsid (); /* TODO: error check? */
setpgid (0, 0);
if (ioctl(pfds[1], TIOCSCTTY, HIO_NULL) == -1) goto slave_oops;
if (dup2(pfds[1], 0) == -1 || dup2(pfds[1], 1) == -1 || dup2(pfds[1], 2) == -1) goto slave_oops;
close (pfds[1]);
pfds[1] == HIO_SYSHND_INVALID;
/* TODO: pass environment like TERM */
execv (param->argv[0], param->argv);
/* if exec fails, free 'param' parameter which is an inherited pointer */
free_param (hio, param);
slave_oops:
if (pfds[1] != HIO_SYSHND_INVALID) close(pfds[1]);
_exit (128);
}
/* parent process */
return pid;
}
static int dev_pty_make (hio_dev_t* dev, void* ctx)
{
hio_t* hio = dev->hio;
@ -45,6 +172,7 @@ static int dev_pty_make (hio_dev_t* dev, void* ctx)
hio_dev_pty_make_t* info = (hio_dev_pty_make_t*)ctx;
hio_syshnd_t pfds[2] = { HIO_SYSHND_INVALID, HIO_SYSHND_INVALID };
int i, fd;
param_t param;
pid_t pid;
#if defined(HAVE_POSIX_OPENPT)
@ -114,37 +242,10 @@ static int dev_pty_make (hio_dev_t* dev, void* ctx)
if (hio_makesyshndcloexec(hio, pfds[0]) <= -1 ||
hio_makesyshndcloexec(hio, pfds[1]) <= -1) goto oops;
pid = fork();
if (pid == -1)
{
hio_seterrwithsyserr (hio, 0, errno);
goto oops;
}
if (pid == 0)
{
/* child */
close (pfds[0]); /* close the pty master */
pfds[0] = HIO_SYSHND_INVALID;
/*TODO: close all open file descriptors */
setsid (); /* TODO: error check? */
setpgid (0, 0);
if (ioctl(pfds[1], TIOCSCTTY, HIO_NULL) == -1) goto slave_oops;
if (dup2(pfds[1], 0) == -1 || dup2(pfds[1], 1) == -1 || dup2(pfds[1], 2) == -1) goto slave_oops;
close (pfds[1]);
pfds[1] == HIO_SYSHND_INVALID;
/* TODO: no hard-coding of the executed program */
execl ("/bin/bash", "bin/bash", "/tmp/a.sh", HIO_NULL);
slave_oops:
if (pfds[1] != HIO_SYSHND_INVALID) close(pfds[1]);
_exit (128);
}
if (make_param(hio, info->cmd, info->flags, &param) <= -1) goto oops;
pid = standard_fork_and_exec(rdev, pfds, info, &param);
free_param (hio, &param);
if (pid <= -1) goto oops;
close (pfds[1]); /* close the pty slave */
pfds[1] = HIO_SYSHND_INVALID;
@ -152,6 +253,8 @@ static int dev_pty_make (hio_dev_t* dev, void* ctx)
if (hio_makesyshndasync(hio, pfds[0]) <= -1) goto oops;
rdev->pfd = pfds[0];
rdev->child_pid = pid;
rdev->flags = info->flags;
rdev->dev_cap = HIO_DEV_CAP_OUT | HIO_DEV_CAP_IN | HIO_DEV_CAP_STREAM;
rdev->on_read = info->on_read;
rdev->on_write = info->on_write;
@ -166,9 +269,49 @@ oops:
static int dev_pty_kill (hio_dev_t* dev, int force)
{
/*hio_t* hio = dev->hio;*/
hio_t* hio = dev->hio;
hio_dev_pty_t* rdev = (hio_dev_pty_t*)dev;
if (rdev->child_pid >= 0)
{
if (!(rdev->flags & HIO_DEV_PTY_FORGET_CHILD))
{
int killed = 0;
int status;
pid_t wpid;
await_child:
wpid = waitpid(rdev->child_pid, &status, WNOHANG);
if (wpid == 0)
{
if (force && !killed)
{
if (!(rdev->flags & HIO_DEV_PTY_FORGET_DIEHARD_CHILD))
{
kill (rdev->child_pid, SIGKILL);
killed = 1;
goto await_child;
}
}
else
{
/* child process is still alive */
hio_seterrnum (hio, HIO_EAGAIN);
return -1; /* call me again */
}
}
/* wpid == rdev->child_pid => full success
* wpid == -1 && errno == ECHILD => no such process. it's waitpid()'ed by some other part of the program?
* other cases ==> can't really handle properly. forget it by returning success
* no need not worry about EINTR because errno can't have the value when WNOHANG is set.
*/
}
HIO_DEBUG1 (hio, "PTY >>>>>>>>>>>>>>>>>>> REAPED CHILD %d\n", (int)rdev->child_pid);
rdev->child_pid = -1;
}
if (rdev->on_close) rdev->on_close (rdev);
if (rdev->pfd != HIO_SYSHND_INVALID)
@ -291,10 +434,19 @@ static int dev_pty_ioctl (hio_dev_t* dev, int cmd, void* arg)
switch (cmd)
{
case HIO_DEV_PTY_CLOSE:
{
hio_dev_kill ((hio_dev_t*)rdev);
return 0;
}
case HIO_DEV_PTY_KILL_CHILD:
if (rdev->child_pid >= 0)
{
if (kill(rdev->child_pid, SIGKILL) == -1)
{
hio_seterrwithsyserr (hio, 0, errno);
return -1;
}
}
return 0;
default:
hio_seterrnum (hio, HIO_EINVAL);
@ -408,3 +560,8 @@ int hio_dev_pty_close (hio_dev_pty_t* dev)
{
return hio_dev_ioctl((hio_dev_t*)dev, HIO_DEV_PTY_CLOSE, HIO_NULL);
}
int hio_dev_pty_killchild (hio_dev_pty_t* dev)
{
return hio_dev_ioctl((hio_dev_t*)dev, HIO_DEV_PTY_KILL_CHILD, HIO_NULL);
}