我用erlang编写了一个nif
库。我也写load
、upgrade
和unload
函数。
这是我的代码:
#include "erl_nif.h"
int checksum(char *s)
{
return 123;
}
/////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////
static ERL_NIF_TERM
checksum_nif(ErlNifEnv* env, int argc, const ERL_NIF_TERM argv[])
{
return enif_make_int(env, checksum(""));
}
/////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////
static int
load(ErlNifEnv* env, void** priv_data, ERL_NIF_TERM load_info)
{
*priv_data = enif_open_resource_type(env,
NULL,
"cwm_utils_buf",
NULL,
ERL_NIF_RT_CREATE | ERL_NIF_RT_TAKEOVER,
NULL);
return 0;
}
static int
upgrade(ErlNifEnv* env, void** priv_data, void** old_priv_data, ERL_NIF_TERM load_info)
{
*priv_data = enif_open_resource_type(env,
NULL,
"cwm_utils_buf",
NULL,
ERL_NIF_RT_TAKEOVER,
NULL);
return 0;
}
static void
unload(ErlNifEnv* env, void* priv_data)
{
return ;
}
static ErlNifFunc nif_funcs[] = {
{"checksum", 1, checksum_nif}
};
ERL_NIF_INIT(mynif, nif_funcs, &load, NULL, &upgrade, &unload);
在 erlang shell 中,我加载此nif
并运行checksum
函数,它返回123
,一切都很好!
之后,我将 checksum
的返回值更改为 123456
,并使用l(mynif)
命令编译并加载nif
到 erlang vm。
这就是问题所在!如果我运行checksum
函数,返回值必须123445
但它仍然是123
的,并且nif
尚未升级。
问题出在哪里?我搜索了很多,并测试了一些示例和库,例如jiffy
但没有奏效。
尝试:
code:purge(mynif).
code:delete(mynif).
l(mynif).