Tokyo Cabinet TCHDB源码阅读——关于变长变量的高效存取(节约存储空间)
在TC中,很多地方为了节约存储空间,在保存变量时不会直接存放变量类型长度的值(比如4字节或8字节的值)到文件中,它会探测变量用来表示值的有效字节数,然后把这些有意义的字节保存起来,在后面读取该变量时,TC会把该变量的所有有效字节都读出来,从而计算出该变量所表示的值。
为了实现这个功能,TC的做法是:把变量的每个字节当成一个有符号数,最高位仅做为符号位使用,前面7位才用来表示真正的值,这样一来,文件中的4个字节的数仅有28位用来保存长度信息,如果我们要保存0xFFFFFFFF这个值,就需要在文件中占用5个字节,然而,这种情况的值毕竟是少数(4字节整型数只有超过2^28时才会在文件中占用5字节,其它情况都会少于或等于4字节),我们一般存放的值都很小,就只需要少于4个字节的存储长度,比如存放小于2^7的所有值只需要1个字节空间,存放2^7到2^14之间的值仅需要2字节等等,通过这中方式节省的空间会远远少于我们浪费的空间,因此这种做法在节省文件空间方面还是很有效的。
上面大概讲了原理,下面我们来看看TC中的代码,看看TC具体怎么实现的,我会在下面的代码中给出注释说明。TC主要通过2个宏来分别完成存放和读取变长变量,这2个宏又分别对应32位版本(最多存取4字节的值)和64位的版本(最多存放8字节的值),我仅分析32位的情况,64位情况类似。
1、 把一个变量按变长方式放到buffer中
/* set a buffer for a variable length number */
#define TCSETVNUMBUF(TC_len, TC_buf, TC_num) / // TC_num为正整数
do { /
int _TC_num = (TC_num); /
if(_TC_num == 0){ / // 存放的变量为0
((signed char *)(TC_buf))[0] = 0; /
(TC_len) = 1; / // 返回存放了1个字节长度
} else { /
(TC_len) = 0; /
while(_TC_num > 0){ / // 变量大于0,就一直循环存放
int _TC_rem = _TC_num & 0x7f; / // 取变量低7位存放
_TC_num >>= 7; / // 变量右移7位
if(_TC_num > 0){ / // 去掉低7位后变量是否还有值?
// 按负数存放取得的变量低7位值,减一确保为负数,因为中间可能有0
((signed char *)(TC_buf))[(TC_len)] = -_TC_rem - 1; /
} else { / // 保留最后7位,按正数的形式
((signed char *)(TC_buf))[(TC_len)] = _TC_rem; /
} /
(TC_len)++; / // 存放的长度加1,表示用了多少字节来存放变量
} /
} /
} while(false)
2、 从buffer中读出按变长方式存放的变量值
/* read a variable length buffer */
#define TCREADVNUMBUF(TC_buf, TC_num, TC_step) /
do { /
TC_num = 0; /
int _TC_base = 1; /
int _TC_i = 0; / // 从buffer第一个成员开始读取
while(true){ /
if(((signed char *)(TC_buf))[_TC_i] >= 0){ / // 该字节大于0,则是最后字节
TC_num += ((signed char *)(TC_buf))[_TC_i] * _TC_base; / // 累加
break; / // 退出结束
} /
// 该字节小于0,则不是最后字节
TC_num += _TC_base * (((signed char *)(TC_buf))[_TC_i] + 1) * -1; / //累加
_TC_base <<= 7; /
_TC_i++; / // 移动buffer
} /
(TC_step) = _TC_i + 1; / // 读取长度加1,表示读了多少字节的变量
} while(false)
Tokyo Cabinet TCHDB源码阅读——delayed record pool和tchdbputasyncimpl相关函数代码注释
在TCHDB结构中跟异步写操作相关的成员有以下几个:
- bool async; /* whether asynchronous storing is called */
- TCXSTR *drpool; /* delayed record pool */
- TCXSTR *drpdef; /* deferred records of the delayed record pool */
- uint64_t drpoff; /* offset of the delayed record pool */
从上面的注释可知,DRP有2个缓冲池,其中drpool是我们传统意义上的缓冲池,而drpdef又是针对drpool做了一次缓冲,仅仅看这里的英文注释我感觉有点难理解,后面看了源码我再尝试说说自己对这两个缓冲区的理解。
在tchdbputasyncimpl函数中下面这个语句片段初始化DRP(delayed record pool)区:
- if(!hdb->drpool){
- hdb->drpool = tcxstrnew3(HDBDRPUNIT + HDBDRPLAT);
- hdb->drpdef = tcxstrnew3(HDBDRPUNIT);
- hdb->drpoff = hdb->fsiz;
- }
由hdb->drpoff = hdb->fsiz这个语句可知,每次DRP区(由drpool指针指向)中的记录都是从文件末尾开始添加的,再由同步写操作tchdbput函数源代码可知,该函数会在写入记录前检查前面的写入操作是否为异步操作,如果是,则它会刷新异步写缓冲区并删除该异步写缓冲区,从而保证同步写操作执行时,所有的异步写操作都完成,因此,TC中的异步写操作和同步写操作不会交错混杂在一起,这也在一定程度上简化了异步写操作的实现。
下面是tchdbputasyncimpl源码及注释:
- /* Store a record in asynchronus fashion.
- `hdb' specifies the hash database object.
- `kbuf' specifies the pointer to the region of the key.
- `ksiz' specifies the size of the region of the key.
- `bidx' specifies the index of the bucket array.
- `hash' specifies the hash value for the collision tree.
- `vbuf' specifies the pointer to the region of the value.
- `vsiz' specifies the size of the region of the value.
- If successful, the return value is true, else, it is false. */
- static bool tchdbputasyncimpl(TCHDB *hdb, const char *kbuf, int ksiz, uint64_t bidx,
- uint8_t hash, const char *vbuf, int vsiz){
- assert(hdb && kbuf && ksiz >= 0 && vbuf && vsiz >= 0);
- // 从缓存中删除指定记录,因为我们在更改该记录,保证数据一致性
- if(hdb->recc) tcmdbout(hdb->recc, kbuf, ksiz);
- if(!hdb->drpool){ // drp区还没分配?分配好该区域
- hdb->drpool = tcxstrnew3(HDBDRPUNIT + HDBDRPLAT);
- hdb->drpdef = tcxstrnew3(HDBDRPUNIT);
- hdb->drpoff = hdb->fsiz;
- }
- off_t off = tchdbgetbucket(hdb, bidx); // 取得hash桶数组中bidx索引位置记录的文件偏移量
- off_t entoff = 0;
- TCHREC rec;
- char rbuf[HDBIOBUFSIZ];
- while(off > 0){
- // 当读到的冲突树中记录偏移量大于hdb->drpoff - hdb->runit时,则把传入的record相关
- // 信息放到drpdef缓冲区,这里是一个优化。原因我还没想通。
- if(off >= hdb->drpoff - hdb->runit){
- TCDODEBUG(hdb->cnt_deferdrp++);
- TCXSTR *drpdef = hdb->drpdef;
- TCXSTRCAT(drpdef, &ksiz, sizeof(ksiz));
- TCXSTRCAT(drpdef, &vsiz, sizeof(vsiz));
- TCXSTRCAT(drpdef, kbuf, ksiz);
- TCXSTRCAT(drpdef, vbuf, vsiz);
- if(TCXSTRSIZE(hdb->drpdef) > HDBDRPUNIT && !tchdbflushdrp(hdb)) return false;
- return true;
- }
- rec.off = off;
- if(!tchdbreadrec(hdb, &rec, rbuf)) return false; // 读取记录到rec,可能过不会读到记录的key和value值
- if(hash > rec.hash){ // 用传入的二级hash和读到的记录二级hash比较,寻找传入记录的正确位置
- off = rec.left;
- entoff = rec.off + (sizeof(uint8_t) + sizeof(uint8_t)); // 这2句调整off和entoff,在冲突树中继续前进
- } else if(hash < rec.hash){ // 同上
- off = rec.right;
- entoff = rec.off + (sizeof(uint8_t) + sizeof(uint8_t)) +
- (hdb->ba64 ? sizeof(uint64_t) : sizeof(uint32_t));
- } else { // 二级hash相等,将传入的记录缓存到drpdef缓冲区中,以后刷新缓冲区时再处理
- TCDODEBUG(hdb->cnt_deferdrp++);
- TCXSTR *drpdef = hdb->drpdef;
- TCXSTRCAT(drpdef, &ksiz, sizeof(ksiz));
- TCXSTRCAT(drpdef, &vsiz, sizeof(vsiz));
- TCXSTRCAT(drpdef, kbuf, ksiz);
- TCXSTRCAT(drpdef, vbuf, vsiz);
- if(TCXSTRSIZE(hdb->drpdef) > HDBDRPUNIT && !tchdbflushdrp(hdb)) return false;
- return true;
- }
- }
- // 走到这里,说明没有在冲突树中找到二级hash相等的记录,插入的record为二叉树新节点,应放到drpool缓冲区中
- // 检查entoff,entoff为0表示传入的record为冲突树的根节点
- if(entoff > 0){ // entoff大于0,说明传入的record不为根,应该成为叶子几点,更新其父节点孩子指针
- if(hdb->ba64){
- uint64_t llnum = hdb->fsiz >> hdb->apow;
- llnum = TCHTOILL(llnum);
- if(!tchdbseekwrite(hdb, entoff, &llnum, sizeof(uint64_t))) return false;
- } else {
- uint32_t lnum = hdb->fsiz >> hdb->apow;
- lnum = TCHTOIL(lnum);
- if(!tchdbseekwrite(hdb, entoff, &lnum, sizeof(uint32_t))) return false;
- }
- } else {// 新记录文件偏移值写入hash桶数组,偏移值为文件大小,说明从文件尾部开始放 }
- tchdbsetbucket(hdb, bidx, hdb->fsiz);
- tchdbdrpappend(hdb, kbuf, ksiz, vbuf, vsiz, hash); // 添加传入的record到drpool缓冲区
- hdb->rnum++;
- if(TCXSTRSIZE(hdb->drpool) > HDBDRPUNIT && !tchdbflushdrp(hdb)) return false; // 是否需要刷新缓冲区?
- return true;
- }
通过阅读源代码,我大概说下自己对drpool缓冲区和drpdef缓冲区的功能的个人理解:在异步写入模式下,drpool缓冲区中的记录具有以下3个特点:
1)在记录所在的冲突树中,它们的二级hash值和树中任何记录的二级hash都不相同。
2)它们会按put的顺序被添加到数据文件尾部。
3)drpool中存放的记录格式和它们在文件中的格式完全一致,因此在下次写入数据文件的时候不需要额外处理了。
至于在drpdef缓冲区中的记录,都能在它们对应的冲突树中找到二级hash值相等的记录,并且它们添加到数据文件的方式暂时也没有决定,只有等到刷新缓冲区时调用tchdbputimpl才决定如何写入数据文件。另外,drpdef中存放的是record的key大小、value大小、key值和value值,在写入数据文件时还需要构造才合适的文件记录格式。
下面是tchdbdrpappend函数代码及注释:
- /* Append a record to the delayed record pool.
- `hdb' specifies the hash database object.
- `kbuf' specifies the pointer to the region of the key.
- `ksiz' specifies the size of the region of the key.
- `vbuf' specifies the pointer to the region of the value.
- `vsiz' specifies the size of the region of the value.
- `hash' specifies the second hash value. */
- static void tchdbdrpappend(TCHDB *hdb, const char *kbuf, int ksiz, const char *vbuf, int vsiz,
- uint8_t hash){
- assert(hdb && kbuf && ksiz >= 0 && vbuf && vsiz >= 0);
- TCDODEBUG(hdb->cnt_appenddrp++);
- char rbuf[HDBIOBUFSIZ];
- // rbuf用于构建存放在磁盘上的record,包含magic nuber、hash值、record头、左右孩子指
- // 针及具体的key和value相关信息等等,下面几条语句分别给这些成员预留空间并赋值。
- char *wp = rbuf;
- *(uint8_t *)(wp++) = HDBMAGICREC;
- *(uint8_t *)(wp++) = hash;
- if(hdb->ba64){ // 存放左右孩子指针
- memset(wp, 0, sizeof(uint64_t) * 2);
- wp += sizeof(uint64_t) * 2;
- } else {
- memset(wp, 0, sizeof(uint32_t) * 2);
- wp += sizeof(uint32_t) * 2;
- }
- uint16_t snum; // 此变量临时存放填充区的长度
- char *pwp = wp;
- wp += sizeof(snum); // 预留存放填充区长度空间
- int step;
- TCSETVNUMBUF(step, wp, ksiz); // 存放ksiz到rbuf中,ksize的长度为变长,step返回ksize占用的长度
- wp += step;
- TCSETVNUMBUF(step, wp, vsiz); // 存放vsiz,处理方式和ksiz一样
- wp += step;
- int32_t hsiz = wp - rbuf;
- int32_t rsiz = hsiz + ksiz + vsiz; // 不包含填充区的record长度
- uint16_t psiz = tchdbpadsize(hdb, hdb->fsiz + rsiz); // record填充区长度
- hdb->fsiz += rsiz + psiz; // hdb文件长度增加新record的长度
- snum = TCHTOIS(psiz);
- memcpy(pwp, &snum, sizeof(snum)); // 填写填充区长度到rbuf预留空间中
- TCXSTR *drpool = hdb->drpool; // 将新记录追加到drp区
- TCXSTRCAT(drpool, rbuf, hsiz);
- TCXSTRCAT(drpool, kbuf, ksiz);
- TCXSTRCAT(drpool, vbuf, vsiz);
- if(psiz > 0){ // 同时追加填充区,填充区都置为0
- char pbuf[psiz];
- memset(pbuf, 0, psiz);
- TCXSTRCAT(drpool, pbuf, psiz);
- }
Tokyo Cabinet TCHDB源码阅读——tchdbput及相关函数代码注释
tchdbput用于向数据文件写入一条记录(record),写入的模式有很多种,比如覆盖写(overwrite)、追加写(append)、加一个整数、加一个浮点数或者调用回调函数处理,然后把结果当作记录写入等等,这个函数在执行时是直接写入硬盘中的数据文件的,和它对应有一个异步写入的函数,名为tchdbputasync,此函数暂时把记录放于drp(delayed record pool)中,在合适的时候再写回硬盘,我后面会有相应函数分析。下面我贴出tchdbput函数的代码及注释,仅当成个人学习记录:
- /* Store a record into a hash database object. */
- bool tchdbput(TCHDB *hdb, const void *kbuf, int ksiz, const void *vbuf, int vsiz){
- assert(hdb && kbuf && ksiz >= 0 && vbuf && vsiz >= 0);
- if(!HDBLOCKMETHOD(hdb, false)) return false; // 检查是否可获得函数锁
- uint8_t hash;
- // 根据key值计算出2个hash值bidx和hash,其中bidx用户索引hash桶数组,hash用于在冲突数中
- //查找记录位置,另外冲突数也在很大程度上依靠hash来获得尽量的平衡
- uint64_t bidx = tchdbbidx(hdb, kbuf, ksiz, &hash);
- if(hdb->fd < 0 || !(hdb->omode & HDBOWRITER)){ // 检查文件是否已打开或当前是否为写模式
- tchdbsetecode(hdb, TCEINVALID, __FILE__, __LINE__, __func__);
- HDBUNLOCKMETHOD(hdb);
- return false;
- }
- if(hdb->async && !tchdbflushdrp(hdb)){ // 若是处于异步操作模式,则刷新延迟写缓冲区
- HDBUNLOCKMETHOD(hdb);
- return false;
- }
- if(!HDBLOCKRECORD(hdb, bidx, true)){ // 检查是否可对记录进行操作
- HDBUNLOCKMETHOD(hdb);
- return false;
- }
- if(hdb->zmode){ // 是否压缩记录,若是,则选择相应压缩算法压缩记录后再存储记录
- char *zbuf;
- if(hdb->opts & HDBTDEFLATE){
- zbuf = _tc_deflate(vbuf, vsiz, &vsiz, _TCZMRAW);
- } else if(hdb->opts & HDBTBZIP){
- zbuf = _tc_bzcompress(vbuf, vsiz, &vsiz);
- } else if(hdb->opts & HDBTTCBS){
- zbuf = tcbsencode(vbuf, vsiz, &vsiz);
- } else {
- zbuf = hdb->enc(vbuf, vsiz, &vsiz, hdb->encop);
- }
- if(!zbuf){
- tchdbsetecode(hdb, TCEMISC, __FILE__, __LINE__, __func__);
- HDBUNLOCKRECORD(hdb, bidx);
- HDBUNLOCKMETHOD(hdb);
- return false;
- }
- bool rv = tchdbputimpl(hdb, kbuf, ksiz, bidx, hash, zbuf, vsiz, HDBPDOVER);
- TCFREE(zbuf);
- HDBUNLOCKRECORD(hdb, bidx);
- HDBUNLOCKMETHOD(hdb);
- if(hdb->dfunit > 0 && hdb->dfcnt > hdb->dfunit &&
- !tchdbdefrag(hdb, hdb->dfunit * HDBDFRSRAT + 1)) rv = false;
- return rv;
- }
- bool rv = tchdbputimpl(hdb, kbuf, ksiz, bidx, hash, vbuf, vsiz, HDBPDOVER); // 调用tchdbputimpl写入记录
- HDBUNLOCKRECORD(hdb, bidx);
- HDBUNLOCKMETHOD(hdb);
- if(hdb->dfunit > 0 && hdb->dfcnt > hdb->dfunit &&
- !tchdbdefrag(hdb, hdb->dfunit * HDBDFRSRAT + 1)) rv = false;
- return rv;
- }
上面的函数中,主要是通过调用tchdbputimpl来实现写入记录功能,该函数如下:
- /* Store a record.
- `hdb' specifies the hash database object.
- `kbuf' specifies the pointer to the region of the key.
- `ksiz' specifies the size of the region of the key.
- `bidx' specifies the index of the bucket array.
- `hash' specifies the hash value for the collision tree.
- `vbuf' specifies the pointer to the region of the value.
- `vsiz' specifies the size of the region of the value.
- `dmode' specifies behavior when the key overlaps.
- If successful, the return value is true, else, it is false. */
- static bool tchdbputimpl(TCHDB *hdb, const char *kbuf, int ksiz, uint64_t bidx, uint8_t hash,
- const char *vbuf, int vsiz, int dmode){
- assert(hdb && kbuf && ksiz >= 0);
- if(hdb->recc) tcmdbout(hdb->recc, kbuf, ksiz); /*从cache中删除记录*/
- off_t off = tchdbgetbucket(hdb, bidx); // 从hash数组中取得对应记录的偏移量
- off_t entoff = 0; // 用于查找冲突数,始终存放冲突树中,当前比较记录的父节点在文件中的偏移量
- TCHREC rec; // 申请了一个记录结构,用于在内存中存放记录的相关信息
- char rbuf[HDBIOBUFSIZ];
- while(off > 0){
- rec.off = off;
- if(!tchdbreadrec(hdb, &rec, rbuf)) return false; //从数据文件读取指定偏移的记录,即对应hash值的第一个记录
- // 读取的方式为:首先看是否可以经过mmap映射的内存读,若可以则直接读,否则调用pread读取
- if(hash > rec.hash){ // 从这里开始比较要插入的值和刚刚读取的记录,比较它们的二级hash值
- off = rec.left;
- entoff = rec.off + (sizeof(uint8_t) + sizeof(uint8_t)); // 调整entoff
- } else if(hash < rec.hash){
- off = rec.right;
- entoff = rec.off + (sizeof(uint8_t) + sizeof(uint8_t)) +
- (hdb->ba64 ? sizeof(uint64_t) : sizeof(uint32_t));
- } else { // hash值相等,接着比较记录的key
- if(!rec.kbuf && !tchdbreadrecbody(hdb, &rec)) return false;
- int kcmp = tcreckeycmp(kbuf, ksiz, rec.kbuf, rec.ksiz); // 比较记录的key值,看是否与已存记录相等
- if(kcmp > 0){
- off = rec.left;
- TCFREE(rec.bbuf);
- rec.kbuf = NULL;
- rec.bbuf = NULL;
- entoff = rec.off + (sizeof(uint8_t) + sizeof(uint8_t)); // 调整entoff
- } else if(kcmp < 0){
- off = rec.right;
- TCFREE(rec.bbuf);
- rec.kbuf = NULL;
- rec.bbuf = NULL;
- entoff = rec.off + (sizeof(uint8_t) + sizeof(uint8_t)) +
- (hdb->ba64 ? sizeof(uint64_t) : sizeof(uint32_t));
- } else { // key值相等,在这里说明有相同记录存在,下面根据传入的模式进行相应处理
- bool rv;
- int nvsiz;
- char *nvbuf;
- HDBPDPROCOP *procptr;
- switch(dmode){
- case HDBPDKEEP: // 保持原记录不变
- tchdbsetecode(hdb, TCEKEEP, __FILE__, __LINE__, __func__);
- TCFREE(rec.bbuf);
- return false;
- case HDBPDCAT: // 附加到原记录后面
- if(vsiz < 1){
- TCFREE(rec.bbuf);
- return true;
- }
- if(!rec.vbuf && !tchdbreadrecbody(hdb, &rec)){
- TCFREE(rec.bbuf);
- return false;
- }
- nvsiz = rec.vsiz + vsiz;
- if(rec.bbuf){
- TCREALLOC(rec.bbuf, rec.bbuf, rec.ksiz + nvsiz);
- memcpy(rec.bbuf + rec.ksiz + rec.vsiz, vbuf, vsiz);
- rec.kbuf = rec.bbuf;
- rec.vbuf = rec.kbuf + rec.ksiz;
- rec.vsiz = nvsiz;
- } else {
- TCMALLOC(rec.bbuf, nvsiz + 1);
- memcpy(rec.bbuf, rec.vbuf, rec.vsiz);
- memcpy(rec.bbuf + rec.vsiz, vbuf, vsiz);
- rec.vbuf = rec.bbuf;
- rec.vsiz = nvsiz;
- }
- rv = tchdbwriterec(hdb, &rec, bidx, entoff);
- TCFREE(rec.bbuf);
- return rv;
- case HDBPDADDINT: // 向原记录增加一个整数值,原记录也是整数
- if(rec.vsiz != sizeof(int)){
- tchdbsetecode(hdb, TCEKEEP, __FILE__, __LINE__, __func__);
- TCFREE(rec.bbuf);
- return false;
- }
- if(!rec.vbuf && !tchdbreadrecbody(hdb, &rec)){
- TCFREE(rec.bbuf);
- return false;
- }
- int lnum;
- memcpy(&lnum, rec.vbuf, sizeof(lnum));
- if(*(int *)vbuf == 0){
- TCFREE(rec.bbuf);
- *(int *)vbuf = lnum;
- return true;
- }
- lnum += *(int *)vbuf;
- rec.vbuf = (char *)&lnum;
- *(int *)vbuf = lnum;
- rv = tchdbwriterec(hdb, &rec, bidx, entoff);
- TCFREE(rec.bbuf);
- return rv;
- case HDBPDADDDBL: // 向原记录增加一个浮点数值
- if(rec.vsiz != sizeof(double)){
- tchdbsetecode(hdb, TCEKEEP, __FILE__, __LINE__, __func__);
- TCFREE(rec.bbuf);
- return false;
- }
- if(!rec.vbuf && !tchdbreadrecbody(hdb, &rec)){
- TCFREE(rec.bbuf);
- return false;
- }
- double dnum;
- memcpy(&dnum, rec.vbuf, sizeof(dnum));
- if(*(double *)vbuf == 0.0){
- TCFREE(rec.bbuf);
- *(double *)vbuf = dnum;
- return true;
- }
- dnum += *(double *)vbuf;
- rec.vbuf = (char *)&dnum;
- *(double *)vbuf = dnum;
- rv = tchdbwriterec(hdb, &rec, bidx, entoff);
- TCFREE(rec.bbuf);
- return rv;
- case HDBPDPROC: // 调用回调函数处理原记录
- if(!rec.vbuf && !tchdbreadrecbody(hdb, &rec)){
- TCFREE(rec.bbuf);
- return false;
- }
- procptr = *(HDBPDPROCOP **)((char *)kbuf - sizeof(procptr));
- nvbuf = procptr->proc(rec.vbuf, rec.vsiz, &nvsiz, procptr->op);
- TCFREE(rec.bbuf);
- if(nvbuf == (void *)-1){
- return tchdbremoverec(hdb, &rec, rbuf, bidx, entoff);
- } else if(nvbuf){
- rec.kbuf = kbuf;
- rec.ksiz = ksiz;
- rec.vbuf = nvbuf;
- rec.vsiz = nvsiz;
- rv = tchdbwriterec(hdb, &rec, bidx, entoff);
- TCFREE(nvbuf);
- return rv;
- }
- tchdbsetecode(hdb, TCEKEEP, __FILE__, __LINE__, __func__);
- return false;
- default:
- break;
- }
- TCFREE(rec.bbuf);
- rec.ksiz = ksiz;
- rec.vsiz = vsiz;
- rec.kbuf = kbuf;
- rec.vbuf = vbuf;
- return tchdbwriterec(hdb, &rec, bidx, entoff);
- }
- }
- }
- // 执行到这里,说明应写入新记录
- if(!vbuf){
- tchdbsetecode(hdb, TCENOREC, __FILE__, __LINE__, __func__);
- return false;
- }
- if(!HDBLOCKDB(hdb)) return false;
- // 构造文件中的记录格式头部,格式为: magic number(1bytes) + hash value(1bytes) + left(4bytes or 8bytes) +
- // right chain(4bytes or 8bytes) + padding size(2bytes)
- rec.rsiz = hdb->ba64 ? sizeof(uint8_t) * 2 + sizeof(uint64_t) * 2 + sizeof(uint16_t) :
- sizeof(uint8_t) * 2 + sizeof(uint32_t) * 2 + sizeof(uint16_t);
- // 键值的存储变量(区域)是变长的,我们在这里计算出其存储区长度,每个字节只用7位,第8位作为符号位
- if(ksiz < (1U << 7)){
- rec.rsiz += 1;
- } else if(ksiz < (1U << 14)){
- rec.rsiz += 2;
- } else if(ksiz < (1U << 21)){
- rec.rsiz += 3;
- } else if(ksiz < (1U << 28)){
- rec.rsiz += 4;
- } else {
- rec.rsiz += 5;
- }
- // value值长度和键值一样,同上
- if(vsiz < (1U << 7)){
- rec.rsiz += 1;
- } else if(vsiz < (1U << 14)){
- rec.rsiz += 2;
- } else if(vsiz < (1U << 21)){
- rec.rsiz += 3;
- } else if(vsiz < (1U << 28)){
- rec.rsiz += 4;
- } else {
- rec.rsiz += 5;
- }
- if(!tchdbfbpsearch(hdb, &rec)){ // 首先看能否从空闲快数组找到合适的记录块,若不能,则标记为应添加到文件末尾
- HDBUNLOCKDB(hdb);
- return false;
- }
- // 下面几条语句赋予的值将被存放在数据文件的记录中,它们在记录中的顺序和这里赋值的顺序恰好一致,呵呵,不同
- // 的是,数据文件记录中在这几个值后面还有一个对齐填充区,这样下一个记录就能从对齐字节开始存放了。
- rec.hash = hash;
- rec.left = 0;
- rec.right = 0;
- rec.ksiz = ksiz;
- rec.vsiz = vsiz;
- rec.psiz = 0;
- rec.kbuf = kbuf;
- rec.vbuf = vbuf;
- if(!tchdbwriterec(hdb, &rec, bidx, entoff)){ // 向数据文件写入记录
- HDBUNLOCKDB(hdb);
- return false;
- }
- // 更新数据文件的统计信息,这里通过向mmap映射的内存区拷贝数据实现,因为我们至少会mmap数据文件控制信息到内存
- hdb->rnum++;
- uint64_t llnum = hdb->rnum;
- llnum = TCHTOILL(llnum);
- memcpy(hdb->map + HDBRNUMOFF, &llnum, sizeof(llnum));
- HDBUNLOCKDB(hdb);
- return true;
- }
在上面查找冲突树的过程中,由于是先比较二级hash值,找到相等的值,再进行key值的比较,最终决定写入记录的位置,因此对于具有相同二级hash值的记录而言,它们可能会由于key的不同而导致与其它具有不同二级hash值的记录相互混杂,由这里我们可以知道,插入过程构造出来的冲突树是非常杂乱无章的,没有规律可言,这也许能进一步促进冲突数区域平衡吧。
Tokyo Cabinet TCHDB源码阅读——tchdbnew、tchdbopen及相关函数代码
在此说明一下:我分析的TC版本是1.4.43,我的阅读流程主要是遵循对TC数据文件的标准操作流程进行分析,即打开数据文件->存放record->获取record->关闭数据文件,期间会涉及到一些相关函数,我会逐个分析。
另外,按我粗浅的理解,我觉得TC不能称为一个完整意义上的数据库,它仅仅是一个存储引擎而已,它的所有操作最终都是针对系统中的一个普通文件进行的,因此以后的分析中,我把TC操作的对象统统称为数据文件对象,而不是数据库对象,它打开的文件称为数据文件。
一、TCHDB *tchdbnew(void)
这个函数实现的功能是:分配一个TCHDB类型的数据文件对象,我们以后的操作都是基于这个对象的,它的功能有点类似于我们打开文件后获得的那个文件描述符,不过TCHDB比文件描述符要复杂的多,下面是代码和注释:
TCHDB *tchdbnew(void){
TCHDB *hdb;
TCMALLOC(hdb, sizeof(*hdb)); // 动态分配一个TCHDB对象
tchdbclear(hdb); // 初始化TCHDB对象
return hdb;
}
下面是tchdbclear对应的代码和注释:
- /* Clear all members.
- `hdb' specifies the hash database object. */
- static void tchdbclear(TCHDB *hdb){
- assert(hdb);
- hdb->mmtx = NULL;
- hdb->rmtxs = NULL;
- hdb->dmtx = NULL;
- hdb->wmtx = NULL;
- hdb->eckey = NULL;
- hdb->rpath = NULL;
- hdb->type = TCDBTHASH; // 类型为hash结构的数据文件
- hdb->flags = 0;
- hdb->bnum = HDBDEFBNUM; // 默认hash桶大小131071
- hdb->apow = HDBDEFAPOW;
- hdb->fpow = HDBDEFFPOW;
- hdb->opts = 0;
- hdb->path = NULL;
- hdb->fd = -1;
- hdb->omode = 0;
- hdb->rnum = 0;
- hdb->fsiz = 0;
- hdb->frec = 0;
- hdb->dfcur = 0;
- hdb->iter = 0;
- hdb->map = NULL;
- hdb->msiz = 0;
- hdb->xmsiz = HDBDEFXMSIZ; // 默认mmap大小64M
- hdb->xfsiz = 0;
- hdb->ba32 = NULL;
- hdb->ba64 = NULL;
- hdb->align = 0;
- hdb->runit = 0;
- hdb->zmode = false;
- hdb->fbpmax = 0;
- hdb->fbpool = NULL;
- hdb->fbpnum = 0;
- hdb->fbpmis = 0;
- hdb->async = false;
- hdb->drpool = NULL;
- hdb->drpdef = NULL;
- hdb->drpoff = 0;
- hdb->recc = NULL;
- hdb->rcnum = 0;
- hdb->enc = NULL;
- hdb->encop = NULL;
- hdb->dec = NULL;
- hdb->decop = NULL;
- hdb->ecode = TCESUCCESS;
- hdb->fatal = false;
- hdb->inode = 0;
- hdb->mtime = 0;
- hdb->dfunit = 0;
- hdb->dfcnt = 0;
- hdb->tran = false;
- hdb->walfd = -1;
- hdb->walend = 0;
- hdb->dbgfd = -1;
- hdb->cnt_writerec = -1;
- hdb->cnt_reuserec = -1;
- hdb->cnt_moverec = -1;
- hdb->cnt_readrec = -1;
- hdb->cnt_searchfbp = -1;
- hdb->cnt_insertfbp = -1;
- hdb->cnt_splicefbp = -1;
- hdb->cnt_dividefbp = -1;
- hdb->cnt_mergefbp = -1;
- hdb->cnt_reducefbp = -1;
- hdb->cnt_appenddrp = -1;
- hdb->cnt_deferdrp = -1;
- hdb->cnt_flushdrp = -1;
- hdb->cnt_adjrecc = -1;
- hdb->cnt_defrag = -1;
- hdb->cnt_shiftrec = -1;
- hdb->cnt_trunc = -1;
- TCDODEBUG(hdb->cnt_writerec = 0);
- TCDODEBUG(hdb->cnt_reuserec = 0);
- TCDODEBUG(hdb->cnt_moverec = 0);
- TCDODEBUG(hdb->cnt_readrec = 0);
- TCDODEBUG(hdb->cnt_searchfbp = 0);
- TCDODEBUG(hdb->cnt_insertfbp = 0);
- TCDODEBUG(hdb->cnt_splicefbp = 0);
- TCDODEBUG(hdb->cnt_dividefbp = 0);
- TCDODEBUG(hdb->cnt_mergefbp = 0);
- TCDODEBUG(hdb->cnt_reducefbp = 0);
- TCDODEBUG(hdb->cnt_appenddrp = 0);
- TCDODEBUG(hdb->cnt_deferdrp = 0);
- TCDODEBUG(hdb->cnt_flushdrp = 0);
- TCDODEBUG(hdb->cnt_adjrecc = 0);
- TCDODEBUG(hdb->cnt_defrag = 0);
- TCDODEBUG(hdb->cnt_shiftrec = 0);
- TCDODEBUG(hdb->cnt_trunc = 0);
- }
二、tchdbopen函数
该函数打开指定的数据文件,并将打开的数据文件信息添加到TCHDB结构体中,打开过程中会检查数据文件是否为空等操作,看代码:
- /* Open a database file and connect a hash database object. */
- bool tchdbopen(TCHDB *hdb, const char *path, int omode){
- assert(hdb && path);
- if(!HDBLOCKMETHOD(hdb, true)) return false; // 获得调用函数锁
- if(hdb->fd >= 0){ // 若数据文件已打开,则返回出错
- tchdbsetecode(hdb, TCEINVALID, __FILE__, __LINE__, __func__); // 设置错误码
- HDBUNLOCKMETHOD(hdb);
- return false;
- }
- char *rpath = tcrealpath(path); // 取得数据文件的标准化路径
- if(!rpath){
- int ecode = TCEOPEN;
- switch(errno){
- case EACCES: ecode = TCENOPERM; break;
- case ENOENT: ecode = TCENOFILE; break;
- case ENOTDIR: ecode = TCENOFILE; break;
- }
- tchdbsetecode(hdb, ecode, __FILE__, __LINE__, __func__);
- HDBUNLOCKMETHOD(hdb);
- return false;
- }
- if(!tcpathlock(rpath)){ // 锁定文件路径, 以防止在操作过程中文件消失
- tchdbsetecode(hdb, TCETHREAD, __FILE__, __LINE__, __func__);
- TCFREE(rpath);
- HDBUNLOCKMETHOD(hdb);
- return false;
- }
- bool rv = tchdbopenimpl(hdb, path, omode); // 具体打开操作
- if(rv){ // 打开数据文件成功,保存数据文件的标准化路径
- hdb->rpath = rpath;
- } else {
- tcpathunlock(rpath);
- TCFREE(rpath);
- }
- HDBUNLOCKMETHOD(hdb);
- return rv; // 返回打开是否成功
- }
函数tchdbopen仅仅做简单的一些检查转换操作,具体打开操作在函数tchdbopenimpl中,我们来看看代码:
- /* Open a database file and connect a hash database object.
- `hdb' specifies the hash database object.
- `path' specifies the path of the database file.
- `omode' specifies the connection mode.
- If successful, the return value is true, else, it is false. */
- static bool tchdbopenimpl(TCHDB *hdb, const char *path, int omode){
- assert(hdb && path);
- int mode = O_RDONLY;
- if(omode & HDBOWRITER){ // 取得数据文件打开模式
- mode = O_RDWR;
- if(omode & HDBOCREAT) mode |= O_CREAT;
- }
- int fd = open(path, mode, HDBFILEMODE); // 调用库函数open打开数据文件,这里可以看到,文件仅仅是普通文件而已。
- if(fd < 0){
- int ecode = TCEOPEN;
- switch(errno){
- case EACCES: ecode = TCENOPERM; break;
- case ENOENT: ecode = TCENOFILE; break;
- case ENOTDIR: ecode = TCENOFILE; break;
- }
- tchdbsetecode(hdb, ecode, __FILE__, __LINE__, __func__);
- return false;
- }
- if(!(omode & HDBONOLCK)){ // 检查是否需要锁定打开的数据文件,这里用的是advisory lock,通过fcntl实现
- if(!tclock(fd, omode & HDBOWRITER, omode & HDBOLCKNB)){
- tchdbsetecode(hdb, TCELOCK, __FILE__, __LINE__, __func__);
- close(fd);
- return false;
- }
- }
- if((omode & HDBOWRITER) && (omode & HDBOTRUNC)){ // 写操作,是否需要截短文件?
- if(ftruncate(fd, 0) == -1){
- tchdbsetecode(hdb, TCETRUNC, __FILE__, __LINE__, __func__);
- close(fd);
- return false;
- }
- if(!tchdbwalremove(hdb, path)){
- close(fd);
- return false;
- }
- }
- struct stat sbuf;
- if(fstat(fd, &sbuf) == -1 || !S_ISREG(sbuf.st_mode)){ // 获得文件属性信息,判断文件是否为普通文件
- tchdbsetecode(hdb, TCESTAT, __FILE__, __LINE__, __func__);
- close(fd);
- return false;
- }
- char hbuf[HDBHEADSIZ];
- if((omode & HDBOWRITER) && sbuf.st_size < 1){ // 写模式下,是否为空文件?
- // 写模式下为空文件,则这里开始构造默认情况下的数据文件头信息,从这里我们也可以推测出数
- // 据文件头在磁盘文件中的存放格式,它的大小为256字节,参见HDBHEADSIZ。
- hdb->flags = 0; // 默认flags为0
- hdb->rnum = 0; // 当前记录为0
- uint32_t fbpmax = 1 << hdb->fpow; // 空闲块池默认大小
- uint32_t fbpsiz = HDBFBPBSIZ + fbpmax * HDBFBPESIZ; // 默认空闲块池大小
- int besiz = (hdb->opts & HDBTLARGE) ? sizeof(int64_t) : sizeof(int32_t); // hash桶数组中每个元素大小
- hdb->align = 1 << hdb->apow; // 默认对齐字节
- hdb->fsiz = HDBHEADSIZ + besiz * hdb->bnum + fbpsiz; // 不包含填充区的文件大小
- hdb->fsiz += tchdbpadsize(hdb, hdb->fsiz); // 包含填充区的文件大小
- hdb->frec = hdb->fsiz; // 数据文件中第一个记录在文件中的偏移
- tchdbdumpmeta(hdb, hbuf); // 将数据文件头信息拷贝到hbuf
- bool err = false;
- if(!tcwrite(fd, hbuf, HDBHEADSIZ)) err = true; // 将数据文件头信息写入数据文件
- char pbuf[HDBIOBUFSIZ];
- memset(pbuf, 0, HDBIOBUFSIZ);
- uint64_t psiz = hdb->fsiz - HDBHEADSIZ;
- while(psiz > 0){ // 这个循环将数据文件头部的填充区置位0,有什么用?可能是后面写入新记录时会读到这个区域...
- if(psiz > HDBIOBUFSIZ){
- if(!tcwrite(fd, pbuf, HDBIOBUFSIZ)) err = true;
- psiz -= HDBIOBUFSIZ;
- } else {
- if(!tcwrite(fd, pbuf, psiz)) err = true;
- psiz = 0;
- }
- }
- if(err){
- tchdbsetecode(hdb, TCEWRITE, __FILE__, __LINE__, __func__);
- close(fd);
- return false;
- }
- sbuf.st_size = hdb->fsiz; // 改写文件属性信息,改写文件大小
- }
- if(lseek(fd, 0, SEEK_SET) == -1){ // 重置文件指针到数据文件头部
- tchdbsetecode(hdb, TCESEEK, __FILE__, __LINE__, __func__);
- close(fd);
- return false;
- }
- if(!tcread(fd, hbuf, HDBHEADSIZ)){ // 读出文件头信息,保证hbuf中含有文件头信息
- tchdbsetecode(hdb, TCEREAD, __FILE__, __LINE__, __func__);
- close(fd);
- return false;
- }
- int type = hdb->type;
- tchdbloadmeta(hdb, hbuf); // 将文件头信息copy到TCHDB结构体中,即初始化TCHDB结构体某些成员
- // 若文件被标识为已打开,很可能前面针对文件的操作在事务中被中断了,这里将数据文件从wal文件中恢复回来,
- // 相当于取消了前面那个事务,目前我们只要知道wal文件用于事务即可,这个函数后面我会补充分析。
- if((hdb->flags & HDBFOPEN) && tchdbwalrestore(hdb, path)){
- if(lseek(fd, 0, SEEK_SET) == -1){ // 数据文件已恢复,下面需要重新读取头部信息
- tchdbsetecode(hdb, TCESEEK, __FILE__, __LINE__, __func__);
- close(fd);
- return false;
- }
- if(!tcread(fd, hbuf, HDBHEADSIZ)){ // 重新读出出数据文件头信息
- tchdbsetecode(hdb, TCEREAD, __FILE__, __LINE__, __func__);
- close(fd);
- return false;
- }
- tchdbloadmeta(hdb, hbuf);// 重新导出出数据文件头信息
- if(!tchdbwalremove(hdb, path)){
- close(fd);
- return false;
- }
- }
- int besiz = (hdb->opts & HDBTLARGE) ? sizeof(int64_t) : sizeof(int32_t); // hash桶大小
- size_t msiz = HDBHEADSIZ + hdb->bnum * besiz; // 算出数据文件最小需要mmap的大小,即数据文件头大小加hash同数组大小
- if(!(omode & HDBONOLCK)){
- if(memcmp(hbuf, HDBMAGICDATA, strlen(HDBMAGICDATA)) || hdb->type != type ||
- hdb->frec < msiz + HDBFBPBSIZ || hdb->frec > hdb->fsiz || sbuf.st_size < hdb->fsiz){
- tchdbsetecode(hdb, TCEMETA, __FILE__, __LINE__, __func__);
- close(fd);
- return false;
- }
- }
- if(((hdb->opts & HDBTDEFLATE) && !_tc_deflate) ||
- ((hdb->opts & HDBTBZIP) && !_tc_bzcompress) || ((hdb->opts & HDBTEXCODEC) && !hdb->enc)){
- tchdbsetecode(hdb, TCEINVALID, __FILE__, __LINE__, __func__);
- close(fd);
- return false;
- }
- size_t xmsiz = (hdb->xmsiz > msiz) ? hdb->xmsiz : msiz; // 数据文件需要mmap的大小,至少为msize
- if(!(omode & HDBOWRITER) && xmsiz > hdb->fsiz) xmsiz = hdb->fsiz; // mmap的大小不超过文件大小
- void *map = mmap(0, xmsiz, PROT_READ | ((omode & HDBOWRITER) ? PROT_WRITE : 0),
- MAP_SHARED, fd, 0); // 映射指定大小数据文件
- if(map == MAP_FAILED){
- tchdbsetecode(hdb, TCEMMAP, __FILE__, __LINE__, __func__);
- close(fd);
- return false;
- }
- hdb->fbpmax = 1 << hdb->fpow; // 空闲块池区域最大数量
- if(omode & HDBOWRITER){ // 写模式,分配空闲块池
- TCMALLOC(hdb->fbpool, hdb->fbpmax * HDBFBPALWRAT * sizeof(HDBFB));
- } else {
- hdb->fbpool = NULL; // 非写模式,不分配空闲块池,节约内存
- }
- hdb->fbpnum = 0; // 其它值的初始化
- hdb->fbpmis = 0;
- hdb->async = false;
- hdb->drpool = NULL;
- hdb->drpdef = NULL;
- hdb->drpoff = 0;
- hdb->recc = (hdb->rcnum > 0) ? tcmdbnew2(hdb->rcnum * 2 + 1) : NULL; // record的缓冲区大小计算
- hdb->path = tcstrdup(path); // 复制一份数据文件raw路径,没有经过标准化处理的路径。
- hdb->fd = fd; // 从这里开始复制一些值到TCHDB结构体中
- hdb->omode = omode;
- hdb->dfcur = hdb->frec;
- hdb->iter = 0;
- hdb->map = map;
- hdb->msiz = msiz;
- hdb->xfsiz = 0;
- if(hdb->opts & HDBTLARGE){ // 判断使用32位还是64为的hash桶
- hdb->ba32 = NULL;
- hdb->ba64 = (uint64_t *)((char *)map + HDBHEADSIZ);
- } else {
- hdb->ba32 = (uint32_t *)((char *)map + HDBHEADSIZ);
- hdb->ba64 = NULL;
- }
- hdb->align = 1 << hdb->apow;
- hdb->runit = tclmin(tclmax(hdb->align, HDBMINRUNIT), HDBIOBUFSIZ);
- hdb->zmode = (hdb->opts & HDBTDEFLATE) || (hdb->opts & HDBTBZIP) ||
- (hdb->opts & HDBTTCBS) || (hdb->opts & HDBTEXCODEC);
- hdb->ecode = TCESUCCESS;
- hdb->fatal = false;
- hdb->inode = (uint64_t)sbuf.st_ino; // 数据文件的inode号
- hdb->mtime = sbuf.st_mtime; // 数据文件修改时间
- hdb->dfcnt = 0;
- hdb->tran = false;
- hdb->walfd = -1;
- hdb->walend = 0;
- if(hdb->omode & HDBOWRITER){ // 若是写模式,并且当前数据文件不处于打开状态,则从数据文件中读取fbp信息,在内存中建立fbp区域
- bool err = false;
- if(!(hdb->flags & HDBFOPEN) && !tchdbloadfbp(hdb)) err = true;
- memset(hbuf, 0, 2);
- if(!tchdbseekwrite(hdb, hdb->msiz, hbuf, 2)) err = true;
- if(err){
- TCFREE(hdb->path);
- TCFREE(hdb->fbpool);
- munmap(hdb->map, xmsiz);
- close(fd);
- hdb->fd = -1;
- return false;
- }
- tchdbsetflag(hdb, HDBFOPEN, true); // 设置数据文件已被打开标志
- }
- return true; // 打开成功
- }
这里补充下上面函数中调用的tchdbwalrestore函数,wal文件的格式为:更新前数据文件大小(8字节) + 一条或多条更新记录,其中,每条更新记录格式如下:
- /* Restore the database from the write ahead logging file.
- `hdb' specifies the hash database object.
- `path' specifies the path of the database file.
- If successful, the return value is true, else, it is false. */
- static int tchdbwalrestore(TCHDB *hdb, const char *path){
- assert(hdb && path);
- char *tpath = tcsprintf("%s%c%s", path, MYEXTCHR, HDBWALSUFFIX); // 构造数据文件对应的wal文件名
- int walfd = open(tpath, O_RDONLY, HDBFILEMODE); // 打开wal文件
- TCFREE(tpath);
- if(walfd < 0) return false;
- bool err = false;
- uint64_t walsiz = 0;
- struct stat sbuf;
- if(fstat(walfd, &sbuf) == 0){ // 获得wal文件属性信息
- walsiz = sbuf.st_size;
- } else {
- tchdbsetecode(hdb, TCESTAT, __FILE__, __LINE__, __func__);
- err = true;
- }
- if(walsiz >= sizeof(walsiz) + HDBHEADSIZ){ // 粗略判断wal文件中是否有更新操作记录,我的理解是:有更新操作必然会导致更新数据文件头信息,因此这里的判断可以根据这一点来做一点优化。
- int dbfd = hdb->fd;
- int tfd = -1;
- if(!(hdb->omode & HDBOWRITER)){ // 若不是写模式,则需要打开数据文件,以进行后面的操作
- tfd = open(path, O_WRONLY, HDBFILEMODE);
- if(tfd >= 0){
- dbfd = tfd;
- } else {
- int ecode = TCEOPEN;
- switch(errno){
- case EACCES: ecode = TCENOPERM; break;
- case ENOENT: ecode = TCENOFILE; break;
- case ENOTDIR: ecode = TCENOFILE; break;
- }
- tchdbsetecode(hdb, ecode, __FILE__, __LINE__, __func__);
- err = true;
- }
- }
- uint64_t fsiz = 0;
- if(tcread(walfd, &fsiz, sizeof(fsiz))){ // wal文件头8字节包含了事务开始前数据文件大小
- fsiz = TCITOHLL(fsiz);
- } else {
- tchdbsetecode(hdb, TCEREAD, __FILE__, __LINE__, __func__);
- err = true;
- }
- TCLIST *list = tclistnew();
- uint64_t waloff = sizeof(fsiz);
- char stack[HDBIOBUFSIZ];
- while(waloff < walsiz){ // 循环读取wal文件中的更新记录,将读到的记录都保存在list中
- uint64_t off; // 存放wal文件中记录的更新区域offset
- uint32_t size; // 存放wal文件中记录的更新区域大小
- if(!tcread(walfd, stack, sizeof(off) + sizeof(size))){ // 从wal文件中读取off和size到stack中
- tchdbsetecode(hdb, TCEREAD, __FILE__, __LINE__, __func__);
- err = true;
- break;
- }
- // 拷贝读到的值到off和size变量并转换成实际值
- memcpy(&off, stack, sizeof(off));
- off = TCITOHLL(off);
- memcpy(&size, stack + sizeof(off), sizeof(size));
- size = TCITOHL(size);
- char *buf; // buf用来存放更新区域offset和更新区域数据(更新前的数据),这里检查能否复用stack,否则动态分配空间
- if(sizeof(off) + size <= HDBIOBUFSIZ){
- buf = stack;
- } else {
- TCMALLOC(buf, sizeof(off) + size);
- }
- *(uint64_t *)buf = off; // 存放offset到buf中
- if(!tcread(walfd, buf + sizeof(off), size)){ //读取更新前数据到buf中
- tchdbsetecode(hdb, TCEREAD, __FILE__, __LINE__, __func__);
- err = true;
- if(buf != stack) TCFREE(buf);
- break;
- }
- TCLISTPUSH(list, buf, sizeof(off) + size); // 存放buf到链表list中,这个链表会自动增长
- if(buf != stack) TCFREE(buf);
- waloff += sizeof(off) + sizeof(size) + size; // 移动waloff指针,循环检查是否还有其它的更改,若有,则继续读取
- }
- size_t xmsiz = 0;
- if(hdb->fd >= 0 && hdb->map) xmsiz = (hdb->xmsiz > hdb->msiz) ? hdb->xmsiz : hdb->msiz;
- for(int i = TCLISTNUM(list) - 1; i >= 0; i--){
- const char *rec;
- int size;
- TCLISTVAL(rec, list, i, size);
- uint64_t off = *(uint64_t *)rec; // rec指向的内存包含信息: 区域大小(8字节) + 区域数据
- rec += sizeof(off); // 调整rec指向更新区域更新前的数据
- size -= sizeof(off); // size为区域数据大小
- if(lseek(dbfd, off, SEEK_SET) == -1){ // 移动数据文件指针,向数据文件写入更新前数据
- tchdbsetecode(hdb, TCESEEK, __FILE__, __LINE__, __func__);
- err = true;
- break;
- }
- if(!tcwrite(dbfd, rec, size)){
- tchdbsetecode(hdb, TCEWRITE, __FILE__, __LINE__, __func__);
- err = true;
- break;
- }
- if(!TCUBCACHE && off < xmsiz){
- size = (size <= xmsiz - off) ? size : xmsiz - off;
- memcpy(hdb->map + off, rec, size);
- }
- }
- tclistdel(list); // 释放链表空间
- if(ftruncate(dbfd, fsiz) == -1){ // 调整数据文件大小,去掉尾部多余数据
- tchdbsetecode(hdb, TCETRUNC, __FILE__, __LINE__, __func__);
- err = true;
- }
- if((hdb->omode & HDBOTSYNC) && fsync(dbfd) == -1){ // 若有可能,同步事务操作
- tchdbsetecode(hdb, TCESYNC, __FILE__, __LINE__, __func__);
- err = true;
- }
- if(tfd >= 0 && close(tfd) == -1){ // 若在这个函数中打开了数据文件,则关闭数据文件文件描述符
- tchdbsetecode(hdb, TCECLOSE, __FILE__, __LINE__, __func__);
- err = true;
- }
- } else {
- err = true;
- }
- if(close(walfd) == -1){ // 关闭wal文件
- tchdbsetecode(hdb, TCECLOSE, __FILE__, __LINE__, __func__);
- err = true;
- }
- return !err; // 返回操作结果
- }
tchdbput用于向数据文件写入一条记录(record),写入的模式有很多种,比如覆盖写(overwrite)、追加写(append)、加一个整数、加一个浮点数或者调用回调函数处理,然后把结果当作记录写入等等,这个函数在执行时是直接写入硬盘中的数据文件的,和它对应有一个异步写入的函数,名为tchdbputasync,此函数暂时把记录放于drp(delayed record pool)中,在合适的时候再写回硬盘,我后面会有相应函数分析。下面我贴出tchdbput函数的代码及注释,仅当成个人学习记录:
- /* Store a record into a hash database object. */
- bool tchdbput(TCHDB *hdb, const void *kbuf, int ksiz, const void *vbuf, int vsiz){
- assert(hdb && kbuf && ksiz >= 0 && vbuf && vsiz >= 0);
- if(!HDBLOCKMETHOD(hdb, false)) return false; // 检查是否可获得函数锁
- uint8_t hash;
- // 根据key值计算出2个hash值bidx和hash,其中bidx用户索引hash桶数组,hash用于在冲突数中
- //查找记录位置,另外冲突数也在很大程度上依靠hash来获得尽量的平衡
- uint64_t bidx = tchdbbidx(hdb, kbuf, ksiz, &hash);
- if(hdb->fd < 0 || !(hdb->omode & HDBOWRITER)){ // 检查文件是否已打开或当前是否为写模式
- tchdbsetecode(hdb, TCEINVALID, __FILE__, __LINE__, __func__);
- HDBUNLOCKMETHOD(hdb);
- return false;
- }
- if(hdb->async && !tchdbflushdrp(hdb)){ // 若是处于异步操作模式,则刷新延迟写缓冲区
- HDBUNLOCKMETHOD(hdb);
- return false;
- }
- if(!HDBLOCKRECORD(hdb, bidx, true)){ // 检查是否可对记录进行操作
- HDBUNLOCKMETHOD(hdb);
- return false;
- }
- if(hdb->zmode){ // 是否压缩记录,若是,则选择相应压缩算法压缩记录后再存储记录
- char *zbuf;
- if(hdb->opts & HDBTDEFLATE){
- zbuf = _tc_deflate(vbuf, vsiz, &vsiz, _TCZMRAW);
- } else if(hdb->opts & HDBTBZIP){
- zbuf = _tc_bzcompress(vbuf, vsiz, &vsiz);
- } else if(hdb->opts & HDBTTCBS){
- zbuf = tcbsencode(vbuf, vsiz, &vsiz);
- } else {
- zbuf = hdb->enc(vbuf, vsiz, &vsiz, hdb->encop);
- }
- if(!zbuf){
- tchdbsetecode(hdb, TCEMISC, __FILE__, __LINE__, __func__);
- HDBUNLOCKRECORD(hdb, bidx);
- HDBUNLOCKMETHOD(hdb);
- return false;
- }
- bool rv = tchdbputimpl(hdb, kbuf, ksiz, bidx, hash, zbuf, vsiz, HDBPDOVER);
- TCFREE(zbuf);
- HDBUNLOCKRECORD(hdb, bidx);
- HDBUNLOCKMETHOD(hdb);
- if(hdb->dfunit > 0 && hdb->dfcnt > hdb->dfunit &&
- !tchdbdefrag(hdb, hdb->dfunit * HDBDFRSRAT + 1)) rv = false;
- return rv;
- }
- bool rv = tchdbputimpl(hdb, kbuf, ksiz, bidx, hash, vbuf, vsiz, HDBPDOVER); // 调用tchdbputimpl写入记录
- HDBUNLOCKRECORD(hdb, bidx);
- HDBUNLOCKMETHOD(hdb);
- if(hdb->dfunit > 0 && hdb->dfcnt > hdb->dfunit &&
- !tchdbdefrag(hdb, hdb->dfunit * HDBDFRSRAT + 1)) rv = false;
- return rv;
- }
上面的函数中,主要是通过调用tchdbputimpl来实现写入记录功能,该函数如下:
- /* Store a record.
- `hdb' specifies the hash database object.
- `kbuf' specifies the pointer to the region of the key.
- `ksiz' specifies the size of the region of the key.
- `bidx' specifies the index of the bucket array.
- `hash' specifies the hash value for the collision tree.
- `vbuf' specifies the pointer to the region of the value.
- `vsiz' specifies the size of the region of the value.
- `dmode' specifies behavior when the key overlaps.
- If successful, the return value is true, else, it is false. */
- static bool tchdbputimpl(TCHDB *hdb, const char *kbuf, int ksiz, uint64_t bidx, uint8_t hash,
- const char *vbuf, int vsiz, int dmode){
- assert(hdb && kbuf && ksiz >= 0);
- if(hdb->recc) tcmdbout(hdb->recc, kbuf, ksiz); /*从cache中删除记录*/
- off_t off = tchdbgetbucket(hdb, bidx); // 从hash数组中取得对应记录的偏移量
- off_t entoff = 0; // 用于查找冲突数,始终存放冲突树中,当前比较记录的父节点在文件中的偏移量
- TCHREC rec; // 申请了一个记录结构,用于在内存中存放记录的相关信息
- char rbuf[HDBIOBUFSIZ];
- while(off > 0){
- rec.off = off;
- if(!tchdbreadrec(hdb, &rec, rbuf)) return false; //从数据文件读取指定偏移的记录,即对应hash值的第一个记录
- // 读取的方式为:首先看是否可以经过mmap映射的内存读,若可以则直接读,否则调用pread读取
- if(hash > rec.hash){ // 从这里开始比较要插入的值和刚刚读取的记录,比较它们的二级hash值
- off = rec.left;
- entoff = rec.off + (sizeof(uint8_t) + sizeof(uint8_t)); // 调整entoff
- } else if(hash < rec.hash){
- off = rec.right;
- entoff = rec.off + (sizeof(uint8_t) + sizeof(uint8_t)) +
- (hdb->ba64 ? sizeof(uint64_t) : sizeof(uint32_t));
- } else { // hash值相等,接着比较记录的key
- if(!rec.kbuf && !tchdbreadrecbody(hdb, &rec)) return false;
- int kcmp = tcreckeycmp(kbuf, ksiz, rec.kbuf, rec.ksiz); // 比较记录的key值,看是否与已存记录相等
- if(kcmp > 0){
- off = rec.left;
- TCFREE(rec.bbuf);
- rec.kbuf = NULL;
- rec.bbuf = NULL;
- entoff = rec.off + (sizeof(uint8_t) + sizeof(uint8_t)); // 调整entoff
- } else if(kcmp < 0){
- off = rec.right;
- TCFREE(rec.bbuf);
- rec.kbuf = NULL;
- rec.bbuf = NULL;
- entoff = rec.off + (sizeof(uint8_t) + sizeof(uint8_t)) +
- (hdb->ba64 ? sizeof(uint64_t) : sizeof(uint32_t));
- } else { // key值相等,在这里说明有相同记录存在,下面根据传入的模式进行相应处理
- bool rv;
- int nvsiz;
- char *nvbuf;
- HDBPDPROCOP *procptr;
- switch(dmode){
- case HDBPDKEEP: // 保持原记录不变
- tchdbsetecode(hdb, TCEKEEP, __FILE__, __LINE__, __func__);
- TCFREE(rec.bbuf);
- return false;
- case HDBPDCAT: // 附加到原记录后面
- if(vsiz < 1){
- TCFREE(rec.bbuf);
- return true;
- }
- if(!rec.vbuf && !tchdbreadrecbody(hdb, &rec)){
- TCFREE(rec.bbuf);
- return false;
- }
- nvsiz = rec.vsiz + vsiz;
- if(rec.bbuf){
- TCREALLOC(rec.bbuf, rec.bbuf, rec.ksiz + nvsiz);
- memcpy(rec.bbuf + rec.ksiz + rec.vsiz, vbuf, vsiz);
- rec.kbuf = rec.bbuf;
- rec.vbuf = rec.kbuf + rec.ksiz;
- rec.vsiz = nvsiz;
- } else {
- TCMALLOC(rec.bbuf, nvsiz + 1);
- memcpy(rec.bbuf, rec.vbuf, rec.vsiz);
- memcpy(rec.bbuf + rec.vsiz, vbuf, vsiz);
- rec.vbuf = rec.bbuf;
- rec.vsiz = nvsiz;
- }
- rv = tchdbwriterec(hdb, &rec, bidx, entoff);
- TCFREE(rec.bbuf);
- return rv;
- case HDBPDADDINT: // 向原记录增加一个整数值,原记录也是整数
- if(rec.vsiz != sizeof(int)){
- tchdbsetecode(hdb, TCEKEEP, __FILE__, __LINE__, __func__);
- TCFREE(rec.bbuf);
- return false;
- }
- if(!rec.vbuf && !tchdbreadrecbody(hdb, &rec)){
- TCFREE(rec.bbuf);
- return false;
- }
- int lnum;
- memcpy(&lnum, rec.vbuf, sizeof(lnum));
- if(*(int *)vbuf == 0){
- TCFREE(rec.bbuf);
- *(int *)vbuf = lnum;
- return true;
- }
- lnum += *(int *)vbuf;
- rec.vbuf = (char *)&lnum;
- *(int *)vbuf = lnum;
- rv = tchdbwriterec(hdb, &rec, bidx, entoff);
- TCFREE(rec.bbuf);
- return rv;
- case HDBPDADDDBL: // 向原记录增加一个浮点数值
- if(rec.vsiz != sizeof(double)){
- tchdbsetecode(hdb, TCEKEEP, __FILE__, __LINE__, __func__);
- TCFREE(rec.bbuf);
- return false;
- }
- if(!rec.vbuf && !tchdbreadrecbody(hdb, &rec)){
- TCFREE(rec.bbuf);
- return false;
- }
- double dnum;
- memcpy(&dnum, rec.vbuf, sizeof(dnum));
- if(*(double *)vbuf == 0.0){
- TCFREE(rec.bbuf);
- *(double *)vbuf = dnum;
- return true;
- }
- dnum += *(double *)vbuf;
- rec.vbuf = (char *)&dnum;
- *(double *)vbuf = dnum;
- rv = tchdbwriterec(hdb, &rec, bidx, entoff);
- TCFREE(rec.bbuf);
- return rv;
- case HDBPDPROC: // 调用回调函数处理原记录
- if(!rec.vbuf && !tchdbreadrecbody(hdb, &rec)){
- TCFREE(rec.bbuf);
- return false;
- }
- procptr = *(HDBPDPROCOP **)((char *)kbuf - sizeof(procptr));
- nvbuf = procptr->proc(rec.vbuf, rec.vsiz, &nvsiz, procptr->op);
- TCFREE(rec.bbuf);
- if(nvbuf == (void *)-1){
- return tchdbremoverec(hdb, &rec, rbuf, bidx, entoff);
- } else if(nvbuf){
- rec.kbuf = kbuf;
- rec.ksiz = ksiz;
- rec.vbuf = nvbuf;
- rec.vsiz = nvsiz;
- rv = tchdbwriterec(hdb, &rec, bidx, entoff);
- TCFREE(nvbuf);
- return rv;
- }
- tchdbsetecode(hdb, TCEKEEP, __FILE__, __LINE__, __func__);
- return false;
- default:
- break;
- }
- TCFREE(rec.bbuf);
- rec.ksiz = ksiz;
- rec.vsiz = vsiz;
- rec.kbuf = kbuf;
- rec.vbuf = vbuf;
- return tchdbwriterec(hdb, &rec, bidx, entoff);
- }
- }
- }
- // 执行到这里,说明应写入新记录
- if(!vbuf){
- tchdbsetecode(hdb, TCENOREC, __FILE__, __LINE__, __func__);
- return false;
- }
- if(!HDBLOCKDB(hdb)) return false;
- // 构造文件中的记录格式头部,格式为: magic number(1bytes) + hash value(1bytes) + left(4bytes or 8bytes) +
- // right chain(4bytes or 8bytes) + padding size(2bytes)
- rec.rsiz = hdb->ba64 ? sizeof(uint8_t) * 2 + sizeof(uint64_t) * 2 + sizeof(uint16_t) :
- sizeof(uint8_t) * 2 + sizeof(uint32_t) * 2 + sizeof(uint16_t);
- // 键值的存储变量(区域)是变长的,我们在这里计算出其存储区长度,每个字节只用7位,第8位作为符号位
- if(ksiz < (1U << 7)){
- rec.rsiz += 1;
- } else if(ksiz < (1U << 14)){
- rec.rsiz += 2;
- } else if(ksiz < (1U << 21)){
- rec.rsiz += 3;
- } else if(ksiz < (1U << 28)){
- rec.rsiz += 4;
- } else {
- rec.rsiz += 5;
- }
- // value值长度和键值一样,同上
- if(vsiz < (1U << 7)){
- rec.rsiz += 1;
- } else if(vsiz < (1U << 14)){
- rec.rsiz += 2;
- } else if(vsiz < (1U << 21)){
- rec.rsiz += 3;
- } else if(vsiz < (1U << 28)){
- rec.rsiz += 4;
- } else {
- rec.rsiz += 5;
- }
- if(!tchdbfbpsearch(hdb, &rec)){ // 首先看能否从空闲快数组找到合适的记录块,若不能,则标记为应添加到文件末尾
- HDBUNLOCKDB(hdb);
- return false;
- }
- // 下面几条语句赋予的值将被存放在数据文件的记录中,它们在记录中的顺序和这里赋值的顺序恰好一致,呵呵,不同
- // 的是,数据文件记录中在这几个值后面还有一个对齐填充区,这样下一个记录就能从对齐字节开始存放了。
- rec.hash = hash;
- rec.left = 0;
- rec.right = 0;
- rec.ksiz = ksiz;
- rec.vsiz = vsiz;
- rec.psiz = 0;
- rec.kbuf = kbuf;
- rec.vbuf = vbuf;
- if(!tchdbwriterec(hdb, &rec, bidx, entoff)){ // 向数据文件写入记录
- HDBUNLOCKDB(hdb);
- return false;
- }
- // 更新数据文件的统计信息,这里通过向mmap映射的内存区拷贝数据实现,因为我们至少会mmap数据文件控制信息到内存
- hdb->rnum++;
- uint64_t llnum = hdb->rnum;
- llnum = TCHTOILL(llnum);
- memcpy(hdb->map + HDBRNUMOFF, &llnum, sizeof(llnum));
- HDBUNLOCKDB(hdb);
- return true;
- }
在上面查找冲突树的过程中,由于是先比较二级hash值,找到相等的值,再进行key值的比较,最终决定写入记录的位置,因此对于具有相同二级hash值的记录而言,它们可能会由于key的不同而导致与其它具有不同二级hash值的记录相互混杂,由这里我们可以知道,插入过程构造出来的冲突树是非常杂乱无章的,没有规律可言,这也许能进一步促进冲突数区域平衡吧。