Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.47
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
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 /
swig4.0 /
tcl /
[ HOME SHELL ]
Name
Size
Permission
Action
attribute.i
34
B
-rw-r--r--
carrays.i
35
B
-rw-r--r--
cdata.i
30
B
-rw-r--r--
cmalloc.i
32
B
-rw-r--r--
cpointer.i
33
B
-rw-r--r--
cstring.i
32
B
-rw-r--r--
cwstring.i
60
B
-rw-r--r--
exception.i
145
B
-rw-r--r--
factory.i
32
B
-rw-r--r--
std_common.i
467
B
-rw-r--r--
std_deque.i
28
B
-rw-r--r--
std_except.i
35
B
-rw-r--r--
std_map.i
2.41
KB
-rw-r--r--
std_pair.i
768
B
-rw-r--r--
std_string.i
36
B
-rw-r--r--
std_vector.i
15.82
KB
-rw-r--r--
std_wstring.i
63
B
-rw-r--r--
stl.i
291
B
-rw-r--r--
tcl8.swg
1.46
KB
-rw-r--r--
tclapi.swg
3.03
KB
-rw-r--r--
tclerrors.swg
1.66
KB
-rw-r--r--
tclfragments.swg
555
B
-rw-r--r--
tclinit.swg
3.97
KB
-rw-r--r--
tclinterp.i
617
B
-rw-r--r--
tclkw.swg
247
B
-rw-r--r--
tclmacros.swg
38
B
-rw-r--r--
tclopers.swg
1.48
KB
-rw-r--r--
tclprimtypes.swg
5.68
KB
-rw-r--r--
tclresult.i
684
B
-rw-r--r--
tclrun.swg
21.75
KB
-rw-r--r--
tclruntime.swg
484
B
-rw-r--r--
tclsh.i
1.83
KB
-rw-r--r--
tclstrings.swg
793
B
-rw-r--r--
tcltypemaps.swg
2.78
KB
-rw-r--r--
tcluserdir.swg
195
B
-rw-r--r--
tclwstrings.swg
1.79
KB
-rw-r--r--
typemaps.i
15.68
KB
-rw-r--r--
wish.i
3.36
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : tclwstrings.swg
/* ----------------------------------------------------------------------------- * tclwstrings.wg * * Utility methods for wchar strings * ----------------------------------------------------------------------------- */ %{ #include <wchar.h> %} %fragment("SWIG_AsWCharPtrAndSize","header") { SWIGINTERN int SWIG_AsWCharPtrAndSize(Tcl_Obj *obj, wchar_t** cptr, size_t* psize, int *alloc) { int len = 0; Tcl_UniChar *ustr = Tcl_GetUnicodeFromObj(obj, &len); if (ustr) { if (cptr) { Tcl_Encoding encoding = NULL; char *src = (char *) ustr; int srcLen = (len)*sizeof(Tcl_UniChar); int dstLen = sizeof(wchar_t)*(len + 1); char *dst = %new_array(dstLen, char); int flags = 0; Tcl_EncodingState *statePtr = 0; int srcRead = 0; int dstWrote = 0; int dstChars = 0; Tcl_UtfToExternal(0, encoding, src, srcLen, flags, statePtr, dst, dstLen, &srcRead, &dstWrote, &dstChars); if (alloc) *alloc = SWIG_NEWOBJ; } if (psize) *psize = len + 1; return SWIG_OK; } return SWIG_TypeError; } } %fragment("SWIG_FromWCharPtrAndSize","header") { SWIGINTERNINLINE Tcl_Obj * SWIG_FromWCharPtrAndSize(const wchar_t* carray, size_t size) { Tcl_Obj *res = NULL; if (size < INT_MAX) { Tcl_Encoding encoding = NULL; char *src = (char *) carray; int srcLen = (int)(size*sizeof(wchar_t)); int dstLen = (int)(size*sizeof(Tcl_UniChar)); char *dst = %new_array(dstLen, char); int flags = 0; Tcl_EncodingState *statePtr = 0; int srcRead = 0; int dstWrote = 0; int dstChars = 0; Tcl_ExternalToUtf(0, encoding, src, srcLen, flags, statePtr, dst, dstLen, &srcRead, &dstWrote, &dstChars); res = Tcl_NewUnicodeObj((Tcl_UniChar*)dst, (int)size); %delete_array(dst); } return res; } }
Close
