Question

我在Lazarus有一个非常小的库，我无法在Mac上使用ctypes。我真的不明白我做错了什么，我希望有人能指出我正确的方向。

这是我在拉撒路的代码。在Linux机器（Ubuntu VM）上进行编译时，一切正常。我可以创建一个Linux .so文件，并使用ctypes，我可以调用共享库。

library project1;

{$mode delphi}{$H+}

{$IFDEF Darwin}
{$linkframework CoreFoundation}
{$linkframework Carbon}
{$ENDIF}

function SubStr(CString: PChar;FromPos,ToPos: Longint): PChar; cdecl;

var
  Length: Integer;

begin
  Length := StrLen(CString);
  SubStr := CString + Length;
  if (FromPos > 0) and (ToPos >= FromPos) then
  begin
    if Length >= FromPos then
      SubStr := CString + FromPos - 1;
    if Length > ToPos then
    CString[ToPos] := #0;
  end;
end;

exports
  SubStr;

end.

以下是Python代码。

import ctypes

lib = ctypes.CDLL('./libproject1.so')


lib.SubStr.argtypes = (ctypes.c_char_p, ctypes.c_int64, ctypes.c_int64)
lib.SubStr.restype = ctypes.c_char_p

lib.SubStr('HelloWorld', 1, 5)
# The output is 'Hello' as expected

然而，当我在Mac上测试同样的东西时，我收到以下错误。

---------------------------------------------------------------------------
OSError                                   Traceback (most recent call last)
<ipython-input-44-37971b70da86> in <module>()
      1 import ctypes
      2 
----> 3 ctypes.CDLL('./libproject1.dylib')

/Users/$USER/miniconda2/lib/python2.7/ctypes/__init__.pyc in __init__(self, name, mode, handle, use_errno, use_last_error)
    360 
    361         if handle is None:
--> 362             self._handle = _dlopen(self._name, mode)
    363         else:
    364             self._handle = handle

OSError: dlopen(./libproject1.dylib, 6): no suitable image found.  Did find:
    ./libproject1.dylib: mach-o, but wrong architecture

我在mac上创建了一个新项目并尝试了同样的事情无济于事。

在这个dylib上使用lipo时，我得到以下输出。

$ lipo -info libproject1.dylib
Non-fat file: libproject1.dylib is architecture: i386

我相信这是我应该得到的。任何人都有关于如何解决这个问题的任何建议？

Answer 1

Miniconda显然是64位版本的Python。你的库是32位。（i386的体系结构是32位的;你应该看到64位库的x86_64。）因此，Python正确报告“错误的体系结构。”

Recompile your library as a 64-bit binary然后再试一次。

Lazarus库使用Python中的ctypes for OSX

1 个答案: