__ __ __ __ _____ _ _ _____ _ _ _ | \/ | \ \ / / | __ \ (_) | | / ____| | | | | | \ / |_ __\ V / | |__) | __ ___ ____ _| |_ ___ | (___ | |__ ___| | | | |\/| | '__|> < | ___/ '__| \ \ / / _` | __/ _ \ \___ \| '_ \ / _ \ | | | | | | |_ / . \ | | | | | |\ V / (_| | || __/ ____) | | | | __/ | | |_| |_|_(_)_/ \_\ |_| |_| |_| \_/ \__,_|\__\___| |_____/|_| |_|\___V 2.1 if you need WebShell for Seo everyday contact me on Telegram Telegram Address : @jackleetFor_More_Tools:
#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"
#include <mysql.h>
static double mysql_constant(char* name, char* arg) {
errno = 0;
arg= arg;
switch (*name) {
case 'B':
if (strEQ(name, "BLOB_FLAG"))
return BLOB_FLAG;
break;
case 'F':
if (strnEQ(name, "FIELD_TYPE_", 11)) {
char* n = name+11;
switch(*n) {
case 'B':
if (strEQ(n, "BLOB"))
return FIELD_TYPE_BLOB;
break;
case 'C':
if (strEQ(n, "CHAR"))
return FIELD_TYPE_CHAR;
break;
case 'D':
if (strEQ(n, "DECIMAL"))
return FIELD_TYPE_DECIMAL;
if (strEQ(n, "DATE"))
return FIELD_TYPE_DATE;
if (strEQ(n, "DATETIME"))
return FIELD_TYPE_DATETIME;
if (strEQ(n, "DOUBLE"))
return FIELD_TYPE_DOUBLE;
break;
case 'F':
if (strEQ(n, "FLOAT"))
return FIELD_TYPE_FLOAT;
break;
case 'I':
if (strEQ(n, "INT24"))
return FIELD_TYPE_INT24;
break;
case 'L':
if (strEQ(n, "LONGLONG"))
return FIELD_TYPE_LONGLONG;
if (strEQ(n, "LONG_BLOB"))
return FIELD_TYPE_LONG_BLOB;
if (strEQ(n, "LONG"))
return FIELD_TYPE_LONG;
break;
case 'M':
if (strEQ(n, "MEDIUM_BLOB"))
return FIELD_TYPE_MEDIUM_BLOB;
break;
case 'N':
if (strEQ(n, "NULL"))
return FIELD_TYPE_NULL;
break;
case 'S':
if (strEQ(n, "SHORT"))
return FIELD_TYPE_SHORT;
if (strEQ(n, "STRING"))
return FIELD_TYPE_STRING;
break;
case 'T':
if (strEQ(n, "TINY"))
return FIELD_TYPE_TINY;
if (strEQ(n, "TINY_BLOB"))
return FIELD_TYPE_TINY_BLOB;
if (strEQ(n, "TIMESTAMP"))
return FIELD_TYPE_TIMESTAMP;
if (strEQ(n, "TIME"))
return FIELD_TYPE_TIME;
break;
case 'V':
if (strEQ(n, "VAR_STRING"))
return FIELD_TYPE_VAR_STRING;
break;
}
}
break;
case 'N':
if (strEQ(name, "NOT_NULL_FLAG"))
return NOT_NULL_FLAG;
break;
case 'P':
if (strEQ(name, "PRI_KEY_FLAG"))
return PRI_KEY_FLAG;
break;
}
errno = EINVAL;
return 0;
}
| Name | Type | Size | Permission | Actions |
|---|---|---|---|---|
| blib | Folder | 0755 |
|
|
| lib | Folder | 0755 |
|
|
| t | Folder | 0755 |
|
|
| Changes | File | 89.22 KB | 0644 |
|
| LICENSE | File | 17.94 KB | 0644 |
|
| MANIFEST | File | 1.86 KB | 0644 |
|
| MANIFEST.SKIP | File | 210 B | 0644 |
|
| META.json | File | 4.6 KB | 0644 |
|
| META.yml | File | 3.47 KB | 0644 |
|
| MYMETA.json | File | 4.6 KB | 0644 |
|
| MYMETA.yml | File | 3.47 KB | 0644 |
|
| Makefile | File | 53.66 KB | 0644 |
|
| Makefile.PL | File | 21.27 KB | 0644 |
|
| README.md | File | 1.04 KB | 0644 |
|
| SECURITY.md | File | 4.38 KB | 0644 |
|
| constants.h | File | 1.9 KB | 0644 |
|
| dbdimp.c | File | 140.55 KB | 0644 |
|
| dbdimp.h | File | 8.84 KB | 0644 |
|
| myld | File | 1.68 KB | 0644 |
|
| mysql.bs | File | 0 B | 0644 |
|
| mysql.xs | File | 16.89 KB | 0644 |
|
| pm_to_blib | File | 0 B | 0644 |
|
| socket.c | File | 923 B | 0644 |
|