ext/SDBM_File/sdbm/dbm.c

   1 /*
   2  * Copyright (c) 1985 The Regents of the University of California.
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms are permitted
   6  * provided that the above copyright notice and this paragraph are
   7  * duplicated in all such forms and that any documentation,
   8  * advertising materials, and other materials related to such
   9  * distribution and use acknowledge that the software was developed
  10  * by the University of California, Berkeley.  The name of the
  11  * University may not be used to endorse or promote products derived
  12  * from this software without specific prior written permission.
  13  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  14  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  15  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  16  */
  17
  18 #ifndef lint
  19 static char sccsid[] = "@(#)dbm.c    5.4 (Berkeley) 5/24/89";
  20 #endif /* not lint */
  21
  22 #include    "dbm.h"
  23
  24 #define    NODB    ((DBM *)0)
  25
  26 static DBM *cur_db = NODB;
  27
  28 static char no_db[] = "dbm: no open database\n";
  29
  30 int
  31 dbminit(char *file)
  32 {
  33     if (cur_db != NODB)
  34         dbm_close(cur_db);
  35
  36     cur_db = dbm_open(file, 2, 0);
  37     if (cur_db == NODB) {
  38         cur_db = dbm_open(file, 0, 0);
  39         if (cur_db == NODB)
  40             return (-1);
  41     }
  42     return (0);
  43 }
  44
  45 long
  46 forder(datum key)
  47 {
  48     if (cur_db == NODB) {
  49         printf(no_db);
  50         return (0L);
  51     }
  52     return (dbm_forder(cur_db, key));
  53 }
  54
  55 datum
  56 fetch(datum key)
  57 {
  58     datum item;
  59
  60     if (cur_db == NODB) {
  61         printf(no_db);
  62         item.dptr = 0;
  63         return (item);
  64     }
  65     return (dbm_fetch(cur_db, key));
  66 }
  67
  68 int
  69 delete(datum key)
  70 {
  71     if (cur_db == NODB) {
  72         printf(no_db);
  73         return (-1);
  74     }
  75     if (dbm_rdonly(cur_db))
  76         return (-1);
  77     return (dbm_delete(cur_db, key));
  78 }
  79
  80 int
  81 store(datum key, datum dat)
  82 {
  83     if (cur_db == NODB) {
  84         printf(no_db);
  85         return (-1);
  86     }
  87     if (dbm_rdonly(cur_db))
  88         return (-1);
  89
  90     return (dbm_store(cur_db, key, dat, DBM_REPLACE));
  91 }
  92
  93 datum
  94 firstkey(void)
  95 {
  96     datum item;
  97
  98     if (cur_db == NODB) {
  99         printf(no_db);
 100         item.dptr = 0;
 101         return (item);
 102     }
 103     return (dbm_firstkey(cur_db));
 104 }
 105
 106 datum
 107 nextkey(datum key)
 108 {
 109     datum item;
 110
 111     if (cur_db == NODB) {
 112         printf(no_db);
 113         item.dptr = 0;
 114         return (item);
 115     }
 116     return (dbm_nextkey(cur_db, key));
 117 }