调用一个C函数,该函数接受来自Nim的struct指针

时间:2017-01-08 21:18:49

标签: ffi nim

我正在使用Nim的GNU argparse使用其外部函数接口。 在< argp.h>中有函数argp_parse,声明如下

extern error_t argp_parse (const struct argp *__restrict __argp,
           int __argc, char **__restrict __argv,
           unsigned __flags, int *__restrict __arg_index,
           void *__restrict __input);

棘手的部分是第一个参数之前的const和__restrict,在Nim中我写了这段代码

type
  ArgpChild {.importc: "struct argp_child"} = object
    argp : ptr[Argp]
    flags : cint
    header : cstring
    group : cint

  Argp* {.importc: "struct argp", header: "<argp.h>"} = object
    options : ptr[ArgpOption]
    parser : pointer #proc (key : cint, arg: cstring, state : ptr[ArgpState]) : Error
    args_doc : cstring
    doc : cstring
    children : ArgpChild 
    help_filter : pointer #proc(key : int, text : cstring, input: pointer) : cstring
    argp_domain : cstring

  ArgpOption* {.importc: "struct argp_option"} = object
    name : cstring
    key : cint
    arg : cstring
    flags : cint
    doc : cstring
    group : cint

  ArgpState {.importc: "struct argp_state"} = object
    input : pointer

  Error* = enum 
    ARGP_KEY_ARG = 0,
    ARGP_ERR_UNKNOWN = 7, 
    ARGP_KEY_END = 0x1000001

proc argp_parse*(argp : Argp, argc : cint, argv : cstringArray, flags: cuint, arg_index: ptr[cint], input : pointer) : Error {.importc: "argp_parse".}

问题是Nim编译器(带有c后端)为argp_parse函数生成了这一行(注意第一个参数之前缺少的const和__restrict关键字)

N_CDECL(Error177010, argp_parse)(struct argp* argp0, int argc0, NCSTRING* argv0, unsigned int flags0, int* argindex0, void* input0);

然后,当gcc处理该文件时,它会抱怨'argp_parse'和#34;的大吼大叫的类型,我猜这是因为它在第一个参数中找到了两个相同函数的不同类型的定义。

有没有办法强制Nim编译器在使用c后端时在函数参数之前添加const(也许是__restrict)关键字?

2 个答案:

答案 0 :(得分:2)

Nim将来会支持restrict编译指示,允许您指定此类参数。从Nim的存储库中最新的todo.txt可以看出这一点。

与此同时,有一种可能的解决办法。您可以使用importc pragma:

,而不是使用emit编译指示。
proc argp_parse*(argp: Argp,
                 argc: cint,
                 argv: cstringArray,
                 flags: cuint,
                 arg_index: ptr[cint],
                 input: pointer): Error =
  {.emit: "argp_parse(`argp`, `argc`, `argv`, `flags`, `arg_index`, `input`);".}

这将创建一个常规的非导入过程,只转发调用argp_parse函数。

答案 1 :(得分:0)

正确的解决方法只是添加header

when defined case_bad: #  error: conflicting types for 'strlen'
  proc c_strlen(a: cstring): csize_t {.importc: "strlen".}
else: # ok
  proc c_strlen(a: cstring): csize_t {.importc: "strlen", header: "<string.h>".}
echo c_strlen("abc")