46 строки
960 B
C
46 строки
960 B
C
|
/* -*- C -*-
|
||
|
*
|
||
|
* $HEADER$
|
||
|
*
|
||
|
* The most basic of MPI applications
|
||
|
*/
|
||
|
|
||
|
#include <stdio.h>
|
||
|
#include <stdlib.h>
|
||
|
#include <unistd.h>
|
||
|
#include <errno.h>
|
||
|
#include <spawn.h>
|
||
|
|
||
|
#include "opal/util/argv.h"
|
||
|
|
||
|
int main(int argc, char* argv[])
|
||
|
{
|
||
|
int rc;
|
||
|
char **pargv = NULL;
|
||
|
pid_t pid;
|
||
|
posix_spawn_file_actions_t factions;
|
||
|
posix_spawnattr_t attrs;
|
||
|
|
||
|
rc = posix_spawnattr_init(&attrs);
|
||
|
if (0 != rc) {
|
||
|
fprintf(stderr, "ERROR INIT ATTRS: %d\n", errno);
|
||
|
exit(1);
|
||
|
}
|
||
|
|
||
|
rc = posix_spawn_file_actions_init(&factions);
|
||
|
if (0 != rc) {
|
||
|
fprintf(stderr, "ERROR INIT FACTIONS: %d\n", errno);
|
||
|
exit(1);
|
||
|
}
|
||
|
posix_spawn_file_actions_addclose(&factions, fileno(stdin));
|
||
|
|
||
|
opal_argv_append_nosize(&pargv, "hostname");
|
||
|
|
||
|
rc = posix_spawn(&pid, "/usr/bin/hostname", NULL, NULL, pargv, NULL);
|
||
|
posix_spawn_file_actions_destroy(&factions);
|
||
|
posix_spawnattr_destroy(&attrs);
|
||
|
|
||
|
sleep(1);
|
||
|
return 0;
|
||
|
}
|