Raku NativeCall 到 LibX11 屏幕和显示

Question

软呢帽 33
乐
我正在尝试使用 Raku 的 NativeCall 与 libX11.so 对话以打印出我的屏幕和显示:

use NativeCall;

class Display is repr('CStruct') { has Pointer $.DisplayPtr };

# libX11.so --> X11
sub XOpenDisplay(Str $name = ':0') returns Display is native('X11') { * }
sub XDefaultScreen(Display $) returns int32 is native('X11') { * }

my Display $display = XOpenDisplay()
    or die "Can not open display";
 
my int $screen = XDefaultScreen($display);

print "display = <" ~ $display ~ ">\n";
print "screen =  <" ~ $screen  ~ ">\n";


$ libX11.pl6
display = <Display<90201160>>
screen =  <0>

问题。我遗漏了一些关于类语法的信息，因为它向我显示了一个指针地址而不是我的显示，我认为它是“:0”。另外我认为类声明应该在某处显示一个字符串。

Answer 1

您有点混淆了 Display(用于与 X 交互的对象)和显示名称(可用于识别和连接到 Display 的字符串)。
此外，对于 repr('CPointer') 最好使用 repr('CStruct') ，而不是 XDisplay * ，因为 Xlib 文档说它应该被视为一个不透明的指针，并且可以通过函数访问所有内容，并且将整个结构转换为 Raku 会很费力(而且不是很有用)。
由于它就像一个对象，因此您可以选择将所有 Xlib 函数封装在 Display 类中，并将它们包装在方法中，如 the pointers section of the NativeCall docs 所示。到目前为止，我对这种风格的代码的翻译是:

use NativeCall;

class Display is repr('CPointer') {
  sub XOpenDisplay(Str) returns Display is native('X11') { * }
  method new(Str $name = ':0') {
    XOpenDisplay($name);
  }

  # You can wrap a libX11 function in a method explicitly, like this...
  sub XDisplayString(Display) returns Str is native('X11') { * }
  method DisplayString {
    XDisplayString(self);
  }

  # Or implicitly, by putting 'is native' on a method declaration 
  # and using 'is symbol' to match the names
  # (self will be passed as the first argument to the libX11 function)
  method DefaultScreen() returns int32 is native('X11') 
    is symbol('XDefaultScreen') { * }

  method Str {
    "Display({ self.DisplayString })";
  }
}

my Display $display .= new
    or die "Can not open display";

my int $screen = $display.DefaultScreen;

print "display = <" ~ $display ~ ">\n";
print "screen =  <" ~ $screen  ~ ">\n";

我为 method Str 提供了一个 Display ，以便它可以直接打印，但同样，不要将对象与用来获取一个的字符串混淆。从这里开始，您可以向 Display 中添加更多方法，并以相同的方式定义 Screen 、 Window 等。您不必这样做——您可以自由地公开定义 subs 并使用对 XOpenDisplay 和其他所有内容的调用，就像您在编写 C 一样，但 OO 风格往往更简洁一些。这是你的选择。