diff options
| author | Paul Buetow <paul@buetow.org> | 2025-03-22 21:06:05 +0200 |
|---|---|---|
| committer | Paul Buetow <paul@buetow.org> | 2025-03-22 21:06:05 +0200 |
| commit | 935fb078d056b87485c21a2f6d9d9a37f4322200 (patch) | |
| tree | 1fdce73a61d2b67641b4f2a67acfdaa623a9abe9 /internal/c/generate_tracepoints_c.raku | |
| parent | b74bada7341ec17f6962748a696730e0e187c03f (diff) | |
fix fcntl
Diffstat (limited to 'internal/c/generate_tracepoints_c.raku')
| -rw-r--r-- | internal/c/generate_tracepoints_c.raku | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/internal/c/generate_tracepoints_c.raku b/internal/c/generate_tracepoints_c.raku index 960e8f6..fef179f 100644 --- a/internal/c/generate_tracepoints_c.raku +++ b/internal/c/generate_tracepoints_c.raku @@ -166,18 +166,18 @@ class Format { return; } - self.set-format-impl(field.name, field.type); + self.set-format-impl($.name, field.name, field.type) unless $!format-impl; } - # TODO: implement FcntlTracepoint (as it can change open flags) + # TODO: Finish to implement FcntlTracepoint (as it can change open flags) # TODO: implement Dup3Tracepoint (as it can change open flags) - multi method set-format-impl('fd', 'unsigned int') { $!format-impl = FdTracepoint.new } - multi method set-format-impl('newname', 'const char *') { $!format-impl = NameTracepoint.new } - multi method set-format-impl('filename', 'const char *') { $!format-impl = OpenTracepoint.new } - multi method set-format-impl('pathname', 'const char *') { $!format-impl = PathnameTracepoint.new } - multi method set-format-impl('ret', 'long') { $!format-impl = RetTracepoint.new } - multi method set-format-impl('cmd', 'unsigned int') { $!format-impl = FcntlTracepoint.new } - multi method set-format-impl($, $) { } + multi method set-format-impl($, 'fd', 'unsigned int') { $!format-impl = FdTracepoint.new } + multi method set-format-impl($, 'newname', 'const char *') { $!format-impl = NameTracepoint.new } + multi method set-format-impl($, 'filename', 'const char *') { $!format-impl = OpenTracepoint.new } + multi method set-format-impl($, 'pathname', 'const char *') { $!format-impl = PathnameTracepoint.new } + multi method set-format-impl($, 'ret', 'long') { $!format-impl = RetTracepoint.new } + multi method set-format-impl('sys_enter_fcntl', $, $) { $!format-impl = FcntlTracepoint.new } + multi method set-format-impl($, $, $) { } method generate-c-constant returns Str { "#define {$!name.uc} {$!id}" } method generate-bpf-c-tracepoint returns Str { $!format-impl.generate-bpf-c-tracepoint: (format => self, :$!name).hash } |