/*
 *  DExec.C
 *
 *  Request the DNet driver to execute a command.  Due to problems with
 *  the Lattice fork*() calls we cannot Execute() from the server process.
 */

#include "lib.h"

int
DExec(_chan, command)
void *_chan;
char *command;
{
    IOSTD ior;
    CHANN *chan = (CHANN *)_chan;
    PORT *replyport = CreatePort(NULL, 0);

    ior.io_Command = DNCMD_EXEC;
    ior.io_Unit = 0;
    ior.io_Offset = (long)command;
    ior.io_Message.mn_ReplyPort = replyport;
    PutMsg(chan->dnetport, (MSG *)&ior);
    WaitMsg(&ior);
    DeletePort(replyport);
    return(1);
}