X-Git-Url: http://git.indexdata.com/?p=idzebra-moved-to-github.git;a=blobdiff_plain;f=bfile%2Fcfile.c;h=60dc4d2533add6c6153416eae3277622fd275ad6;hp=92413852ead477631f33b6d71c93724b42d53a95;hb=05b9b8ed020c5bfa48a913d6a2e2b50ddf1bab8e;hpb=896c0427df9d8eff5de6a1735dcd992e067df844 diff --git a/bfile/cfile.c b/bfile/cfile.c index 9241385..60dc4d2 100644 --- a/bfile/cfile.c +++ b/bfile/cfile.c @@ -1,4 +1,4 @@ -/* $Id: cfile.c,v 1.27 2002-08-02 19:26:55 adam Exp $ +/* $Id: cfile.c,v 1.32 2004-12-08 12:23:08 adam Exp $ Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002 Index Data Aps @@ -20,19 +20,17 @@ Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ - - #include #include #include #include -#include +#include "mfile.h" #include "cfile.h" static int write_head (CFile cf) { - int left = cf->head.hash_size * sizeof(int); + int left = cf->head.hash_size * sizeof(zint); int bno = 1; const char *tab = (char*) cf->array; @@ -51,7 +49,7 @@ static int write_head (CFile cf) static int read_head (CFile cf) { - int left = cf->head.hash_size * sizeof(int); + int left = cf->head.hash_size * sizeof(zint); int bno = 1; char *tab = (char*) cf->array; @@ -78,17 +76,17 @@ CFile cf_open (MFile mf, MFile_area area, const char *fname, int hash_bytes; cf->rmf = mf; - logf (LOG_DEBUG, "cf: open %s %s", cf->rmf->name, wflag ? "rdwr" : "rd"); + yaz_log (YLOG_DEBUG, "cf: open %s %s", cf->rmf->name, wflag ? "rdwr" : "rd"); sprintf (path, "%s-b", fname); if (!(cf->block_mf = mf_open (area, path, block_size, wflag))) { - logf (LOG_FATAL|LOG_ERRNO, "Failed to open %s", path); + yaz_log (YLOG_FATAL|YLOG_ERRNO, "Failed to open %s", path); exit (1); } sprintf (path, "%s-i", fname); if (!(cf->hash_mf = mf_open (area, path, HASH_BSIZE, wflag))) { - logf (LOG_FATAL|LOG_ERRNO, "Failed to open %s", path); + yaz_log (YLOG_FATAL|YLOG_ERRNO, "Failed to open %s", path); exit (1); } assert (firstp); @@ -99,13 +97,13 @@ CFile cf_open (MFile mf, MFile_area area, const char *fname, cf->head.state = 1; cf->head.block_size = block_size; cf->head.hash_size = 199; - hash_bytes = cf->head.hash_size * sizeof(int); + hash_bytes = cf->head.hash_size * sizeof(zint); cf->head.flat_bucket = cf->head.next_bucket = cf->head.first_bucket = (hash_bytes+sizeof(cf->head))/HASH_BSIZE + 2; cf->head.next_block = 1; if (wflag) mf_write (cf->hash_mf, 0, 0, sizeof(cf->head), &cf->head); - cf->array = (int *) xmalloc (hash_bytes); + cf->array = (zint *) xmalloc (hash_bytes); for (i = 0; ihead.hash_size; i++) cf->array[i] = 0; if (wflag) @@ -116,11 +114,11 @@ CFile cf_open (MFile mf, MFile_area area, const char *fname, *firstp = 0; assert (cf->head.block_size == block_size); assert (cf->head.hash_size > 2); - hash_bytes = cf->head.hash_size * sizeof(int); + hash_bytes = cf->head.hash_size * sizeof(zint); assert (cf->head.next_bucket > 0); assert (cf->head.next_block > 0); if (cf->head.state == 1) - cf->array = (int *) xmalloc (hash_bytes); + cf->array = (zint *) xmalloc (hash_bytes); else cf->array = NULL; read_head (cf); @@ -146,9 +144,9 @@ CFile cf_open (MFile mf, MFile_area area, const char *fname, return cf; } -static int cf_hash (CFile cf, int no) +static int cf_hash (CFile cf, zint no) { - return (no>>3) % cf->head.hash_size; + return (int) (((no >> 3) % cf->head.hash_size)); } static void release_bucket (CFile cf, struct CFile_hash_bucket *p) @@ -189,7 +187,7 @@ static void flush_bucket (CFile cf, int no_to_flush) } } -static struct CFile_hash_bucket *alloc_bucket (CFile cf, int block_no, int hno) +static struct CFile_hash_bucket *alloc_bucket (CFile cf, zint block_no, int hno) { struct CFile_hash_bucket *p, **pp; @@ -216,14 +214,14 @@ static struct CFile_hash_bucket *alloc_bucket (CFile cf, int block_no, int hno) return p; } -static struct CFile_hash_bucket *get_bucket (CFile cf, int block_no, int hno) +static struct CFile_hash_bucket *get_bucket (CFile cf, zint block_no, int hno) { struct CFile_hash_bucket *p; p = alloc_bucket (cf, block_no, hno); if (!mf_read (cf->hash_mf, block_no, 0, 0, &p->ph)) { - logf (LOG_FATAL|LOG_ERRNO, "read get_bucket"); + yaz_log (YLOG_FATAL|YLOG_ERRNO, "read get_bucket"); exit (1); } assert (p->ph.this_bucket == block_no); @@ -231,10 +229,11 @@ static struct CFile_hash_bucket *get_bucket (CFile cf, int block_no, int hno) return p; } -static struct CFile_hash_bucket *new_bucket (CFile cf, int *block_nop, int hno) +static struct CFile_hash_bucket *new_bucket (CFile cf, zint *block_nop, int hno) { struct CFile_hash_bucket *p; - int i, block_no; + int i; + zint block_no; block_no = *block_nop = cf->head.next_bucket++; p = alloc_bucket (cf, block_no, hno); @@ -250,21 +249,22 @@ static struct CFile_hash_bucket *new_bucket (CFile cf, int *block_nop, int hno) return p; } -static int cf_lookup_flat (CFile cf, int no) +static zint cf_lookup_flat (CFile cf, zint no) { - int hno = (no*sizeof(int))/HASH_BSIZE; - int off = (no*sizeof(int)) - hno*HASH_BSIZE; - int vno = 0; + zint hno = (no*sizeof(zint))/HASH_BSIZE; + int off = (int) ((no*sizeof(zint)) - hno*HASH_BSIZE); + zint vno = 0; - mf_read (cf->hash_mf, hno+cf->head.next_bucket, off, sizeof(int), &vno); + mf_read (cf->hash_mf, hno+cf->head.next_bucket, off, sizeof(zint), &vno); return vno; } -static int cf_lookup_hash (CFile cf, int no) +static zint cf_lookup_hash (CFile cf, zint no) { int hno = cf_hash (cf, no); struct CFile_hash_bucket *hb; - int block_no, i; + zint block_no; + int i; for (hb = cf->parray[hno]; hb; hb = hb->h_next) { @@ -290,13 +290,13 @@ static int cf_lookup_hash (CFile cf, int no) { if (hb->ph.this_bucket == block_no) { - logf (LOG_FATAL, "Found hash bucket on other chain (1)"); + yaz_log (YLOG_FATAL, "Found hash bucket on other chain (1)"); abort (); } for (i = 0; iph.vno[i]; i++) if (hb->ph.no[i] == no) { - logf (LOG_FATAL, "Found hash bucket on other chain (2)"); + yaz_log (YLOG_FATAL, "Found hash bucket on other chain (2)"); abort (); } } @@ -310,25 +310,27 @@ static int cf_lookup_hash (CFile cf, int no) return 0; } -static void cf_write_flat (CFile cf, int no, int vno) +static void cf_write_flat (CFile cf, zint no, zint vno) { - int hno = (no*sizeof(int))/HASH_BSIZE; - int off = (no*sizeof(int)) - hno*HASH_BSIZE; + zint hno = (no*sizeof(zint))/HASH_BSIZE; + int off = (int) ((no*sizeof(zint)) - hno*HASH_BSIZE); hno += cf->head.next_bucket; if (hno >= cf->head.flat_bucket) cf->head.flat_bucket = hno+1; cf->dirty = 1; - mf_write (cf->hash_mf, hno, off, sizeof(int), &vno); + mf_write (cf->hash_mf, hno, off, sizeof(zint), &vno); } static void cf_moveto_flat (CFile cf) { struct CFile_hash_bucket *p; - int i, j; + int j; + zint i; - logf (LOG_DEBUG, "cf: Moving to flat shadow: %s", cf->rmf->name); - logf (LOG_DEBUG, "cf: hits=%d miss=%d bucket_in_memory=%d total=%d", + yaz_log (YLOG_DEBUG, "cf: Moving to flat shadow: %s", cf->rmf->name); + yaz_log (YLOG_DEBUG, "cf: hits=%d miss=%d bucket_in_memory=" ZINT_FORMAT " total=" + ZINT_FORMAT, cf->no_hits, cf->no_miss, cf->bucket_in_memory, cf->head.next_bucket - cf->head.first_bucket); assert (cf->head.state == 1); @@ -339,7 +341,7 @@ static void cf_moveto_flat (CFile cf) { if (!mf_read (cf->hash_mf, i, 0, 0, &p->ph)) { - logf (LOG_FATAL|LOG_ERRNO, "read bucket moveto flat"); + yaz_log (YLOG_FATAL|YLOG_ERRNO, "read bucket moveto flat"); exit (1); } for (j = 0; j < HASH_BUCKET && p->ph.vno[j]; j++) @@ -354,27 +356,28 @@ static void cf_moveto_flat (CFile cf) cf->dirty = 1; } -static int cf_lookup (CFile cf, int no) +static zint cf_lookup (CFile cf, zint no) { if (cf->head.state > 1) return cf_lookup_flat (cf, no); return cf_lookup_hash (cf, no); } -static int cf_new_flat (CFile cf, int no) +static zint cf_new_flat (CFile cf, zint no) { - int vno = (cf->head.next_block)++; + zint vno = (cf->head.next_block)++; cf_write_flat (cf, no, vno); return vno; } -static int cf_new_hash (CFile cf, int no) +static zint cf_new_hash (CFile cf, zint no) { int hno = cf_hash (cf, no); struct CFile_hash_bucket *hbprev = NULL, *hb = cf->parray[hno]; - int *bucketpp = &cf->array[hno]; - int i, vno = (cf->head.next_block)++; + zint *bucketpp = &cf->array[hno]; + int i; + zint vno = (cf->head.next_block)++; for (hb = cf->parray[hno]; hb; hb = hb->h_next) if (!hb->ph.vno[HASH_BUCKET-1]) @@ -406,7 +409,7 @@ static int cf_new_hash (CFile cf, int no) { if (hb->ph.this_bucket == *bucketpp) { - logf (LOG_FATAL, "Found hash bucket on other chain"); + yaz_log (YLOG_FATAL, "Found hash bucket on other chain"); abort (); } } @@ -433,7 +436,7 @@ static int cf_new_hash (CFile cf, int no) return vno; } -int cf_new (CFile cf, int no) +zint cf_new (CFile cf, zint no) { if (cf->head.state > 1) return cf_new_flat (cf, no); @@ -447,9 +450,9 @@ int cf_new (CFile cf, int no) } -int cf_read (CFile cf, int no, int offset, int nbytes, void *buf) +int cf_read (CFile cf, zint no, int offset, int nbytes, void *buf) { - int block; + zint block; assert (cf); zebra_mutex_lock (&cf->mutex); @@ -461,15 +464,15 @@ int cf_read (CFile cf, int no, int offset, int nbytes, void *buf) zebra_mutex_unlock (&cf->mutex); if (!mf_read (cf->block_mf, block, offset, nbytes, buf)) { - logf (LOG_FATAL|LOG_ERRNO, "cf_read no=%d, block=%d", no, block); + yaz_log (YLOG_FATAL|YLOG_ERRNO, "cf_read no=" ZINT_FORMAT " block=" ZINT_FORMAT, no, block); exit (1); } return 1; } -int cf_write (CFile cf, int no, int offset, int nbytes, const void *buf) +int cf_write (CFile cf, zint no, int offset, int nbytes, const void *buf) { - int block; + zint block; assert (cf); zebra_mutex_lock (&cf->mutex); @@ -488,7 +491,8 @@ int cf_write (CFile cf, int no, int offset, int nbytes, const void *buf) zebra_mutex_unlock (&cf->mutex); if (mf_write (cf->block_mf, block, offset, nbytes, buf)) { - logf (LOG_FATAL|LOG_ERRNO, "cf_write no=%d, block=%d", no, block); + yaz_log (YLOG_FATAL|YLOG_ERRNO, "cf_write no=" ZINT_FORMAT + " block=" ZINT_FORMAT, no, block); exit (1); } return 0; @@ -496,7 +500,8 @@ int cf_write (CFile cf, int no, int offset, int nbytes, const void *buf) int cf_close (CFile cf) { - logf (LOG_DEBUG, "cf: close hits=%d miss=%d bucket_in_memory=%d total=%d", + yaz_log (YLOG_DEBUG, "cf: close hits=%d miss=%d bucket_in_memory=" ZINT_FORMAT + " total=" ZINT_FORMAT, cf->no_hits, cf->no_miss, cf->bucket_in_memory, cf->head.next_bucket - cf->head.first_bucket); flush_bucket (cf, -1);