38 lines
1.0 KiB
C++
38 lines
1.0 KiB
C++
#include "__call.h"
|
|
#include "Exception.h"
|
|
#include "MString.h"
|
|
#include <limits.h>
|
|
#include <stdlib.h>
|
|
#include <unistd.h>
|
|
#include <sys/types.h>
|
|
#include <sys/wait.h>
|
|
|
|
namespace jet {
|
|
|
|
__call::__call(coreutils::ZString &in, coreutils::MString &out, Global &global) : Tag(in, out, global) {
|
|
if(hasContainer)
|
|
throw coreutils::Exception("call cannot have a container.");
|
|
if(!variableDefined(coreutils::ZString("pgm")))
|
|
throw coreutils::Exception("pgm keyword must be specified.");
|
|
pipe[fd]; // TODO: Get these pipes to work with name and input keywords.
|
|
dup2(0);
|
|
if(pid != fork()) {
|
|
argv[0] = variables["pgm"]; // TODO: Need to peel off the program name only and pass as argv[0].
|
|
for(ix = 1; ix <= ARG_MAX; ++ix) {
|
|
coreutils::MString arg("arg");
|
|
arg << ix;
|
|
if(variableDefined(arg))
|
|
argv[ix] = variables[arg].c_str();
|
|
else
|
|
break;
|
|
}
|
|
argv[ix] == NULL;
|
|
execve(variables["pgm"].c_str(), argv, NULL);
|
|
exit(-1);
|
|
}
|
|
waitpid(&status);
|
|
|
|
}
|
|
|
|
}
|