0

我正在尝试将 openCV 与 Erlang NIF 一起使用。所以我想做一个基本的事情,那就是阅读一张图片并将指针发送回 erlang。并能够再次将收到的指针发回给 C 并显示图片

所以 niftest.cpp 看起来像这样:

/* niftest.cpp */

#include "erl_nif.h"
#include <opencv/highgui.h>
#include <opencv/cv.h>
using namespace cv;
using namespace std;


static ErlNifResourceType* frame_res = NULL;


typedef struct _frame_t {
IplImage* _frame;
} frame_t;

//------------------------------------------------------------------------------
// NIF callbacks
//------------------------------------------------------------------------------

static void frame_cleanup(ErlNifEnv* env, void* arg) {
enif_free(arg);
}

static int load(ErlNifEnv* env, void** priv, ERL_NIF_TERM load_info)
{

ErlNifResourceFlags flags = (ErlNifResourceFlags) (ERL_NIF_RT_CREATE | ERL_NIF_RT_TAKEOVER);
frame_res = enif_open_resource_type(env, "niftest", "ocv_frame",
                      &frame_cleanup,
                      flags, 0);
return 0;
}


static ERL_NIF_TERM get_pic(ErlNifEnv* env, int argc, const ERL_NIF_TERM argv[])
{

IplImage* src = cvLoadImage("/home/khashayar/Downloads/pic.png");

cout << src->width << endl;

IplImage* gray = cvCreateImage(cvGetSize(src), IPL_DEPTH_8U, 1);
cvCvtColor(src, gray, CV_RGB2GRAY);

frame_t* frame = (frame_t*)enif_alloc_resource(frame_res, sizeof(frame_t));
frame->_frame = gray ;

ERL_NIF_TERM term = enif_make_resource(env, frame);
enif_release_resource(frame);
return enif_make_tuple2(env, enif_make_atom(env, "ok"), term); 

}


static ERL_NIF_TERM show_pic(ErlNifEnv* env, int argc, const ERL_NIF_TERM argv[]){

frame_t* frame;
 if (!enif_get_resource(env, argv[0], frame_res, (void**) &frame)) {
   return enif_make_badarg(env);
 }

 cvShowImage("YOOHOO", frame->_frame);

 cvWaitKey(30);

 return enif_make_atom(env, "ok");
}

static ErlNifFunc nif_funcs[] =
  {
    {"show_pic", 1, show_pic},
    {"get_pic", 0, get_pic}
  };

ERL_NIF_INIT(niftest,nif_funcs,load,NULL,NULL,NULL)

我的 niftest.erl 看起来像这样:

-module(niftest).

-compile(export_all).

init() ->
      erlang:load_nif("./niftest", 0).

get_pic() ->
      "NIF library not loaded".

show_pic(F) ->
      "NIF library not loaded".

所以现在的问题是当我调用 get_pic 时,我得到的回报是{ok, <<>>}指针根本无效。

当我cout制作它之前的框架时,enif_make_resource它有一个值,我可以看到它,但它返回给我是空的!

我做错了什么?我已经阅读了所有文档,但我真的无法弄清楚。

注意:您可以使用以下命令编译代码:

g++ -fPIC -shared -o niftest.so niftest.cpp -lopencv_core -lopencv_imgproc -lopencv_highgui -I /usr/lib64/erlang/usr/include/

然后运行 ​​erlang shell 并调用 init 和 get_pic 函数

4

1 回答 1

2

NIF 是移植 OpenCV 的高级 GUI 的错误解决方案。

然而,要回答你的问题:{ok, <<>>}你得到的元组中明显空的二进制文件对 Erlang 来说是不透明的。这是erl_nif手册页中记录的资源对象。

资源对象是垃圾收集器友好的。如果没有进程引用给定资源,则将调用清理函数。它们通常是在 NIF 中嵌入 C 或 C++ 指针的正确结构。

IplImage*指针是资源对象的完美候选者。您可能不需要该frame_t类型,因为您可以简单地将指针转换为IplImage**. 清理函数应该释放内存,并在您的示例中调用cvReleaseImage

由于指针是不透明的,因此您需要移植访问器函数以向 Erlang 提供数据。这实际上取决于您想从图像中提取的数据类型。例如,您可以移植cvEncodeImage函数并CvMat*使用enif_make_binary.

另外,作为旁注,"NIF library not loaded"您应该调用erlang:nif_error/1,2存根函数,而不是返回 list 。

移植 API(如 OpenCV 的 High GUI)的正确方法是使用外部驱动程序(或 C 节点)。

有几个原因,包括:

  • NIF 调用应该快速返回(调用cvWaitKey对于 NIF 来说是一个糟糕的候选者,而且计算时间过长),否则它们会混淆调度程序;
  • 使用 NIF 或链接驱动程序,内存管理直接影响 Erlang 的虚拟机,任何崩溃都会导致整个 Erlang 节点崩溃。

外部驱动程序是从(通常)获取数据stdin并回复stdout. 这在 C 或 C++ 中设计非常简单。您可以根据需要移植 OpenCV 的 API 或更复杂的函数。在这种情况下,指针IplImage*可以作为不透明的 4 或 8 字节序列传输,或者作为参考编号,前提是您维护了IplImage*Erlang 已分配的所有指针的列表。然而,与 NIF 不同的是,它没有资源对象,您必须设计您的 Erlang 端代码以确保正确释放内存。

您将在互操作性教程用户指南中找到更多信息和示例代码。

另请参阅此问题:Erlang 上的 OpenCV

于 2013-09-25T09:17:40.603 回答