stasis-aries-wal/src/lladd/pageFile.c

217 lines
5.3 KiB
C
Raw Normal View History

/**
@file
This file handles all of the file I/O for pages.
*/
#include "page.h"
#include <lladd/bufferManager.h>
#include "pageFile.h"
#include <assert.h>
#include <lladd/logger/logger2.h>
2006-04-14 03:45:26 +00:00
#include <lladd/truncation.h>
2004-07-27 21:30:54 +00:00
#include <sys/types.h>
#include <sys/stat.h>
/** For O_DIRECT. It's unclear that this is the correct thing to #define, but it works under linux. */
#define __USE_GNU
2004-07-27 21:30:54 +00:00
#include <fcntl.h>
#include <unistd.h>
/** Allows boostrapping of the header page. */
#include <lladd/operations/pageOperations.h>
2004-07-27 21:30:54 +00:00
static int stable = -1;
static pthread_mutex_t stable_mutex;
/* static long myLseek(int f, long offset, int whence); */
2004-07-27 21:30:54 +00:00
static long myLseekNoLock(int f, long offset, int whence);
static int oldOffset = -1;
int pageFile_isDurable = 1;
void pageRead(Page *ret) {
2004-07-20 00:15:17 +00:00
long pageoffset;
long offset;
2004-07-20 00:15:17 +00:00
pageoffset = ret->id * PAGE_SIZE;
2004-07-27 21:30:54 +00:00
pthread_mutex_lock(&stable_mutex);
if(oldOffset != pageoffset) {
offset = myLseekNoLock(stable, pageoffset, SEEK_SET);
assert(offset == pageoffset);
} else {
offset = oldOffset;
}
oldOffset = offset + PAGE_SIZE;
2004-07-27 21:30:54 +00:00
assert(offset == pageoffset);
int read_size;
read_size = read(stable, ret->memAddr, PAGE_SIZE);
if(read_size != PAGE_SIZE) {
if (!read_size) { /* Past EOF... */
/* long fileSize = myLseekNoLock(stable, 0, SEEK_END);
2004-07-27 21:30:54 +00:00
offset = myLseekNoLock(stable, pageoffset, SEEK_SET);
assert(offset == pageoffset); */
/* if(fileSize <= pageoffset) { */
memset(ret->memAddr, 0, PAGE_SIZE);
/* write(stable, ret->memAddr, PAGE_SIZE); */ /* all this does is extend the file..why would we bother doing that? :)
} */
2004-07-27 21:30:54 +00:00
} else if(read_size == -1) {
perror("pageFile.c couldn't read");
fflush(NULL);
2006-06-13 22:40:53 +00:00
abort();
2004-07-27 21:30:54 +00:00
} else {
printf("pageFile.c readfile: read_size = %d, errno = %d\n", read_size, errno);
abort();
}
}
2004-07-27 21:30:54 +00:00
pthread_mutex_unlock(&stable_mutex);
2004-07-20 00:15:17 +00:00
}
/** @todo need to sync the page file to disk occasionally, so that the
dirty page table can be kept up to date. */
void pageWrite(Page * ret) {
/** If the page is clean, there's no reason to write it out. */
if(!dirtyPages_isDirty(ret)) {
DEBUG(" =^)~ ");
return;
}
long pageoffset = ret->id * PAGE_SIZE;
2004-07-20 00:15:17 +00:00
long offset ;
/* assert(ret->pending == 0); */
// If necessary, force the log to disk so that ret's LSN will be stable.
LogForce(pageReadLSN(ret));
2004-07-27 21:30:54 +00:00
pthread_mutex_lock(&stable_mutex);
2004-07-27 22:04:59 +00:00
if(oldOffset != pageoffset) {
offset = myLseekNoLock(stable, pageoffset, SEEK_SET);
assert(offset == pageoffset);
} else {
offset = oldOffset;
}
oldOffset = offset + PAGE_SIZE;
2004-07-20 00:15:17 +00:00
assert(ret->memAddr);
/* DEBUG("Writing page %d\n", ret->id); */
2004-07-27 21:30:54 +00:00
int write_ret = write(stable, ret->memAddr, PAGE_SIZE);
if(write_ret != PAGE_SIZE) {
if(-1 == write_ret) {
perror("pageFile.c couldn't write");
fflush(NULL);
abort();
} else if(0 == write_ret) {
/* now what? */
printf("write_ret is zero\n");
fflush(NULL);
abort();
} else {
printf("write_ret is %d\n", write_ret);
fflush(NULL);
abort();
}
}
2006-04-14 03:45:26 +00:00
dirtyPages_remove(ret);
2004-07-27 21:30:54 +00:00
pthread_mutex_unlock(&stable_mutex);
}
//#define PAGE_FILE_O_DIRECT
/** @todo O_DIRECT is broken in older linuxes (eg 2.4). The build script should disable it on such platforms. */
void openPageFile() {
DEBUG("Opening storefile.\n");
2004-07-27 21:30:54 +00:00
if(pageFile_isDurable) {
#ifdef PAGE_FILE_O_DIRECT
stable = open (STORE_FILE, O_CREAT | O_RDWR | O_DIRECT, S_IRWXU | S_IRWXG | S_IRWXO);
#else
stable = open (STORE_FILE, O_CREAT | O_RDWR, S_IRWXU | S_IRWXG | S_IRWXO);
#endif
} else {
fprintf(stderr, "\n**********\n");
fprintf (stderr, "pageFile.c: pageFile_isDurable==0; the page file will not force writes to disk.\n");
fprintf (stderr, " Transactions will not be durable if the system crashes.\n**********\n");
stable = open (STORE_FILE, O_CREAT | O_RDWR , S_IRWXU | S_IRWXG | S_IRWXO);
}
2004-07-27 21:30:54 +00:00
if(stable == -1) {
perror("couldn't open storefile");
fflush(NULL);
abort();
}
pthread_mutex_init(&stable_mutex, NULL);
}
void forcePageFile() {
#ifndef PAGE_FILE_O_DIRECT
#ifdef HAVE_FDATASYNC
fdatasync(stable);
#else
fsync(stable);
#endif // HAVE_FDATASYNC
#endif // PAGE_FILE_O_DIRECT
}
void closePageFile() {
forcePageFile();
2004-07-27 21:30:54 +00:00
int ret = close(stable);
if(-1 == ret) {
perror("Couldn't close storefile.");
fflush(NULL);
abort();
}
stable = -1;
}
static long myLseek(int f, long offset, int whence) {
long ret;
2004-07-27 21:30:54 +00:00
pthread_mutex_lock(&stable_mutex);
ret = myLseekNoLock(f, offset, whence);
pthread_mutex_unlock(&stable_mutex);
2004-07-20 00:15:17 +00:00
return ret;
}
static long myLseekNoLock(int f, long offset, int whence) {
2004-07-27 21:30:54 +00:00
assert(! ( offset % 4096 ));
long ret = lseek(f, offset, whence);
if(ret == -1) {
perror("Couldn't seek.");
fflush(NULL);
abort();
}
return ret;
}
2004-07-27 21:30:54 +00:00
/*void myFwrite(const void * dat, long size, FILE * f) {
int nmemb = fwrite(dat, size, 1, f);
/ * test * /
if(nmemb != 1) {
perror("myFwrite");
abort();
2004-07-27 21:30:54 +00:00
/ * return FILE_WRITE_OPEN_ERROR; * /
}
2004-07-27 21:30:54 +00:00
}*/
long pageCount() {
pthread_mutex_lock(&stable_mutex);
printf(".");
2004-07-27 21:30:54 +00:00
long fileSize = myLseek(stable, 0, SEEK_END);
oldOffset = -1;
pthread_mutex_unlock(&stable_mutex);
assert(! (fileSize % PAGE_SIZE));
return fileSize / PAGE_SIZE;
}