static kbool_t file_ExportNameSpace(KonohaContext *kctx, kNameSpace *ns, kNameSpace *exportNS, int option, KTraceInfo *trace)
{
KDEFINE_INT_CONST ClassData[] = { // add Array as available
{"FILE", VirtualType_KClass, (uintptr_t)KClass_File},
{NULL},
};
KLIB kNameSpace_LoadConstData(kctx, exportNS, KConst_(ClassData), trace);
return true;
}
static void file_defineConst(KonohaContext *kctx, kNameSpace *ns, KTraceInfo *trace)
{
KFileStdIn = new_File(kctx, OnGlobalConstList, stdin, TEXTSIZE("/dev/stdin"), trace);
KFileStdOut = new_File(kctx, OnGlobalConstList, stdout, TEXTSIZE("/dev/stdout"), trace);
KFileStdErr = new_File(kctx, OnGlobalConstList, stderr, TEXTSIZE("/dev/stderr"), trace);
KDEFINE_FILE_CONST FileData[] = {
{"stdin", KType_File, KFileStdIn},
{"stdout", KType_File, KFileStdOut},
{"stderr", KType_File, KFileStdErr},
{NULL}, /* sentinel */
};
KLIB kNameSpace_LoadConstData(kctx, ns, KConst_(FileData), trace);
KDEFINE_INT_CONST IntData[] = {
{"EOF", KType_Int, EOF},
{NULL}, /* sentinel */
};
KLIB kNameSpace_LoadConstData(kctx, ns, KConst_(IntData), trace);
}
static kbool_t float_ExportNameSpace(KonohaContext *kctx, kNameSpace *ns, kNameSpace *exportNS, int option, KTraceInfo *trace)
{
if(sizeof(kfloat_t) == sizeof(double)) {
KDEFINE_INT_CONST ClassData[] = { // add Array as available
{"double", VirtualType_KClass, (uintptr_t)KClass_Float},
{NULL},
};
KLIB kNameSpace_LoadConstData(kctx, exportNS, KConst_(ClassData), trace);
}
return true;
}
static kbool_t float_defineMethod(KonohaContext *kctx, kNameSpace *ns, KTraceInfo *trace)
{
KRequireKonohaCommonModule(trace);
if(KClass_Float == NULL) {
KDEFINE_CLASS defFloat = {0};
SETUNBOXNAME(defFloat, float);
defFloat.cstruct_size = sizeof(kFloat);
defFloat.cflag = KClassFlag_int;
defFloat.init = kFloat_Init;
defFloat.p = kFloat_p;
KClass_Float = KLIB kNameSpace_DefineClass(kctx, ns, NULL, &defFloat, trace);
}
int FN_x = KFieldName_("x");
KDEFINE_METHOD MethodData[] = {
_Public|_Const|_Im, _F(Float_opPlus), KType_float, KType_float, KMethodName_("+"), 0,
_Public|_Const|_Im, _F(Float_opADD), KType_float, KType_float, KMethodName_("+"), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Int_opADD), KType_float, KType_Int, KMethodName_("+"), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Float_opSUB), KType_float, KType_float, KMethodName_("-"), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Int_opSUB), KType_float, KType_Int, KMethodName_("-"), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Float_opMUL), KType_float, KType_float, KMethodName_("*"), 1, KType_float, FN_x,
_Public|_Im, _F(Float_opDIV), KType_float, KType_float, KMethodName_("/"), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Float_opEQ), KType_Boolean, KType_float, KMethodName_("=="), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Float_opNEQ), KType_Boolean, KType_float, KMethodName_("!="), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Float_opLT), KType_Boolean, KType_float, KMethodName_("<"), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Float_opLTE), KType_Boolean, KType_float, KMethodName_("<="), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Float_opGT), KType_Boolean, KType_float, KMethodName_(">"), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Float_opGTE), KType_Boolean, KType_float, KMethodName_(">="), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Int_opMUL), KType_float, KType_Int, KMethodName_("*"), 1, KType_float, FN_x,
_Public|_Im, _F(Int_opDIV), KType_float, KType_Int, KMethodName_("/"), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Int_opEQ), KType_Boolean, KType_Int, KMethodName_("=="), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Int_opNEQ), KType_Boolean, KType_Int, KMethodName_("!="), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Int_opLT), KType_Boolean, KType_Int, KMethodName_("<"), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Int_opLTE), KType_Boolean, KType_Int, KMethodName_("<="), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Int_opGT), KType_Boolean, KType_Int, KMethodName_(">"), 1, KType_float, FN_x,
_Public|_Const|_Im, _F(Int_opGTE), KType_Boolean, KType_Int, KMethodName_(">="), 1, KType_float, FN_x,
_Public|_Const|_Im|_Coercion, _F(Float_toInt), KType_Int, KType_float, KMethodName_To(KType_Int), 0,
_Public|_Const|_Im|_Coercion, _F(Int_toFloat), KType_float, KType_Int, KMethodName_To(KType_float), 0,
_Public|_Const|_Im, _F(Float_toString), KType_String, KType_float, KMethodName_To(KType_String), 0,
_Public|_Const|_Im, _F(String_toFloat), KType_float, KType_String, KMethodName_To(KType_float), 0,
_Public|_Const|_Im, _F(Float_opMINUS), KType_float, KType_float, KMethodName_("-"), 0,
DEND,
};
KLIB kNameSpace_LoadMethodData(kctx, ns, MethodData, trace);
KDEFINE_FLOAT_CONST FloatData[] = {
{"FLOAT_EPSILON", KType_float, DBL_EPSILON},
{"Infinity", KType_float, INFINITY},
{"NaN", KType_float, NAN},
{NULL} /* sentinel */
};
KLIB kNameSpace_LoadConstData(kctx, ns, KConst_(FloatData), trace);
return true;
}
static kbool_t object_PackupNameSpace(KonohaContext *kctx, kNameSpace *ns, int option, KTraceInfo *trace)
{
// KRequirePackage("konoha.subtype", trace);
KDEFINE_INT_CONST ClassData[] = { // add Object as available
{"Object", VirtualType_KClass, (uintptr_t)KClass_(KType_Object)},
{NULL},
};
KLIB kNameSpace_LoadConstData(kctx, ns, KConst_(ClassData), trace);
object_defineMethod(kctx, ns, trace);
subtype_defineSyntax(kctx, ns, trace);
return true;
}
static void path_defineAccessConst(KonohaContext *kctx, kNameSpace *ns, KTraceInfo *trace)
{
KDEFINE_INT_CONST intData[] = {
/*for System.access*/
{KDefineConstInt(R_OK)},
{KDefineConstInt(W_OK)},
{KDefineConstInt(X_OK)},
{KDefineConstInt(F_OK)},
{NULL} /* sentinel */
};
KLIB kNameSpace_LoadConstData(kctx, ns, KConst_(intData), trace);
}
static kbool_t process_PackupNameSpace(KonohaContext *kctx, kNameSpace *ns, int option, KTraceInfo *trace)
{
kparamtype_t p = {KType_Int};
KClass *cintArray = KLIB KClass_Generics(kctx, KClass_(KType_Array), KType_void, 1, &p);
#define KType_IntArray (cintArray->typeId)
KDEFINE_METHOD MethodData[] = {
_Public|_Static, _F(System_getpid), KType_Int, KType_System, KMethodName_("getpid"), 0,
_Public|_Static, _F(System_getppid), KType_Int, KType_System, KMethodName_("getppid"), 0,
_Public|_Static, _F(System_getuid), KType_Int, KType_System, KMethodName_("getuid"), 0,
_Public|_Static, _F(System_geteuid), KType_Int, KType_System, KMethodName_("geteuid"), 0,
_Public|_Static, _F(System_getgid), KType_Int, KType_System, KMethodName_("getgid"), 0,
_Public|_Static, _F(System_getegid), KType_Int, KType_System, KMethodName_("getegid"), 0,
_Public|_Static, _F(System_getpgid), KType_Int, KType_System, KMethodName_("getpgid"), 1, KType_Int, KFieldName_("pid"),
_Public|_Static, _F(System_Setpgid), KType_Int, KType_System, KMethodName_("setpgid"), 2, KType_Int, KFieldName_("pid"), KType_Int, KFieldName_("pgid"),
_Public|_Static, _F(System_getpriority), KType_Int, KType_System, KMethodName_("getpriority"), 2, KType_Int, KFieldName_("which"), KType_Int, KFieldName_("who"),
_Public|_Static, _F(System_Setpriority), KType_Int, KType_System, KMethodName_("setpriority"), 3, KType_Int, KFieldName_("which"), KType_Int, KFieldName_("who"), KType_Int, KFieldName_("priority"),
_Public|_Static, _F(System_getgroups), KType_Int, KType_System, KMethodName_("getgroups"), 2, KType_Int, KFieldName_("size"), KType_IntArray, KFieldName_("list[]"),
_Public|_Static, _F(System_Setgroups), KType_Int, KType_System, KMethodName_("setgroups"), 2, KType_Int, KFieldName_("size"), KType_IntArray, KFieldName_("*list"),
_Public|_Static, _F(System_fork), KType_Int, KType_System, KMethodName_("fork"), 0,
_Public|_Static, _F(System_wait), KType_Int, KType_System, KMethodName_("wait"), 0,
_Public|_Static, _F(System_waitpid), KType_Int, KType_System, KMethodName_("wait"), 2, KType_Int, KFieldName_("pid"), KType_Int, KFieldName_("options"),
_Public|_Static, _F(System_Setuid), KType_Int, KType_System, KMethodName_("setuid"), 1, KType_Int, KFieldName_("uid"),
_Public|_Static, _F(System_Seteuid), KType_Int, KType_System, KMethodName_("seteuid"), 1, KType_Int, KFieldName_("euid"),
_Public|_Static, _F(System_Setreuid), KType_Int, KType_System, KMethodName_("setreuid"), 2, KType_Int, KFieldName_("ruid"), KType_Int, KFieldName_("euid"),
_Public|_Static, _F(System_Setgid), KType_Int, KType_System, KMethodName_("setgid"), 1, KType_Int, KFieldName_("gid"),
_Public|_Static, _F(System_Setegid), KType_Int, KType_System, KMethodName_("setguid"), 1, KType_Int, KFieldName_("egid"),
_Public|_Static, _F(System_Setregid), KType_Int, KType_System, KMethodName_("setrguid"), 2, KType_Int, KFieldName_("rgid"), KType_Int, KFieldName_("egid"),
_Public|_Static, _F(System_Setsid), KType_Int, KType_System, KMethodName_("setsid"), 0,
_Public|_Static, _F(System_getsid), KType_Int, KType_System, KMethodName_("getsid"), 1, KType_Int, KFieldName_("pid"),
_Public|_Static, _F(System_sleep), KType_Int, KType_System, KMethodName_("sleep"), 1, KType_Int, KFieldName_("sec"),
_Public|_Static, _F(System_usleep), KType_Boolean, KType_System, KMethodName_("usleep"), 1, KType_Int, KFieldName_("usec"),
_Public|_Static, _F(System_system), KType_Int, KType_System, KMethodName_("system"), 1, KType_String, KFieldName_("command"),
_Public|_Static, _F(System_getenv), KType_String, KType_System, KMethodName_("getenv"), 1, KType_String, KFieldName_("name"),
DEND,
};
KLIB kNameSpace_LoadMethodData(kctx, ns, MethodData, trace);
KDEFINE_INT_CONST intData[] = {
{KDefineConstInt(SIGHUP)},
{KDefineConstInt(SIGINT)},
{KDefineConstInt(SIGABRT)},
{KDefineConstInt(SIGKILL)},
/*for System.setpriority*/
{KDefineConstInt(PRIO_PROCESS)},
{KDefineConstInt(PRIO_PGRP)},
{KDefineConstInt(PRIO_USER)},
{}
};
KLIB kNameSpace_LoadConstData(kctx, ns, KConst_(intData), trace);
return true;
}
static KClassVar* kNameSpace_DefineClassName(KonohaContext *kctx, kNameSpace *ns, kshortflag_t cflag, kString *name, KTraceInfo *trace)
{
KDEFINE_CLASS defNewClass = {0};
defNewClass.cflag = cflag | KClassFlag_Nullable;
defNewClass.typeId = KTypeAttr_NewId;
defNewClass.baseTypeId = KType_Object;
defNewClass.superTypeId = KType_Object; //superClass->typeId;
defNewClass.init = Object_InitToMakeDefaultValueAsNull; // dummy for first generation of DefaultValueAsNull
KClassVar *definedClass = (KClassVar *)KLIB kNameSpace_DefineClass(kctx, ns, name, &defNewClass, trace);
KDEFINE_CLASS_CONST ClassData[] = {
{kString_text(name), VirtualType_KClass, definedClass},
{NULL},
};
KLIB kNameSpace_LoadConstData(kctx, ns, KConst_(ClassData), trace);
return definedClass;
}
static kbool_t Syntax_PackupNameSpace(KonohaContext *kctx, kNameSpace *ns, int option, KTraceInfo *trace)
{
KDEFINE_INT_CONST ClassData[] = { // add Array as available
{"Symbol", VirtualType_KClass, (uintptr_t)KClass_Symbol},
{"Syntax", VirtualType_KClass, (uintptr_t)KClass_Syntax},
{"Token", VirtualType_KClass, (uintptr_t)KClass_Token},
{"Node", VirtualType_KClass, (uintptr_t)KClass_Node},
{"NameSpace", VirtualType_KClass, (uintptr_t)KClass_NameSpace},
{NULL},
};
KLIB kNameSpace_LoadConstData(kctx, ns, KConst_(ClassData), 0);
Syntax_defineTokenFunc(kctx, ns, trace);
Syntax_defineMessageMethod(kctx, ns, trace);
Syntax_defineNodeMethod(kctx, ns, trace);
Syntax_defineSyntaxMethod(kctx, ns, trace);
Syntax_defineNameSpaceMethod(kctx, ns, trace);
return true;
}
static kbool_t Syntax_ExportNameSpace(KonohaContext *kctx, kNameSpace *ns, kNameSpace *exportNS, int option, KTraceInfo *trace)
{
KDEFINE_INT_CONST IntData[] = {
#define DEFINE_KEYWORD(KW) {#KW, KType_Int, KW}
DEFINE_KEYWORD(ErrTag),
DEFINE_KEYWORD(WarnTag),
DEFINE_KEYWORD(NoticeTag),
DEFINE_KEYWORD(InfoTag),
DEFINE_KEYWORD(DebugTag),
DEFINE_KEYWORD(TypeCheckPolicy_NoCheck),
DEFINE_KEYWORD(TypeCheckPolicy_AllowVoid),
DEFINE_KEYWORD(TypeCheckPolicy_Coercion),
DEFINE_KEYWORD(TypeCheckPolicy_CONST),
DEFINE_KEYWORD(Precedence_CPPStyleScope),
DEFINE_KEYWORD(Precedence_CStyleSuffixCall), /*x(), x[], x.x x->x x++ */
DEFINE_KEYWORD(Precedence_CStylePrefixOperator), /*++x, --x, sizeof x &x +x -x !x (T)x */
// DEFINE_KEYWORD(Precedence_CppMember), /* .x ->x */
DEFINE_KEYWORD(Precedence_CStyleMUL), /* x * x, x / x, x % x*/
DEFINE_KEYWORD(Precedence_CStyleADD), /* x + x, x - x */
DEFINE_KEYWORD(Precedence_CStyleSHIFT), /* x << x, x >> x */
DEFINE_KEYWORD(Precedence_CStyleCOMPARE),
DEFINE_KEYWORD(Precedence_CStyleEquals),
DEFINE_KEYWORD(Precedence_CStyleBITAND),
DEFINE_KEYWORD(Precedence_CStyleBITXOR),
DEFINE_KEYWORD(Precedence_CStyleBITOR),
DEFINE_KEYWORD(Precedence_CStyleAND),
DEFINE_KEYWORD(Precedence_CStyleOR),
DEFINE_KEYWORD(Precedence_CStyleTRINARY), /* ? : */
DEFINE_KEYWORD(Precedence_CStyleAssign),
DEFINE_KEYWORD(Precedence_CStyleCOMMA),
DEFINE_KEYWORD(Precedence_Statement),
DEFINE_KEYWORD(Precedence_CStyleStatementEnd),
DEFINE_KEYWORD(KNode_Done),
DEFINE_KEYWORD(KNode_Const),
DEFINE_KEYWORD(KNode_New),
DEFINE_KEYWORD(KNode_Null),
DEFINE_KEYWORD(KNode_UnboxConst),
DEFINE_KEYWORD(KNode_Local),
DEFINE_KEYWORD(KNode_Field),
DEFINE_KEYWORD(KNode_Box),
DEFINE_KEYWORD(KNode_MethodCall),
DEFINE_KEYWORD(KNode_And),
DEFINE_KEYWORD(KNode_Or),
DEFINE_KEYWORD(KNode_Assign),
DEFINE_KEYWORD(KNode_Block),
DEFINE_KEYWORD(KNode_If),
DEFINE_KEYWORD(KNode_While),
DEFINE_KEYWORD(KNode_DoWhile),
DEFINE_KEYWORD(KNode_Return),
DEFINE_KEYWORD(KNode_Break),
DEFINE_KEYWORD(KNode_Continue),
DEFINE_KEYWORD(KNode_Try),
DEFINE_KEYWORD(KNode_Throw),
DEFINE_KEYWORD(KNode_Error),
#undef DEFINE_KEYWORD
{NULL},
};
KLIB kNameSpace_LoadConstData(kctx, exportNS, KConst_(IntData), trace);
return true;
}
static kbool_t curl_PackupNameSpace(KonohaContext *kctx, kNameSpace *ns, int option, KTraceInfo *trace)
{
KRequireKonohaCommonModule(trace);
KRequirePackage("Type.File", trace);
KDEFINE_CLASS defCurl = {
STRUCTNAME(Curl),
.cflag = KClassFlag_Final,
.init = kCurl_Init,
.reftrace = kCurl_Reftrace,
.free = kCurl_Free,
};
KClass *cCurl = KLIB kNameSpace_DefineClass(kctx, ns, NULL, &defCurl, trace);
KDEFINE_METHOD MethodData[] = {
_Public, _F(Curl_new), KType_Curl, KType_Curl, KMethodName_("new"), 0,
_Public, _F(Curl_SetOptBoolean), KType_void, KType_Curl, KMethodName_("setOpt"), 2, KType_Int, KFieldName_("option"), KType_Boolean, KFieldName_("data"),
_Public, _F(Curl_SetOptInt), KType_void, KType_Curl, KMethodName_("setOpt"), 2, KType_Int, KFieldName_("option"), KType_Int, KFieldName_("data"),
_Public, _F(Curl_SetOptString), KType_void, KType_Curl, KMethodName_("setOpt"), 2, KType_Int, KFieldName_("option"), KType_String, KFieldName_("data"),
_Public, _F(Curl_SetOptFile), KType_void, KType_Curl, KMethodName_("setOpt"), 2, KType_Int, KFieldName_("option"), KType_File, KFieldName_("data"),
_Public, _F(Curl_appendHeader), KType_void, KType_Curl, KMethodName_("appendHeader"), 1, KType_String, KFieldName_("header"),
_Public, _F(Curl_perform), KType_Boolean, KType_Curl, KMethodName_("perform"), 0,
_Public, _F(Curl_receiveString), KType_String, KType_Curl, KMethodName_("receiveString"), 0,
_Public|_Im, _F(Curl_getInfo), KType_Object/*FIXME KType_Dynamic*/, KType_Curl, KMethodName_("getInfo"), 1, KType_Int, KFieldName_("type"),
DEND,
};
KLIB kNameSpace_LoadMethodData(kctx, ns, MethodData, trace);
KDEFINE_INT_CONST IntData[] = {
{KDefineConstInt(CURLOPT_AUTOREFERER)},
{KDefineConstInt(CURLOPT_COOKIESESSION)},
{KDefineConstInt(CURLOPT_CRLF)},
{KDefineConstInt(CURLOPT_DNS_USE_GLOBAL_CACHE)},
{KDefineConstInt(CURLOPT_FAILONERROR)},
{KDefineConstInt(CURLOPT_FILETIME)},
{KDefineConstInt(CURLOPT_FOLLOWLOCATION)},
{KDefineConstInt(CURLOPT_FORBID_REUSE)},
{KDefineConstInt(CURLOPT_FRESH_CONNECT)},
{KDefineConstInt(CURLOPT_FTP_USE_EPRT)},
{KDefineConstInt(CURLOPT_FTP_USE_EPSV)},
{KDefineConstInt(CURLOPT_FTPAPPEND)},
{KDefineConstInt(CURLOPT_FTPLISTONLY)},
{KDefineConstInt(CURLOPT_HEADER)},
{KDefineConstInt(CURLOPT_HTTPGET)},
{KDefineConstInt(CURLOPT_HTTPPROXYTUNNEL)},
{KDefineConstInt(CURLOPT_NETRC)},
{KDefineConstInt(CURLOPT_NOBODY)},
{KDefineConstInt(CURLOPT_NOPROGRESS)},
{KDefineConstInt(CURLOPT_NOSIGNAL)},
{KDefineConstInt(CURLOPT_POST)},
{KDefineConstInt(CURLOPT_PUT)},
{KDefineConstInt(CURLOPT_SSL_VERIFYPEER)},
{KDefineConstInt(CURLOPT_TRANSFERTEXT)},
{KDefineConstInt(CURLOPT_UNRESTRICTED_AUTH)},
{KDefineConstInt(CURLOPT_UPLOAD)},
{KDefineConstInt(CURLOPT_VERBOSE)},
{KDefineConstInt(CURLOPT_BUFFERSIZE)},
{KDefineConstInt(CURLOPT_CLOSEPOLICY)},
{KDefineConstInt(CURLOPT_CONNECTTIMEOUT)},
{KDefineConstInt(CURLOPT_DNS_CACHE_TIMEOUT)},
{KDefineConstInt(CURLOPT_FTPSSLAUTH)},
{KDefineConstInt(CURLOPT_HTTP_VERSION)},
{KDefineConstInt(CURLOPT_HTTPAUTH)},
{KDefineConstInt(CURLAUTH_ANY)},
{KDefineConstInt(CURLAUTH_ANYSAFE)},
{KDefineConstInt(CURLOPT_INFILESIZE)},
{KDefineConstInt(CURLOPT_LOW_SPEED_LIMIT)},
{KDefineConstInt(CURLOPT_LOW_SPEED_TIME)},
{KDefineConstInt(CURLOPT_MAXCONNECTS)},
{KDefineConstInt(CURLOPT_MAXREDIRS)},
{KDefineConstInt(CURLOPT_PORT)},
{KDefineConstInt(CURLOPT_PROXYAUTH)},
{KDefineConstInt(CURLOPT_PROXYPORT)},
{KDefineConstInt(CURLOPT_PROXYTYPE)},
{KDefineConstInt(CURLOPT_RESUME_FROM)},
{KDefineConstInt(CURLOPT_SSL_VERIFYHOST)},
{KDefineConstInt(CURLOPT_SSLVERSION)},
{KDefineConstInt(CURLOPT_TIMECONDITION)},
{KDefineConstInt(CURLOPT_TIMEOUT)},
{KDefineConstInt(CURLOPT_TIMEVALUE)},
{KDefineConstInt(CURLOPT_CAINFO)},
{KDefineConstInt(CURLOPT_CAPATH)},
{KDefineConstInt(CURLOPT_COOKIE)},
{KDefineConstInt(CURLOPT_COOKIEFILE)},
{KDefineConstInt(CURLOPT_COOKIEJAR)},
{KDefineConstInt(CURLOPT_CUSTOMREQUEST)},
{KDefineConstInt(CURLOPT_ENCODING)},
{KDefineConstInt(CURLOPT_FTPPORT)},
{KDefineConstInt(CURLOPT_INTERFACE)},
{KDefineConstInt(CURLOPT_KRB4LEVEL)},
{KDefineConstInt(CURLOPT_POSTFIELDS)},
{KDefineConstInt(CURLOPT_PROXY)},
{KDefineConstInt(CURLOPT_PROXYUSERPWD)},
{KDefineConstInt(CURLOPT_RANDOM_FILE)},
{KDefineConstInt(CURLOPT_RANGE)},
{KDefineConstInt(CURLOPT_REFERER)},
{KDefineConstInt(CURLOPT_SSL_CIPHER_LIST)},
{KDefineConstInt(CURLOPT_SSLCERT)},
{KDefineConstInt(CURLOPT_SSLCERTTYPE)},
{KDefineConstInt(CURLOPT_SSLENGINE)},
{KDefineConstInt(CURLOPT_SSLENGINE_DEFAULT)},
{KDefineConstInt(CURLOPT_SSLKEY)},
{KDefineConstInt(CURLOPT_SSLKEYTYPE)},
{KDefineConstInt(CURLOPT_URL)},
{KDefineConstInt(CURLOPT_USERAGENT)},
{KDefineConstInt(CURLOPT_USERPWD)},
{KDefineConstInt(CURLOPT_FILE)},
{KDefineConstInt(CURLOPT_WRITEDATA)},
{KDefineConstInt(CURLOPT_READDATA)},
{KDefineConstInt(CURLOPT_STDERR)},
{KDefineConstInt(CURLOPT_WRITEHEADER)},
{KDefineConstInt(CURLINFO_HEADER_SIZE)},
{KDefineConstInt(CURLINFO_REQUEST_SIZE)},
{KDefineConstInt(CURLINFO_REDIRECT_TIME)},
{KDefineConstInt(CURLINFO_TOTAL_TIME)},
{KDefineConstInt(CURLINFO_NAMELOOKUP_TIME)},
{KDefineConstInt(CURLINFO_CONNECT_TIME)},
{KDefineConstInt(CURLINFO_PRETRANSFER_TIME)},
{KDefineConstInt(CURLINFO_STARTTRANSFER_TIME)},
{KDefineConstInt(CURLINFO_SIZE_UPLOAD)},
{KDefineConstInt(CURLINFO_SIZE_DOWNLOAD)},
{KDefineConstInt(CURLINFO_SPEED_DOWNLOAD)},
{KDefineConstInt(CURLINFO_SPEED_UPLOAD)},
{KDefineConstInt(CURLINFO_EFFECTIVE_URL)},
{KDefineConstInt(CURLINFO_CONTENT_TYPE)},
{} // end of const data
};
KLIB kNameSpace_LoadConstData(kctx, ns, KConst_(IntData), trace);
return true;
}
static kbool_t math_PackupNameSpace(KonohaContext *kctx, kNameSpace *ns, int option, KTraceInfo *trace)
{
KRequirePackage("Type.Float", trace);
static KDEFINE_CLASS MathDef = {0};
MathDef.cflag = KClassFlag_Singleton|KClassFlag_Final;
MathDef.structname = "Math"; /*structname*/
MathDef.typeId = KTypeAttr_NewId; /*cid*/
KClass *cMath = KLIB kNameSpace_DefineClass(kctx, ns, NULL, &MathDef, trace);
int FN_x = KFieldName_("x");
int FN_y = KFieldName_("y");
KDEFINE_METHOD MethodData[] = {
_Public|_Const|_Static, _F(Math_abs), KType_Int, KType_Math, KMethodName_("abs"), 1, KType_Int, FN_x,
_Public|_Const|_Static, _F(Math_fabs), KType_float, KType_Math, KMethodName_("fabs"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_pow), KType_float, KType_Math, KMethodName_("pow"), 2, KType_float, FN_x, KType_float, FN_y,
_Public|_Const|_Static, _F(Math_ldexp), KType_float, KType_Math, KMethodName_("ldexp"), 2, KType_float, FN_x, KType_Int, FN_y,
_Public|_Const|_Static, _F(Math_modf), KType_float, KType_Math, KMethodName_("modf"), 2, KType_float, FN_x, KType_float, FN_y,
_Public|_Const|_Static, _F(Math_frexp), KType_float, KType_Math, KMethodName_("frexp"), 2, KType_float, FN_x, KType_Int, FN_y,
_Public|_Const|_Static, _F(Math_fmod), KType_float, KType_Math, KMethodName_("fmod"), 2, KType_float, FN_x, KType_float, FN_y,
_Public|_Const|_Static, _F(Math_ceil), KType_float, KType_Math, KMethodName_("ceil"), 1, KType_float, FN_x,
#ifdef K_USING_WIN32_
_Public, _F(Math_round), KType_float, KType_Math, KMethodName_("round"), 1, KType_float, FN_x,
_Public, _F(Math_nearByInt), KType_float, KType_Math, KMethodName_("nearByInt"), 1, KType_float, FN_x,
#endif
_Public|_Const|_Static, _F(Math_floor), KType_float, KType_Math, KMethodName_("floor"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_sqrt), KType_float, KType_Math, KMethodName_("sqrt"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_exp), KType_float, KType_Math, KMethodName_("exp"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_log10), KType_float, KType_Math, KMethodName_("log10"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_log), KType_float, KType_Math, KMethodName_("log"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_sin), KType_float, KType_Math, KMethodName_("sin"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_cos), KType_float, KType_Math, KMethodName_("cos"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_tan), KType_float, KType_Math, KMethodName_("tan"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_asin), KType_float, KType_Math, KMethodName_("asin"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_acos), KType_float, KType_Math, KMethodName_("acos"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_atan), KType_float, KType_Math, KMethodName_("atan"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_atan2), KType_float, KType_Math, KMethodName_("atan2"), 2, KType_float, FN_x, KType_float, FN_y,
_Public|_Const|_Static, _F(Math_sinh), KType_float, KType_Math, KMethodName_("sinh"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_cosh), KType_float, KType_Math, KMethodName_("cosh"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_tanh), KType_float, KType_Math, KMethodName_("tanh"), 1, KType_float, FN_x,
#if defined(K_USING_WIN32_)
_Public|_Const|_Static, _F(Math_asinh), KType_float, KType_Math, KMethodName_("asinh"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_acosh), KType_float, KType_Math, KMethodName_("acosh"), 1, KType_float, FN_x,
_Public|_Const|_Static, _F(Math_atanh), KType_float, KType_Math, KMethodName_("atanh"), 1, KType_float, FN_x,
#endif
_Public, _F(Math_random), KType_float, KType_Math, KMethodName_("random"), 0,
DEND,
};
KLIB kNameSpace_LoadMethodData(kctx, ns, MethodData, trace);
KDEFINE_FLOAT_CONST FloatData[] = {
{MATH_(E)},
{MATH_(LOG2E)},
{MATH_(LOG10E)},
{MATH_(LN2)},
{MATH_(LN10)},
{MATH_(PI)},
{MATH_(SQRT2)},
{}
};
KLIB kNameSpace_LoadConstData(kctx, ns, KConst_(FloatData), trace);
return true;
}
void MODSUGAR_Init(KonohaContext *kctx, KonohaContextVar *ctx)
{
KParserModel *mod = (KParserModel *)KCalloc_UNTRACE(sizeof(KParserModel), 1);
mod->h.name = "sugar";
mod->h.allocSize = sizeof(KParserModel);
mod->h.setupModelContext = SugarModule_Setup;
KLIB KRuntime_SetModule(kctx, ParserModelIndex, (KRuntimeModel *)mod, 0);
KonohaLibVar *l = (KonohaLibVar *)ctx->klib;
l->kNameSpace_GetClassByFullName = kNameSpace_GetClassByFullName;
l->kNameSpace_DefineClass = kNameSpace_DefineClass;
l->kNameSpace_LoadMethodData = kNameSpace_LoadMethodData;
l->kNameSpace_SetConstData = kNameSpace_SetConstData;
l->kNameSpace_LoadConstData = kNameSpace_LoadConstData;
l->kNameSpace_GetGetterMethodNULL = kNameSpace_GetGetterMethodNULL;
l->kNameSpace_GetSetterMethodNULL = kNameSpace_GetSetterMethodNULL;
l->kNameSpace_GetCoercionMethodNULL = kNameSpace_GetCoercionMethodNULL;
l->kNameSpace_GetMethodByParamSizeNULL = kNameSpace_GetMethodByParamSizeNULL;
l->kNameSpace_GetMethodBySignatureNULL = kNameSpace_GetMethodBySignatureNULL;
l->kMethod_DoLazyCompilation = kMethod_DoLazyCompilation;
l->kNameSpace_FreeSugarExtension = kNameSpace_FreeSugarExtension;
l->Konoha_LoadScript = Konoha_LoadScript;
l->Konoha_Eval = Konoha_Eval;
l->kMethod_GenCode = kMethod_GenCode;
l->kMethod_SetFunc = kMethod_SetFunc;
KDEFINE_CLASS defSymbol = {0};
defSymbol.structname = "Symbol";
defSymbol.typeId = KTypeAttr_NewId;
defSymbol.cflag = KClassFlag_int;
defSymbol.init = KClass_(KType_Int)->init;
defSymbol.unbox = KClass_(KType_Int)->unbox;
defSymbol.format = kSymbol_format;
KDEFINE_CLASS defSyntax = {0};
SETSTRUCTNAME(defSyntax, Syntax);
defSyntax.init = kSyntax_Init;
//defSyntax.format = kSyntax_format;
KDEFINE_CLASS defToken = {0};
SETSTRUCTNAME(defToken, Token);
defToken.init = kToken_Init;
defToken.reftrace = kToken_Reftrace;
defToken.format = kToken_format;
KDEFINE_CLASS defNode = {0};
SETSTRUCTNAME(defNode, Node);
defNode.init = kUntypedNode_Init;
defNode.reftrace = kUntypedNode_Reftrace;
defNode.format = kUntypedNode_format;
InitNodeClass(kctx, mod);
mod->cSymbol = KLIB KClass_define(kctx, PackageId_sugar, NULL, &defSymbol, 0);
mod->cSyntax = KLIB KClass_define(kctx, PackageId_sugar, NULL, &defSyntax, 0);
mod->cToken = KLIB KClass_define(kctx, PackageId_sugar, NULL, &defToken, 0);
mod->cNode = KLIB KClass_define(kctx, PackageId_sugar, NULL, &defNode, 0);
mod->cTokenArray = KClass_p0(kctx, KClass_Array, mod->cToken->typeId);
KLIB Knull(kctx, mod->cToken);
KLIB Knull(kctx, mod->cNode);
SugarModule_Setup(kctx, &mod->h, 0);
KDEFINE_INT_CONST ClassData[] = { // konoha defined class
{"void", VirtualType_KClass, (uintptr_t)KClass_void},
{"boolean", VirtualType_KClass, (uintptr_t)KClass_Boolean},
{"int", VirtualType_KClass, (uintptr_t)KClass_Int},
{"String", VirtualType_KClass, (uintptr_t)KClass_String},
{"Func", VirtualType_KClass, (uintptr_t)KClass_Func},
{"System", VirtualType_KClass, (uintptr_t)KClass_System},
{NULL},
};
kNameSpace_LoadConstData(kctx, KNULL(NameSpace), KConst_(ClassData), 0);
l->Tokenize = Tokenize;
l->ApplyMacroData = ApplyMacroData;
l->SetMacroData = SetMacroData;
l->Preprocess = Preprocess;
l->EvalTokenList = EvalTokenList;
l->ParseTypePattern = ParseTypePattern;
l->kToken_ToBraceGroup = kToken_ToBraceGroup;
l->kUntypedNode_AddParsedObject = kUntypedNode_AddParsedObject;
l->FindEndOfStatement = FindEndOfStatement;
l->kUntypedNode_ParseFlag = kUntypedNode_ParseFlag;
l->kUntypedNode_GetToken = kUntypedNode_GetToken;
l->kUntypedNode_GetNode = kUntypedNode_GetNode;
l->kUntypedNode_SetConst = kUntypedNode_SetConst;
l->kUntypedNode_SetUnboxConst = kUntypedNode_SetUnboxConst;
l->kUntypedNode_SetVariable = kUntypedNode_SetVariable;
l->TypeCheckNodeAt = TypeCheckNodeAt;
l->TypeCheckNodeByName = TypeCheckNodeByName;
l->TypeCheckMethodParam = TypeCheckMethodParam;
l->new_MethodNode = new_MethodNode;
l->AddLocalVariable = AddLocalVariable;
l->kUntypedNode_DeclType = kUntypedNode_DeclType;
l->TypeVariableNULL = TypeVariableNULL;
l->kNameSpace_DefineSyntax = kNameSpace_DefineSyntax;
l->kNameSpace_GetSyntax = kNameSpace_GetSyntax;
l->kSyntax_AddPattern = kSyntax_AddPattern;
l->kNameSpace_AddSyntax = kNameSpace_AddSyntax;
l->kNameSpace_UseDefaultVirtualMachine = kNameSpace_UseDefaultVirtualMachine;
l->kUntypedNode_InsertAfter = kUntypedNode_InsertAfter;
l->kUntypedNode_AddNode = kUntypedNode_AddNode;
l->kUntypedNode_Op = kUntypedNode_Op;
l->ParseSyntaxNode = ParseSyntaxNode;
l->ParseNode = ParseNode;
l->ParseNewNode = ParseNewNode;
l->AppendParsedNode = AppendParsedNode;
l->kToken_ToError = kToken_ToError;
l->MessageNode = MessageNode;
l->VisitNode = VisitNode;
#ifndef USE_SMALLBUILD
l->dumpToken = dumpToken;
l->dumpTokenArray = dumpTokenArray;
#endif
DefineDefaultSyntax(kctx, KNULL(NameSpace));
}
static kbool_t Libevent_PackupNameSpace(KonohaContext *kctx, kNameSpace *ns, int option, KTraceInfo *trace)
{
/* Class Definition */
/* If you want to create Generic class like Array<T>, see konoha.map package */
// cevent_base
KDEFINE_CLASS defcevent_base = {0};
SETSTRUCTNAME(defcevent_base, cevent_base);
defcevent_base.cflag = KClassFlag_Final; //must be final in C
defcevent_base.init = cevent_base_Init;
defcevent_base.free = cevent_base_Free;
KClass *cevent_baseClass = KLIB kNameSpace_DefineClass(kctx, ns, NULL, &defcevent_base, trace);
// cevent
KDEFINE_CLASS defcevent = {0};
SETSTRUCTNAME(defcevent, cevent);
defcevent.cflag = KClassFlag_Final;
defcevent.init = cevent_Init;
// defcevent.reftrace = cevent_Reftrace;
defcevent.free = cevent_Free;
KClass *ceventClass = KLIB kNameSpace_DefineClass(kctx, ns, NULL, &defcevent, trace);
// cbufferevent
KDEFINE_CLASS defcbufferevent = {0};
SETSTRUCTNAME(defcbufferevent, cbufferevent);
defcbufferevent.cflag = KClassFlag_Final;
defcbufferevent.init = cbufferevent_Init;
// defcbufferevent.reftrace = cbufferevent_Reftrace;
defcbufferevent.free = cbufferevent_Free;
KClass *cbuffereventClass = KLIB kNameSpace_DefineClass(kctx, ns, NULL, &defcbufferevent, trace);
// eventCBArg
KDEFINE_CLASS defeventCBArg = {0};
SETSTRUCTNAME(defeventCBArg, eventCBArg);
defeventCBArg.cflag = KClassFlag_Final;
defeventCBArg.init = eventCBArg_Init;
defeventCBArg.reftrace = eventCBArg_Reftrace;
defeventCBArg.free = eventCBArg_Free;
KClass *eventCBArgClass = KLIB kNameSpace_DefineClass(kctx, ns, NULL, &defeventCBArg, trace);
// buffereventCBArg
KDEFINE_CLASS defbuffereventCBArg = {0};
SETSTRUCTNAME(defbuffereventCBArg, buffereventCBArg);
defbuffereventCBArg.cflag = KClassFlag_Final;
defbuffereventCBArg.init = buffereventCBArg_Init;
defbuffereventCBArg.reftrace = buffereventCBArg_Reftrace;
defbuffereventCBArg.free = buffereventCBArg_Free;
KClass *buffereventCBArgClass = KLIB kNameSpace_DefineClass(kctx, ns, NULL, &defbuffereventCBArg, trace);
// ctimeval
KDEFINE_CLASS defctimeval = {0};
SETSTRUCTNAME(defctimeval, ctimeval);
defctimeval.cflag = KClassFlag_Final;
defctimeval.init = ctimeval_Init;
KClass *ctimevalClass = KLIB kNameSpace_DefineClass(kctx, ns, NULL, &defctimeval, trace);
// Sockaddr_in
KDEFINE_CLASS defSockaddr_in = {0};
SETSTRUCTNAME(defSockaddr_in, Sockaddr_in);
defSockaddr_in.cflag = KClassFlag_Final;
defSockaddr_in.init = Sockaddr_in_Init;
KClass *Sockaddr_inClass = KLIB kNameSpace_DefineClass(kctx, ns, NULL, &defSockaddr_in, trace);
/* You can define methods with the following procedures. */
int KType_cevent_base = cevent_baseClass->typeId;
int KType_cevent = ceventClass->typeId;
int KType_cbufferevent = cbuffereventClass->typeId;
int KType_eventCBArg = eventCBArgClass->typeId;
int KType_buffereventCBArg = buffereventCBArgClass->typeId;
int KType_ctimeval = ctimevalClass->typeId;
int KType_Sockaddr_in = Sockaddr_inClass->typeId;
/* define Generics parameter for callback method */
//eventCB_p
kparamtype_t eventCB_p[] = {{KType_Int, 0}, {KType_Int, 0}, {KType_Object, 0}};
KClass *ceventCBfunc = KLIB KClass_Generics(kctx, KClass_Func, KType_void, 3, eventCB_p);
int KType_ceventCBfunc = ceventCBfunc->typeId;
//bev_dataCB_p
kparamtype_t bev_dataCB_p[] = {{KType_cbufferevent, 0}, {KType_Object, 0}};
KClass *Cbev_dataCBfunc = KLIB KClass_Generics(kctx, KClass_Func, KType_void, 2, bev_dataCB_p);
int KType_Cbev_dataCBfunc = Cbev_dataCBfunc->typeId;
//bev_eventCB_p
kparamtype_t bev_eventCB_p[] = {{KType_cbufferevent, 0}, {KType_Int, 0}, {KType_Object, 0}};
KClass *Cbev_eventCBfunc = KLIB KClass_Generics(kctx, KClass_Func, KType_void, 3, bev_eventCB_p);
int KType_Cbev_eventCBfunc = Cbev_eventCBfunc->typeId;
KDEFINE_METHOD MethodData[] = {
// System class
_Public|_Static, _F(System_evutil_make_socket_nonblocking), KType_Int, KType_System, KMethodName_("evutil_make_socket_nonblocking"), 1, KType_Int, KFieldName_("fd"),
// cevent_base
_Public, _F(cevent_base_new), KType_cevent_base, KType_cevent_base, KMethodName_("new"), 0,
_Public, _F(cevent_base_event_dispatch), KType_Int, KType_cevent_base, KMethodName_("event_dispatch"), 0,
// cevent
_Public, _F(cevent_new), KType_cevent, KType_cevent, KMethodName_("new"), 4, KType_cevent_base, KFieldName_("cevent_base"), KType_Int, KFieldName_("evd"), KType_Int, KFieldName_("event"), KType_eventCBArg, KFieldName_("CBarg"),
_Public, _F(cevent_event_add), KType_Int, KType_cevent, KMethodName_("event_add"), 1, KType_ctimeval, KFieldName_("timeval"),
_Public, _F(cevent_event_del), KType_Int, KType_cevent, KMethodName_("event_del"), 0,
_Public, _F(cevent_getID), KType_Int, KType_cevent, KMethodName_("getID"), 0,
_Public, _F(cevent_getEvents), KType_Int, KType_cevent, KMethodName_("getEvents"), 0,
// cbufferevent
_Public, _F(cbufferevent_new), KType_cbufferevent, KType_cbufferevent, KMethodName_("new"), 3, KType_cevent_base, KFieldName_("cevent_base"), KType_Int, KFieldName_("evd"), KType_Int, KFieldName_("options"),
_Public, _F(cbufferevent_setcb), KType_void, KType_cbufferevent, KMethodName_("bufferevent_setcb"), 1, KType_buffereventCBArg, KFieldName_("buffereventCBArg"),
_Public, _F(cbufferevent_socket_connect), KType_Int, KType_cbufferevent, KMethodName_("bufferevent_socket_connect"), 1, KType_Sockaddr_in, KFieldName_("sockaddr"),
_Public, _F(cbufferevent_enable), KType_Int, KType_cbufferevent, KMethodName_("bufferevent_enable"), 1, KType_Int, KFieldName_("event"),
_Public, _F(cbufferevent_write), KType_Int, KType_cbufferevent, KMethodName_("bufferevent_write"), 1, KType_Bytes, KFieldName_("writebuffer"),
_Public, _F(cbufferevent_read), KType_Int, KType_cbufferevent, KMethodName_("bufferevent_read"), 1, KType_Bytes, KFieldName_("readbuffer"),
// eventCBArg
_Public, _F(eventCBArg_new), KType_eventCBArg, KType_eventCBArg, KMethodName_("new"), 2, KType_ceventCBfunc, KFieldName_("konoha_CB"), KType_Object, KFieldName_("CBarg"),
// buffereventCBArg
_Public, _F(buffereventCBArg_new), KType_buffereventCBArg, KType_buffereventCBArg, KMethodName_("new"), 4, KType_Cbev_dataCBfunc, KFieldName_("readCB"), KType_Cbev_dataCBfunc, KFieldName_("writeCB"), KType_Cbev_eventCBfunc, KFieldName_("eventCB"), KType_Object, KFieldName_("CBarg"),
// ctimeval
_Public, _F(ctimeval_new), KType_ctimeval, KType_ctimeval, KMethodName_("new"), 2, KType_Int, KFieldName_("tv_sec"), KType_Int, KFieldName_("tv_usec"),
// Sockaddr_in
_Public, _F(Sockaddr_in_new), KType_Sockaddr_in, KType_Sockaddr_in, KMethodName_("new"), 3, KType_Int, KFieldName_("family"), KType_Int, KFieldName_("addr"), KType_Int, KFieldName_("port"),
DEND, /* <= sentinel */
};
KLIB kNameSpace_LoadMethodData(kctx, ns, MethodData, trace);
KDEFINE_INT_CONST IntData[] = {
// === for event_new() ===
{KDefineConstInt(EV_TIMEOUT)},
{KDefineConstInt(EV_READ)},
{KDefineConstInt(EV_WRITE)},
{KDefineConstInt(EV_SIGNAL)},
{KDefineConstInt(EV_PERSIST)},
{KDefineConstInt(EV_ET)},
// === for bufferevent ===
// bufferevent.h
{KDefineConstInt(BEV_EVENT_READING)},
{KDefineConstInt(BEV_EVENT_WRITING)},
{KDefineConstInt(BEV_EVENT_EOF)},
{KDefineConstInt(BEV_EVENT_ERROR)},
{KDefineConstInt(BEV_EVENT_TIMEOUT)},
{KDefineConstInt(BEV_EVENT_CONNECTED)},
// bufferevent.h: enum bufferevent_options
{KDefineConstInt(BEV_OPT_CLOSE_ON_FREE)},
{KDefineConstInt(BEV_OPT_THREADSAFE)},
{KDefineConstInt(BEV_OPT_DEFER_CALLBACKS)},
{KDefineConstInt(BEV_OPT_UNLOCK_CALLBACKS)},
{KDefineConstInt(AF_INET)},// TODO should be implement in posix.socket package
{} /* <= sentinel */
};
KLIB kNameSpace_LoadConstData(kctx, ns, KConst_(IntData), trace);
return true;
}
static kbool_t xml_PackupNameSpace(KonohaContext *kctx, kNameSpace *ns, int option, KTraceInfo *trace)
{
KRequireKonohaCommonModel(trace);
KDEFINE_CLASS defXml = {
STRUCTNAME(XmlReader),
.cflag = KClassFlag_Final,
.init = XmlReader_init,
.free = XmlReader_free,
.reftrace = XmlReader_reftrace,
};
KClass *cXmlReader = KLIB kNameSpace_DefineClass(kctx, ns, NULL, &defXml, trace);
#define KType_XmlReader cXmlReader->typeId
KDEFINE_METHOD MethodData[] = {
_Public, _F(XmlReader_new), KType_XmlReader, KType_XmlReader, KMethodName_("new"), 1, KType_String, KFieldName_("path"),
_Public, _F(XmlReader_close), KType_void, KType_XmlReader, KMethodName_("close"), 0,
_Public, _F(XmlReader_getQuoteChar), KType_String, KType_XmlReader, KMethodName_("getQuoteChar"), 0,
_Public, _F(XmlReader_read), KType_Boolean, KType_XmlReader, KMethodName_("read"), 0,
_Public, _F(XmlReader_readState), KType_Int, KType_XmlReader, KMethodName_("readState"), 0,
_Public, _F(XmlReader_nodeType), KType_Int, KType_XmlReader, KMethodName_("nodeType"), 0,
_Public, _F(XmlReader_isNamespaceDecl), KType_Boolean, KType_XmlReader, KMethodName_("isNamespaceDecl"), 0,
_Public, _F(XmlReader_isEmptyElement), KType_Boolean, KType_XmlReader, KMethodName_("isEmptyElement"), 0,
_Public, _F(XmlReader_hasAttributes), KType_Boolean, KType_XmlReader, KMethodName_("hasAttributes"), 0,
_Public, _F(XmlReader_hasValue), KType_Boolean, KType_XmlReader, KMethodName_("hasValue"), 0,
_Public, _F(XmlReader_getDepth), KType_Int, KType_XmlReader, KMethodName_("getDepth"), 0,
_Public, _F(XmlReader_getAttributeCount), KType_Int, KType_XmlReader, KMethodName_("getAttributeCount"), 0,
_Public, _F(XmlReader_moveToFirstAttribute), KType_Boolean, KType_XmlReader, KMethodName_("moveToFirstAttribute"), 0,
_Public, _F(XmlReader_moveToNextAttribute), KType_Boolean, KType_XmlReader, KMethodName_("moveToNextAttribute"), 0,
_Public, _F(XmlReader_moveToElement), KType_Boolean, KType_XmlReader, KMethodName_("moveToElement"), 0,
_Public, _F(XmlReader_constBaseUri), KType_String, KType_XmlReader, KMethodName_("constBaseUri"), 0,
_Public, _F(XmlReader_constEncoding), KType_String, KType_XmlReader, KMethodName_("constEncoding"), 0,
_Public, _F(XmlReader_constValue), KType_String, KType_XmlReader, KMethodName_("constValue"), 0,
_Public, _F(XmlReader_constNamespaceUri), KType_String, KType_XmlReader, KMethodName_("constNamespaceUri"), 0,
_Public, _F(XmlReader_constLocalName), KType_String, KType_XmlReader, KMethodName_("constLocalName"), 0,
_Public, _F(XmlReader_constName), KType_String, KType_XmlReader, KMethodName_("constName"), 0,
_Public, _F(XmlReader_constXmlLang), KType_String, KType_XmlReader, KMethodName_("constXmlLang"), 0,
_Public, _F(XmlReader_constPrefix), KType_String, KType_XmlReader, KMethodName_("constPrefix"), 0,
_Public, _F(XmlReader_getAttribute), KType_String, KType_XmlReader, KMethodName_("getAttribute"), 0,
_Public, _F(XmlReader_getAttributeNo), KType_String, KType_XmlReader, KMethodName_("getAttributeNo"), 1, KType_Int, KFieldName_("no"),
_Public, _F(XmlReader_getAttributeNs), KType_String, KType_XmlReader, KMethodName_("getAttributeNs"), 2, KType_String, KFieldName_("ns"), KType_String, KFieldName_("name"),
_Public, _F(XmlReader_lookupNameSpace), KType_String, KType_XmlReader, KMethodName_("lookupNameSpace"), 1, KType_String, KFieldName_("ns"),
_Public, _F(XmlReader_normalization), KType_Int, KType_XmlReader, KMethodName_("normalization"), 0,
_Public, _F(String_convertToXml), KType_XmlReader, KType_String, KMethodName_("convertToXml"), 0,
DEND,
};
KLIB kNameSpace_LoadMethodData(kctx, ns, MethodData, trace);
KDEFINE_INT_CONST IntData[] = {
{KDefineConstInt(XML_READER_TYPE_NONE)},
{KDefineConstInt(XML_READER_TYPE_ELEMENT)},
{KDefineConstInt(XML_READER_TYPE_ATTRIBUTE)},
{KDefineConstInt(XML_READER_TYPE_TEXT)},
{KDefineConstInt(XML_READER_TYPE_CDATA)},
{KDefineConstInt(XML_READER_TYPE_ENTITY_REFERENCE)},
{KDefineConstInt(XML_READER_TYPE_ENTITY)},
{KDefineConstInt(XML_READER_TYPE_PROCESSING_INSTRUCTION)},
{KDefineConstInt(XML_READER_TYPE_COMMENT)},
{KDefineConstInt(XML_READER_TYPE_DOCUMENT)},
{KDefineConstInt(XML_READER_TYPE_DOCUMENT_TYPE)},
{KDefineConstInt(XML_READER_TYPE_DOCUMENT_FRAGMENT)},
{KDefineConstInt(XML_READER_TYPE_NOTATION)},
{KDefineConstInt(XML_READER_TYPE_WHITESPACE)},
{KDefineConstInt(XML_READER_TYPE_SIGNIFICANT_WHITESPACE)},
{KDefineConstInt(XML_READER_TYPE_END_ELEMENT)},
{KDefineConstInt(XML_READER_TYPE_END_ENTITY)},
{KDefineConstInt(XML_READER_TYPE_XML_DECLARATION)},
{} // end of const data
};
KLIB kNameSpace_LoadConstData(kctx, ns, KConst_(IntData), trace);
return true;
}
