Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
code cleanup, streamlining, removed some redundant function calls.
[simgrid.git] / src / smpi / smpi_global.c
index 0d069d0..ef58d88 100644 (file)
@@ -12,9 +12,12 @@ void *smpi_request_new()
 {
        smpi_mpi_request_t request = xbt_new(s_smpi_mpi_request_t, 1);
 
+       request->buf       = NULL;
        request->completed = 0;
        request->mutex     = SIMIX_mutex_init();
        request->cond      = SIMIX_cond_init();
+       request->data      = NULL;
+       request->forward   = 0;
 
        return request;
 }
@@ -26,11 +29,9 @@ void smpi_request_free(void *pointer)
 
        smpi_mpi_request_t request = pointer;
 
-       if (NULL != request) {
-               SIMIX_cond_destroy(request->cond);
-               SIMIX_mutex_destroy(request->mutex);
-               xbt_free(request);
-       }
+       SIMIX_cond_destroy(request->cond);
+       SIMIX_mutex_destroy(request->mutex);
+       xbt_free(request);
 
        return;
 }
@@ -41,7 +42,10 @@ void smpi_request_reset(void *pointer)
 {
        smpi_mpi_request_t request = pointer;
 
+       request->buf       = NULL;
        request->completed = 0;
+       request->data      = NULL;
+       request->forward   = 0;
 
        return;
 }
@@ -51,17 +55,16 @@ void *smpi_message_new(void);
 
 void *smpi_message_new()
 {
-       return xbt_new(s_smpi_received_message_t, 1);
+       smpi_received_message_t message = xbt_new(s_smpi_received_message_t, 1);
+       message->buf = NULL;
+       return message;
 }
 
 void smpi_message_free(void *pointer);
 
 void smpi_message_free(void *pointer)
 {
-       if (NULL != pointer) {
-               xbt_free(pointer);
-       }
-
+       xbt_free(pointer);
        return;
 }
 
@@ -69,6 +72,8 @@ void smpi_message_reset(void *pointer);
 
 void smpi_message_reset(void *pointer)
 {
+       smpi_received_message_t message = pointer;
+       message->buf = NULL;
        return;
 }
 
@@ -79,7 +84,7 @@ int smpi_create_request(void *buf, int count, smpi_mpi_datatype_t datatype,
 
        smpi_mpi_request_t request = NULL;
 
-       // FIXME: make sure requestptr is not null
+       // parameter checking prob belongs in smpi_mpi, but this is less repeat code
        if (NULL == buf) {
                retval = MPI_ERR_INTERN;
        } else if (0 > count) {
@@ -95,7 +100,7 @@ int smpi_create_request(void *buf, int count, smpi_mpi_datatype_t datatype,
        } else if (NULL == comm) {
                retval = MPI_ERR_COMM;
        } else if (NULL == requestptr) {
-               retval = MPI_ERR_INTERN;
+               retval = MPI_ERR_ARG;
        } else {
                request           = xbt_mallocator_get(smpi_global->request_mallocator);
                request->comm     = comm;
@@ -219,15 +224,12 @@ void smpi_global_destroy()
        smpi_global = NULL;
 }
 
-// FIXME: smarter algorithm?
 int smpi_host_index()
 {
-       int i;
        smx_host_t host = SIMIX_host_self();
+       smpi_host_data_t hdata = (smpi_host_data_t)SIMIX_host_get_data(host);
 
-       for(i = smpi_global->host_count - 1; i > 0 && host != smpi_global->hosts[i]; i--);
-
-       return i;
+       return hdata->index;
 }
 
 int smpi_run_simulation(int argc, char **argv)