dbm数据库源代码分析(15)：dbm部分

   dbm接口的实现基本上也都是直接调用gdbm中相应函数来完成的。
   （1）int dbminit(file)函数。打开并初始化一个新的dbm数据库文件。本函数流程几乎与dbmopen.c中的dbm_open函数一样，只不过没有flags标志的判断，直接以可写方式打开一个新的文件，并把返回的文件信息结构保存在全局变量_gdbm_file中。
/* dbminit.c - 为dbm操作打开一个文件，这是一个ndbm接口 */ #include "autoconf.h" #include "gdbmdefs.h" #include "gdbmerrno.h" #include "extern.h" /* 初始化ndbm系统。file是一个指针文件名的指针变量。在标准的dbm中，数据库用.pag和.dir两个文件 来存储。为了使gdbm能够兼容使用了dbminit调用的dbm，我们使用同样的文件名。特别地，dbminit在 调用gdbm_open时使用文件名file.pag。如果这个文件（file.pag）为0字节大小，则会执行一个文件 初始化过程，设置文件的一些初始结构。任何的出错都将导致返回-1值，没有错误则返回0。 注意：file.dir将会链接到file.pag */ int dbminit (file) char *file; { char* pag_file; /* 用来构建"file.pag" */ char* dir_file; /* 用来构建"file.dir" */ struct stat dir_stat; /* 文件"file.dir"的状态信息 */ int ret; ret = 0; /* 默认返回值 */ /* 准备正确的文件名"file.pag"和"file.dir" */ pag_file = (char *) malloc (strlen (file)+5); dir_file = (char *) malloc (strlen (file)+5); if ((pag_file == NULL) || (dir_file == NULL)) { gdbm_errno = GDBM_MALLOC_ERROR; return -1; } strcpy (pag_file, file); strcat (pag_file, ".pag"); strcpy (dir_file, file); strcat (dir_file, ".dir"); if (_gdbm_file != NULL) gdbm_close (_gdbm_file); /* 以可写方式打开文件，DBM从不创建文件，返回的文件信息结构保存在全局变量_gdbm_file中（参看extern.h和global.c） */ _gdbm_file = gdbm_open (pag_file, 0, GDBM_WRITER, 0, NULL); /* 如果不能打开，试着以读方式打开 */ if (_gdbm_file == NULL) { _gdbm_file = gdbm_open (pag_file, 0, GDBM_READER, 0, NULL); /* 我们成功打开了文件吗? */ if (_gdbm_file == NULL) { gdbm_errno = GDBM_FILE_OPEN_ERROR; ret = -1; goto done; } } /* 如果打开的文件是新文件，让file.dir链接到file.pag，这就使两个文件的时间戳变成一样的 */ if (stat (dir_file, &dir_stat) == 0) /* 获取文件的状态信息 */ { if (dir_stat.st_size == 0) /* 删除原先的dir_file，然后创建到pag_file的新链接dir_file */ if (unlink (dir_file) != 0 || link (pag_file, dir_file) != 0) { gdbm_errno = GDBM_FILE_OPEN_ERROR; gdbm_close (_gdbm_file); ret = -1; goto done; } } else /* 否则不能获取到文件的状态信息，直接让dir_file链接到pag_file */ { if (link (pag_file, dir_file) != 0) { gdbm_errno = GDBM_FILE_OPEN_ERROR; gdbm_close (_gdbm_file); ret = -1; goto done; } } ret = 0; /* 链接没有创建成功时，转到这里 */ done: free (dir_file); free (pag_file); return ret; }

   （2）int  dbmclose()函数。关闭全局变量_gdbm_file中指示的dbm数据库文件。程序先调用gdbm_close来完成工作，然后清空全局变量_gdbm_memory中存放的当前关键字内容。

/* close.c - 关闭打开的数据库 */ #include "autoconf.h" #include "gdbmdefs.h" #include "extern.h" /* 不清楚dbmclose()是否总是一个void函数在老的C函数库中，这里我们使用int。 */ int dbmclose() { if (_gdbm_file != NULL) { gdbm_close (_gdbm_file); _gdbm_file = NULL; if (_gdbm_memory.dptr != NULL) free(_gdbm_memory.dptr); _gdbm_memory.dptr = NULL; _gdbm_memory.dsize = 0; } return (0); }

   （3）int store(key, content)函数。向全局变量_gdbm_file指示的数据库中存入一个新的关键字/数据对。直接调用gdbm_store来完成工作，操作标志为GDBM_REPLACE。

