void init_image__xpm( )
{
ADD_FUNCTION( "_xpm_write_rows", f__xpm_write_rows,
tFunc(tObj tObj tInt tArr(tStr) tArr(tStr), tInt), 0);
ADD_FUNCTION( "_xpm_trim_rows", f__xpm_trim_rows,
tFunc(tArr(tStr),tArr(tStr)), 0);
}
void
_ol_ldap_program_init(void)
{
start_new_program();
ADD_STORAGE(OLSTORAGE);
set_init_callback(init_ldap);
set_exit_callback(exit_ldap);
ADD_FUNCTION("create", f_create,
tFunc(tString, tVoid), 0);
ADD_FUNCTION("bind", f_ldap_bind,
tFunc(tOr(tString, tVoid) tOr(tString, tVoid) tOr(tInt, tVoid),
tInt), 0);
ADD_FUNCTION("unbind", f_ldap_unbind,
tFunc(tVoid, tInt), 0);
ADD_FUNCTION("enable_cache", f_ldap_enable_cache,
tFunc(tOr(tInt, tVoid) tOr(tInt, tVoid), tInt), 0);
ADD_FUNCTION("disable_cache", f_ldap_disable_cache,
tFunc(tVoid, tVoid), 0);
ADD_FUNCTION("destroy_cache", f_ldap_destroy_cache,
tFunc(tVoid, tVoid), 0);
ADD_FUNCTION("flush_cache", f_ldap_flush_cache,
tFunc(tVoid, tVoid), 0);
ADD_FUNCTION("uncache_entry", f_ldap_uncache_entry,
tFunc(tString, tVoid), 0);
ADD_FUNCTION("set_cache_options", f_ldap_set_cache_options,
tFunc(tInt, tVoid), 0);
ADD_FUNCTION("err2string", f_ldap_err2string,
tFunc(tInt, tVoid), 0);
ADD_FUNCTION("set_base_dn", f_set_base_dn,
tFunc(tString, tString), 0);
ADD_FUNCTION("set_basedn", f_set_base_dn,
tFunc(tString, tString), 0);
ADD_FUNCTION("set_scope", f_set_scope,
tFunc(tInt, tVoid), 0);
ADD_FUNCTION("dn2ufn", f_ldap_dn2ufn,
tFunc(tString, tString), 0);
ADD_FUNCTION("explode_dn", f_ldap_explode_dn,
tFunc(tString tOr(tInt, tVoid), tArr(tString)), 0);
ADD_FUNCTION("search", f_ldap_search,
tFunc(tOr(tMapping,
tString tOr(tArray, tVoid) tOr(tInt, tVoid) tOr(tInt, tVoid)),
tOr(tObj, tInt)), 0);
ADD_FUNCTION("modify", f_ldap_modify,
tFunc(tString tArr(tMap(tString, tMixed)), tVoid), 0);
ADD_FUNCTION("add", f_ldap_add,
tFunc(tString tArr(tMap(tString, tMixed)), tVoid), 0);
ADD_FUNCTION("delete", f_ldap_delete,
tFunc(tString, tVoid), 0);
_ol_result_program_init();
ldap_program = end_program();
add_program_constant("Client", ldap_program, 0);
add_program_constant("client", ldap_program, 0);
}
/* Init the module */
void pike_module_init(void)
{
#ifdef PEXTS_VERSION
pexts_init();
#endif
start_new_program();
ADD_STORAGE( PCRE_Regexp );
ADD_FUNCTION( "create", f_pcre_create,
tFunc(tOr(tStr,tVoid) tOr(tStr,tVoid), tVoid), 0);
ADD_FUNCTION("match", f_pcre_match,
tFunc(tStr tOr(tStr,tVoid), tInt), 0);
ADD_FUNCTION("split", f_pcre_split,
tFunc(tStr tOr(tStr,tVoid), tArr(tStr)), 0);
set_init_callback(init_regexp);
set_exit_callback(free_regexp);
end_class("Regexp", 0);
add_integer_constant("version", 2, 0);
}
void init_parser_pike()
{
ADD_FUNCTION2("tokenize", f_tokenize,
tFunc(tStr,tArr(tOr(tArr(tStr),tStr))), 0, 0);
}