为什么dets file_size在删除所有键后不减少

Question

我对dets文件的大小有问题。

> {ok,D1} = dets:open_file(sample_dets_file, [{type, set},{auto_save,3}]).
{ok,sample_dets_file}

> [dets:insert(D1,{{fid,X},"this is sample data"}) || X <- lists:seq(1,10000)].
> dets:info(D1).

[{type,set},
 {keypos,1},
 {size,10000},
 {file_size,769748},
 {filename,"sample_dets_file"}]

> [dets:delete(D1,{fid,X}) || X <- lists:seq(1,10000)].
> dets:info(D1).

[{type,set},
 {keypos,1},
 {size,0},
 {file_size,770092},
 {filename,"sample_dets_file"}]

后插入- {size,10000}, {file_size,769748}

删除后- {size,0}, {file_size,770092}.

即使表是空的，文件大小也没有减少。但是，当我执行delete_all_objects时，文件大小会恢复正常。

> dets:delete_all_objects(D1).
> dets:info(D1).

 [{type,set},
 {keypos,1},
 {size,0},
 {file_size,5464},
 {filename,"sample_dets_file"}]

我不明白除了删除操作之外，还需要做些什么，以减少file_size。问题是，由于dets file_size被限制在4gb以内，即使删除了对象，我也达到了dets文件的大小限制。

Answer 1

除执行delete_all_objects之外，dets实现在删除条目时不尝试收缩文件。要手动缩小文件，您必须创建一个新的临时dets文件，将所有条目复制到新文件中，删除旧文件，并重命名临时文件以替换旧文件。

Answer 2

还有一个选项是如何缩小DETS表的大小(删除后)。

关闭此DETS表(dets: Close )并使用选项{修复、强制}打开它。

请参阅文档：http://www.erlang.org/doc/man/dets.htm

整理表碎片的唯一方法是关闭它，然后再打开它，将修复选项设置为强制。

当没有其他进程打开该文件时，将压缩该文件。

对我来说很管用。