1
1

Some shmem Windows updates. I'm not sure if this makes a difference. Shiqing - can you please test?.

This commit was SVN r25591.
Этот коммит содержится в:
Samuel Gutierrez 2011-12-07 21:56:27 +00:00
родитель 076db435cd
Коммит dcb965e60e

Просмотреть файл

@ -247,7 +247,6 @@ static void *mmap(void *start, size_t length, int prot, int flags, int fd, off_t
}
/* ////////////////////////////////////////////////////////////////////////// */
/* SKG will not compile, but it's a start */
static int
segment_create(opal_shmem_ds_t *ds_buf,
const char *file_name,
@ -282,7 +281,7 @@ segment_create(opal_shmem_ds_t *ds_buf,
*temp2 = '/';
}
/* update path change in ds_buf */
memcpy(ds_buf->seg_name, temp1, OPAL_PATH_MAX);
memcpy(ds_buf->seg_name, file_name, OPAL_PATH_MAX);
/* relase the temporary file name */
free(temp1); /* relase the temporary file name */
@ -297,7 +296,7 @@ segment_create(opal_shmem_ds_t *ds_buf,
/* size: low 32-bits */
(DWORD)real_size,
/* name of map object */
ds_buf->seg_name);
temp1);
if (NULL == hMapObject) {
rc = GetLastError();
goto out;
@ -495,16 +494,6 @@ segment_unlink(opal_shmem_ds_t *ds_buf)
ds_buf->seg_name)
);
if (-1 == unlink(ds_buf->seg_name)) {
int err = errno;
char hn[MAXHOSTNAMELEN];
gethostname(hn, MAXHOSTNAMELEN - 1);
hn[MAXHOSTNAMELEN - 1] = '\0';
opal_show_help("help-opal-shmem-windows.txt", "sys call fail", 1, hn,
"unlink(2)", ds_buf->seg_name, strerror(err), err);
return OPAL_ERROR;
}
/* don't completely reset the opal_shmem_ds_t. in particular, only reset
* the id and flip the invalid bit. size and name values will remain valid
* across unlinks. other information stored in flags will remain untouched.