From aa773cc37651e0a7c0d059a55b8f179e0c176344 Mon Sep 17 00:00:00 2001 From: Akira Kakuto Date: Wed, 1 Jan 2014 14:36:17 +0000 Subject: Revert because of the lua-script problems. From Hans. git-svn-id: svn://tug.org/texlive/trunk@32535 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/luatexdir/ChangeLog | 5 -- Build/source/texk/web2c/luatexdir/lua/luainit.w | 5 -- Build/source/texk/web2c/luatexdir/tex/texfileio.w | 57 ----------------------- 3 files changed, 67 deletions(-) diff --git a/Build/source/texk/web2c/luatexdir/ChangeLog b/Build/source/texk/web2c/luatexdir/ChangeLog index cda5bee8184..d63f8574bb2 100644 --- a/Build/source/texk/web2c/luatexdir/ChangeLog +++ b/Build/source/texk/web2c/luatexdir/ChangeLog @@ -1,8 +1,3 @@ -2014-01-01 TANAKA Takuji - - * lua/luainit.w, tex/texfileio.w: Enable to use file names with - multi-byte characters in LuaTeX on Windows (Windows only). - 2013-12-23 Peter Breitenlohner * pdf/pdfgen.w (pdf_end_stream): Always write "\nendstream" for diff --git a/Build/source/texk/web2c/luatexdir/lua/luainit.w b/Build/source/texk/web2c/luatexdir/lua/luainit.w index 57a46aa1192..e86f7f8d05b 100644 --- a/Build/source/texk/web2c/luatexdir/lua/luainit.w +++ b/Build/source/texk/web2c/luatexdir/lua/luainit.w @@ -806,12 +806,7 @@ void lua_initialize(int ac, char **av) synctexoption = SYNCTEX_NO_OPTION; /* parse commandline */ -#ifdef WIN32 - get_command_line_args_utf8("utf-8", &argc, &argv); - parse_options(argc, argv); -#else parse_options(ac, av); -#endif if (lua_only) shellenabledp = true; diff --git a/Build/source/texk/web2c/luatexdir/tex/texfileio.w b/Build/source/texk/web2c/luatexdir/tex/texfileio.w index 91672d2ed37..5d58acaf587 100644 --- a/Build/source/texk/web2c/luatexdir/tex/texfileio.w +++ b/Build/source/texk/web2c/luatexdir/tex/texfileio.w @@ -72,16 +72,6 @@ the web2c library char *nameoffile; int namelength; -#if defined(WIN32) -static FILE *wbinpopen(wchar_t *cmdw, char *mode) -{ - wchar_t mw[3]; - mw[0] = (wchar_t)mode[0]; /* It must be ASCII */ - mw[1] = L'b'; - mw[2] = L'\0'; - return _wpopen(cmdw, mw); -} -#endif @ When input files are opened via a callback, they will also be read using callbacks. for that purpose, the |open_read_file_callback| returns an @@ -108,11 +98,7 @@ static char *find_in_output_directory(const char *s) if (output_directory && !kpse_absolute_p(s, false)) { FILE *f_ptr; char *ftemp = concat3(output_directory, DIR_SEP_STRING, s); -#ifdef WIN32 - f_ptr = fsyscp_fopen(ftemp, "rb"); /* this code is used for input files only */ -#else f_ptr = fopen(ftemp, "rb"); /* this code is used for input files only */ -#endif if (f_ptr) { fclose(f_ptr); return ftemp; @@ -254,11 +240,7 @@ luatex_open_input(FILE ** f_ptr, const char *fn, int filefmt, fname[i] = 0; } /* This fopen is not allowed to fail. */ -#ifdef WIN32 - *f_ptr = fsyscp_xfopen(fname, fopen_mode); -#else *f_ptr = xfopen(fname, fopen_mode); -#endif } if (*f_ptr) { recorder_record_input(fname); @@ -281,11 +263,7 @@ boolean luatex_open_output(FILE ** f_ptr, const char *fn, } /* Is the filename openable as given? */ -#ifdef WIN32 - *f_ptr = fsyscp_fopen(fname, fopen_mode); -#else *f_ptr = fopen(fname, fopen_mode); -#endif if (!*f_ptr) { /* Can't open as given. Try the envvar. */ @@ -293,11 +271,7 @@ boolean luatex_open_output(FILE ** f_ptr, const char *fn, if (texmfoutput && *texmfoutput && !absolute) { fname = concat3(texmfoutput, DIR_SEP_STRING, fn); -#ifdef WIN32 - *f_ptr = fsyscp_fopen(fname, fopen_mode); -#else *f_ptr = fopen(fname, fopen_mode); -#endif } } if (*f_ptr) { @@ -1163,11 +1137,7 @@ boolean zopen_w_input(FILE ** f, const char *fname, int format, if (callbackid > 0) { res = run_callback(callbackid, "S->S", fname, &fnam); if (res && fnam && strlen(fnam) > 0) { -#ifdef WIN32 - *f = fsyscp_fopen(fnam, fopen_mode); -#else *f = fopen(fnam, fopen_mode); -#endif if (*f == NULL) { return 0; } @@ -1188,11 +1158,7 @@ boolean zopen_w_output(FILE ** f, const char *s, const_string fopen_mode) { int res = 1; if (luainit) { -#ifdef WIN32 - *f = fsyscp_fopen(s, fopen_mode); -#else *f = fopen(s, fopen_mode); -#endif if (*f == NULL) { return 0; } @@ -1217,11 +1183,7 @@ void zwclose(FILE * f) int open_outfile(FILE ** f, const char *name, const char *mode) { FILE *res; -#ifdef WIN32 - res = fsyscp_fopen(name, mode); -#else res = fopen(name, mode); -#endif if (res != NULL) { *f = res; return 1; @@ -1272,7 +1234,6 @@ static FILE *runpopen(char *cmd, const char *mode) #ifdef WIN32 char *pp; - wchar_t *cmdw = NULL; for (pp = cmd; *pp; pp++) { if (*pp == '\'') *pp = '"'; @@ -1287,23 +1248,9 @@ static FILE *runpopen(char *cmd, const char *mode) allow = shell_cmd_is_allowed(thecmd, &safecmd, &cmdname); } if (allow == 1) -#ifdef WIN32 - { - cmdw = get_wstring_from_mbstring(CP_UTF8, (const char *)cmd, cmdw); - f = wbinpopen(cmdw, mode); - } -#else f = popen(cmd, mode); -#endif else if (allow == 2) -#ifdef WIN32 - { - cmdw = get_wstring_from_mbstring(CP_UTF8, (const char *)safecmd, cmdw); - f = wbinpopen(cmdw, mode); - } -#else f = popen(safecmd, mode); -#endif else if (allow == -1) fprintf(stderr, "\nrunpopen quotation error in command line: %s\n", cmd); @@ -1314,10 +1261,6 @@ static FILE *runpopen(char *cmd, const char *mode) free(safecmd); if (cmdname) free(cmdname); -#ifdef WIN32 - if (cmdw) - free(cmdw); -#endif return f; } -- cgit v1.2.3