You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
56 lines
1.4 KiB
56 lines
1.4 KiB
9 years ago
|
Author: Justin Pryzby <justinpryzby@users.sf.net>
|
||
|
Description: (guess) Use mmap only if it exists.
|
||
|
--- a/src/fits/fitsbody.c
|
||
|
+++ b/src/fits/fitsbody.c
|
||
|
@@ -64,9 +64,12 @@
|
||
|
***/
|
||
|
PIXTYPE *alloc_body(tabstruct *tab, void (*func)(PIXTYPE *ptr, int npix))
|
||
|
{
|
||
|
+#ifdef HAVE_MMAP
|
||
|
FILE *file;
|
||
|
PIXTYPE *buffer;
|
||
|
- size_t npix, size, sizeleft, spoonful;
|
||
|
+ size_t sizeleft, spoonful;
|
||
|
+#endif
|
||
|
+ size_t npix, size;
|
||
|
|
||
|
if (!body_ramflag)
|
||
|
{
|
||
|
@@ -87,7 +90,9 @@
|
||
|
/* Decide if the data will go in physical memory or on swap-space */
|
||
|
npix = tab->tabsize/tab->bytepix;
|
||
|
size = npix*sizeof(PIXTYPE);
|
||
|
+#if !HAVE_MMAP
|
||
|
if (size < body_ramleft)
|
||
|
+#endif
|
||
|
{
|
||
|
/*-- There should be enough RAM left: try to do a malloc() */
|
||
|
if ((tab->bodybuf = malloc(size)))
|
||
|
@@ -105,6 +110,7 @@
|
||
|
tab->bodybuf = NULL;
|
||
|
}
|
||
|
|
||
|
+#if HAVE_MMAP
|
||
|
if (size < body_vramleft)
|
||
|
{
|
||
|
/*-- Convert and copy the data to a swap file, and mmap() it */
|
||
|
@@ -144,6 +150,7 @@
|
||
|
return NULL;
|
||
|
return (PIXTYPE *)tab->bodybuf;
|
||
|
}
|
||
|
+#endif
|
||
|
|
||
|
/* If no memory left at all: forget it! */
|
||
|
return NULL;
|
||
|
@@ -270,8 +277,10 @@
|
||
|
size = (tab->tabsize/tab->bytepix)*sizeof(PIXTYPE);
|
||
|
if (tab->swapflag)
|
||
|
{
|
||
|
+#if HAVE_MMAP
|
||
|
if (munmap(tab->bodybuf, size))
|
||
|
warning("Can't unmap ", tab->cat->filename);
|
||
|
+#endif
|
||
|
tab->swapflag = 0;
|
||
|
tab->bodybuf = NULL;
|
||
|
body_vramleft += size;
|