3 Copyright 2006-2012 Taco Hoekwater <taco@luatex.org>
5 This file is part of LuaTeX.
7 LuaTeX is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 2 of the License, or (at your
10 option) any later version.
12 LuaTeX is distributed in the hope that it will be useful, but WITHOUT
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public
15 License for more details.
17 You should have received a copy of the GNU General Public License along
18 with LuaTeX; if not, see <http://www.gnu.org/licenses/>. */
21 # define LUATEX_API_H 1
23 /* output modes, a bad place but this compiles at least */
25 typedef enum { OMODE_NONE
, OMODE_DVI
, OMODE_PDF
} output_mode
;
27 # define MAX_OMODE 2 /* largest index in enum output_mode */
29 extern int output_mode_used
;
30 extern int output_mode_option
;
31 extern int output_mode_value
;
32 extern int draft_mode_option
;
33 extern int draft_mode_value
;
35 /* get_o_mode translates from output_mode to output_mode_used */
36 /* fix_o_mode freezes output_mode as soon as anything goes through the backend */
38 extern output_mode
get_o_mode(void);
39 extern void fix_o_mode(void);
51 # define MyName "LuajitTeX"
52 # define my_name "luajittex"
54 # define MyName "LuaTeX"
55 # define my_name "luatex"
62 typedef struct LoadS
{
67 extern lua_State
*Luas
;
69 extern void make_table(lua_State
* L
, const char *tab
, const char *mttab
, const char *getfunc
,
72 extern int luac_main(int argc
, char *argv
[]);
74 extern int luaopen_tex(lua_State
* L
);
75 extern int luaopen_pdf(lua_State
* L
);
76 extern int luaopen_texio(lua_State
* L
);
77 extern int luaopen_lang(lua_State
* L
);
79 # define LUA_TEXFILEHANDLE "TEXFILE*"
81 extern lua_State
*luatex_error(lua_State
* L
, int fatal
);
83 extern int luaopen_unicode(lua_State
* L
);
84 extern int luaopen_zip(lua_State
* L
);
85 extern int luaopen_lfs(lua_State
* L
);
86 extern int luaopen_lpeg(lua_State
* L
);
87 extern int luaopen_md5(lua_State
* L
);
88 extern int luatex_md5_lua_open(lua_State
* L
);
90 extern int luaopen_zlib(lua_State
* L
);
91 extern int luaopen_gzip(lua_State
* L
);
92 extern int luaopen_ff(lua_State
* L
);
93 extern int luaopen_profiler(lua_State
* L
);
95 extern int luaopen_socket_core(lua_State
* L
);
96 extern int luaopen_mime_core(lua_State
* L
);
97 extern void luatex_socketlua_open(lua_State
* L
);
99 extern int luaopen_img(lua_State
* L
);
100 extern int l_new_image(lua_State
* L
);
101 extern int luaopen_epdf(lua_State
* L
);
102 extern int luaopen_pdfscanner(lua_State
* L
);
103 extern int luaopen_mplib(lua_State
* L
);
105 extern void open_oslibext(lua_State
* L
, int safer_option
);
106 extern int open_iolibext(lua_State
* L
);
107 extern void open_strlibext(lua_State
* L
);
108 extern void open_lfslibext(lua_State
* L
);
110 extern void initfilecallbackids(int max
);
111 extern void setinputfilecallbackid(int n
, int i
);
112 extern void setreadfilecallbackid(int n
, int i
);
113 extern int getinputfilecallbackid(int n
);
114 extern int getreadfilecallbackid(int n
);
116 extern void lua_initialize(int ac
, char **av
);
118 extern int luaopen_kpse(lua_State
* L
);
120 extern int luaopen_callback(lua_State
* L
);
122 extern int luaopen_lua(lua_State
* L
, char *fname
);
124 extern int luaopen_stats(lua_State
* L
);
126 extern int luaopen_font(lua_State
* L
);
127 extern int luaopen_vf(lua_State
* L
);
128 extern int font_to_lua(lua_State
* L
, int f
);
129 extern int font_from_lua(lua_State
* L
, int f
); /* return is boolean */
131 extern int luaopen_oldtoken(lua_State
* L
);
132 extern int luaopen_token(lua_State
* L
);
133 extern void tokenlist_to_lua(lua_State
* L
, int p
);
134 extern void tokenlist_to_luastring(lua_State
* L
, int p
);
135 extern int tokenlist_from_lua(lua_State
* L
);
137 extern void lua_nodelib_push(lua_State
* L
);
138 extern int nodelib_getdir(lua_State
* L
, int n
, int absolute_only
);
139 extern int nodelib_getlist(lua_State
* L
, int n
);
141 extern int luaopen_node(lua_State
* L
);
142 extern void nodelist_to_lua(lua_State
* L
, int n
);
143 extern int nodelist_from_lua(lua_State
* L
);
145 extern int dimen_to_number(lua_State
* L
, const char *s
);
147 extern int get_command_id(const char *s
);
149 extern void dump_luac_registers(void);
151 extern void undump_luac_registers(void);
156 extern char *jithash_hashname
;
159 #if !defined(LUAI_HASHLIMIT)
160 #define LUAI_HASHLIMIT 5
162 extern unsigned char show_luahashchars
;
164 extern void unhide_lua_table(lua_State
* lua
, const char *name
, int r
);
165 extern int hide_lua_table(lua_State
* lua
, const char *name
);
167 extern void unhide_lua_value(lua_State
* lua
, const char *name
,
168 const char *item
, int r
);
169 extern int hide_lua_value(lua_State
* lua
, const char *name
, const char *item
);
171 typedef struct command_item_
{
172 const char *cmd_name
;
174 const char **commands
;
177 extern command_item command_names
[];
178 extern int callback_callbacks_id
;
180 extern void luainterpreter(void);
182 extern int luabytecode_max
;
183 extern unsigned int luabytecode_bytes
;
184 extern int luastate_bytes
;
186 extern int callback_count
;
187 extern int saved_callback_count
;
189 extern const char *luatex_banner
;
194 const char *name
; /* parameter name */
195 int idx
; /* index within img_parms array */
198 extern void preset_environment(lua_State
* L
, const parm_struct
* p
, const char *s
);
200 extern char *startup_filename
;
201 extern int safer_option
;
202 extern int nosocket_option
;
204 extern char *last_source_name
;
205 extern int last_lineno
;
207 extern int program_name_set
; /* in lkpselib.c */
213 extern int loader_C_luatex(lua_State
* L
, const char *name
, const char *filename
);
214 extern int loader_Call_luatex(lua_State
* L
, const char *name
, const char *filename
);
216 extern void init_tex_table(lua_State
* L
);
218 extern int tex_table_id
;
219 extern int pdf_table_id
;
220 extern int token_table_id
;
221 extern int oldtoken_table_id
;
222 extern int node_table_id
;
223 extern int main_initialize(void);
225 extern int do_run_callback(int special
, const char *values
, va_list vl
);
226 extern int lua_traceback(lua_State
* L
);
230 extern char *luanames
[];
232 extern int ff_get_ttc_index(char *ffname
, char *psname
); /* luafontloader/src/luafflib.c */
233 extern int ff_createcff(char *, unsigned char **, int *); /* luafontloader/src/luafflib.c */
235 extern char *FindResourceTtfFont(char *filename
, char *fontname
); /* luafontloader/fontforge/fontforge/macbinary.c */
237 extern char charsetstr
[]; /* from mpdir/psout.w */
240 extern char **environ
;
247 extern int luatwrite(lua_State
* L
);
250 Same as in lnodelib.c, but with prefix G_ for now.
251 These macros create and access pointers (indices) to keys which is faster. The
252 shortcuts are created as part of the initialization.
256 #define init_lua_key(a) do { \
257 lua_pushliteral(Luas,#a); \
258 luaS_##a##_ptr = lua_tostring(Luas,-1); \
259 luaS_##a##_index = luaL_ref (Luas,LUA_REGISTRYINDEX); \
262 #define init_lua_key_alias(a,b) do { \
263 lua_pushliteral(Luas,b); \
264 luaS_##a##_ptr = lua_tostring(Luas,-1); \
265 luaS_##a##_index = luaL_ref (Luas,LUA_REGISTRYINDEX); \
268 #define make_lua_key(a) \
269 int luaS_##a##_index = 0; \
270 const char * luaS_##a##_ptr = NULL
272 #define lua_key_eq(a,b) (a==luaS_##b##_ptr)
274 #define luaS_index(a) luaS_##a##_index
275 #define lua_key_index(a) luaS_##a##_index
276 #define lua_key(a) luaS_##a##_ptr
277 #define use_lua_key(a) \
278 extern int luaS_##a##_index ; \
279 extern const char * luaS_##a##_ptr
281 #define lua_key_rawgeti(a) \
282 lua_rawgeti(L, LUA_REGISTRYINDEX, luaS_##a##_index);\
285 #define lua_key_rawgeti_n(a,n) \
286 lua_rawgeti(L, LUA_REGISTRYINDEX, luaS_##a##_index);\
290 Unfortunately floor is already redefined as
291 #define floor ((integer)floor((double)(a)))
293 #define lua_uroundnumber(a,b) (unsigned int)floor((double)(lua_tonumber(a,b)+0.5))
297 #define lua_roundnumber(a,b) (int)floor((double)lua_tonumber(a,b)+0.5)
298 #define lua_uroundnumber(a,b) (unsigned int)((double)(lua_tonumber(a,b)+0.5))
299 extern int lua_numeric_field_by_index(lua_State
*, int , int);
300 extern unsigned int lua_unsigned_numeric_field_by_index(lua_State
*, int , int);
302 /* Currently we sometimes use numbers and sometimes strings in node properties. We can
303 make that consistent by having a check on number and if not then assign a string. The
304 strings are prehashed and we make a bunch of lua tables that have these values. We can
305 preassign these at startup time. */
307 /* no need for L state argument */
309 #define PACK_TYPE_SIZE 4
310 #define GROUP_CODE_SIZE 23
311 #define MATH_STYLE_NAME_SIZE 8
312 #define APPEND_LIST_SIZE 5
313 #define DIR_PAR_SIZE 8
314 #define DIR_TEXT_SIZE 8
316 extern int l_pack_type_index
[PACK_TYPE_SIZE
];
317 extern int l_group_code_index
[GROUP_CODE_SIZE
];
318 extern int l_math_style_name_index
[MATH_STYLE_NAME_SIZE
];
319 extern int l_dir_par_index
[DIR_PAR_SIZE
];
320 extern int l_dir_text_index
[DIR_TEXT_SIZE
];
322 #define lua_push_pack_type(L,pack_type) lua_rawgeti(L, LUA_REGISTRYINDEX, l_pack_type_index[pack_type] );
323 #define lua_push_group_code(L,group_code) lua_rawgeti(L, LUA_REGISTRYINDEX, l_group_code_index[group_code]);
324 #define lua_push_math_style_name(L,style_name) lua_rawgeti(L, LUA_REGISTRYINDEX, l_math_style_name_index[style_name]);
325 #define lua_push_dir_par(L,dir) lua_rawgeti(L, LUA_REGISTRYINDEX, l_dir_par_index[dir+dir_swap])
326 #define lua_push_dir_text(L,dir) lua_rawgeti(L, LUA_REGISTRYINDEX, l_dir_text_index[dir+dir_swap])
328 #define lua_push_string_by_index(L,index) lua_rawgeti(L, LUA_REGISTRYINDEX, index)
329 #define lua_push_string_by_name(L,index) lua_rawgeti(L, LUA_REGISTRYINDEX, lua_key_index(index))
331 #define set_l_pack_type_index \
332 l_pack_type_index[0] = lua_key_index(exactly); \
333 l_pack_type_index[1] = lua_key_index(additional); \
334 l_pack_type_index[2] = lua_key_index(cal_expand_ratio);\
335 l_pack_type_index[3] = lua_key_index(subst_ex_font);
337 #define set_l_group_code_index \
338 l_group_code_index[0] = lua_key_index(empty_string);\
339 l_group_code_index[1] = lua_key_index(simple);\
340 l_group_code_index[2] = lua_key_index(hbox);\
341 l_group_code_index[3] = lua_key_index(adjusted_hbox);\
342 l_group_code_index[4] = lua_key_index(vbox);\
343 l_group_code_index[5] = lua_key_index(vtop);\
344 l_group_code_index[6] = lua_key_index(align);\
345 l_group_code_index[7] = lua_key_index(no_align);\
346 l_group_code_index[8] = lua_key_index(output);\
347 l_group_code_index[9] = lua_key_index(math);\
348 l_group_code_index[10] = lua_key_index(disc);\
349 l_group_code_index[11] = lua_key_index(insert);\
350 l_group_code_index[12] = lua_key_index(vcenter);\
351 l_group_code_index[13] = lua_key_index(math_choice);\
352 l_group_code_index[14] = lua_key_index(semi_simple);\
353 l_group_code_index[15] = lua_key_index(math_shift);\
354 l_group_code_index[16] = lua_key_index(math_left);\
355 l_group_code_index[17] = lua_key_index(local_box);\
356 l_group_code_index[18] = lua_key_index(split_off);\
357 l_group_code_index[19] = lua_key_index(split_keep);\
358 l_group_code_index[20] = lua_key_index(preamble);\
359 l_group_code_index[21] = lua_key_index(align_set);\
360 l_group_code_index[22] = lua_key_index(fin_row)
362 #define set_l_math_style_name_index \
363 l_math_style_name_index[0] = lua_key_index(display);\
364 l_math_style_name_index[1] = lua_key_index(crampeddisplay);\
365 l_math_style_name_index[2] = lua_key_index(text);\
366 l_math_style_name_index[3] = lua_key_index(crampedtext);\
367 l_math_style_name_index[4] = lua_key_index(script);\
368 l_math_style_name_index[5] = lua_key_index(crampedscript);\
369 l_math_style_name_index[6] = lua_key_index(scriptscript);\
370 l_math_style_name_index[7] = lua_key_index(crampedscriptscript)
372 #define set_l_dir_par_index \
373 l_dir_par_index[0] = lua_key_index(TLT);\
374 l_dir_par_index[1] = lua_key_index(TRT);\
375 l_dir_par_index[2] = lua_key_index(LTL);\
376 l_dir_par_index[3] = lua_key_index(RTT);\
377 l_dir_par_index[4] = lua_key_index(TLT);\
378 l_dir_par_index[5] = lua_key_index(TRT);\
379 l_dir_par_index[6] = lua_key_index(LTL);\
380 l_dir_par_index[7] = lua_key_index(RTT);\
382 #define set_l_dir_text_index \
383 l_dir_text_index[0] = lua_key_index(mTLT);\
384 l_dir_text_index[1] = lua_key_index(mTRT);\
385 l_dir_text_index[2] = lua_key_index(mLTL);\
386 l_dir_text_index[3] = lua_key_index(mRTT);\
387 l_dir_text_index[4] = lua_key_index(pTLT);\
388 l_dir_text_index[5] = lua_key_index(pTRT);\
389 l_dir_text_index[6] = lua_key_index(pLTL);\
390 l_dir_text_index[7] = lua_key_index(pRTT);\
392 #define img_parms_max 25
393 #define img_pageboxes_max 6
395 extern int img_parms
[img_parms_max
];
396 extern int img_pageboxes
[img_pageboxes_max
];
398 # define set_l_img_keys_index \
399 img_parms[ 0] = lua_key_index(attr); \
400 img_parms[ 1] = lua_key_index(bbox); \
401 img_parms[ 2] = lua_key_index(colordepth); \
402 img_parms[ 3] = lua_key_index(colorspace); \
403 img_parms[ 4] = lua_key_index(depth); \
404 img_parms[ 5] = lua_key_index(filename); \
405 img_parms[ 6] = lua_key_index(filepath); \
406 img_parms[ 7] = lua_key_index(height); \
407 img_parms[ 8] = lua_key_index(imagetype); \
408 img_parms[ 9] = lua_key_index(index); \
409 img_parms[10] = lua_key_index(keepopen); \
410 img_parms[11] = lua_key_index(objnum); \
411 img_parms[12] = lua_key_index(pagebox); \
412 img_parms[13] = lua_key_index(page); \
413 img_parms[14] = lua_key_index(pages); \
414 img_parms[15] = lua_key_index(ref_count); \
415 img_parms[16] = lua_key_index(rotation); \
416 img_parms[17] = lua_key_index(stream); \
417 img_parms[18] = lua_key_index(transform); \
418 img_parms[19] = lua_key_index(visiblefilename); \
419 img_parms[20] = lua_key_index(width); \
420 img_parms[21] = lua_key_index(xres); \
421 img_parms[22] = lua_key_index(xsize); \
422 img_parms[23] = lua_key_index(yres); \
423 img_parms[24] = lua_key_index(ysize); \
425 # define set_l_img_pageboxes_index \
426 img_pageboxes[0] = lua_key_index(none); \
427 img_pageboxes[1] = lua_key_index(media); \
428 img_pageboxes[2] = lua_key_index(crop); \
429 img_pageboxes[3] = lua_key_index(bleed); \
430 img_pageboxes[4] = lua_key_index(trim); \
431 img_pageboxes[5] = lua_key_index(art); \
433 #define lua_push_img_key(L,key) lua_rawgeti(L, LUA_REGISTRYINDEX, img_parms[key] );
434 #define lua_push_img_pagebox(L,box) lua_rawgeti(L, LUA_REGISTRYINDEX, img_pageboxes[box]);
436 extern int lua_show_valid_list(lua_State
*L
, const char **list
, int max
);
437 extern int lua_show_valid_keys(lua_State
*L
, int *list
, int max
);
439 #define set_make_keys \
440 make_lua_key(cmdname);make_lua_key(expandable);make_lua_key(protected);\
442 make_lua_key(MathConstants);\
446 make_lua_key(accent);\
447 make_lua_key(action);\
448 make_lua_key(action_id);\
449 make_lua_key(action_type);\
450 make_lua_key(active);\
451 make_lua_key(additional);\
452 make_lua_key(adjust);\
453 make_lua_key(adjust_head);\
454 make_lua_key(adjusted_hbox);\
455 make_lua_key(advance);\
456 make_lua_key(after_display);\
457 make_lua_key(after_output);\
458 make_lua_key(align);\
459 make_lua_key(align_head);\
460 make_lua_key(align_set);\
461 make_lua_key(alignment);\
462 make_lua_key(annot);\
466 make_lua_key(attributes);\
467 make_lua_key(auto_expand);\
469 make_lua_key(before_display);\
470 make_lua_key(best_ins_ptr);\
471 make_lua_key(best_page_break);\
472 make_lua_key(best_size);\
473 make_lua_key(bleed);\
475 make_lua_key(bot_accent);\
476 make_lua_key(bottom_left);\
477 make_lua_key(bottom_right);\
479 make_lua_key(box_left);\
480 make_lua_key(box_left_width);\
481 make_lua_key(box_right);\
482 make_lua_key(box_right_width);\
483 make_lua_key(broken_ins);\
484 make_lua_key(broken_ptr);\
485 make_lua_key(cache);\
486 make_lua_key(cal_expand_ratio);\
487 make_lua_key(catalog);\
489 make_lua_key(characters);\
490 make_lua_key(checksum);\
491 make_lua_key(cidinfo);\
492 make_lua_key(class);\
493 make_lua_key(colordepth);\
494 make_lua_key(colorspace);\
495 make_lua_key(command);\
496 make_lua_key(commands);\
497 make_lua_key(comment);\
498 make_lua_key(components);\
499 make_lua_key(compresslevel);\
500 make_lua_key(contrib_head);\
503 make_lua_key(count);\
504 make_lua_key(crampeddisplay);\
505 make_lua_key(crampedscript);\
506 make_lua_key(crampedscriptscript);\
507 make_lua_key(crampedtext);\
509 make_lua_key(csname);\
511 make_lua_key(degree);\
512 make_lua_key(delim);\
513 make_lua_key(delimptr);\
514 make_lua_key(denom);\
515 make_lua_key(depth);\
516 make_lua_key(designsize);\
517 make_lua_key(dest_id);\
518 make_lua_key(dest_type);\
520 make_lua_key(dir_h);\
521 make_lua_key(direct);\
522 make_lua_key(direction);\
525 make_lua_key(display);\
527 make_lua_key(dvi_ptr);\
528 make_lua_key(embedding);\
529 make_lua_key(empty_string);\
530 make_lua_key(encodingbytes);\
531 make_lua_key(encodingname);\
534 make_lua_key(equation);\
535 make_lua_key(equation_number);\
536 make_lua_key(exactly);\
537 make_lua_key(expansion_factor);\
539 make_lua_key(extend);\
540 make_lua_key(extender);\
541 make_lua_key(extensible);\
542 make_lua_key(extra_space);\
545 make_lua_key(fence);\
547 make_lua_key(filename);\
548 make_lua_key(filepath);\
550 make_lua_key(fin_row);\
552 make_lua_key(fonts);\
553 make_lua_key(format);\
554 make_lua_key(fullname);\
555 make_lua_key(global);\
557 make_lua_key(glue_order);\
558 make_lua_key(glue_set);\
559 make_lua_key(glue_sign);\
560 make_lua_key(glyph);\
564 make_lua_key(height);\
565 make_lua_key(hmode_par);\
566 make_lua_key(hold_head);\
567 make_lua_key(horiz_variants);\
568 make_lua_key(hyphenchar);\
570 make_lua_key(image);\
571 make_lua_key(imagetype);\
572 make_lua_key(immediate);\
573 make_lua_key(index);\
575 make_lua_key(insert);\
576 make_lua_key(italic);\
577 make_lua_key(keepopen);\
579 make_lua_key(kerns);\
581 make_lua_key(large_char);\
582 make_lua_key(large_fam);\
583 make_lua_key(last_ins_ptr);\
584 make_lua_key(leader);\
585 make_lua_key(least_page_cost);\
587 make_lua_key(left_boundary);\
588 make_lua_key(left_protruding);\
589 make_lua_key(level);\
590 make_lua_key(ligatures);\
591 make_lua_key(link_attr);\
593 make_lua_key(local_box);\
596 make_lua_key(lua_functions);\
597 make_lua_key(luatex);\
598 make_lua_key(luatex_node);\
599 make_lua_key(luatex_oldtoken);\
600 make_lua_key(luatex_token);\
605 make_lua_key(marginkern);\
608 make_lua_key(math_choice);\
609 make_lua_key(math_left);\
610 make_lua_key(math_shift);\
611 make_lua_key(mathdir);\
612 make_lua_key(mathkern);\
613 make_lua_key(mathstyle);\
614 make_lua_key(media);\
617 make_lua_key(modeline);\
619 make_lua_key(named_id);\
620 make_lua_key(names);\
621 make_lua_key(new_graf);\
622 make_lua_key(new_window);\
625 make_lua_key(no_align);\
628 make_lua_key(node_properties);\
629 make_lua_key(node_properties_indirect);\
630 make_lua_key(nomath);\
633 make_lua_key(nucleus);\
635 make_lua_key(number);\
636 make_lua_key(objcompression);\
637 make_lua_key(objnum);\
638 make_lua_key(oldmath);\
639 make_lua_key(ordering);\
640 make_lua_key(origin);\
641 make_lua_key(output);\
642 make_lua_key(overlay_accent);\
648 make_lua_key(pages);\
649 make_lua_key(page_head);\
650 make_lua_key(page_ins_head);\
651 make_lua_key(pageattributes);\
652 make_lua_key(pagebox);\
653 make_lua_key(pageresources);\
654 make_lua_key(pagesattributes);\
655 make_lua_key(parameters);\
656 make_lua_key(pdf_data);\
657 make_lua_key(pdftex);\
658 make_lua_key(pdf_destination);\
659 make_lua_key(pdf_literal);\
660 make_lua_key(pen_broken);\
661 make_lua_key(pen_inter);\
662 make_lua_key(penalty);\
665 make_lua_key(post_linebreak);\
667 make_lua_key(pre_adjust);\
668 make_lua_key(pre_adjust_head);\
669 make_lua_key(pre_align);\
670 make_lua_key(pre_box);\
671 make_lua_key(preamble);\
673 make_lua_key(prevdepth);\
674 make_lua_key(prevgraf);\
675 make_lua_key(psname);\
679 make_lua_key(radical);\
681 make_lua_key(ref_count);\
683 make_lua_key(registry);\
684 make_lua_key(renew);\
686 make_lua_key(replace);\
687 make_lua_key(resources);\
688 make_lua_key(right);\
689 make_lua_key(right_boundary);\
690 make_lua_key(right_protruding);\
691 make_lua_key(rotation);\
693 make_lua_key(scale);\
694 make_lua_key(script);\
695 make_lua_key(scriptscript);\
696 make_lua_key(semi_simple);\
697 make_lua_key(shift);\
698 make_lua_key(shrink);\
699 make_lua_key(shrink_order);\
700 make_lua_key(simple);\
702 make_lua_key(skewchar);\
703 make_lua_key(slant);\
705 make_lua_key(small_char);\
706 make_lua_key(small_fam);\
707 make_lua_key(space);\
708 make_lua_key(space_shrink);\
709 make_lua_key(space_stretch);\
710 make_lua_key(spacefactor);\
712 make_lua_key(special);\
713 make_lua_key(split_keep);\
714 make_lua_key(split_off);\
715 make_lua_key(stack);\
716 make_lua_key(start);\
718 make_lua_key(stream);\
719 make_lua_key(streamfile);\
720 make_lua_key(stretch);\
721 make_lua_key(stretch_order);\
722 make_lua_key(string);\
723 make_lua_key(style);\
725 make_lua_key(subst_ex_font);\
726 make_lua_key(subtype);\
728 make_lua_key(supplement);\
729 make_lua_key(surround);\
731 make_lua_key(temp_head);\
733 make_lua_key(term_and_log);\
736 make_lua_key(thread_attr);\
737 make_lua_key(thread_id);\
739 make_lua_key(token);\
741 make_lua_key(top_accent);\
742 make_lua_key(top_left);\
743 make_lua_key(top_right);\
744 make_lua_key(tounicode);\
745 make_lua_key(trailer);\
746 make_lua_key(transform);\
749 make_lua_key(uchyph);\
750 make_lua_key(umath);\
751 make_lua_key(units_per_em);\
753 make_lua_key(user_id);\
755 make_lua_key(value);\
757 make_lua_key(vcenter);\
758 make_lua_key(version);\
759 make_lua_key(vert_italic);\
760 make_lua_key(vert_variants);\
761 make_lua_key(vmode_par);\
762 make_lua_key(visiblefilename);\
764 make_lua_key(width);\
765 make_lua_key(writable);\
766 make_lua_key(x_height);\
767 make_lua_key(xformresources);\
768 make_lua_key(xformattributes);\
769 make_lua_key(xoffset);\
771 make_lua_key(xsize);\
772 make_lua_key(xyz_zoom);\
773 make_lua_key(yoffset); \
774 make_lua_key(yres); \
777 #define set_init_keys \
778 init_lua_key(cmdname);init_lua_key(expandable);init_lua_key(protected);\
780 init_lua_key(MathConstants);\
784 init_lua_key(accent);\
785 init_lua_key(action);\
786 init_lua_key(action_id);\
787 init_lua_key(action_type);\
788 init_lua_key(active);\
789 init_lua_key(additional);\
790 init_lua_key(adjust);\
791 init_lua_key(adjust_head);\
792 init_lua_key(adjusted_hbox);\
793 init_lua_key(advance);\
794 init_lua_key(after_display);\
795 init_lua_key(after_output);\
796 init_lua_key(align);\
797 init_lua_key(align_head);\
798 init_lua_key(align_set);\
799 init_lua_key(alignment);\
800 init_lua_key(annot);\
804 init_lua_key(attributes);\
805 init_lua_key(auto_expand);\
807 init_lua_key(before_display);\
808 init_lua_key(best_ins_ptr);\
809 init_lua_key(best_page_break);\
810 init_lua_key(best_size);\
811 init_lua_key(bleed);\
813 init_lua_key(bot_accent);\
814 init_lua_key(bottom_left);\
815 init_lua_key(bottom_right);\
817 init_lua_key(box_left);\
818 init_lua_key(box_left_width);\
819 init_lua_key(box_right);\
820 init_lua_key(box_right_width);\
821 init_lua_key(broken_ins);\
822 init_lua_key(broken_ptr);\
823 init_lua_key(cache);\
824 init_lua_key(cal_expand_ratio);\
825 init_lua_key(catalog);\
827 init_lua_key(characters);\
828 init_lua_key(checksum);\
829 init_lua_key(cidinfo);\
830 init_lua_key(class);\
831 init_lua_key(colordepth);\
832 init_lua_key(colorspace);\
833 init_lua_key(command);\
834 init_lua_key(commands);\
835 init_lua_key(comment);\
836 init_lua_key(components);\
837 init_lua_key(compresslevel);\
838 init_lua_key(contrib_head);\
841 init_lua_key(count);\
842 init_lua_key(crampeddisplay);\
843 init_lua_key(crampedscript);\
844 init_lua_key(crampedscriptscript);\
845 init_lua_key(crampedtext);\
847 init_lua_key(csname);\
849 init_lua_key(degree);\
850 init_lua_key(delim);\
851 init_lua_key(delimptr);\
852 init_lua_key(denom);\
853 init_lua_key(depth);\
854 init_lua_key(designsize);\
855 init_lua_key(dest_id);\
856 init_lua_key(dest_type);\
858 init_lua_key(dir_h);\
859 init_lua_key(direct);\
860 init_lua_key(direction);\
863 init_lua_key(display);\
865 init_lua_key(dvi_ptr);\
866 init_lua_key(embedding);\
867 init_lua_key(encodingbytes);\
868 init_lua_key(encodingname);\
871 init_lua_key(equation);\
872 init_lua_key(equation_number);\
873 init_lua_key(exactly);\
874 init_lua_key(expansion_factor);\
876 init_lua_key(extend);\
877 init_lua_key(extender);\
878 init_lua_key(extensible);\
879 init_lua_key(extra_space);\
882 init_lua_key(fence);\
884 init_lua_key(filename);\
885 init_lua_key(filepath);\
887 init_lua_key(fin_row);\
889 init_lua_key(fonts);\
890 init_lua_key(format);\
891 init_lua_key(fullname);\
892 init_lua_key(global);\
894 init_lua_key(glue_order);\
895 init_lua_key(glue_set);\
896 init_lua_key(glue_sign);\
897 init_lua_key(glyph);\
901 init_lua_key(height);\
902 init_lua_key(hmode_par);\
903 init_lua_key(hold_head);\
904 init_lua_key(horiz_variants);\
905 init_lua_key(hyphenchar);\
907 init_lua_key(image);\
908 init_lua_key(imagetype);\
909 init_lua_key(immediate);\
910 init_lua_key(index);\
912 init_lua_key(insert);\
913 init_lua_key(italic);\
914 init_lua_key(keepopen);\
916 init_lua_key(kerns);\
918 init_lua_key(large_char);\
919 init_lua_key(large_fam);\
920 init_lua_key(last_ins_ptr);\
921 init_lua_key(leader);\
922 init_lua_key(least_page_cost);\
924 init_lua_key(left_boundary);\
925 init_lua_key(left_protruding);\
926 init_lua_key(level);\
927 init_lua_key(ligatures);\
928 init_lua_key(link_attr);\
930 init_lua_key(local_box);\
933 init_lua_key(lua_functions);\
934 init_lua_key(luatex);\
935 init_lua_key(luatex_node);\
936 init_lua_key(luatex_oldtoken);\
937 init_lua_key(luatex_token);\
938 init_lua_key(marginkern);\
941 init_lua_key(math_choice);\
942 init_lua_key(math_left);\
943 init_lua_key(math_shift);\
944 init_lua_key(mathdir);\
945 init_lua_key(mathkern);\
946 init_lua_key(mathstyle);\
947 init_lua_key(media);\
950 init_lua_key(modeline);\
952 init_lua_key(named_id);\
953 init_lua_key(names);\
954 init_lua_key(new_graf);\
955 init_lua_key(new_window);\
958 init_lua_key(no_align);\
961 init_lua_key(nomath);\
964 init_lua_key(nucleus);\
966 init_lua_key(number);\
967 init_lua_key(objcompression);\
968 init_lua_key(objnum);\
969 init_lua_key(oldmath);\
970 init_lua_key(origin);\
971 init_lua_key(ordering);\
972 init_lua_key(output);\
973 init_lua_key(overlay_accent);\
975 init_lua_key(pages);\
976 init_lua_key(page_head);\
977 init_lua_key(page_ins_head);\
978 init_lua_key(pageattributes);\
979 init_lua_key(pagebox);\
980 init_lua_key(pageresources);\
981 init_lua_key(pagesattributes);\
982 init_lua_key(parameters);\
983 init_lua_key(pdftex);\
984 init_lua_key(pdf_destination);\
985 init_lua_key(pdf_literal);\
986 init_lua_key(pen_broken);\
987 init_lua_key(pen_inter);\
988 init_lua_key(penalty);\
991 init_lua_key(post_linebreak);\
993 init_lua_key(pre_adjust);\
994 init_lua_key(pre_adjust_head);\
995 init_lua_key(pre_align);\
996 init_lua_key(pre_box);\
997 init_lua_key(preamble);\
999 init_lua_key(prevdepth);\
1000 init_lua_key(prevgraf);\
1001 init_lua_key(psname);\
1003 init_lua_key(push);\
1004 init_lua_key(quad);\
1005 init_lua_key(radical);\
1007 init_lua_key(ref_count);\
1009 init_lua_key(registry);\
1010 init_lua_key(renew);\
1012 init_lua_key(replace);\
1013 init_lua_key(resources);\
1014 init_lua_key(right);\
1015 init_lua_key(right_boundary);\
1016 init_lua_key(right_protruding);\
1017 init_lua_key(rotation);\
1018 init_lua_key(rule);\
1019 init_lua_key(scale);\
1020 init_lua_key(script);\
1021 init_lua_key(scriptscript);\
1022 init_lua_key(semi_simple);\
1023 init_lua_key(shift);\
1024 init_lua_key(shrink);\
1025 init_lua_key(shrink_order);\
1026 init_lua_key(simple);\
1027 init_lua_key(size);\
1028 init_lua_key(skewchar);\
1029 init_lua_key(slant);\
1030 init_lua_key(slot);\
1031 init_lua_key(small_char);\
1032 init_lua_key(small_fam);\
1033 init_lua_key(space);\
1034 init_lua_key(space_shrink);\
1035 init_lua_key(space_stretch);\
1036 init_lua_key(spacefactor);\
1037 init_lua_key(spec);\
1038 init_lua_key(special);\
1039 init_lua_key(split_keep);\
1040 init_lua_key(split_off);\
1041 init_lua_key(stack);\
1042 init_lua_key(start);\
1043 init_lua_key(step);\
1044 init_lua_key(stream);\
1045 init_lua_key(streamfile);\
1046 init_lua_key(stretch);\
1047 init_lua_key(stretch_order);\
1048 init_lua_key(string);\
1049 init_lua_key(style);\
1051 init_lua_key(subst_ex_font);\
1052 init_lua_key(subtype);\
1054 init_lua_key(supplement);\
1055 init_lua_key(surround);\
1056 init_lua_key(tail);\
1057 init_lua_key(temp_head);\
1058 init_lua_key(term);\
1060 init_lua_key(text);\
1061 init_lua_key(thread_attr);\
1062 init_lua_key(thread_id);\
1064 init_lua_key(token);\
1066 init_lua_key(top_accent);\
1067 init_lua_key(top_left);\
1068 init_lua_key(top_right);\
1069 init_lua_key(tounicode);\
1070 init_lua_key(trailer);\
1071 init_lua_key(transform);\
1072 init_lua_key(trim);\
1073 init_lua_key(type);\
1074 init_lua_key(uchyph);\
1075 init_lua_key(umath);\
1076 init_lua_key(units_per_em);\
1077 init_lua_key(used);\
1078 init_lua_key(user_id);\
1080 init_lua_key(value);\
1081 init_lua_key(vbox);\
1082 init_lua_key(vcenter);\
1083 init_lua_key(version);\
1084 init_lua_key(vert_italic);\
1085 init_lua_key(vert_variants);\
1086 init_lua_key(vmode_par);\
1087 init_lua_key(visiblefilename);\
1088 init_lua_key(vtop);\
1089 init_lua_key(width);\
1090 init_lua_key(writable);\
1091 init_lua_key(x_height);\
1092 init_lua_key(xformresources);\
1093 init_lua_key(xformattributes);\
1094 init_lua_key(xoffset);\
1095 init_lua_key(xres);\
1096 init_lua_key(xsize);\
1097 init_lua_key(xyz_zoom);\
1098 init_lua_key(yoffset);\
1099 init_lua_key(yres);\
1100 init_lua_key(ysize);\
1101 init_lua_key_alias(empty_string,"");\
1102 init_lua_key_alias(lua_functions,"lua.functions");\
1103 init_lua_key_alias(luatex_node, "luatex.node");\
1104 init_lua_key_alias(mLTL,"-LTL");\
1105 init_lua_key_alias(mRTT,"-RTT");\
1106 init_lua_key_alias(mTLT,"-TLT");\
1107 init_lua_key_alias(mTRT,"-TRT");\
1108 init_lua_key_alias(node_properties,"node.properties");\
1109 init_lua_key_alias(node_properties_indirect,"node.properties.indirect");\
1110 init_lua_key_alias(pLTL,"+LTL");\
1111 init_lua_key_alias(pRTT,"+RTT");\
1112 init_lua_key_alias(pTLT,"+TLT");\
1113 init_lua_key_alias(pTRT,"+TRT");\
1114 init_lua_key_alias(pdf_data,"pdf.data");\
1115 init_lua_key_alias(term_and_log,"term and log")
1117 #define assign_math_style(L,n,target) do { \
1118 if (lua_type(L,n) == LUA_TNUMBER) { \
1119 /* new, often same as subtype anyway */ \
1120 target = lua_tointeger(L,n); \
1121 } else if (lua_type(L,n) == LUA_TSTRING) { \
1122 const char *s = lua_tostring(L, n); \
1123 if (lua_key_eq(s,display)) { \
1125 } else if (lua_key_eq(s,crampeddisplay)) { \
1127 } else if (lua_key_eq(s,text)) { \
1129 } else if (lua_key_eq(s,crampedtext)) { \
1131 } else if (lua_key_eq(s,script)) { \
1133 } else if (lua_key_eq(s,crampedscript)) { \
1135 } else if (lua_key_eq(s,scriptscript)) { \
1137 } else if (lua_key_eq(s,crampedscriptscript)) { \
1143 target = 2; /* text by default */ \
1148 extern FILE *_cairo_win32_tmpfile( void );
1149 #define tmpfile() _cairo_win32_tmpfile()
1150 #endif /* __MINGW32__ */
1152 #endif /* LUATEX_API_H */
1155 /* These keys have to available to different files */
1158 use_lua_key(cmdname
);use_lua_key(expandable
);use_lua_key(protected);
1161 use_lua_key(MathConstants
);
1165 use_lua_key(accent
);
1166 use_lua_key(action
);
1167 use_lua_key(action_id
);
1168 use_lua_key(action_type
);
1169 use_lua_key(active
);
1170 use_lua_key(additional
);
1171 use_lua_key(adjust
);
1172 use_lua_key(adjust_head
);
1173 use_lua_key(adjusted_hbox
);
1174 use_lua_key(advance
);
1175 use_lua_key(after_display
);
1176 use_lua_key(after_output
);
1178 use_lua_key(align_head
);
1179 use_lua_key(align_set
);
1180 use_lua_key(alignment
);
1185 use_lua_key(attributes
);
1186 use_lua_key(auto_expand
);
1188 use_lua_key(before_display
);
1189 use_lua_key(best_ins_ptr
);
1190 use_lua_key(best_page_break
);
1191 use_lua_key(best_size
);
1194 use_lua_key(bot_accent
);
1195 use_lua_key(bottom_left
);
1196 use_lua_key(bottom_right
);
1198 use_lua_key(box_left
);
1199 use_lua_key(box_left_width
);
1200 use_lua_key(box_right
);
1201 use_lua_key(box_right_width
);
1202 use_lua_key(broken_ins
);
1203 use_lua_key(broken_ptr
);
1205 use_lua_key(cal_expand_ratio
);
1206 use_lua_key(catalog
);
1208 use_lua_key(characters
);
1209 use_lua_key(checksum
);
1210 use_lua_key(cidinfo
);
1212 use_lua_key(colordepth
);
1213 use_lua_key(colorspace
);
1214 use_lua_key(command
);
1215 use_lua_key(commands
);
1216 use_lua_key(comment
);
1217 use_lua_key(components
);
1218 use_lua_key(compresslevel
);
1219 use_lua_key(contrib_head
);
1223 use_lua_key(crampeddisplay
);
1224 use_lua_key(crampedscript
);
1225 use_lua_key(crampedscriptscript
);
1226 use_lua_key(crampedtext
);
1228 use_lua_key(csname
);
1230 use_lua_key(degree
);
1232 use_lua_key(delimptr
);
1235 use_lua_key(designsize
);
1236 use_lua_key(dest_id
);
1237 use_lua_key(dest_type
);
1240 use_lua_key(direct
);
1241 use_lua_key(direction
);
1244 use_lua_key(display
);
1246 use_lua_key(dvi_ptr
);
1247 use_lua_key(embedding
);
1248 use_lua_key(empty_string
);
1249 use_lua_key(encodingbytes
);
1250 use_lua_key(encodingname
);
1253 use_lua_key(equation
);\
1254 use_lua_key(equation_number
);\
1255 use_lua_key(exactly
);
1256 use_lua_key(expansion_factor
);
1258 use_lua_key(extend
);
1259 use_lua_key(extender
);
1260 use_lua_key(extensible
);
1261 use_lua_key(extra_space
);
1266 use_lua_key(filename
);
1267 use_lua_key(filepath
);
1269 use_lua_key(fin_row
);
1272 use_lua_key(format
);
1273 use_lua_key(fullname
);
1274 use_lua_key(global
);
1276 use_lua_key(glue_order
);
1277 use_lua_key(glue_set
);
1278 use_lua_key(glue_sign
);
1283 use_lua_key(height
);
1284 use_lua_key(hmode_par
);
1285 use_lua_key(hold_head
);
1286 use_lua_key(horiz_variants
);
1287 use_lua_key(hyphenchar
);
1290 use_lua_key(imagetype
);
1291 use_lua_key(immediate
);
1294 use_lua_key(insert
);
1295 use_lua_key(italic
);
1296 use_lua_key(keepopen
);
1300 use_lua_key(large_char
);
1301 use_lua_key(large_fam
);
1302 use_lua_key(last_ins_ptr
);
1303 use_lua_key(leader
);
1304 use_lua_key(least_page_cost
);
1306 use_lua_key(left_boundary
);
1307 use_lua_key(left_protruding
);
1309 use_lua_key(ligatures
);
1310 use_lua_key(link_attr
);
1312 use_lua_key(local_box
);
1315 use_lua_key(lua_functions
);
1316 use_lua_key(luatex
);
1317 use_lua_key(luatex_node
);
1318 use_lua_key(luatex_oldtoken
);
1319 use_lua_key(luatex_token
);
1324 use_lua_key(marginkern
);
1327 use_lua_key(math_choice
);
1328 use_lua_key(math_left
);
1329 use_lua_key(math_shift
);
1330 use_lua_key(mathdir
);
1331 use_lua_key(mathkern
);
1332 use_lua_key(mathstyle
);
1336 use_lua_key(modeline
);
1338 use_lua_key(named_id
);
1340 use_lua_key(new_graf
);
1341 use_lua_key(new_window
);
1344 use_lua_key(no_align
);
1347 use_lua_key(node_properties
);
1348 use_lua_key(node_properties_indirect
);
1349 use_lua_key(nomath
);
1352 use_lua_key(nucleus
);
1354 use_lua_key(number
);
1355 use_lua_key(objcompression
);
1356 use_lua_key(objnum
);
1357 use_lua_key(oldmath
);
1358 use_lua_key(origin
);
1359 use_lua_key(ordering
);
1360 use_lua_key(output
);
1361 use_lua_key(overlay_accent
);
1368 use_lua_key(page_head
);
1369 use_lua_key(page_ins_head
);
1370 use_lua_key(pagebox
);
1371 use_lua_key(pageattributes
);
1372 use_lua_key(pageresources
);
1373 use_lua_key(pagesattributes
);
1374 use_lua_key(parameters
);
1375 use_lua_key(pdf_data
);
1376 use_lua_key(pdftex
);
1377 use_lua_key(pdf_destination
);\
1378 use_lua_key(pdf_literal
);\
1379 use_lua_key(pen_broken
);
1380 use_lua_key(pen_inter
);
1381 use_lua_key(penalty
);
1384 use_lua_key(post_linebreak
);
1386 use_lua_key(pre_adjust
);
1387 use_lua_key(pre_adjust_head
);
1388 use_lua_key(pre_align
);
1389 use_lua_key(pre_box
);
1390 use_lua_key(preamble
);
1392 use_lua_key(prevdepth
);
1393 use_lua_key(prevgraf
);
1394 use_lua_key(psname
);
1398 use_lua_key(radical
);
1400 use_lua_key(ref_count
);
1402 use_lua_key(registry
);
1405 use_lua_key(replace
);
1406 use_lua_key(resources
);
1408 use_lua_key(right_boundary
);
1409 use_lua_key(right_protruding
);
1410 use_lua_key(rotation
);
1413 use_lua_key(script
);
1414 use_lua_key(scriptscript
);
1415 use_lua_key(semi_simple
);
1417 use_lua_key(shrink
);
1418 use_lua_key(shrink_order
);
1419 use_lua_key(simple
);
1421 use_lua_key(skewchar
);
1424 use_lua_key(small_char
);
1425 use_lua_key(small_fam
);
1427 use_lua_key(space_shrink
);
1428 use_lua_key(space_stretch
);
1429 use_lua_key(spacefactor
);
1431 use_lua_key(special
);
1432 use_lua_key(split_keep
);
1433 use_lua_key(split_off
);
1437 use_lua_key(stream
);
1438 use_lua_key(streamfile
);
1439 use_lua_key(stretch
);
1440 use_lua_key(stretch_order
);
1441 use_lua_key(string
);
1444 use_lua_key(subst_ex_font
);
1445 use_lua_key(subtype
);
1447 use_lua_key(supplement
);
1448 use_lua_key(surround
);
1450 use_lua_key(temp_head
);
1452 use_lua_key(term_and_log
);
1455 use_lua_key(thread_attr
);
1456 use_lua_key(thread_id
);
1460 use_lua_key(top_accent
);
1461 use_lua_key(top_left
);
1462 use_lua_key(top_right
);
1463 use_lua_key(tounicode
);
1464 use_lua_key(trailer
);
1465 use_lua_key(transform
);
1468 use_lua_key(uchyph
);
1470 use_lua_key(units_per_em
);
1472 use_lua_key(user_id
);
1476 use_lua_key(vcenter
);
1477 use_lua_key(version
);
1478 use_lua_key(vert_italic
);
1479 use_lua_key(vert_variants
);
1480 use_lua_key(vmode_par
);
1481 use_lua_key(visiblefilename
);
1484 use_lua_key(writable
);
1485 use_lua_key(x_height
);
1486 use_lua_key(xformresources
);
1487 use_lua_key(xformattributes
);
1488 use_lua_key(xoffset
);
1491 use_lua_key(xyz_zoom
);
1492 use_lua_key(yoffset
);