The temporary per-record keys are compacted a little, and duplication
[idzebra-moved-to-github.git] / index / extract.c
index 5c1f738..4a5e2ec 100644 (file)
@@ -4,7 +4,27 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: extract.c,v $
- * Revision 1.43  1995-12-11 09:12:46  adam
+ * Revision 1.48  1996-02-01 20:53:26  adam
+ * The temporary per-record keys are compacted a little, and duplication
+ * of the per-records keys are avoided when they are saved in the record
+ * information buffer.
+ *
+ * Revision 1.47  1996/01/17  14:57:48  adam
+ * Prototype changed for reader functions in extract/retrieve. File
+ *  is identified by 'void *' instead of 'int.
+ *
+ * Revision 1.46  1995/12/15  14:57:16  adam
+ * Bug fix.
+ *
+ * Revision 1.45  1995/12/15  12:37:41  adam
+ * In addRecordKeyAny: Writes key only when attrSet != -1.
+ *
+ * Revision 1.44  1995/12/12  16:00:54  adam
+ * System call sync(2) used after update/commit.
+ * Locking (based on fcntl) uses F_EXLCK and F_SHLCK instead of F_WRLCK
+ * and F_RDLCK.
+ *
+ * Revision 1.43  1995/12/11  09:12:46  adam
  * The rec_get function returns NULL if record doesn't exist - will
  * happen in the server if the result set records have been deleted since
  * the creation of the set (i.e. the search).
