Noções básicas sobre gravações de arquivos simultâneas de vários processos
Daqui :É um arquivo anexado atômico no UNIX
Considere um caso em que vários processos abrem o mesmo arquivo e são anexados a ele. O_APPEND garante que procurar o final do arquivo e, em seguida, iniciar a operação de gravação é atômica. Assim, vários processos podem ser anexados ao mesmo arquivo e nenhum processo sobrescreverá qualquer gravação de outro processo, desde que cada tamanho de gravação seja <= PIPE_BUF.
Eu escrevi um programa de teste onde vários processos abrem e gravam no mesmo arquivo (write(2)
). Eu me certifico de que cada tamanho de gravação seja> PIPE_BUF (4k). Eu estava esperando ver casos em que um processo substitui os dados de outra pessoa. Mas isso não acontece. Eu testei com tamanhos de gravação diferentes. Isso é apenas sorte ou há uma razão pela qual isso não acontece? Meu objetivo final é entender se vários processos anexados ao mesmo arquivo precisam coordenar suas gravações.
Aqui está o programa completo. Todo processo cria um buffer int, preenche todos os valores comrank
, abre um arquivo e grava nele.
Especificações: OpenMPI 1.4.3 no Opensuse 11,3 de 64 bits
Compilado como: mpicc -O3 test.c, executado como: mpirun -np 8 ./a.out
#include <stdio.h>
#include <stdlib.h>
#include <mpi.h>
#include <fcntl.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>
int
main(int argc, char** argv) {
int rank, size, i, bufsize = 134217728, fd, status = 0, bytes_written, tmp_bytes_written;
int* buf;
char* filename = "/tmp/testfile.out";
MPI_Init(&argc, &argv);
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
MPI_Comm_size(MPI_COMM_WORLD, &size);
buf = (int*) malloc (bufsize * sizeof(int));
if(buf == NULL) {
status = -1;
perror("Could not malloc");
goto finalize;
}
for(i=0; i<bufsize; i++)
buf[i] = rank;
if(-1 == (fd = open(filename, O_APPEND|O_WRONLY, S_IWUSR))) {
perror("Cant open file");
status = -1;
goto end;
exit(-1);
}
bytes_written = 0;
if(bufsize != (tmp_bytes_written = write(fd, buf, bufsize))) {
perror("Error during write");
printf("ret value: %d\n", tmp_bytes_written);
status = -1;
goto close;
}
close:
if(-1 == close(fd)) {
perror("Error during close");
status = -1;
}
end:
free(buf);
finalize:
MPI_Finalize();
return status;
}