ba8b5c17 |
1 | /* |
2 | ** $Id: luaconf.h,v 1.176 2013/03/16 21:10:18 roberto Exp $ |
3 | ** Configuration file for Lua |
4 | ** See Copyright Notice in lua.h |
5 | */ |
6 | |
7 | |
8 | #ifndef lconfig_h |
9 | #define lconfig_h |
10 | |
11 | #include <limits.h> |
12 | #include <stddef.h> |
13 | |
14 | |
15 | /* |
16 | ** ================================================================== |
17 | ** Search for "@@" to find all configurable definitions. |
18 | ** =================================================================== |
19 | */ |
20 | |
21 | |
22 | /* |
23 | @@ LUA_ANSI controls the use of non-ansi features. |
24 | ** CHANGE it (define it) if you want Lua to avoid the use of any |
25 | ** non-ansi feature or library. |
26 | */ |
27 | #if !defined(LUA_ANSI) && defined(__STRICT_ANSI__) |
28 | #define LUA_ANSI |
29 | #endif |
30 | |
31 | |
32 | #if !defined(LUA_ANSI) && defined(_WIN32) && !defined(_WIN32_WCE) |
33 | #define LUA_WIN /* enable goodies for regular Windows platforms */ |
34 | #endif |
35 | |
36 | #if defined(LUA_WIN) |
37 | #define LUA_DL_DLL |
38 | #define LUA_USE_AFORMAT /* assume 'printf' handles 'aA' specifiers */ |
39 | #endif |
40 | |
41 | |
42 | |
43 | #if defined(LUA_USE_LINUX) |
44 | #define LUA_USE_POSIX |
45 | #define LUA_USE_DLOPEN /* needs an extra library: -ldl */ |
46 | #define LUA_USE_READLINE /* needs some extra libraries */ |
47 | #define LUA_USE_STRTODHEX /* assume 'strtod' handles hex formats */ |
48 | #define LUA_USE_AFORMAT /* assume 'printf' handles 'aA' specifiers */ |
49 | #define LUA_USE_LONGLONG /* assume support for long long */ |
50 | #endif |
51 | |
52 | #if defined(LUA_USE_MACOSX) |
53 | #define LUA_USE_POSIX |
54 | #define LUA_USE_DLOPEN /* does not need -ldl */ |
55 | #define LUA_USE_READLINE /* needs an extra library: -lreadline */ |
56 | #define LUA_USE_STRTODHEX /* assume 'strtod' handles hex formats */ |
57 | #define LUA_USE_AFORMAT /* assume 'printf' handles 'aA' specifiers */ |
58 | #define LUA_USE_LONGLONG /* assume support for long long */ |
59 | #endif |
60 | |
61 | |
62 | |
63 | /* |
64 | @@ LUA_USE_POSIX includes all functionality listed as X/Open System |
65 | @* Interfaces Extension (XSI). |
66 | ** CHANGE it (define it) if your system is XSI compatible. |
67 | */ |
68 | #if defined(LUA_USE_POSIX) |
69 | #define LUA_USE_MKSTEMP |
70 | #define LUA_USE_ISATTY |
71 | #define LUA_USE_POPEN |
72 | #define LUA_USE_ULONGJMP |
73 | #define LUA_USE_GMTIME_R |
74 | #endif |
75 | |
76 | |
77 | |
78 | /* |
79 | @@ LUA_PATH_DEFAULT is the default path that Lua uses to look for |
80 | @* Lua libraries. |
81 | @@ LUA_CPATH_DEFAULT is the default path that Lua uses to look for |
82 | @* C libraries. |
83 | ** CHANGE them if your machine has a non-conventional directory |
84 | ** hierarchy or if you want to install your libraries in |
85 | ** non-conventional directories. |
86 | */ |
87 | #if defined(_WIN32) /* { */ |
88 | /* |
89 | ** In Windows, any exclamation mark ('!') in the path is replaced by the |
90 | ** path of the directory of the executable file of the current process. |
91 | */ |
92 | #define LUA_LDIR "!\\lua\\" |
93 | #define LUA_CDIR "!\\" |
94 | #define LUA_PATH_DEFAULT \ |
95 | LUA_LDIR"?.lua;" LUA_LDIR"?\\init.lua;" \ |
96 | LUA_CDIR"?.lua;" LUA_CDIR"?\\init.lua;" ".\\?.lua" |
97 | #define LUA_CPATH_DEFAULT \ |
98 | LUA_CDIR"?.dll;" LUA_CDIR"loadall.dll;" ".\\?.dll" |
99 | |
100 | #else /* }{ */ |
101 | |
102 | #define LUA_VDIR LUA_VERSION_MAJOR "." LUA_VERSION_MINOR "/" |
103 | #define LUA_ROOT "/usr/local/" |
104 | #define LUA_LDIR LUA_ROOT "share/lua/" LUA_VDIR |
105 | #define LUA_CDIR LUA_ROOT "lib/lua/" LUA_VDIR |
106 | #define LUA_PATH_DEFAULT \ |
107 | LUA_LDIR"?.lua;" LUA_LDIR"?/init.lua;" \ |
108 | LUA_CDIR"?.lua;" LUA_CDIR"?/init.lua;" "./?.lua" |
109 | #define LUA_CPATH_DEFAULT \ |
110 | LUA_CDIR"?.so;" LUA_CDIR"loadall.so;" "./?.so" |
111 | #endif /* } */ |
112 | |
113 | |
114 | /* |
115 | @@ LUA_DIRSEP is the directory separator (for submodules). |
116 | ** CHANGE it if your machine does not use "/" as the directory separator |
117 | ** and is not Windows. (On Windows Lua automatically uses "\".) |
118 | */ |
119 | #if defined(_WIN32) |
120 | #define LUA_DIRSEP "\\" |
121 | #else |
122 | #define LUA_DIRSEP "/" |
123 | #endif |
124 | |
125 | |
126 | /* |
127 | @@ LUA_ENV is the name of the variable that holds the current |
128 | @@ environment, used to access global names. |
129 | ** CHANGE it if you do not like this name. |
130 | */ |
131 | #define LUA_ENV "_ENV" |
132 | |
133 | |
134 | /* |
135 | @@ LUA_API is a mark for all core API functions. |
136 | @@ LUALIB_API is a mark for all auxiliary library functions. |
137 | @@ LUAMOD_API is a mark for all standard library opening functions. |
138 | ** CHANGE them if you need to define those functions in some special way. |
139 | ** For instance, if you want to create one Windows DLL with the core and |
140 | ** the libraries, you may want to use the following definition (define |
141 | ** LUA_BUILD_AS_DLL to get it). |
142 | */ |
143 | #if defined(LUA_BUILD_AS_DLL) /* { */ |
144 | |
145 | #if defined(LUA_CORE) || defined(LUA_LIB) /* { */ |
146 | #define LUA_API __declspec(dllexport) |
147 | #else /* }{ */ |
148 | #define LUA_API __declspec(dllimport) |
149 | #endif /* } */ |
150 | |
151 | #else /* }{ */ |
152 | |
153 | #define LUA_API extern |
154 | |
155 | #endif /* } */ |
156 | |
157 | |
158 | /* more often than not the libs go together with the core */ |
159 | #define LUALIB_API LUA_API |
160 | #define LUAMOD_API LUALIB_API |
161 | |
162 | |
163 | /* |
164 | @@ LUAI_FUNC is a mark for all extern functions that are not to be |
165 | @* exported to outside modules. |
166 | @@ LUAI_DDEF and LUAI_DDEC are marks for all extern (const) variables |
167 | @* that are not to be exported to outside modules (LUAI_DDEF for |
168 | @* definitions and LUAI_DDEC for declarations). |
169 | ** CHANGE them if you need to mark them in some special way. Elf/gcc |
170 | ** (versions 3.2 and later) mark them as "hidden" to optimize access |
171 | ** when Lua is compiled as a shared library. Not all elf targets support |
172 | ** this attribute. Unfortunately, gcc does not offer a way to check |
173 | ** whether the target offers that support, and those without support |
174 | ** give a warning about it. To avoid these warnings, change to the |
175 | ** default definition. |
176 | */ |
177 | #if defined(__GNUC__) && ((__GNUC__*100 + __GNUC_MINOR__) >= 302) && \ |
178 | defined(__ELF__) /* { */ |
179 | #define LUAI_FUNC __attribute__((visibility("hidden"))) extern |
180 | #define LUAI_DDEC LUAI_FUNC |
181 | #define LUAI_DDEF /* empty */ |
182 | |
183 | #else /* }{ */ |
184 | #define LUAI_FUNC extern |
185 | #define LUAI_DDEC extern |
186 | #define LUAI_DDEF /* empty */ |
187 | #endif /* } */ |
188 | |
189 | |
190 | |
191 | /* |
192 | @@ LUA_QL describes how error messages quote program elements. |
193 | ** CHANGE it if you want a different appearance. |
194 | */ |
195 | #define LUA_QL(x) "'" x "'" |
196 | #define LUA_QS LUA_QL("%s") |
197 | |
198 | |
199 | /* |
200 | @@ LUA_IDSIZE gives the maximum size for the description of the source |
201 | @* of a function in debug information. |
202 | ** CHANGE it if you want a different size. |
203 | */ |
204 | #define LUA_IDSIZE 60 |
205 | |
206 | |
207 | /* |
208 | @@ luai_writestring/luai_writeline define how 'print' prints its results. |
209 | ** They are only used in libraries and the stand-alone program. (The #if |
210 | ** avoids including 'stdio.h' everywhere.) |
211 | */ |
212 | #if defined(LUA_LIB) || defined(lua_c) |
213 | #include <stdio.h> |
214 | #define luai_writestring(s,l) fwrite((s), sizeof(char), (l), stdout) |
215 | #define luai_writeline() (luai_writestring("\n", 1), fflush(stdout)) |
216 | #endif |
217 | |
218 | /* |
219 | @@ luai_writestringerror defines how to print error messages. |
220 | ** (A format string with one argument is enough for Lua...) |
221 | */ |
222 | #define luai_writestringerror(s,p) \ |
223 | (fprintf(stderr, (s), (p)), fflush(stderr)) |
224 | |
225 | |
226 | /* |
227 | @@ LUAI_MAXSHORTLEN is the maximum length for short strings, that is, |
228 | ** strings that are internalized. (Cannot be smaller than reserved words |
229 | ** or tags for metamethods, as these strings must be internalized; |
230 | ** #("function") = 8, #("__newindex") = 10.) |
231 | */ |
232 | #define LUAI_MAXSHORTLEN 40 |
233 | |
234 | |
235 | |
236 | /* |
237 | ** {================================================================== |
238 | ** Compatibility with previous versions |
239 | ** =================================================================== |
240 | */ |
241 | |
242 | /* |
243 | @@ LUA_COMPAT_ALL controls all compatibility options. |
244 | ** You can define it to get all options, or change specific options |
245 | ** to fit your specific needs. |
246 | */ |
247 | #if defined(LUA_COMPAT_ALL) /* { */ |
248 | |
249 | /* |
250 | @@ LUA_COMPAT_UNPACK controls the presence of global 'unpack'. |
251 | ** You can replace it with 'table.unpack'. |
252 | */ |
253 | #define LUA_COMPAT_UNPACK |
254 | |
255 | /* |
256 | @@ LUA_COMPAT_LOADERS controls the presence of table 'package.loaders'. |
257 | ** You can replace it with 'package.searchers'. |
258 | */ |
259 | #define LUA_COMPAT_LOADERS |
260 | |
261 | /* |
262 | @@ macro 'lua_cpcall' emulates deprecated function lua_cpcall. |
263 | ** You can call your C function directly (with light C functions). |
264 | */ |
265 | #define lua_cpcall(L,f,u) \ |
266 | (lua_pushcfunction(L, (f)), \ |
267 | lua_pushlightuserdata(L,(u)), \ |
268 | lua_pcall(L,1,0,0)) |
269 | |
270 | |
271 | /* |
272 | @@ LUA_COMPAT_LOG10 defines the function 'log10' in the math library. |
273 | ** You can rewrite 'log10(x)' as 'log(x, 10)'. |
274 | */ |
275 | #define LUA_COMPAT_LOG10 |
276 | |
277 | /* |
278 | @@ LUA_COMPAT_LOADSTRING defines the function 'loadstring' in the base |
279 | ** library. You can rewrite 'loadstring(s)' as 'load(s)'. |
280 | */ |
281 | #define LUA_COMPAT_LOADSTRING |
282 | |
283 | /* |
284 | @@ LUA_COMPAT_MAXN defines the function 'maxn' in the table library. |
285 | */ |
286 | #define LUA_COMPAT_MAXN |
287 | |
288 | /* |
289 | @@ The following macros supply trivial compatibility for some |
290 | ** changes in the API. The macros themselves document how to |
291 | ** change your code to avoid using them. |
292 | */ |
293 | #define lua_strlen(L,i) lua_rawlen(L, (i)) |
294 | |
295 | #define lua_objlen(L,i) lua_rawlen(L, (i)) |
296 | |
297 | #define lua_equal(L,idx1,idx2) lua_compare(L,(idx1),(idx2),LUA_OPEQ) |
298 | #define lua_lessthan(L,idx1,idx2) lua_compare(L,(idx1),(idx2),LUA_OPLT) |
299 | |
300 | /* |
301 | @@ LUA_COMPAT_MODULE controls compatibility with previous |
302 | ** module functions 'module' (Lua) and 'luaL_register' (C). |
303 | */ |
304 | #define LUA_COMPAT_MODULE |
305 | |
306 | #endif /* } */ |
307 | |
308 | /* }================================================================== */ |
309 | |
310 | |
311 | |
312 | /* |
313 | @@ LUAI_BITSINT defines the number of bits in an int. |
314 | ** CHANGE here if Lua cannot automatically detect the number of bits of |
315 | ** your machine. Probably you do not need to change this. |
316 | */ |
317 | /* avoid overflows in comparison */ |
318 | #if INT_MAX-20 < 32760 /* { */ |
319 | #define LUAI_BITSINT 16 |
320 | #elif INT_MAX > 2147483640L /* }{ */ |
321 | /* int has at least 32 bits */ |
322 | #define LUAI_BITSINT 32 |
323 | #else /* }{ */ |
324 | #error "you must define LUA_BITSINT with number of bits in an integer" |
325 | #endif /* } */ |
326 | |
327 | |
328 | /* |
329 | @@ LUA_INT32 is an signed integer with exactly 32 bits. |
330 | @@ LUAI_UMEM is an unsigned integer big enough to count the total |
331 | @* memory used by Lua. |
332 | @@ LUAI_MEM is a signed integer big enough to count the total memory |
333 | @* used by Lua. |
334 | ** CHANGE here if for some weird reason the default definitions are not |
335 | ** good enough for your machine. Probably you do not need to change |
336 | ** this. |
337 | */ |
338 | #if LUAI_BITSINT >= 32 /* { */ |
339 | #define LUA_INT32 int |
340 | #define LUAI_UMEM size_t |
341 | #define LUAI_MEM ptrdiff_t |
342 | #else /* }{ */ |
343 | /* 16-bit ints */ |
344 | #define LUA_INT32 long |
345 | #define LUAI_UMEM unsigned long |
346 | #define LUAI_MEM long |
347 | #endif /* } */ |
348 | |
349 | |
350 | /* |
351 | @@ LUAI_MAXSTACK limits the size of the Lua stack. |
352 | ** CHANGE it if you need a different limit. This limit is arbitrary; |
353 | ** its only purpose is to stop Lua to consume unlimited stack |
354 | ** space (and to reserve some numbers for pseudo-indices). |
355 | */ |
356 | #if LUAI_BITSINT >= 32 |
357 | #define LUAI_MAXSTACK 1000000 |
358 | #else |
359 | #define LUAI_MAXSTACK 15000 |
360 | #endif |
361 | |
362 | /* reserve some space for error handling */ |
363 | #define LUAI_FIRSTPSEUDOIDX (-LUAI_MAXSTACK - 1000) |
364 | |
365 | |
366 | |
367 | |
368 | /* |
369 | @@ LUAL_BUFFERSIZE is the buffer size used by the lauxlib buffer system. |
370 | ** CHANGE it if it uses too much C-stack space. |
371 | */ |
372 | #define LUAL_BUFFERSIZE BUFSIZ |
373 | |
374 | |
375 | |
376 | |
377 | /* |
378 | ** {================================================================== |
379 | @@ LUA_NUMBER is the type of numbers in Lua. |
380 | ** CHANGE the following definitions only if you want to build Lua |
381 | ** with a number type different from double. You may also need to |
382 | ** change lua_number2int & lua_number2integer. |
383 | ** =================================================================== |
384 | */ |
385 | |
386 | #define LUA_NUMBER_DOUBLE |
387 | #define LUA_NUMBER double |
388 | |
389 | /* |
390 | @@ LUAI_UACNUMBER is the result of an 'usual argument conversion' |
391 | @* over a number. |
392 | */ |
393 | #define LUAI_UACNUMBER double |
394 | |
395 | |
396 | /* |
397 | @@ LUA_NUMBER_SCAN is the format for reading numbers. |
398 | @@ LUA_NUMBER_FMT is the format for writing numbers. |
399 | @@ lua_number2str converts a number to a string. |
400 | @@ LUAI_MAXNUMBER2STR is maximum size of previous conversion. |
401 | */ |
402 | #define LUA_NUMBER_SCAN "%lf" |
403 | #define LUA_NUMBER_FMT "%.14g" |
404 | #define lua_number2str(s,n) sprintf((s), LUA_NUMBER_FMT, (n)) |
405 | #define LUAI_MAXNUMBER2STR 32 /* 16 digits, sign, point, and \0 */ |
406 | |
407 | |
408 | /* |
409 | @@ l_mathop allows the addition of an 'l' or 'f' to all math operations |
410 | */ |
411 | #define l_mathop(x) (x) |
412 | |
413 | |
414 | /* |
415 | @@ lua_str2number converts a decimal numeric string to a number. |
416 | @@ lua_strx2number converts an hexadecimal numeric string to a number. |
417 | ** In C99, 'strtod' does both conversions. C89, however, has no function |
418 | ** to convert floating hexadecimal strings to numbers. For these |
419 | ** systems, you can leave 'lua_strx2number' undefined and Lua will |
420 | ** provide its own implementation. |
421 | */ |
422 | #define lua_str2number(s,p) strtod((s), (p)) |
423 | |
424 | #if defined(LUA_USE_STRTODHEX) |
425 | #define lua_strx2number(s,p) strtod((s), (p)) |
426 | #endif |
427 | |
428 | |
429 | /* |
430 | @@ The luai_num* macros define the primitive operations over numbers. |
431 | */ |
432 | |
433 | /* the following operations need the math library */ |
434 | #if defined(lobject_c) || defined(lvm_c) |
435 | #include <math.h> |
436 | #define luai_nummod(L,a,b) ((a) - l_mathop(floor)((a)/(b))*(b)) |
437 | #define luai_numpow(L,a,b) (l_mathop(pow)(a,b)) |
438 | #endif |
439 | |
440 | /* these are quite standard operations */ |
441 | #if defined(LUA_CORE) |
442 | #define luai_numadd(L,a,b) ((a)+(b)) |
443 | #define luai_numsub(L,a,b) ((a)-(b)) |
444 | #define luai_nummul(L,a,b) ((a)*(b)) |
445 | #define luai_numdiv(L,a,b) ((a)/(b)) |
446 | #define luai_numunm(L,a) (-(a)) |
447 | #define luai_numeq(a,b) ((a)==(b)) |
448 | #define luai_numlt(L,a,b) ((a)<(b)) |
449 | #define luai_numle(L,a,b) ((a)<=(b)) |
450 | #define luai_numisnan(L,a) (!luai_numeq((a), (a))) |
451 | #endif |
452 | |
453 | |
454 | |
455 | /* |
456 | @@ LUA_INTEGER is the integral type used by lua_pushinteger/lua_tointeger. |
457 | ** CHANGE that if ptrdiff_t is not adequate on your machine. (On most |
458 | ** machines, ptrdiff_t gives a good choice between int or long.) |
459 | */ |
460 | #define LUA_INTEGER ptrdiff_t |
461 | |
462 | /* |
463 | @@ LUA_UNSIGNED is the integral type used by lua_pushunsigned/lua_tounsigned. |
464 | ** It must have at least 32 bits. |
465 | */ |
466 | #define LUA_UNSIGNED unsigned LUA_INT32 |
467 | |
468 | |
469 | |
470 | /* |
471 | ** Some tricks with doubles |
472 | */ |
473 | |
474 | #if defined(LUA_NUMBER_DOUBLE) && !defined(LUA_ANSI) /* { */ |
475 | /* |
476 | ** The next definitions activate some tricks to speed up the |
477 | ** conversion from doubles to integer types, mainly to LUA_UNSIGNED. |
478 | ** |
479 | @@ LUA_MSASMTRICK uses Microsoft assembler to avoid clashes with a |
480 | ** DirectX idiosyncrasy. |
481 | ** |
482 | @@ LUA_IEEE754TRICK uses a trick that should work on any machine |
483 | ** using IEEE754 with a 32-bit integer type. |
484 | ** |
485 | @@ LUA_IEEELL extends the trick to LUA_INTEGER; should only be |
486 | ** defined when LUA_INTEGER is a 32-bit integer. |
487 | ** |
488 | @@ LUA_IEEEENDIAN is the endianness of doubles in your machine |
489 | ** (0 for little endian, 1 for big endian); if not defined, Lua will |
490 | ** check it dynamically for LUA_IEEE754TRICK (but not for LUA_NANTRICK). |
491 | ** |
492 | @@ LUA_NANTRICK controls the use of a trick to pack all types into |
493 | ** a single double value, using NaN values to represent non-number |
494 | ** values. The trick only works on 32-bit machines (ints and pointers |
495 | ** are 32-bit values) with numbers represented as IEEE 754-2008 doubles |
496 | ** with conventional endianess (12345678 or 87654321), in CPUs that do |
497 | ** not produce signaling NaN values (all NaNs are quiet). |
498 | */ |
499 | |
500 | /* Microsoft compiler on a Pentium (32 bit) ? */ |
501 | #if defined(LUA_WIN) && defined(_MSC_VER) && defined(_M_IX86) /* { */ |
502 | |
503 | #define LUA_MSASMTRICK |
504 | #define LUA_IEEEENDIAN 0 |
505 | #define LUA_NANTRICK |
506 | |
507 | |
508 | /* pentium 32 bits? */ |
509 | #elif defined(__i386__) || defined(__i386) || defined(__X86__) /* }{ */ |
510 | |
511 | #define LUA_IEEE754TRICK |
512 | #define LUA_IEEELL |
513 | #define LUA_IEEEENDIAN 0 |
514 | #define LUA_NANTRICK |
515 | |
516 | /* pentium 64 bits? */ |
517 | #elif defined(__x86_64) /* }{ */ |
518 | |
519 | #define LUA_IEEE754TRICK |
520 | #define LUA_IEEEENDIAN 0 |
521 | |
522 | #elif defined(__POWERPC__) || defined(__ppc__) /* }{ */ |
523 | |
524 | #define LUA_IEEE754TRICK |
525 | #define LUA_IEEEENDIAN 1 |
526 | |
527 | #else /* }{ */ |
528 | |
529 | /* assume IEEE754 and a 32-bit integer type */ |
530 | #define LUA_IEEE754TRICK |
531 | |
532 | #endif /* } */ |
533 | |
534 | #endif /* } */ |
535 | |
536 | /* }================================================================== */ |
537 | |
538 | |
539 | |
540 | |
541 | /* =================================================================== */ |
542 | |
543 | /* |
544 | ** Local configuration. You can use this space to add your redefinitions |
545 | ** without modifying the main part of the file. |
546 | */ |
547 | |
548 | |
549 | |
550 | #endif |
551 | |