@@ -184,7 +204,6 @@ void key_open (int mem)
 {
     if (mem < 50000)
         mem = 50000;
-    logf (LOG_LOG, "key_open %d", mem);
     key_buf = xmalloc (mem);
     ptr_top = mem/sizeof(char*);
     ptr_i = 0;
@@ -311,7 +330,6 @@ void key_flush (void)
 int key_close (void)
 {
     key_flush ();
-    logf (LOG_LOG, "buf free");
     xfree (key_buf);
     rec_close (&records);
     dict_close (matchDict);
@@ -333,6 +351,8 @@ struct recKeys {
     int buf_used;
     int buf_max;
     char *buf;
+    char prevAttrSet;
+    short prevAttrUse;
 } reckeys;
 
 static void addRecordKey (const RecWord *p)
@@ -341,29 +361,46 @@ static void addRecordKey (const RecWord *p)
     char attrSet;
     short attrUse;
     size_t i;
+    int lead = 0;
 
     if (reckeys.buf_used+1024 > reckeys.buf_max)
     {
         char *b;
 
-        b = xmalloc (reckeys.buf_max += 65000);
+        b = xmalloc (reckeys.buf_max += 128000);
         if (reckeys.buf_used > 0)
             memcpy (b, reckeys.buf, reckeys.buf_used);
         xfree (reckeys.buf);
         reckeys.buf = b;
     }
     dst = reckeys.buf + reckeys.buf_used;
+
+    attrSet = p->attrSet;
+    if (reckeys.buf_used > 0 && reckeys.prevAttrSet == attrSet)
+        lead |= 1;
+    else
+        reckeys.prevAttrSet = attrSet;
+    attrUse = p->attrUse;
+    if (reckeys.buf_used > 0 && reckeys.prevAttrUse == attrUse)
+        lead |= 2;
+    else
+        reckeys.prevAttrUse = attrUse;
+
     switch (p->which)
     {
     case Word_String:
-        attrSet = p->attrSet;
-        memcpy (dst, &attrSet, sizeof(attrSet));
-        dst += sizeof(attrSet);
+        *dst++ = lead;
 
-        attrUse = p->attrUse;
-        memcpy (dst, &attrUse, sizeof(attrUse));
-        dst += sizeof(attrUse);
-        
+        if (!(lead & 1))
+        {
+            memcpy (dst, &attrSet, sizeof(attrSet));
+            dst += sizeof(attrSet);
+        }
+        if (!(lead & 2))
+        {
+            memcpy (dst, &attrUse, sizeof(attrUse));
+            dst += sizeof(attrUse);
+        }
         for (i = 0; p->u.string[i]; i++)
             *dst++ = p->u.string[i];
         *dst++ = '\0';
@@ -381,20 +418,27 @@ static void addRecordKey (const RecWord *p)
 static void flushRecordKeys (SYSNO sysno, int cmd, struct recKeys *reckeys, 
                              const char *databaseName)
 {
+    char attrSet = -1;
+    short attrUse = -1;
     int off = 0;
     while (off < reckeys->buf_used)
     {
         const char *src = reckeys->buf + off;
-        char attrSet;
-        short attrUse;
         struct it_key key;
-        
-        memcpy (&attrSet, src, sizeof(attrSet));
-        src += sizeof(attrSet);
-
-        memcpy (&attrUse, src, sizeof(attrUse));
-        src += sizeof(attrUse);
+        int lead;
+    
+        lead = *src++;
 
+        if (!(lead & 1))
+        {
+            memcpy (&attrSet, src, sizeof(attrSet));
+            src += sizeof(attrSet);
+        }
+        if (!(lead & 2))
+        {
+            memcpy (&attrUse, src, sizeof(attrUse));
+            src += sizeof(attrUse);
+        }
         if (key_buf_used + 1024 > (ptr_top-ptr_i)*sizeof(char*))
             key_flush ();
         ++ptr_i;
@@ -482,47 +526,57 @@ static void addRecordKeyAny (const RecWord *p)
         w.attrUse = 1016;
         addRecordKey (&w);
     }
-    addRecordKey (p);
+    if (p->attrSet != -1)
+        addRecordKey (p);
 }
 
-
 #define FILE_READ_BUFSIZE 4096
-
-static int file_noread;
+struct file_read_info {
+    int file_noread;
+    int fd;
 #if FILE_READ_BUFSIZE
-static char *file_buf;
-static int file_offset;
-static int file_bufsize;
+    char *file_buf;
+    int file_offset;
+    int file_bufsize;
 #endif
+};
 
-static void file_read_start (int fd)
+static struct file_read_info *file_read_start (int fd)
 {
-    file_noread = 0;
+    struct file_read_info *fi = xmalloc (sizeof(*fi));
+
+    fi->fd = fd;
+    fi->file_noread = 0;
 #if FILE_READ_BUFSIZE
-    file_offset = 0;
-    file_buf = xmalloc (FILE_READ_BUFSIZE);
-    file_bufsize = read (fd, file_buf, FILE_READ_BUFSIZE);
+    fi->file_offset = 0;
+    fi->file_buf = xmalloc (FILE_READ_BUFSIZE);
+    fi->file_bufsize = read (fd, fi->file_buf, FILE_READ_BUFSIZE);
 #endif
+    return fi;
 }
 
-static void file_read_stop (int fd)
+static void file_read_stop (struct file_read_info *fi)
 {
+    assert (fi);
 #if FILE_READ_BUFSIZE
-    xfree (file_buf);
-    file_buf = NULL;
+    xfree (fi->file_buf);
+    fi->file_buf = NULL;
 #endif
+    xfree (fi);
 }
 
-static int file_read (int fd, char *buf, size_t count)
+static int file_read (void *handle, char *buf, size_t count)
 {
+    struct file_read_info *p = handle;
+    int fd = p->fd;
 #if FILE_READ_BUFSIZE
-    int l = file_bufsize - file_offset;
+    int l = p->file_bufsize - p->file_offset;
 
     if (count > l)
     {
         int r;
         if (l > 0)
-            memcpy (buf, file_buf + file_offset, l);
+            memcpy (buf, p->file_buf + p->file_offset, l);
         count = count-l;
         if (count > FILE_READ_BUFSIZE)
         {
@@ -531,12 +585,12 @@ static int file_read (int fd, char *buf, size_t count)
                 logf (LOG_FATAL|LOG_ERRNO, "read");
                 exit (1);
             }
-            file_bufsize = 0;
-            file_offset = 0;
-            file_noread += l+r;
+            p->file_bufsize = 0;
+            p->file_offset = 0;
+            p->file_noread += l+r;
             return l+r;
         }
-        file_bufsize = r = read (fd, file_buf, FILE_READ_BUFSIZE);
+        p->file_bufsize = r = read (fd, p->file_buf, FILE_READ_BUFSIZE);
         if (r == -1)
         {
             logf (LOG_FATAL|LOG_ERRNO, "read");
@@ -544,28 +598,28 @@ static int file_read (int fd, char *buf, size_t count)
         }
         else if (r <= count)
         {
-            file_offset = r;
-            memcpy (buf + l, file_buf, r);
-            file_noread += l+r;
+            p->file_offset = r;
+            memcpy (buf + l, p->file_buf, r);
+            p->file_noread += l+r;
             return l+r;
         }
         else
         {
-            file_offset = count;
-            memcpy (buf + l, file_buf, count - l);
-            file_noread += count;
+            p->file_offset = count;
+            memcpy (buf + l, p->file_buf, count - l);
+            p->file_noread += count;
             return count;
         }
     }
-    memcpy (buf, file_buf + file_offset, count);
-    file_offset += count;
-    file_noread += count;
+    memcpy (buf, p->file_buf + p->file_offset, count);
+    p->file_offset += count;
+    p->file_noread += count;
     return count;
 #else
     int r;
     r = read (fd, buf, count);
     if (r > 0)
-        file_noread += r;
+        p->file_noread += r;
     return r;
 #endif
 }
@@ -715,7 +769,8 @@ static char *fileMatchStr (struct recKeys *reckeys, struct recordGroup *rGroup,
 
 static int recordExtract (SYSNO *sysno, const char *fname,
                           struct recordGroup *rGroup, int deleteFlag,
-                          int fd, RecType recType, char *subType)
+                          struct file_read_info *fi, RecType recType,
+                          char *subType)
 {
     struct recExtractCtrl extractCtrl;
     int r;
@@ -723,15 +778,17 @@ static int recordExtract (SYSNO *sysno, const char *fname,
     SYSNO sysnotmp;
     Record rec;
 
-    if (fd != -1)
+    if (fi->fd != -1)
     {
-        extractCtrl.fd = fd;
+        extractCtrl.fh = fi;
         /* extract keys */
         extractCtrl.subType = subType;
         extractCtrl.init = wordInit;
         extractCtrl.add = addRecordKeyAny;
 
         reckeys.buf_used = 0;
+        reckeys.prevAttrUse = -1;
+        reckeys.prevAttrSet = -1;
         extractCtrl.readf = file_read;
         r = (*recType->extract)(&extractCtrl);
   
@@ -842,10 +899,17 @@ static int recordExtract (SYSNO *sysno, const char *fname,
     xfree (rec->info[recInfo_delKeys]);
     if (reckeys.buf_used > 0 && rGroup->flagStoreKeys == 1)
     {
+#if 1
+        rec->size[recInfo_delKeys] = reckeys.buf_used;
+        rec->info[recInfo_delKeys] = reckeys.buf;
+        reckeys.buf = NULL;
+        reckeys.buf_max = 0;
+#else
         rec->info[recInfo_delKeys] = xmalloc (reckeys.buf_used);
         rec->size[recInfo_delKeys] = reckeys.buf_used;
         memcpy (rec->info[recInfo_delKeys], reckeys.buf,
                 rec->size[recInfo_delKeys]);
+#endif
     }
     else
     {
@@ -856,24 +920,25 @@ static int recordExtract (SYSNO *sysno, const char *fname,
     xfree (rec->info[recInfo_storeData]);
     if (rGroup->flagStoreData == 1)
     {
-        rec->size[recInfo_storeData] = file_noread;
-        rec->info[recInfo_storeData] = xmalloc (file_noread);
+        rec->size[recInfo_storeData] = fi->file_noread;
+        rec->info[recInfo_storeData] = xmalloc (fi->file_noread);
 #if FILE_READ_BUFSIZE
-        if (file_noread < FILE_READ_BUFSIZE)
-           memcpy (rec->info[recInfo_storeData], file_buf, file_noread);
+        if (fi->file_noread < FILE_READ_BUFSIZE)
+           memcpy (rec->info[recInfo_storeData], fi->file_buf,
+                    fi->file_noread);
         else
 #endif
         {
-            if (lseek (fd, 0L, SEEK_SET) < 0)
+            if (lseek (fi->fd, 0L, SEEK_SET) < 0)
             {
                 logf (LOG_ERRNO|LOG_FATAL, "seek to 0 in %s", fname);
                 exit (1);
             }
-            if (read (fd, rec->info[recInfo_storeData], file_noread) 
-                < file_noread)
+            if (read (fi->fd, rec->info[recInfo_storeData], fi->file_noread) 
+                < fi->file_noread)
             {
                 logf (LOG_ERRNO|LOG_FATAL, "read %d bytes of %s",
-                      file_noread, fname);
+                      fi->file_noread, fname);
                 exit (1);
             }
         }
@@ -902,6 +967,7 @@ int fileExtract (SYSNO *sysno, const char *fname,
     RecType recType;
     struct recordGroup rGroupM;
     struct recordGroup *rGroup = &rGroupM;
+    struct file_read_info *fi;
 
     memcpy (rGroup, rGroupP, sizeof(*rGroupP));
    
@@ -1010,9 +1076,9 @@ int fileExtract (SYSNO *sysno, const char *fname,
             return 0;
         }
     }
-    file_read_start (fd);
-    recordExtract (sysno, fname, rGroup, deleteFlag, fd, recType, subType);
-    file_read_stop (fd);
+    fi = file_read_start (fd);
+    recordExtract (sysno, fname, rGroup, deleteFlag, fi, recType, subType);
+    file_read_stop (fi);
     if (fd != -1)
         close (fd);
     return 1;