터미널 명령 이외의 다른 방법으로 닫히지 않는 X 창을 만드는 방법

Question 1

xterm전환할 수 있는 옵션이 있는 경우 아래 트릭을 사용할 수 있습니다. 그러나 몇 가지 주의 사항이 있습니다. 이들 중 대부분이 해결되면 솔루션이 상당히 복잡해집니다. 마지막에 있는 최종 스크립트를 참조하세요.

xterm -e 'trap "" HUP; your-application'

창 관리자로부터 종료 명령을 받은 후 xtermSIGHUP은 애플리케이션의 프로세스 그룹으로 전송되고 프로세스가 반환될 때만 종료됩니다.

귀하의 애플리케이션이 SIGHUP 핸들러를 재설정하지 않고 애플리케이션의 하위 애플리케이션에 원치 않는 부작용이 있을 수 있다고 가정합니다.

귀하의 응용 프로그램이 tmux.

이러한 문제를 해결하려면 다음을 수행할 수 있습니다.

xterm -e sh -c 'bash -mc tmux <&1 & trap "" HUP; wait'

이렇게 하면 tmux다른 프로세스 그룹에서 시작되므로 shSIGHUP만 수신되고 무시됩니다.

이제 이는 이러한 신호에 대한 핸들러를 재설정하는 데 적용되지 않지만 tmux일반적으로 구현에 따라 shSIGINT, SIGQUIT 신호는 bash비대화형 신호로 제공되므로 일반적으로 애플리케이션에서 무시됩니다 sh. 귀하가 귀하의 응용 프로그램을 사용 Ctrl+C하거나 중단하는 것을 방지합니다 Ctrl+\.

이는 POSIX 요구 사항입니다. 일부 쉘은 mksh이를 지원하지 않거나(적어도 현재 버전은 아님) dashSIGINT를 부분적으로만 지원하고 SIGQUIT는 지원하지 않습니다. 따라서 mksh가능하다면 다음과 같이 할 수 있습니다.

xterm -e mksh -c 'bash -mc your-application <&1 & trap "" HUP; wait'

mksh(그러나 부적합을 수정하기로 결정한 경우 향후 버전에서는 작동하지 않을 수 있습니다).

mksh또는 사용 가능함을 보장할 수 없거나 bash향후 변경될 수 있는 동작에 의존하고 싶지 않은 경우 다음과 같은 래퍼 스크립트를 perl작성하는 등 작업을 수동으로 수행할 수 있습니다.unclosable-xterm

#! /bin/sh -
[ "$#" -gt 0 ] || set -- "${SHELL:-/bin/sh}"
exec xterm -e perl -MPOSIX -e '
  $pid = fork;
  if ($pid == 0) {
    setpgrp or die "setpgrp: $!";
    tcsetpgrp(0,getpid) or die "tcsetpgrp: $!";
    exec @ARGV;
    die "exec: $!";
  }
  die "fork: $!" if $pid < 0;
  $SIG{HUP} = "IGNORE";
  waitpid(-1,WUNTRACED)' "$@"

(라고 불리는 unclosable-xterm your-application and its args).

이제 또 다른 부작용은 우리가 생성하여 전경에 배치하는 새 프로세스 그룹( bash -m또는 setpgrp+ 포함 tcsetpgrp)이 더 이상 세션 리더 프로세스 그룹이 아니므로 더 이상 그렇지 않다는 것입니다.고아가 된프로세스 그룹(현재 이를 처리하는 상위 프로세스가 있다고 합니다( sh또는 perl)).

즉 Ctrl+Z, 을 누르면 프로세스가 일시 중지됩니다. 여기서는 부주의한 상위 프로세스가 종료됩니다. 이는 프로세스 그룹이 SIGHUP을 수신하고 희망적으로 종료됨을 의미합니다.

이를 방지하기 위해 하위 프로세스에서 SIGTSTP를 무시할 수 있지만 애플리케이션이 대화형 셸인 경우 일부 구현(예 mksh: yash또는 rc) 의 경우 Ctrl-Z실행되는 작업에 적용되지 않습니다.

또는 다음과 같이 자식이 중지될 때마다 자식을 다시 시작하는 보다 신중한 부모를 구현할 수도 있습니다.

#! /bin/sh -
[ "$#" -gt 0 ] || set -- "${SHELL:-/bin/sh}"
exec xterm -e perl -MPOSIX -e '
  $pid = fork;
  if ($pid == 0) {
    setpgrp or die "setpgrp: $!";
    tcsetpgrp(0,getpid) or die "tcsetpgrp: $!";
    exec @ARGV;
    die "exec: $!";
  }
  die "fork: $!" if $pid < 0;
  $SIG{HUP} = "IGNORE";
  while (waitpid(-1,WUNTRACED) > 0 && WIFSTOPPED(${^CHILD_ERROR_NATIVE})) {
    kill "CONT", -$pid;
  }' "$@"

xterm또 다른 질문은 다른 이유로 사라지는 경우입니다 .폐쇄예를 들어 xtermX 서버에 대한 연결이 종료되거나 끊어진 경우(예 xkill:파괴하다예를 들어, 창 관리자의 작업 또는 X 서버 충돌) 이러한 경우에는 SIGHUP을 사용하여 프로세스를 종료하므로 이러한 프로세스는 종료되지 않습니다. 이 문제를 해결하려면 poll()터미널 장치에서 다음을 사용할 수 있습니다(실행 시 터미널 장치가 제거됨 xterm).

#! /bin/sh -
[ "$#" -gt 0 ] || set -- "${SHELL:-/bin/sh}"
exec xterm -e perl -w -MPOSIX -MIO::Poll -e '
  $pid = fork; # start the command in a child process
  if ($pid == 0) {
    setpgrp or die "setpgrp: $!"; # new process group
    tcsetpgrp(0,getpid) or die "tcsetpgrp: $!"; # in foreground
    exec @ARGV;
    die "exec: $!";
  }
  die "fork: $!" if $pid < 0;
  $SIG{HUP} = "IGNORE"; # ignore SIGHUP in the parent
  $SIG{CHLD} = sub {
    if (waitpid(-1,WUNTRACED) == $pid) {
      if (WIFSTOPPED(${^CHILD_ERROR_NATIVE})) {
        # resume the process when stopped
        # we may want to do that only for SIGTSTP though
        kill "CONT", -$pid;
      } else {
        # exit when the process dies
        exit;
      }
    }
  };

  # watch for terminal hang-up
  $p = IO::Poll->new;
  $p->mask(STDIN, POLLERR);
  while ($p->poll <= 0 || $p->events(STDIN) & POLLHUP == 0) {};
  kill "HUP", -$pid;
  ' "$@"

Answer