Remove an old file.
This commit was SVN r6762.
Этот коммит содержится в:
родитель
6f0b51e4db
Коммит
3c13d699f8
@ -1,69 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2004-2005 The Trustees of Indiana University.
|
|
||||||
* All rights reserved.
|
|
||||||
* Copyright (c) 2004-2005 The Trustees of the University of Tennessee.
|
|
||||||
* All rights reserved.
|
|
||||||
* Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
|
|
||||||
* University of Stuttgart. All rights reserved.
|
|
||||||
* Copyright (c) 2004-2005 The Regents of the University of California.
|
|
||||||
* All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*/
|
|
||||||
/** @file:
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "orte_config.h"
|
|
||||||
|
|
||||||
#include "include/orte_constants.h"
|
|
||||||
#include "util/proc_info.h"
|
|
||||||
#include "mca/base/mca_base_param.h"
|
|
||||||
#include "mca/errmgr/errmgr.h"
|
|
||||||
#include "mca/ns/base/base.h"
|
|
||||||
#include "opal/util/output.h"
|
|
||||||
|
|
||||||
|
|
||||||
int orte_ns_base_get_peers(orte_process_name_t **procs,
|
|
||||||
size_t *num_procs, size_t *self)
|
|
||||||
{
|
|
||||||
size_t i;
|
|
||||||
int rc;
|
|
||||||
orte_cellid_t mycellid;
|
|
||||||
orte_jobid_t myjobid;
|
|
||||||
orte_vpid_t myvpid;
|
|
||||||
|
|
||||||
*procs = (orte_process_name_t*)malloc(orte_process_info.num_procs *
|
|
||||||
sizeof(orte_process_name_t));
|
|
||||||
if (NULL == *procs) {
|
|
||||||
return ORTE_ERR_OUT_OF_RESOURCE;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (ORTE_SUCCESS != (rc = orte_ns.get_cellid(&mycellid, orte_process_info.my_name))) {
|
|
||||||
ORTE_ERROR_LOG(rc);
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (ORTE_SUCCESS != orte_ns.get_jobid(&myjobid, orte_process_info.my_name)) {
|
|
||||||
ORTE_ERROR_LOG(rc);
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (ORTE_SUCCESS != orte_ns.get_vpid(&myvpid, orte_process_info.my_name)) {
|
|
||||||
ORTE_ERROR_LOG(rc);
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
for (i=0; i < orte_process_info.num_procs; i++) {
|
|
||||||
(*procs)[i].cellid = mycellid;
|
|
||||||
(*procs)[i].jobid = myjobid;
|
|
||||||
(*procs)[i].vpid = orte_process_info.vpid_start + i;
|
|
||||||
}
|
|
||||||
|
|
||||||
*num_procs = orte_process_info.num_procs;
|
|
||||||
*self = (size_t)(myvpid - orte_process_info.vpid_start);
|
|
||||||
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
Загрузка…
x
Ссылка в новой задаче
Block a user