<div><span class="Apple-tab-span" style="white-space:pre">> On MacOS, SBCL doesn't survive a call to fork() if Lisp code in
> being run in the child process -- something about threading going
> wrong after the fork.

Hmm, this behavior seems strange to me, I use "pure lisp" SBCL-daemon
on Linux and do not have any problems with this, although the basic
Lisp-code is executed after a fork. 

> The solution, unattractive as it may sound, is to write the code for
> the child process as a glue function written in C, which also
> implies doing the fork in C.

I think that if Lisp-code after the fork will only have a few trivial
foreign-calls, the behavior should not differ from the case use of C-code.
However, I do not have MacOS, and I can not experiment with this. 

> I'm a bit surprised that it works with CCL out of the box for you,
> because I recall having to disable GC or interrupts (or something
> like that) to by-pass a crash there.

See above. It seems to me that few trivial foreign-calls without memory
allocation should not cause problems.

> What I would like to see is a little domain specific language that
> describes common syscalls and library functions (dup2, open, setenv,
> ...). 

Now I use sb-ext:run-programma for rather simple tasks, such as to call
sendmail. Use eDSL for this problem seems to me unnecessarily complicated.
Yes, this approach could be interesting and very powerful, but not for the
encountered my problems. IMHO, this solution on base eDSL should be completely
independent library, because of its complexity increases the potential risks.
But a simpler solution is also needed

> a. Ignore the problem, declare CLISP unsupported.

Yes, it pleases me most:)

Andrey  </span></div><div><span class="Apple-tab-span" style="white-space:pre"><br></span></div><br><div class="gmail_quote">2010/6/4 David Lichteblau <span dir="ltr"><<a href="mailto:david@lichteblau.com">david@lichteblau.com</a>></span><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">Hi there,<br>
<div><div></div><div class="h5"><br>
Quoting Andrey Moskvitin (<a href="mailto:archimag@gmail.com">archimag@gmail.com</a>):<br>
> I wrote a very simple library iolib.process, which allows you to run child<br>
> processes and interact with them through the standard IO-streams. In<br>
> contrast<br>
> to the sb-ext:run-programm and similar tools offered by implementations,<br>
> iolib.process not depend on the specific implementation, but only on<br>
> iolib.syscalls<br>
> and iolib.streams. iolib.process should work on all Unix-systems, tested on<br>
> Linux with SBCL, Clozure CL and CLISP. Perhaps, after appropriate revision,<br>
> it makes sense to include this library in the iolib.<br>
><br>
> URL: <a href="http://github.com/archimag/iolib.process/" target="_blank">http://github.com/archimag/iolib.process/</a><br>
<br>
</div></div>having such a library sounds like a great idea, and I like your code in<br>
the sense that it looks somewhat similar architecturally to what I did<br>
when I needed something similar in Hemlock.<br>
<br>
Unfortunately, it would also run into the same problems as my code did:<br>
<br>
  - On MacOS, SBCL doesn't survive a call to fork() if Lisp code in<br>
    being run in the child process -- something about threading going<br>
    wrong after the fork.<br>
<br>
    The solution, unattractive as it may sound, is to write the code for<br>
    the child process as a glue function written in C, which also<br>
    implies doing the fork in C.<br>
<br>
  - I'm a bit surprised that it works with CCL out of the box for you,<br>
    because I recall having to disable GC or interrupts (or something<br>
    like that) to by-pass a crash there.<br>
<br>
    Perhaps writing the code in C isn't that bad an idea after all,<br>
    because it also reduces this kind of portability issue.<br>
<br>
  - When using the C code approach, some flexibility would get lost.  In<br>
    practise, user code often needs to set up the child process<br>
    environment in ways that are hard to foresee for the library author,<br>
    i.e. for FD redirection, tty and session handling, environment<br>
    variables etc.  (and attempts to implement a general API with lots of<br>
    keyword arguments for those use cases does not lead to good API<br>
    design, I think).<br>
<br>
    What I would like to see is a little domain specific language that<br>
    describes common syscalls and library functions (dup2, open, setenv,<br>
    ...).  It would then compile those calls into a byte array, and pass<br>
    that to the C function.  Following the fork, the C code would<br>
    execute the bytecode.<br>
<br>
  - As Stelian explained, there are certain issues with SIGCHLD that<br>
    make this code unportable, because CLISP works very hard to keep<br>
    iolib from getting its hands on the SIGCHLD handler.<br>
<br>
    I think there are several approaches to this:<br>
<br>
     a. Ignore the problem, declare CLISP unsupported.<br>
<br>
     b. Solve the problem by clever SIGCHLD handler chaining.<br>
<br>
     c. Write a separate "fork server", where the Lisp justs asks the<br>
        server to spaws processes instead of doing that itself.  (I<br>
        believe Stelian wrote something like that, but I don't know<br>
        where the code is.)<br>
<br>
     d. Like c., but in particular run that "fork server" process as a<br>
        child process of the Lisp.  So the process hierarchy would be:<br>
<br>
              <Lisp process><br>
                  |    ^<br>
                  |    | socketpair for communication<br>
                  v    v<br>
              <Helper process written in C><br>
                  |                  |                 ...<br>
                  v                  v<br>
              Forked process 1      Forked process 2   ...<br>
<br>
        The advantage is that the helper process never dies, so it<br>
        doesn't lead to SIGCHLD, and the SIGCHLDs for the other processes get<br>
        handled in C.<br>
<br>
     e. Distinguish between Lisps that need the hack described in d and<br>
        those which don't.  I.e., use method d on CLISP, but skip the<br>
        helper process on SBCL, CCL and others.<br>
<br>
        The disadvantage would be that code behaves differently<br>
        depending on the Lisp used.<br>
<br>
Personally I would strongly prefer approaches a. or b.<br>
<font color="#888888"><br>
<br>
David<br>
</font></blockquote></div><br>