Changeset 5664

Show
Ignore:
Timestamp:
11/02/09 17:25:42 (3 weeks ago)
Author:
balaji
Message:

Name-space the PMI2 (and PMI-1.1) process-mapping key value.

Reviewed by goodell.

Location:
mpich2/trunk/src
Files:
4 modified

Legend:

Unmodified
Added
Removed
  • mpich2/trunk/src/mpid/ch3/src/mpid_vc.c

    r5647 r5664  
    10031003{ 
    10041004    int mpi_errno = MPI_SUCCESS; 
    1005     /* process-mapping is available */ 
     1005    /* PMI_process_mapping is available */ 
    10061006    mapping_type_t mt = -1; 
    10071007    map_block_t *mb = NULL; 
     
    11571157        int num_nodes = 0; 
    11581158 
    1159         mpi_errno = PMI2_Info_GetJobAttr("process-mapping", process_mapping, sizeof(process_mapping), &found); 
     1159        mpi_errno = PMI2_Info_GetJobAttr("PMI_process_mapping", process_mapping, sizeof(process_mapping), &found); 
    11601160        if (mpi_errno) MPIU_ERR_POP(mpi_errno); 
    1161         MPIU_ERR_CHKINTERNAL(!found, mpi_errno, "process-mapping attribute not found"); 
     1161        MPIU_ERR_CHKINTERNAL(!found, mpi_errno, "PMI_process_mapping attribute not found"); 
    11621162        /* this code currently assumes pg is comm_world */ 
    11631163        mpi_errno = populate_ids_from_mapping(process_mapping, &num_nodes, pg, &did_map); 
    11641164        if (mpi_errno) MPIU_ERR_POP(mpi_errno); 
    1165         MPIU_ERR_CHKINTERNAL(!did_map, mpi_errno, "unable to populate node ids from process-mapping"); 
     1165        MPIU_ERR_CHKINTERNAL(!did_map, mpi_errno, "unable to populate node ids from PMI_process_mapping"); 
    11661166        g_num_nodes = num_nodes; 
    11671167    } 
     
    11861186    if (mpi_errno) MPIU_ERR_POP(mpi_errno); 
    11871187 
    1188     /* See if process manager supports process-mapping keyval */ 
    1189  
    1190     /* FIXME 'process-mapping' only applies for the original PG (MPI_COMM_WORLD) */ 
    1191     pmi_errno = PMI_KVS_Get(kvs_name, "process-mapping", value, val_max_sz); 
     1188    /* See if process manager supports PMI_process_mapping keyval */ 
     1189 
     1190    /* FIXME 'PMI_process_mapping' only applies for the original PG (MPI_COMM_WORLD) */ 
     1191    pmi_errno = PMI_KVS_Get(kvs_name, "PMI_process_mapping", value, val_max_sz); 
    11921192    if (pmi_errno == 0) { 
    11931193        int did_map = 0; 
     
    12061206    } 
    12071207    else { 
    1208         MPIU_DBG_MSG(CH3_OTHER,TERSE,"unable to obtain the 'process-mapping' PMI key"); 
     1208        MPIU_DBG_MSG(CH3_OTHER,TERSE,"unable to obtain the 'PMI_process_mapping' PMI key"); 
    12091209    } 
    12101210 
  • mpich2/trunk/src/pm/hydra/pm/pmiserv/pmi_handle_v1.c

    r5590 r5664  
    307307        /* Didn't find the job attribute; see if we know how to 
    308308         * generate it */ 
    309         if (strcmp(key, "process-mapping") == 0) { 
     309        if (strcmp(key, "PMI_process_mapping") == 0) { 
    310310            /* Create a vector format */ 
    311311            status = HYD_pmcd_pmi_process_mapping(process, HYD_pmcd_pmi_vector, &node_list); 
     
    316316                                    "key value larger than maximum allowed\n"); 
    317317 
    318             status = HYD_pmcd_pmi_add_kvs("process-mapping", node_list, 
     318            status = HYD_pmcd_pmi_add_kvs("PMI_process_mapping", node_list, 
    319319                                          process->node->pg->kvs, &ret); 
    320320            HYDU_ERR_POP(status, "unable to add process_mapping to KVS\n"); 
  • mpich2/trunk/src/pm/hydra/pm/pmiserv/pmi_handle_v2.c

    r5602 r5664  
    506506        /* Didn't find the job attribute; see if we know how to 
    507507         * generate it */ 
    508         if (strcmp(key, "process-mapping") == 0) { 
     508        if (strcmp(key, "PMI_process_mapping") == 0) { 
    509509            /* Create a vector format */ 
    510510            status = HYD_pmcd_pmi_process_mapping(process, HYD_pmcd_pmi_vector, &node_list); 
     
    515515                                    "key value larger than maximum allowed\n"); 
    516516 
    517             status = HYD_pmcd_pmi_add_kvs("process-mapping", node_list, 
     517            status = HYD_pmcd_pmi_add_kvs("PMI_process_mapping", node_list, 
    518518                                          process->node->pg->kvs, &ret); 
    519519            HYDU_ERR_POP(status, "unable to add process_mapping to KVS\n"); 
  • mpich2/trunk/src/pm/mpd/mpdman.py

    r4666 r5664  
    441441                mpd_print(1,'expected msg to contain a process_mapping key') 
    442442                sys.exit(-1) 
    443             self.KVSs[self.default_kvsname]['process-mapping'] = msg['process_mapping'] 
     443            self.KVSs[self.default_kvsname]['PMI_process_mapping'] = msg['process_mapping'] 
    444444 
    445445