/* store.c - 添加一个新的关键字/数据对到数据库中 */ #include "autoconf.h" #include "gdbmdefs.h" #include "extern.h" /* 添加一个新的关键字/数据到数据库中。key是关键字，content是其关联的数据。在从本过程 返回前，磁盘上的文件会被更新以反映新数据库的结构 */ int store (key, content) datum key; datum content; { return gdbm_store (_gdbm_file, key, content, GDBM_REPLACE); }

   （4）int fetch(key）函数。在全局变量_gdbm_file中指示的数据库中查找给定的关键字，返回其关联的数据。程序先调用gdbm_fetch来完成工作，然后还要把返回数据的起始地址保存在char*型全局变量_gdbm_fetch_val中。

/* fetch.c - 查找给空的关键字，并返回其关联的数据 */ #include "autoconf.h" #include "gdbmdefs.h" #include "extern.h" /* 查找给定的关键字，返回其关联数据的datum结构，结构中的数据指针指向一个动态分配的内存，而不是数据在磁盘文件中的偏移地址 */ datum fetch (key) datum key; { datum ret_val; /* 返回值 */ /* 释放先前的动态内存，调用实际的函数，然后保存指针指向新的内存 */ ret_val = gdbm_fetch (_gdbm_file, key); /* char*型全局变量_gdbm_fetch_val在extern.h中声明，在global.c中定义，用来指向返回的数据的起始地址 */ if (_gdbm_fetch_val != NULL) free (_gdbm_fetch_val); _gdbm_fetch_val = ret_val.dptr; /* 返回新的数据 */ return ret_val; }

   （5）int delete(key)函数。从数据库_gdbm_file中删除给定的关键字及其关联的数据。直接调用gdbm_delete来完成工作。

/* delete.c - 从数据库中删除给定的关键字及其关联的数据。 */ #include "autoconf.h" #include "gdbmdefs.h" #include "extern.h" /* 从数据库_gdbm_file中删除给定的key及其关联的数据项 */ int delete (key) datum key; { return gdbm_delete (_gdbm_file, key); }

   （6）datum firstkey()函数。返回数据库_gdbm_file的第一个散列桶中的第一个关键字。程序先调用gdbm_firskey来完成工作，然后还要把返回的关键字保存在datum型全局变量_gdbm_memory中。
   （7）datum nextkey()函数。返回数据库_gdbm_file中当前关键字的下一个关键字，当前关键字保存在全局变量_gdbm_memory中。程序用当前关键字调用gdbm_nextkey返回下一个关键字，之后清空当前关键字的内空，并把新的关键字保存到全局变量_gdbm_memory中。

/* seq.c - 用来访问数据库中的所有关键字/数据 */ #include "autoconf.h" #include "gdbmdefs.h" #include "extern.h" /* 返回全局变量_gdbm_file指示的数据库的第一个散列桶中的第一个关键字 */ datum firstkey () { datum ret_val; /* 释放先前的动态内存，调用实际函数，然后保存指针指向新的内存 */ ret_val = gdbm_firstkey (_gdbm_file); /* datum型全局变量_gdbm_memory在extern.h中声明，在global.c中定义，用来保存返回的关键字 */ if (_gdbm_memory.dptr != NULL) free (_gdbm_memory.dptr); _gdbm_memory = ret_val; /* 返回找到的关键字 */ return ret_val; } /* 返回文件dbf中当前关键字的下一个关键字，当前关键字保存在全局变量_gdbm_memory中 */ datum nextkey (key) datum key; { datum ret_val; /* 确保当前关键字是一个有效的关键字 */ if (key.dptr == NULL) return key; /* 用当前关键字调用gdbm_nextkey返回下一个关键字，之后清空当前关键字的内空，并保存为下一个关键字 */ ret_val = gdbm_nextkey (_gdbm_file, key); if (_gdbm_memory.dptr != NULL) free (_gdbm_memory.dptr); _gdbm_memory = ret_val; /* 返回找到的关键字 */ return ret_val; }