diff options
author | Karl Berry <karl@freefriends.org> | 2018-06-29 18:22:30 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2018-06-29 18:22:30 +0000 |
commit | a1165a963f66db22ade48394e8504283d09ae49e (patch) | |
tree | 9a6a1ac26ba10bb85b4b9850380b9399adb6db08 /Build/source/texk/tex4htk/t4ht.c | |
parent | 222ce493b9de63ffcb3d1da49ecdcff0b1c049ff (diff) |
sync with tex4ht for #line and -hA
git-svn-id: svn://tug.org/texlive/trunk@48112 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/tex4htk/t4ht.c')
-rw-r--r-- | Build/source/texk/tex4htk/t4ht.c | 616 |
1 files changed, 611 insertions, 5 deletions
diff --git a/Build/source/texk/tex4htk/t4ht.c b/Build/source/texk/tex4htk/t4ht.c index a5894b9d209..c0af58bc2bc 100644 --- a/Build/source/texk/tex4htk/t4ht.c +++ b/Build/source/texk/tex4htk/t4ht.c @@ -1,8 +1,12 @@ -/* t4ht.c (2012-07-25-19:28), generated from tex4ht-t4ht.tex +#line 145 "./tex4ht-t4ht.tex" + +/* t4ht.c (2018-06-28-11:26), generated from tex4ht-t4ht.tex Copyright (C) 2009-2012 TeX Users Group Copyright (C) 1998-2009 Eitan M. Gurari +#line 1 "./tex4ht-t4ht.tex" + % % This work may be distributed and/or modified under the % conditions of the LaTeX Project Public License, either @@ -22,6 +26,8 @@ */ +#line 334 "./tex4ht-t4ht.tex" + /* ********************************************** Compiler options * (uncommented | command line) * @@ -47,6 +53,8 @@ (uncommented | command line) * ----------------------------------------------- */ +#line 3233 "./tex4ht-t4ht.tex" + #ifndef ENVFILE #endif @@ -55,6 +63,8 @@ /* ******************************************** */ +#line 384 "./tex4ht-t4ht.tex" + #ifdef BCC32 #define WIN32 #define ANSI @@ -65,6 +75,8 @@ +#line 396 "./tex4ht-t4ht.tex" + #ifdef BCC #define DOS_C #define ANSI @@ -74,6 +86,8 @@ +#line 758 "./tex4ht-t4ht.tex" + #ifdef __DJGPP__ #define DOS_WIN32 #define ANSI @@ -93,12 +107,16 @@ #define DOS_WIN32 #endif +#line 436 "./tex4ht-t4ht.tex" + #ifdef DOS_WIN32 #define STRUCT_DIRENT #endif +#line 579 "./tex4ht-t4ht.tex" + #ifdef KPATHSEA #ifdef WIN32 #define KWIN32 @@ -107,6 +125,8 @@ +#line 406 "./tex4ht-t4ht.tex" + #ifdef KPATHSEA #include <kpathsea/config.h> #endif @@ -114,13 +134,19 @@ #include <stdlib.h> +#line 427 "./tex4ht-t4ht.tex" + #ifdef HAVE_STRING_H #include <string.h> #endif +#line 443 "./tex4ht-t4ht.tex" + #ifdef HAVE_DIRENT_H +#line 456 "./tex4ht-t4ht.tex" + #include <dirent.h> @@ -129,6 +155,8 @@ #define STRUCT_DIRECT #endif +#line 461 "./tex4ht-t4ht.tex" + #ifdef HAVE_SYS_NDIR_H #include <sys/ndir.h> #endif @@ -143,13 +171,21 @@ #endif +#line 3974 "./tex4ht-t4ht.tex" + #include <signal.h> +#line 542 "./tex4ht-t4ht.tex" + + +#line 3496 "./tex4ht-t4ht.tex" #ifndef __DJGPP__ +#line 3530 "./tex4ht-t4ht.tex" + #ifndef F_OK #ifdef DOS_WIN32 #define F_OK 0 @@ -190,8 +226,12 @@ #include <setjmp.h> #endif +#line 3507 "./tex4ht-t4ht.tex" + #ifdef __DJGPP__ +#line 3530 "./tex4ht-t4ht.tex" + #ifndef F_OK #ifdef DOS_WIN32 #define F_OK 0 @@ -219,6 +259,8 @@ +#line 479 "./tex4ht-t4ht.tex" + #ifdef DOS #define PROTOTYP #endif @@ -230,6 +272,8 @@ #endif +#line 568 "./tex4ht-t4ht.tex" + #ifdef KPATHSEA #ifdef WIN32 #undef CDECL @@ -240,6 +284,8 @@ #endif +#line 3789 "./tex4ht-t4ht.tex" + #if defined(DOS_WIN32) || defined(__MSDOS__) #define READ_BIN_FLAGS "rb" #define READ_TEXT_FLAGS "r" @@ -258,6 +304,8 @@ +#line 234 "./tex4ht-t4ht.tex" + #define Q_CHAR char #define U_CHAR char #define C_CHAR char @@ -266,14 +314,20 @@ #define C_NULL (C_CHAR *) 0 +#line 328 "./tex4ht-t4ht.tex" + #define IGNORED void +#line 421 "./tex4ht-t4ht.tex" + #ifndef EXIT_FAILURE #define EXIT_FAILURE 1 #endif +#line 491 "./tex4ht-t4ht.tex" + #ifdef PROTOTYP #define MYVOID void #define ARG_I(x) x @@ -291,6 +345,8 @@ #endif +#line 783 "./tex4ht-t4ht.tex" + #if defined(DOS_WIN32) || defined(__DJGPP__) #define dir_path_slash(str) (is_forward_slash(str)? '/' : '\\') #else @@ -298,17 +354,23 @@ #endif +#line 1158 "./tex4ht-t4ht.tex" + struct empty_pic_struct{ long int n; struct empty_pic_struct *next; }; +#line 1497 "./tex4ht-t4ht.tex" + #ifndef HTFDIR #define HTFDIR "" #endif +#line 2035 "./tex4ht-t4ht.tex" + struct files_rec{ FILE* file; char *name, *group, op; @@ -325,46 +387,66 @@ struct files_rec{ #define Set_op 6 +#line 2177 "./tex4ht-t4ht.tex" + struct env_c_rec{ Q_CHAR *option; struct env_c_rec *next; }; +#line 2307 "./tex4ht-t4ht.tex" + struct sys_call_rec{ Q_CHAR * filter; struct sys_call_rec *next; }; +#line 2357 "./tex4ht-t4ht.tex" + struct htf_struct{ Q_CHAR *key, *body, *media; struct htf_struct *next; }; +#line 3088 "./tex4ht-t4ht.tex" + struct script_struct{ Q_CHAR *command; struct script_struct *next; }; +#line 3107 "./tex4ht-t4ht.tex" + #define NULL_SCRIPT (struct script_struct *) 0 +#line 3718 "./tex4ht-t4ht.tex" + #define LG_EXT ".lg" +#line 3850 "./tex4ht-t4ht.tex" + #define bad_arg err_arg(0) #define bad_mem err_i(1) +#line 4201 "./tex4ht-t4ht.tex" + #define eq_str(x,y) (!strcmp(x,y)) +#line 4255 "./tex4ht-t4ht.tex" + #define m_alloc(typ,n) (typ *) malloc_chk((int) ((n) * sizeof(typ))) +#line 4490 "./tex4ht-t4ht.tex" + #ifndef TRUE #define TRUE 1 #endif @@ -376,16 +458,24 @@ struct script_struct{ #endif +#line 4504 "./tex4ht-t4ht.tex" + #define eq_str(x,y) (!strcmp(x,y)) +#line 246 "./tex4ht-t4ht.tex" + static int eoln_ch; +#line 292 "./tex4ht-t4ht.tex" + static BOOL check_tex4ht_c_err = FALSE; +#line 878 "./tex4ht-t4ht.tex" + static Q_CHAR *ch_mod = Q_NULL; static Q_CHAR *debug = Q_NULL; static Q_CHAR *Xfield = Q_NULL; @@ -398,28 +488,42 @@ static BOOL newchmod = FALSE; static Q_CHAR *noreuse = Q_NULL; +#line 1100 "./tex4ht-t4ht.tex" + U_CHAR *HOME_DIR; +#line 2184 "./tex4ht-t4ht.tex" + static struct env_c_rec *envChoice = (struct env_c_rec*) 0; +#line 2315 "./tex4ht-t4ht.tex" + static BOOL system_yes; static struct sys_call_rec *system_calls = (struct sys_call_rec *) 0; +#line 2352 "./tex4ht-t4ht.tex" + static struct htf_struct *htf_rec = (struct htf_struct *) 0; +#line 2601 "./tex4ht-t4ht.tex" + static BOOL status; +#line 2815 "./tex4ht-t4ht.tex" + static char *Font_css_base = NULL, *Font_css_mag = NULL; static int base_font_size = 10; +#line 3095 "./tex4ht-t4ht.tex" + static struct script_struct * dvigif_script = NULL_SCRIPT, * dvigif_glyp_script = NULL_SCRIPT, @@ -427,21 +531,33 @@ static struct script_struct * empty_fig_script = NULL_SCRIPT, * copy_script = NULL_SCRIPT, * +#line 2235 "./tex4ht-t4ht.tex" + file_script = NULL_SCRIPT, * +#line 2171 "./tex4ht-t4ht.tex" + ext_script = NULL_SCRIPT, * chmod_script = NULL_SCRIPT; +#line 3769 "./tex4ht-t4ht.tex" + static FILE* lg_file; static long begin_lg_file; +#line 3919 "./tex4ht-t4ht.tex" + static const C_CHAR *warn_err_mssg[]={ +#line 3841 "./tex4ht-t4ht.tex" + + +#line 843 "./tex4ht-t4ht.tex" "\n--------------------------------------------------------------------\n" "t4ht [-f<dir char>]filename ...\n" @@ -466,6 +582,8 @@ static const C_CHAR *warn_err_mssg[]={ , "Insufficient memory\n", +#line 3835 "./tex4ht-t4ht.tex" + "Illegal storage address\n", "Floating-point\n", "Interrupt with Cntr-C\n", @@ -476,67 +594,105 @@ static const C_CHAR *warn_err_mssg[]={ "" }; +#line 4127 "./tex4ht-t4ht.tex" + static Q_CHAR command[255]; static int system_return; +#line 4138 "./tex4ht-t4ht.tex" + static BOOL system_yes; +#line 4191 "./tex4ht-t4ht.tex" + static BOOL always_call_sys = FALSE; +#line 4376 "./tex4ht-t4ht.tex" + static Q_CHAR* match[10]; static int max_match[10]; +#line 793 "./tex4ht-t4ht.tex" + #if defined(DOS_WIN32) || defined(__DJGPP__) static BOOL is_forward_slash( ARG_I(Q_CHAR *) ); #endif +#line 1069 "./tex4ht-t4ht.tex" + static char * abs_addr( ARG_II( U_CHAR *, U_CHAR *) ); +#line 1379 "./tex4ht-t4ht.tex" + static void execute_script( ARG_V(struct script_struct*,const Q_CHAR *,const Q_CHAR *,const Q_CHAR *,const Q_CHAR *) ); +#line 1531 "./tex4ht-t4ht.tex" + static struct script_struct * filterGifScript( ARG_II( struct script_struct *, Q_CHAR *) ); +#line 1605 "./tex4ht-t4ht.tex" + void free_script( ARG_I( struct script_struct *) ); +#line 2152 "./tex4ht-t4ht.tex" + static BOOL strpre( ARG_II(char *,char *) ); +#line 3051 "./tex4ht-t4ht.tex" + static struct script_struct * add_script( ARG_I(struct script_struct *) ); +#line 3627 "./tex4ht-t4ht.tex" + static FILE* f_open( ARG_II(const char*,const char*) ); +#line 3648 "./tex4ht-t4ht.tex" + static FILE* f_home_open( ARG_II(const char*,const char*) ); +#line 3678 "./tex4ht-t4ht.tex" + static FILE* open_file( ARG_II(const C_CHAR *, const C_CHAR *) ); +#line 3860 "./tex4ht-t4ht.tex" + static void err_i( ARG_I(int) ); +#line 3876 "./tex4ht-t4ht.tex" + static void err_arg( ARG_I(int) ); +#line 3894 "./tex4ht-t4ht.tex" + static void warn_i_str( ARG_II(int,const Q_CHAR *) ); +#line 3978 "./tex4ht-t4ht.tex" + static void +#line 4019 "./tex4ht-t4ht.tex" + #ifdef CDECL CDECL #endif @@ -545,36 +701,56 @@ CDECL sig_err(ARG_I(int)); +#line 4105 "./tex4ht-t4ht.tex" + #ifdef KWIN32 static BOOL sigint_handler(ARG_I(DWORD)); #endif +#line 4169 "./tex4ht-t4ht.tex" + static void call_sys(ARG_I(Q_CHAR *)); +#line 4212 "./tex4ht-t4ht.tex" + static void strct( ARG_II(C_CHAR *, const C_CHAR *) ); +#line 4232 "./tex4ht-t4ht.tex" + static long int get_long_int( ARG_I(Q_CHAR *) ); +#line 4261 "./tex4ht-t4ht.tex" + static void* malloc_chk(ARG_I(int)); +#line 4278 "./tex4ht-t4ht.tex" + static void* r_alloc(ARG_II(void *, size_t)); +#line 4342 "./tex4ht-t4ht.tex" + static BOOL scan_until_end_str( ARG_IV(const C_CHAR *, int, BOOL, FILE *) ); +#line 4392 "./tex4ht-t4ht.tex" + static BOOL scan_until_str( ARG_IV(const C_CHAR *, int, BOOL, FILE *) ); +#line 4430 "./tex4ht-t4ht.tex" + static BOOL scan_str( ARG_III(const C_CHAR *, BOOL, FILE *) ); +#line 799 "./tex4ht-t4ht.tex" + #if defined(DOS_WIN32) || defined(__DJGPP__) static BOOL is_forward_slash @@ -598,6 +774,8 @@ static BOOL is_forward_slash #endif +#line 1073 "./tex4ht-t4ht.tex" + static char * abs_addr #ifdef ANSI @@ -638,6 +816,8 @@ static char * abs_addr } +#line 1384 "./tex4ht-t4ht.tex" + static void execute_script #ifdef ANSI @@ -667,6 +847,8 @@ static void execute_script Q_CHAR *p, *q; const Q_CHAR *t; +#line 1458 "./tex4ht-t4ht.tex" + #ifdef KPATHSEA const char * texmf = kpse_var_value( "SELFAUTOPARENT" ); #endif @@ -675,6 +857,8 @@ const char * texmf = kpse_var_value( "SELFAUTOPARENT" ); temp = script; system_return = 0; while( temp ){ +#line 1424 "./tex4ht-t4ht.tex" + p = temp->command; q = command; while( *p != '\0' ){ @@ -697,6 +881,8 @@ while( *p != '\0' ){ case '4':{ t = match_4; while( *t != '\0' ){ *(q++) = *(t++); } break; } case '~':{ +#line 1464 "./tex4ht-t4ht.tex" + #ifdef KPATHSEA if( texmf ){ t = texmf; @@ -717,6 +903,8 @@ while( *p != '\0' ){ if( (command[0] != '\0') && !system_return ){ +#line 4162 "./tex4ht-t4ht.tex" + (IGNORED) call_sys(command); } @@ -724,6 +912,8 @@ while( *p != '\0' ){ } } +#line 1536 "./tex4ht-t4ht.tex" + static struct script_struct * filterGifScript #ifdef ANSI @@ -753,6 +943,8 @@ static struct script_struct * filterGifScript command = old_script->command; if( *command != '.' ){ +#line 1559 "./tex4ht-t4ht.tex" + new_script = NULL_SCRIPT; while( old_script != NULL_SCRIPT ){ command = old_script->command; @@ -773,6 +965,10 @@ return filtered_script; } else { +#line 1578 "./tex4ht-t4ht.tex" + + +#line 1598 "./tex4ht-t4ht.tex" ext = file; while( *ext != '\0' ){ ext++; } @@ -794,6 +990,8 @@ while( TRUE ){ } } +#line 1559 "./tex4ht-t4ht.tex" + new_script = NULL_SCRIPT; while( old_script != NULL_SCRIPT ){ command = old_script->command; @@ -818,6 +1016,8 @@ return filtered_script; } +#line 1610 "./tex4ht-t4ht.tex" + void free_script #ifdef ANSI @@ -843,6 +1043,8 @@ void free_script } +#line 2156 "./tex4ht-t4ht.tex" + static BOOL strpre #ifdef ANSI @@ -868,6 +1070,8 @@ static BOOL strpre } +#line 3055 "./tex4ht-t4ht.tex" + static struct script_struct * add_script #ifdef ANSI @@ -904,8 +1108,12 @@ static struct script_struct * add_script } +#line 3576 "./tex4ht-t4ht.tex" + #if defined(__MSDOS__) +#line 3582 "./tex4ht-t4ht.tex" + static char *get_env_dir #ifdef ANSI @@ -942,6 +1150,8 @@ static char *get_env_dir #endif +#line 3631 "./tex4ht-t4ht.tex" + static FILE* f_open #ifdef ANSI @@ -967,6 +1177,8 @@ static FILE* f_open } +#line 3652 "./tex4ht-t4ht.tex" + static FILE* f_home_open #ifdef ANSI @@ -998,6 +1210,8 @@ static FILE* f_home_open } +#line 3682 "./tex4ht-t4ht.tex" + static FILE* open_file #ifdef ANSI @@ -1036,6 +1250,8 @@ static FILE* open_file } +#line 3864 "./tex4ht-t4ht.tex" + static void err_i #ifdef ANSI @@ -1057,6 +1273,8 @@ static void err_i } +#line 3880 "./tex4ht-t4ht.tex" + static void err_arg #ifdef ANSI @@ -1078,6 +1296,8 @@ static void err_arg } +#line 3898 "./tex4ht-t4ht.tex" + static void warn_i_str #ifdef ANSI @@ -1102,9 +1322,13 @@ static void warn_i_str } +#line 3987 "./tex4ht-t4ht.tex" + static void +#line 4019 "./tex4ht-t4ht.tex" + #ifdef CDECL CDECL #endif @@ -1134,6 +1358,8 @@ sig_err #endif } +#line 768 "./tex4ht-t4ht.tex" + #ifdef __DJGPP__ if (s != SIGINT && s != SIGQUIT) exit(EXIT_FAILURE); @@ -1143,6 +1369,8 @@ sig_err } +#line 4111 "./tex4ht-t4ht.tex" + #ifdef KWIN32 static BOOL sigint_handler @@ -1164,6 +1392,8 @@ static BOOL sigint_handler #endif +#line 4176 "./tex4ht-t4ht.tex" + static void call_sys #ifdef ANSI @@ -1188,6 +1418,8 @@ static void call_sys } +#line 4216 "./tex4ht-t4ht.tex" + static void strct #ifdef ANSI @@ -1213,6 +1445,8 @@ static void strct } +#line 4236 "./tex4ht-t4ht.tex" + static long int get_long_int #ifdef ANSI @@ -1238,6 +1472,8 @@ static long int get_long_int } +#line 4265 "./tex4ht-t4ht.tex" + static void* malloc_chk #ifdef ANSI @@ -1257,6 +1493,8 @@ static void* malloc_chk } +#line 4282 "./tex4ht-t4ht.tex" + static void* r_alloc #ifdef ANSI @@ -1280,6 +1518,8 @@ static void* r_alloc } +#line 4346 "./tex4ht-t4ht.tex" + static BOOL scan_until_end_str #ifdef ANSI @@ -1322,6 +1562,8 @@ static BOOL scan_until_end_str } +#line 4396 "./tex4ht-t4ht.tex" + static BOOL scan_until_str #ifdef ANSI @@ -1365,6 +1607,8 @@ static BOOL scan_until_str } +#line 4434 "./tex4ht-t4ht.tex" + static BOOL scan_str #ifdef ANSI @@ -1401,6 +1645,8 @@ static BOOL scan_str int +#line 4019 "./tex4ht-t4ht.tex" + #ifdef CDECL CDECL #endif @@ -1422,13 +1668,19 @@ CDECL #undef SEP #endif { +#line 1154 "./tex4ht-t4ht.tex" + struct empty_pic_struct *empty_pic; +#line 3555 "./tex4ht-t4ht.tex" + Q_CHAR * tex4ht_env_file = (Q_CHAR *) 0; Q_CHAR * dos_env_file = #if defined(__MSDOS__) +#line 3572 "./tex4ht-t4ht.tex" + get_env_dir(argv[0]) ; @@ -1440,6 +1692,8 @@ get_env_dir(argv[0]) +#line 3923 "./tex4ht-t4ht.tex" + #ifdef WIN32 /* See comments in tex4ht */ if (argc > 2) { @@ -1487,6 +1741,8 @@ get_env_dir(argv[0]) +#line 4028 "./tex4ht-t4ht.tex" + #ifdef SIGSEGV (void) signal(SIGSEGV,sig_err); @@ -1494,6 +1750,8 @@ get_env_dir(argv[0]) (void) signal(SIGFPE,sig_err); #ifdef KWIN32 +#line 4051 "./tex4ht-t4ht.tex" + SetConsoleCtrlHandler((PHANDLER_ROUTINE)sigint_handler, TRUE); @@ -1505,22 +1763,26 @@ SetConsoleCtrlHandler((PHANDLER_ROUTINE)sigint_handler, TRUE); +#line 173 "./tex4ht-t4ht.tex" + (IGNORED) printf("----------------------------\n"); #ifndef KPATHSEA #ifdef PLATFORM - (IGNORED) printf("t4ht.c (2012-07-25-19:28 %s)\n",PLATFORM); + (IGNORED) printf("t4ht.c (2018-06-28-11:26 %s)\n",PLATFORM); #else - (IGNORED) printf("t4ht.c (2012-07-25-19:28)\n"); + (IGNORED) printf("t4ht.c (2018-06-28-11:26)\n"); #endif #else #ifdef PLATFORM - (IGNORED) printf("t4ht.c (2012-07-25-19:28 %s kpathsea)\n",PLATFORM); + (IGNORED) printf("t4ht.c (2018-06-28-11:26 %s kpathsea)\n",PLATFORM); #else - (IGNORED) printf("t4ht.c (2012-07-25-19:28 kpathsea)\n"); + (IGNORED) printf("t4ht.c (2018-06-28-11:26 kpathsea)\n"); #endif #endif +#line 910 "./tex4ht-t4ht.tex" + { int i, count = 0; for(i=0; i<argc; i++){ Q_CHAR *p = argv[i]; @@ -1559,11 +1821,17 @@ SetConsoleCtrlHandler((PHANDLER_ROUTINE)sigint_handler, TRUE); +#line 1104 "./tex4ht-t4ht.tex" + HOME_DIR = getenv("HOME"); +#line 4142 "./tex4ht-t4ht.tex" + { C_CHAR *yes = NULL; system_yes = ( +#line 4154 "./tex4ht-t4ht.tex" + #ifdef SYSTEM_FUNCTION_OK 0 #else @@ -1574,6 +1842,8 @@ system( yes ) != 0 } +#line 4382 "./tex4ht-t4ht.tex" + { int i; for( i=0; i<=9; i++){ match[i] = (Q_CHAR *) malloc(70); @@ -1584,9 +1854,13 @@ system( yes ) != 0 +#line 892 "./tex4ht-t4ht.tex" + { int i; Q_CHAR *p, *q; +#line 1002 "./tex4ht-t4ht.tex" + #ifdef KPATHSEA kpse_set_program_name (argv[0], "tex4ht"); #endif @@ -1596,8 +1870,12 @@ system( yes ) != 0 if( argc == 1 ){ bad_arg; } for(i=1; i<argc; i++){ if( *( p=argv[i] ) == '-' ){ +#line 1014 "./tex4ht-t4ht.tex" + if( (int) strlen((char *) argv[i] ) == 2 ){ if( +#line 1041 "./tex4ht-t4ht.tex" + (*(p+1) != 'i') && (*(p+1) != 'p') && (*(p+1) != 'r') @@ -1612,6 +1890,8 @@ if( (int) strlen((char *) argv[i] ) == 2 ){ switch( *(p+1) ){ case 'M':{ ch_mod = q; newchmod = TRUE; break; } case 'S':{ +#line 2279 "./tex4ht-t4ht.tex" + { struct sys_call_rec *q; q = m_alloc(struct sys_call_rec, 1); q->next = system_calls; @@ -1623,6 +1903,8 @@ switch( *(p+1) ){ case 'X':{ Xfield = q; break;} case 'b':{ bitmaps_no_dm = q-1; break;} case 'c':{ +#line 2190 "./tex4ht-t4ht.tex" + struct env_c_rec *temp = (struct env_c_rec*) m_alloc(struct env_c_rec, (int) 1); temp->option = q; @@ -1632,10 +1914,14 @@ envChoice = temp; break;} case 'd':{ dir = (*q=='~')? abs_addr(q,NULL) : q; break; } case 'e':{ +#line 3482 "./tex4ht-t4ht.tex" + tex4ht_env_file = q; break; } case 'f':{ +#line 1058 "./tex4ht-t4ht.tex" + p = p + 2; lg_name = p + (int) strlen((char *) p ); while( *lg_name != *p ){ lg_name--; } @@ -1658,6 +1944,8 @@ lg_name++; } if( lg_name == NULL ){ bad_arg; } +#line 944 "./tex4ht-t4ht.tex" + { Q_CHAR *p, *q; FILE* file; (IGNORED) strcpy((char *) (char *) tmp_name, (char *) (char *) lg_name); @@ -1681,6 +1969,8 @@ lg_name++; +#line 968 "./tex4ht-t4ht.tex" + (IGNORED) strcpy((char *) job_name, (char *) tmp_name); *(job_name + strlen((char *) job_name) - 4) = '\0'; @@ -1689,14 +1979,22 @@ lg_name++; +#line 92 "./tex4ht-t4ht.tex" + + +#line 2910 "./tex4ht-t4ht.tex" { FILE* file; U_CHAR env_loc[512]; env_loc[0] = '\0'; +#line 3164 "./tex4ht-t4ht.tex" + { Q_CHAR str[512], *TEX4HTENV; +#line 3449 "./tex4ht-t4ht.tex" + if( tex4ht_env_file ){ if( debug ){ (IGNORED) printf("%s?\n", tex4ht_env_file); @@ -1713,6 +2011,8 @@ if( debug && file ){ +#line 3152 "./tex4ht-t4ht.tex" + if( !file ) { if( debug ){ (IGNORED) printf("tex4ht.env?\n"); @@ -1725,6 +2025,8 @@ if( !file ) { +#line 3203 "./tex4ht-t4ht.tex" + #ifndef DOS_WIN32 if( !file ) { if( debug ){ @@ -1739,6 +2041,8 @@ if( !file ) { +#line 3186 "./tex4ht-t4ht.tex" + if( !file ){ TEX4HTENV = getenv("TEX4HTENV"); if( TEX4HTENV ){ @@ -1751,8 +2055,12 @@ if( !file ){ +#line 3390 "./tex4ht-t4ht.tex" + if( !file ){ if( HOME_DIR ){ (IGNORED) sprintf(str, +#line 3429 "./tex4ht-t4ht.tex" + #if defined(DOS_WIN32) || defined(__DJGPP__) is_forward_slash(HOME_DIR)? "%s/tex4ht.env" : "%s\\tex4ht.env" #else @@ -1797,6 +2105,8 @@ if( !file ){ +#line 3217 "./tex4ht-t4ht.tex" + #ifdef ENVFILE if( !file ) { if( debug ){ @@ -1811,6 +2121,8 @@ if( !file ){ if( !file ) { +#line 3465 "./tex4ht-t4ht.tex" + if( dos_env_file ){ if( debug ){ (IGNORED) printf("%s?\n", dos_env_file); @@ -1823,11 +2135,15 @@ if( dos_env_file ){ } +#line 3253 "./tex4ht-t4ht.tex" + #ifdef KPATHSEA if( !file ) { U_CHAR * envfile; char *arch, *p, str[256]; +#line 3280 "./tex4ht-t4ht.tex" + p = arch = (char *) kpse_var_value( "SELFAUTOLOC" ); while( *p != '\0' ){ if( (*p == '/') || (*p == '\\') ){ @@ -1839,6 +2155,8 @@ while( *p != '\0' ){ envfile = (char *) 0; +#line 3291 "./tex4ht-t4ht.tex" + if( arch ){ (IGNORED) sprintf(str,"%s%ctex4ht.env", arch+1, *arch); if( debug ){ @@ -1850,6 +2168,8 @@ if( arch ){ if ( !envfile ){ +#line 3303 "./tex4ht-t4ht.tex" + if( debug ){ (IGNORED) printf( "kpse_open_file (\"tex4ht.env\", kpse_program_text_format)?\n"); @@ -1858,8 +2178,12 @@ envfile= kpse_find_file ("tex4ht.env", kpse_program_text_format, 0); } if ( !envfile ){ +#line 3357 "./tex4ht-t4ht.tex" + if( system("kpsewhich --progname=tex4ht tex4ht.env > tex4ht.tmp") == 0 ){ +#line 3370 "./tex4ht-t4ht.tex" + char fileaddr [256]; int loc = 0; FILE* file = f_open("tex4ht.tmp", READ_TEXT_FLAGS); @@ -1887,6 +2211,8 @@ if( file ){ if( debug ){ U_CHAR *p, *q; +#line 3322 "./tex4ht-t4ht.tex" + p = (U_CHAR *) kpse_var_value( "T4HTINPUTS" ); if( p ){ (IGNORED) printf("T4HTINPUTS = %s\n", p); @@ -1905,6 +2231,8 @@ if( !p && !q ){ if( !file ) warn_i_str( 5, +#line 3241 "./tex4ht-t4ht.tex" + #ifdef DOS_WIN32 "tex4ht.env" #endif @@ -1918,6 +2246,8 @@ if( !p && !q ){ if( file ){ +#line 2927 "./tex4ht-t4ht.tex" + eoln_ch = (int) 'x'; while( eoln_ch != EOF ) { Q_CHAR ch; ch = (char) (eoln_ch = getc(file)); @@ -1926,41 +2256,55 @@ while( eoln_ch != EOF ) { Q_CHAR ch; if( status ){ switch( ch ){ case 'A':{ +#line 2992 "./tex4ht-t4ht.tex" + if( debug ){ (IGNORED) printf(".......'A' script\n"); } chmod_script = add_script(chmod_script); break;} case 'C':{ +#line 2967 "./tex4ht-t4ht.tex" + if( debug ){ (IGNORED) printf(".......'C' script\n"); } copy_script = add_script(copy_script); break;} case 'E':{ +#line 2998 "./tex4ht-t4ht.tex" + if( debug ){ (IGNORED) printf(".......'E' script\n"); } empty_fig_script = add_script(empty_fig_script); break;} case 'F':{ +#line 2953 "./tex4ht-t4ht.tex" + if( debug ){ (IGNORED) printf(".......'F' script\n"); } dvigif_glyp_script = add_script(dvigif_glyp_script); break;} case 'G':{ +#line 1179 "./tex4ht-t4ht.tex" + if( debug ){ (IGNORED) printf(".......'G' script\n"); } dvigif_script = add_script(dvigif_script); break;} case 'M':{ +#line 2960 "./tex4ht-t4ht.tex" + if( debug ){ (IGNORED) printf(".......'M' script\n"); } move_script = add_script(move_script); break;} case 'S':{ +#line 2266 "./tex4ht-t4ht.tex" + { struct sys_call_rec *q; q = m_alloc(struct sys_call_rec, 1); q->next = system_calls; @@ -1974,30 +2318,44 @@ if( debug ){ break;} case 'X':{ +#line 2977 "./tex4ht-t4ht.tex" + if( debug ){ (IGNORED) printf(".......'X' script\n"); } +#line 2235 "./tex4ht-t4ht.tex" + file_script = add_script( +#line 2235 "./tex4ht-t4ht.tex" + file_script ); break;} case '.':{ +#line 2983 "./tex4ht-t4ht.tex" + if( debug ){ (IGNORED) printf(".......'.' script\n"); } +#line 2171 "./tex4ht-t4ht.tex" + ext_script = add_script( +#line 2171 "./tex4ht-t4ht.tex" + ext_script ); break;} case '<':{ +#line 3009 "./tex4ht-t4ht.tex" + if( *(match[1]) != '/' ){ U_CHAR *p; BOOL env_skip; @@ -2006,6 +2364,8 @@ if( *(match[1]) != '/' ){ p++ ){} if( *p == '>' ){ *p = '\0'; } +#line 2198 "./tex4ht-t4ht.tex" + if( envChoice == (struct env_c_rec*) 0 ){ env_skip = !eq_str(match[1], "default" ); } else { @@ -2018,6 +2378,8 @@ if( envChoice == (struct env_c_rec*) 0 ){ if( env_skip ){ +#line 3030 "./tex4ht-t4ht.tex" + U_CHAR cur_block[90]; if( debug ){ (IGNORED) printf("....... <%s> skipping ...\n", match[1]); @@ -2057,15 +2419,23 @@ while( !status && (eoln_ch != EOF) ){ lg_file = open_file(lg_name,LG_EXT); if( lg_file ) { +#line 3755 "./tex4ht-t4ht.tex" + begin_lg_file = ftell(lg_file); +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 274 "./tex4ht-t4ht.tex" + if( check_tex4ht_c_err ){ eoln_ch = (int) 'x'; while( eoln_ch != EOF ) { @@ -2081,12 +2451,20 @@ if( check_tex4ht_c_err ){ +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 1700 "./tex4ht-t4ht.tex" + { +#line 2052 "./tex4ht-t4ht.tex" + Q_CHAR *file_name, file_mode[5]; int i, start_loc, end_loc, addr = 0; char rec_op, *ch; @@ -2115,6 +2493,8 @@ BOOL write_on; ( eq_str(match[2],"Skip ")? Skip_op : ( eq_str(match[2],"Cont ")? Cont_op : No_op ))); if( rec_op == No_op ){ +#line 1736 "./tex4ht-t4ht.tex" + ch = match[2]; if( (ch[0]=='S') && (ch[1]=='e') && (ch[2]=='t') ){ ch += 3; rec_op = Set_op; @@ -2133,11 +2513,15 @@ if( rec_op != No_op ){ match[1], match[2], match[3], match[4], match[5]); } else { +#line 1998 "./tex4ht-t4ht.tex" + file_name = match[1]; *(file_name + (int) strlen((char *) file_name) - 1) = '\0'; strcpy((char *) file_mode, WRITE_TEXT_FLAGS); for(i=1; i<=2; i++){ +#line 2017 "./tex4ht-t4ht.tex" + for( p = opened_files; p != (struct files_rec*) 0; p = p->right ){ if( eq_str(file_name,p->name) ) { break; } } @@ -2156,6 +2540,8 @@ to_rec = from_rec; from_rec = p; file_name = match[5]; strcpy((char *) file_mode, +#line 4305 "./tex4ht-t4ht.tex" + READ_BIN_FLAGS ); @@ -2163,8 +2549,12 @@ READ_BIN_FLAGS +#line 1959 "./tex4ht-t4ht.tex" + if( to_rec->down == (struct files_rec*) 0 ){ +#line 1973 "./tex4ht-t4ht.tex" + to_rec->down = p = m_alloc(struct files_rec, 1); p->up = to_rec; p->right = p->left = p->down = (struct files_rec*) 0; @@ -2184,6 +2574,8 @@ to_rec = p; } if( to_rec->from_rec != from_rec ){ +#line 1985 "./tex4ht-t4ht.tex" + to_rec->right = p = m_alloc(struct files_rec, 1); p->left = to_rec; p->right = p->down = (struct files_rec*) 0; @@ -2199,8 +2591,12 @@ to_rec = p; +#line 1913 "./tex4ht-t4ht.tex" + if( to_rec->down == (struct files_rec*) 0 ){ +#line 1929 "./tex4ht-t4ht.tex" + to_rec->down = p = m_alloc(struct files_rec, 1); p->up = to_rec; p->right = p->left = p->down = (struct files_rec*) 0; @@ -2222,6 +2618,8 @@ to_rec = p; } if( !eq_str(to_rec->group,match[3]) ){ +#line 1943 "./tex4ht-t4ht.tex" + to_rec->right = p = m_alloc(struct files_rec, 1); p->left = to_rec; p->right = p->down = (struct files_rec*) 0; @@ -2239,6 +2637,8 @@ to_rec = p; +#line 1900 "./tex4ht-t4ht.tex" + p = m_alloc(struct files_rec, 1); p->down = to_rec->down; to_rec->down = p; p->up = to_rec; @@ -2252,6 +2652,8 @@ p->label = addr; +#line 1782 "./tex4ht-t4ht.tex" + if( rec_op == Until_op ){ for( p = to_rec->down; p != (struct files_rec*) 0; p = p->down ){ @@ -2259,6 +2661,8 @@ if( rec_op == Until_op ){ } if( p == (struct files_rec*) 0 ){ +#line 1882 "./tex4ht-t4ht.tex" + (IGNORED) fprintf(stderr,"%sMissing `CopyTo From':\n", "--- warning --- "); for( p = to_rec->down; p != (struct files_rec*) 0; p = p->down ){ (IGNORED) fprintf(stderr," %s %s%d %s\n", to_rec->name, @@ -2275,16 +2679,22 @@ for( p = to_rec->down; p != (struct files_rec*) 0; p = p->down ){ } else { +#line 1800 "./tex4ht-t4ht.tex" + in_file = from_rec->file; out_file = to_rec->file; start_loc = from_op->loc; write_on = TRUE; (IGNORED) fseek(in_file, (long) start_loc, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); for( p= from_op; p != to_rec; p = p->up ){ switch( p->op ){ case Until_op:{ +#line 1817 "./tex4ht-t4ht.tex" + if( write_on ){ end_loc = p->loc; for(; start_loc<end_loc; start_loc++) { @@ -2293,6 +2703,8 @@ if( write_on ){ break; } case Skip_op:{ +#line 1826 "./tex4ht-t4ht.tex" + if( write_on ){ end_loc = p->loc; for(; start_loc<end_loc; start_loc++) { @@ -2303,6 +2715,8 @@ write_on = FALSE; break; } case Cont_op:{ +#line 1837 "./tex4ht-t4ht.tex" + end_loc = p->loc; if( write_on ){ for(; start_loc<end_loc; start_loc++) { @@ -2311,6 +2725,8 @@ if( write_on ){ } else { start_loc = end_loc; (IGNORED) fseek(in_file, (long) end_loc, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); } @@ -2318,6 +2734,8 @@ write_on = TRUE; break; } case Set_op:{ +#line 1851 "./tex4ht-t4ht.tex" + addr = -1; for( p1 = from_op->up; p1 != to_rec; p1 = p1->up ){ if( (p1->op == Addr_op) && (p1->label == p->label) ){ @@ -2331,6 +2749,8 @@ if( addr != -1 ){ (p->up)->loc = addr; } +#line 1861 "./tex4ht-t4ht.tex" + to_rec->down = from_op->down; if( from_op->down != (struct files_rec*) 0){ (from_op->down)->up = to_rec; @@ -2357,14 +2777,22 @@ if( to_rec->down == (struct files_rec*) 0){ } } } +#line 1749 "./tex4ht-t4ht.tex" + for( p = opened_files; p != (struct files_rec*) 0; ){ (IGNORED) fclose(p->file); free((void *) p->name); +#line 1758 "./tex4ht-t4ht.tex" + for( p1 = p->down; p1 != (struct files_rec*) 0; ){ +#line 1765 "./tex4ht-t4ht.tex" + for( p2 = p1->down; p2 != (struct files_rec*) 0; ){ +#line 1772 "./tex4ht-t4ht.tex" + for( p3 = p2->down; p3 != (struct files_rec*) 0; ){ p4 = p3; p3 = p3->down; free((void *) p4); } @@ -2386,11 +2814,17 @@ for( p3 = p2->down; p3 != (struct files_rec*) 0; ){ +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 2368 "./tex4ht-t4ht.tex" + { struct htf_struct *last_rec, *p; last_rec = (struct htf_struct *) 0; eoln_ch = (int) 'x'; @@ -2398,6 +2832,8 @@ for( p3 = p2->down; p3 != (struct files_rec*) 0; ){ status = scan_str("htfcss: ", TRUE, lg_file); status = scan_until_end_str("", 1, status, lg_file); +#line 2383 "./tex4ht-t4ht.tex" + if( status ){ Q_CHAR *s, *t; int i; @@ -2414,9 +2850,13 @@ if( status ){ if( status ){ Q_CHAR *key, *body, *media; media = body = key = match[1]; +#line 2400 "./tex4ht-t4ht.tex" + while( *body && (*body != ' ') ){ body++; } if( *body == ' ' ){ media = body; *(body++) = '\0'; } +#line 2412 "./tex4ht-t4ht.tex" + if( (int) strlen((char *) body) > 6 ){ if( (*(body) == '@') && (*(body+1) == 'm') @@ -2436,6 +2876,8 @@ if( (int) strlen((char *) body) > 6 ){ if( *body ){ if( *key ){ +#line 2430 "./tex4ht-t4ht.tex" + p = m_alloc(struct htf_struct, 1); p->next = (struct htf_struct *) 0; p->key = m_alloc(char, (int) strlen((char *) key) + 1); @@ -2456,6 +2898,8 @@ if( debug ){ } #if 0 /* unreachable */ else if( last_rec ){ +#line 2449 "./tex4ht-t4ht.tex" + last_rec->body = (Q_CHAR *) r_alloc((void *) last_rec->body, (size_t) strlen((char *) last_rec->body) + (size_t) strlen((char *) body) @@ -2476,11 +2920,17 @@ if( debug ){ +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 2471 "./tex4ht-t4ht.tex" + eoln_ch = (int) 'x'; while( eoln_ch != EOF ) { status = scan_str("Font_Css_Plus ", TRUE, lg_file); @@ -2490,6 +2940,8 @@ while( eoln_ch != EOF ) { key = match[1]; *(key + (int) strlen((char *) key) - 1) = '\0'; +#line 2486 "./tex4ht-t4ht.tex" + if( (*key != '\0') && (*key != '\n') ) { struct htf_struct *p; p = m_alloc(struct htf_struct, 1); @@ -2508,11 +2960,17 @@ if( (*key != '\0') && (*key != '\n') ) { +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 1124 "./tex4ht-t4ht.tex" + { struct empty_pic_struct *last; last = empty_pic = (struct empty_pic_struct *) 0; while( TRUE ) { @@ -2520,6 +2978,8 @@ if( (*key != '\0') && (*key != '\n') ) { status = scan_until_str( ".idv[" , 1, status, lg_file); status = scan_until_end_str("] ---", 1, status, lg_file); if( status ){ +#line 1141 "./tex4ht-t4ht.tex" + if( last == (struct empty_pic_struct *) 0 ){ last = empty_pic = (struct empty_pic_struct *) m_alloc(struct empty_pic_struct, (int) 1); @@ -2534,6 +2994,8 @@ last->n = get_long_int(match[1]); if ( eoln_ch == EOF ){ break; } } +#line 1141 "./tex4ht-t4ht.tex" + if( last == (struct empty_pic_struct *) 0 ){ last = empty_pic = (struct empty_pic_struct *) m_alloc(struct empty_pic_struct, (int) 1); @@ -2551,11 +3013,17 @@ last->n = get_long_int(match[1]); +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 1192 "./tex4ht-t4ht.tex" + { BOOL characters, skip; characters = skip = FALSE; while( TRUE ) { @@ -2565,6 +3033,8 @@ last->n = get_long_int(match[1]); if( eq_str(match[1],"--- ") ){ if( eq_str(match[2],"needs ---") ){ +#line 1231 "./tex4ht-t4ht.tex" + status = scan_until_str(" ", 1, status, lg_file); status = scan_until_str(".idv", 1, status, lg_file); status = scan_until_str("[", 2, status, lg_file); @@ -2574,6 +3044,8 @@ status = scan_until_str(" ", 3, status, lg_file); status = scan_until_end_str("---", 4, status, lg_file); if( status ) { +#line 1353 "./tex4ht-t4ht.tex" + struct script_struct * filtered_dvigif_script = NULL_SCRIPT; @@ -2585,6 +3057,8 @@ struct script_struct *(p + (int) strlen((char *) p) - 6) = '\0'; if( characters ){ +#line 1295 "./tex4ht-t4ht.tex" + Q_CHAR filename[255]; FILE* file; (IGNORED) strcpy((char *) filename, ""); @@ -2593,6 +3067,8 @@ if( dir && !bitmaps_no_dm ){ (IGNORED) strct(filename, dir); } file = fopen(filename, READ_TEXT_FLAGS); if( !file || noreuse ){ +#line 1332 "./tex4ht-t4ht.tex" + filtered_dvigif_script = dvigif_glyp_script? filterGifScript(dvigif_glyp_script, match[3]): filterGifScript(dvigif_script, match[3]); @@ -2602,6 +3078,8 @@ filtered_dvigif_script = dvigif_glyp_script? if( dir && !bitmaps_no_dm && !system_return ){ (void) execute_script(move_script,match[3],dir,".",""); +#line 1346 "./tex4ht-t4ht.tex" + if( ch_mod && !bitmaps_no_dm && !system_return ){ (void) execute_script(chmod_script, ch_mod, dir?dir:"",match[3], ""); } @@ -2614,6 +3092,8 @@ if( ch_mod && !bitmaps_no_dm && !system_return ){ (IGNORED) fclose(file); if( newchmod ) { +#line 1346 "./tex4ht-t4ht.tex" + if( ch_mod && !bitmaps_no_dm && !system_return ){ (void) execute_script(chmod_script, ch_mod, dir?dir:"",match[3], ""); } @@ -2625,11 +3105,17 @@ if( ch_mod && !bitmaps_no_dm && !system_return ){ } else { +#line 1258 "./tex4ht-t4ht.tex" + if( gif_i == +#line 1286 "./tex4ht-t4ht.tex" + empty_pic->n ) { +#line 1272 "./tex4ht-t4ht.tex" + if( !skip ){ (void) execute_script(empty_fig_script, (dir && !bitmaps_no_dm )? dir :"", match[3],"",""); @@ -2642,8 +3128,12 @@ empty_pic = empty_pic->next; } else { +#line 1265 "./tex4ht-t4ht.tex" + if( !nopict && !skip ){ +#line 1319 "./tex4ht-t4ht.tex" + filtered_dvigif_script = filterGifScript(dvigif_script, match[3]); (void) execute_script( filtered_dvigif_script,match[1],match[2],match[3],job_name); @@ -2666,15 +3156,21 @@ if( ch_mod && !bitmaps_no_dm && !system_return ){ } else if( eq_str(match[2],"characters ---") ){ +#line 1221 "./tex4ht-t4ht.tex" + status = scan_until_end_str("", 1, status, lg_file); characters = eq_str(match[1],""); } else { +#line 1212 "./tex4ht-t4ht.tex" + status = scan_until_end_str("", 1, status, lg_file); } } else { +#line 1643 "./tex4ht-t4ht.tex" + status = scan_until_end_str(" ignore ---", 2, status, lg_file); if( status ){ skip = eq_str(match[2]," ignore ---") ? TRUE : @@ -2688,16 +3184,24 @@ if( status ){ +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 2534 "./tex4ht-t4ht.tex" + { Q_CHAR css_name[255]; FILE *css_file, *tmp_file; BOOL css_sty; +#line 2578 "./tex4ht-t4ht.tex" + (IGNORED) strcpy((char *) css_name, (char *) job_name); (IGNORED) strct(css_name, ".css"); css_file = fopen(css_name, READ_TEXT_FLAGS); @@ -2709,6 +3213,8 @@ css_file = fopen(css_name, READ_TEXT_FLAGS); if( !tmp_file ) { (IGNORED) warn_i_str(5,tmp_name); } else { +#line 2568 "./tex4ht-t4ht.tex" + int ch; while( (ch = getc(css_file)) != EOF ) { (IGNORED) putc( ch, tmp_file ); @@ -2725,11 +3231,15 @@ while( (ch = getc(css_file)) != EOF ) { (IGNORED) warn_i_str(5,css_name); } else { +#line 2590 "./tex4ht-t4ht.tex" + css_sty = FALSE; eoln_ch = (int) 'x'; while( eoln_ch != EOF ) { status = scan_until_end_str("", 1, TRUE, tmp_file); +#line 2607 "./tex4ht-t4ht.tex" + { Q_CHAR *p, *q; int n; n = 0; p = match[1]; q = match[2]; @@ -2749,13 +3259,21 @@ while( eoln_ch != EOF ) { if( css_sty ){ +#line 2624 "./tex4ht-t4ht.tex" + (IGNORED) fprintf(css_file, "/* start css.sty */\n"); +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 2797 "./tex4ht-t4ht.tex" + eoln_ch = (int) 'x'; while( eoln_ch != EOF ) { status = scan_str("Font_css_base: ", TRUE, lg_file); @@ -2771,11 +3289,17 @@ while( eoln_ch != EOF ) { +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 2682 "./tex4ht-t4ht.tex" + eoln_ch = (int) 'x'; while( eoln_ch != EOF ) { status = scan_str("Font_Size: ", TRUE, lg_file); @@ -2786,11 +3310,17 @@ while( eoln_ch != EOF ) { +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 2711 "./tex4ht-t4ht.tex" + eoln_ch = (int) 'x'; while( eoln_ch != EOF ) { status = scan_str("Font(\"", TRUE, lg_file); @@ -2811,6 +3341,8 @@ while( eoln_ch != EOF ) { p = match[4]; *(p + (int) strlen((char *) p) - 2) = '\0'; +#line 2759 "./tex4ht-t4ht.tex" + { Q_CHAR *p; second = (int) ( (int) get_long_int(match[3]) @@ -2824,6 +3356,8 @@ while( eoln_ch != EOF ) { p++; } +#line 2779 "./tex4ht-t4ht.tex" + if( (int) ( (double) get_long_int(match[2]) / (int) get_long_int(match[4]) + 0.5 @@ -2838,11 +3372,15 @@ if( (int) ( (double) get_long_int(match[2]) +#line 2740 "./tex4ht-t4ht.tex" + font_sty = htf_rec; while ( font_sty ) { if( eq_str(font_sty->key,match[1]) ){ if( *(font_sty->media) == '\0' ){ +#line 2823 "./tex4ht-t4ht.tex" + (IGNORED) fprintf(css_file, (Font_css_base == NULL)? ".%s-%s" : Font_css_base, match[1], match[2]); @@ -2864,6 +3402,8 @@ if( font_sty ) { second = 100; } else { +#line 2843 "./tex4ht-t4ht.tex" + (IGNORED) fprintf(css_file, "@media %s{", font_sty->media); (IGNORED) fprintf(css_file, (Font_css_base == NULL)? ".%s-%s" : Font_css_base, @@ -2885,6 +3425,8 @@ if( font_sty ) { font_sty = font_sty->next; } if( second != 100 ){ +#line 2823 "./tex4ht-t4ht.tex" + (IGNORED) fprintf(css_file, (Font_css_base == NULL)? ".%s-%s" : Font_css_base, match[1], match[2]); @@ -2909,14 +3451,22 @@ if( font_sty ) { +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 2867 "./tex4ht-t4ht.tex" + { char *font_class [256]; int last_class; +#line 2886 "./tex4ht-t4ht.tex" + last_class = 0; eoln_ch = (int) 'x'; while( eoln_ch != EOF ) { @@ -2929,7 +3479,11 @@ while( eoln_ch != EOF ) { match[1] = (Q_CHAR *) malloc(7); max_match[1] = 7; } } +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); @@ -2950,11 +3504,17 @@ while( eoln_ch != EOF ) { +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 2663 "./tex4ht-t4ht.tex" + eoln_ch = (int) 'x'; while( eoln_ch != EOF ) { status = scan_str("Css: ", TRUE, lg_file); @@ -2968,10 +3528,14 @@ while( eoln_ch != EOF ) { +#line 2645 "./tex4ht-t4ht.tex" + eoln_ch = (int) 'x'; while( eoln_ch != EOF ) { status = scan_until_end_str("", 1, TRUE, tmp_file); +#line 2607 "./tex4ht-t4ht.tex" + { Q_CHAR *p, *q; int n; n = 0; p = match[1]; q = match[2]; @@ -2998,12 +3562,20 @@ while( eoln_ch != EOF ) { +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 2082 "./tex4ht-t4ht.tex" + if( +#line 2171 "./tex4ht-t4ht.tex" + ext_script ){ @@ -3020,16 +3592,22 @@ ext_script while( *(--ext) != '.' ){ ; } *ext = '\0'; ext++; +#line 2104 "./tex4ht-t4ht.tex" + { struct script_struct *cur, *add, *temp; Q_CHAR extPlus[256]; cur = +#line 2171 "./tex4ht-t4ht.tex" + ext_script ; add = cur_script = NULL_SCRIPT; while( cur ){ +#line 2125 "./tex4ht-t4ht.tex" + (IGNORED) strcpy((char *) extPlus, (char *) ext); /* if ( envChoice ) { @@ -3041,6 +3619,8 @@ ext_script if( strpre(extPlus, cur->command) ){ +#line 2135 "./tex4ht-t4ht.tex" + temp = (struct script_struct *) m_alloc(struct script_struct, (int) 1); temp->command = m_alloc(char, (int) strlen((char *) cur->command) + 1); @@ -3061,6 +3641,8 @@ temp->next = NULL_SCRIPT; (void) execute_script(cur_script, match[1], Dotfield? Dotfield : "", "", ""); +#line 2144 "./tex4ht-t4ht.tex" + while( cur_script != (struct script_struct*) 0 ){ struct script_struct *temp; temp = cur_script; cur_script = cur_script->next; free((void *) temp); @@ -3071,12 +3653,20 @@ while( cur_script != (struct script_struct*) 0 ){ +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 2217 "./tex4ht-t4ht.tex" + if( +#line 2235 "./tex4ht-t4ht.tex" + file_script ){ @@ -3097,11 +3687,17 @@ file_script +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 112 "./tex4ht-t4ht.tex" + eoln_ch = (int) 'x'; while( eoln_ch != EOF ) { status = scan_str("File: ", TRUE, lg_file); @@ -3127,11 +3723,17 @@ while( eoln_ch != EOF ) { +#line 3759 "./tex4ht-t4ht.tex" + (IGNORED) fseek(lg_file, begin_lg_file, +#line 3763 "./tex4ht-t4ht.tex" + 0 ); +#line 2245 "./tex4ht-t4ht.tex" + eoln_ch = (int) 'x'; while( eoln_ch != EOF ) { Q_CHAR *command, ch; int n; @@ -3144,6 +3746,8 @@ while( eoln_ch != EOF ) { Q_CHAR *command, ch; command = match[2]; *(command + (int) strlen((char *) command) - 5) = '\0'; +#line 2289 "./tex4ht-t4ht.tex" + flag = FALSE; p = system_calls; while( p ){ @@ -3163,6 +3767,8 @@ while( p ){ if( flag ){ +#line 4162 "./tex4ht-t4ht.tex" + (IGNORED) call_sys(command); |