static int lua_kpathsea_new(lua_State * L) { kpathsea kpse = NULL; kpathsea *kp = NULL; const char *av = luaL_checkstring(L, 1); const char *liar = luaL_optstring(L, 2, av); kpse = kpathsea_new(); kpathsea_set_program_name(kpse, av, liar); kp = (kpathsea *) lua_newuserdata(L, sizeof(kpathsea *)); *kp = kpse; luaL_getmetatable(L, KPATHSEA_METATABLE); lua_setmetatable(L, -2); return 1; }
int main (int argc, char **argv) { kpathsea kpse = xcalloc(1, sizeof(kpathsea_instance)); kpathsea_set_program_name(kpse, argv[0], NULL); puts (remove_dots (kpse,"/w/kpathsea")); puts (remove_dots (kpse,"/w//kpathsea")); puts (remove_dots (kpse,"/w/./kpathsea")); puts (remove_dots (kpse,".")); puts (remove_dots (kpse,"./")); puts (remove_dots (kpse,"./.")); puts (remove_dots (kpse,"../kpathsea")); puts (remove_dots (kpse,"/kpathsea/../foo")); puts (remove_dots (kpse,"/../w/kpathsea")); puts (remove_dots (kpse,"/../w/kpathsea/.")); puts (remove_dots (kpse,"/te/share/texmf/../../../../bin/gnu")); }
int main (int argc, char **argv) { kpathsea kpse = xcalloc(1, sizeof(kpathsea_instance)); kpathsea_set_program_name(kpse, argv[0], NULL); kpathsea_xputenv (kpse, "KPATHSEA_DPI", "781"); /* call mktexpk */ kpathsea_xputenv (kpse,"MAKETEX_BASE_DPI", "300"); /* call mktexpk */ kpathsea_set_program_enabled(kpse, kpse_pk_format, 1, kpse_src_env); test_make_tex (kpse, kpse_pk_format, "cmr10"); /* Fail with mktextfm. */ kpathsea_set_program_enabled(kpse, kpse_tfm_format, 1, kpse_src_env); test_make_tex (kpse, kpse_tfm_format, "foozler99"); /* Call something disabled. */ test_make_tex (kpse, kpse_bst_format, "no-way"); return 0; }
int main(int argc, char **argv) { const char **p; kpathsea kpse = kpathsea_new(); kpathsea_set_program_name (kpse, argv[0], NULL); printf("\n%s: name -> xdirname(name) + xbasename(name)\n\n", kpse->invocation_short_name); for (p = tab; *p; p++) { char *q = xdirname(*p); printf("%s -> %s + %s\n", *p, q, xbasename(*p)); free (q); } #if defined (WIN32) kanji_test(); #endif return 0; }
void kpse_set_progname (const_string argv0) { kpathsea_set_program_name (kpse_def, argv0, NULL); }
void kpse_set_program_name (const_string argv0, const_string progname) { kpathsea_set_program_name (kpse_def, argv0, progname); }