]>
git.proxmox.com Git - proxmox-perl-rs.git/blob - Proxmox/Lib/template.pm
9eb10cfbe4b2c61bddedaf3bda2b8921c15ee153
1 package Proxmox
::Lib
::{{PRODUCT
}};
5 Proxmox::Lib::{{PRODUCT}} - base module for {{PRODUCT}} rust bindings
9 package {{PRODUCT}}::RS::SomeBindings;
11 use base 'Proxmox::Lib::{{PRODUCT}}';
13 BEGIN { __PACKAGE__->bootstrap(); }
19 This is the base module of all {{PRODUCT}} bindings.
20 Its job is to ensure the 'lib{{LIBRARY}}.so' library is loaded and provide a 'bootstrap' class
21 method to load the actual code.
31 # Keep on a single line, modified by testsuite!
32 sub libdirs
{ return (map "-L$_/auto", @INC); }
34 sub load
: prototype($) {
37 my $mod_name = $pkg->library();
39 my @dirs = $pkg->libdirs();
40 my $mod_file = DynaLoader
::dl_findfile
({{DEBUG_LIBPATH
}}@dirs, $mod_name);
41 die "failed to locate shared library for $mod_name (lib${mod_name}.so)\n" if !$mod_file;
43 my $lib = DynaLoader
::dl_load_file
($mod_file)
44 or die "failed to load library '$mod_file'\n";
46 my $data = ($::{'proxmox-rs-library'} //= {});
47 $data->{$mod_name} = $lib;
48 $data->{-current
} //= $lib;
49 $data->{-package} //= $pkg;
55 my $mod_name = $pkg->library();
57 my $bootstrap_name = 'boot_' . ($pkg =~ s/::/__/gr);
59 my $lib = $::{'proxmox-rs-library'}
60 or die "rust library not available for '{PRODUCT}'\n";
61 $lib = $lib->{$mod_name};
63 my $sym = DynaLoader
::dl_find_symbol
($lib, $bootstrap_name);
64 die "failed to locate '$bootstrap_name'\n" if !defined $sym;
65 my $boot = DynaLoader
::dl_install_xsub
($bootstrap_name, $sym, "src/FIXME.rs");
71 __PACKAGE__-
>bootstrap();