#include "lprefix.h"
#include <ctype.h>
#include <errno.h>
#include <locale.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "lua.h"
#include "lauxlib.h"
#include "lualib.h"
Go to the source code of this file.
|
| #define | IO_INPUT (IO_PREFIX "input") |
| |
| #define | IO_OUTPUT (IO_PREFIX "output") |
| |
| #define | IO_PREFIX "_IO_" |
| |
| #define | IOPREF_LEN (sizeof(IO_PREFIX)/sizeof(char) - 1) |
| |
| #define | isclosed(p) ((p)->closef == NULL) |
| |
| #define | l_checkmodep(m) ((m[0] == 'r' || m[0] == 'w') && m[1] == '\0') |
| |
| #define | l_fseek(f, o, w) fseek(f,o,w) |
| |
| #define | l_ftell(f) ftell(f) |
| |
| #define | l_getc(f) getc(f) |
| |
| #define | l_lockfile(f) ((void)0) |
| |
| #define | L_MAXLENNUM 200 |
| |
| #define | L_MODEEXT "b" |
| |
| #define | l_pclose(L, file) ((void)L, (void)file, -1) |
| |
| #define | l_popen(L, c, m) |
| |
| #define | l_seeknum long |
| |
| #define | l_unlockfile(f) ((void)0) |
| |
| #define | liolib_c |
| |
| #define | LUA_LIB |
| |
| #define | MAXARGLINE 250 |
| |
| #define | tolstream(L) ((LStream *)luaL_checkudata(L, 1, LUA_FILEHANDLE)) |
| |
|
| static int | aux_close (lua_State *L) |
| |
| static void | aux_lines (lua_State *L, int toclose) |
| |
| static void | createmeta (lua_State *L) |
| |
| static void | createstdfile (lua_State *L, FILE *f, const char *k, const char *fname) |
| |
| static int | f_close (lua_State *L) |
| |
| static int | f_flush (lua_State *L) |
| |
| static int | f_gc (lua_State *L) |
| |
| static int | f_lines (lua_State *L) |
| |
| static int | f_read (lua_State *L) |
| |
| static int | f_seek (lua_State *L) |
| |
| static int | f_setvbuf (lua_State *L) |
| |
| static int | f_tostring (lua_State *L) |
| |
| static int | f_write (lua_State *L) |
| |
| static int | g_iofile (lua_State *L, const char *f, const char *mode) |
| |
| static int | g_read (lua_State *L, FILE *f, int first) |
| |
| static int | g_write (lua_State *L, FILE *f, int arg) |
| |
| static FILE * | getiofile (lua_State *L, const char *findex) |
| |
| static int | io_close (lua_State *L) |
| |
| static int | io_fclose (lua_State *L) |
| |
| static int | io_flush (lua_State *L) |
| |
| static int | io_input (lua_State *L) |
| |
| static int | io_lines (lua_State *L) |
| |
| static int | io_noclose (lua_State *L) |
| |
| static int | io_open (lua_State *L) |
| |
| static int | io_output (lua_State *L) |
| |
| static int | io_pclose (lua_State *L) |
| |
| static int | io_popen (lua_State *L) |
| |
| static int | io_read (lua_State *L) |
| |
| static int | io_readline (lua_State *L) |
| |
| static int | io_tmpfile (lua_State *L) |
| |
| static int | io_type (lua_State *L) |
| |
| static int | io_write (lua_State *L) |
| |
| static int | l_checkmode (const char *mode) |
| |
| LUAMOD_API int | luaopen_io (lua_State *L) |
| |
| static LStream * | newfile (lua_State *L) |
| |
| static LStream * | newprefile (lua_State *L) |
| |
| static int | nextc (RN *rn) |
| |
| static void | opencheck (lua_State *L, const char *fname, const char *mode) |
| |
| static void | read_all (lua_State *L, FILE *f) |
| |
| static int | read_chars (lua_State *L, FILE *f, size_t n) |
| |
| static int | read_line (lua_State *L, FILE *f, int chop) |
| |
| static int | read_number (lua_State *L, FILE *f) |
| |
| static int | readdigits (RN *rn, int hex) |
| |
| static int | test2 (RN *rn, const char *set) |
| |
| static int | test_eof (lua_State *L, FILE *f) |
| |
| static FILE * | tofile (lua_State *L) |
| |
| #define IOPREF_LEN (sizeof(IO_PREFIX)/sizeof(char) - 1) |
| #define isclosed |
( |
|
p | ) |
((p)->closef == NULL) |
| #define l_checkmodep |
( |
|
m | ) |
((m[0] == 'r' || m[0] == 'w') && m[1] == '\0') |
| #define l_fseek |
( |
|
f, |
|
|
|
o, |
|
|
|
w |
|
) |
| fseek(f,o,w) |
| #define l_ftell |
( |
|
f | ) |
ftell(f) |
| #define l_getc |
( |
|
f | ) |
getc(f) |
| #define l_lockfile |
( |
|
f | ) |
((void)0) |
| #define l_pclose |
( |
|
L, |
|
|
|
file |
|
) |
| ((void)L, (void)file, -1) |
| #define l_popen |
( |
|
L, |
|
|
|
c, |
|
|
|
m |
|
) |
| |
Value: (FILE*)0)
LUALIB_API int luaL_error(lua_State *L, const char *fmt,...)
Definition at line 76 of file liolib.c.
| #define l_unlockfile |
( |
|
f | ) |
((void)0) |
| static void aux_lines |
( |
lua_State * |
L, |
|
|
int |
toclose |
|
) |
| |
|
static |
| static void createstdfile |
( |
lua_State * |
L, |
|
|
FILE * |
f, |
|
|
const char * |
k, |
|
|
const char * |
fname |
|
) |
| |
|
static |
| static int g_iofile |
( |
lua_State * |
L, |
|
|
const char * |
f, |
|
|
const char * |
mode |
|
) |
| |
|
static |
| static int g_read |
( |
lua_State * |
L, |
|
|
FILE * |
f, |
|
|
int |
first |
|
) |
| |
|
static |
| static int g_write |
( |
lua_State * |
L, |
|
|
FILE * |
f, |
|
|
int |
arg |
|
) |
| |
|
static |
| static FILE* getiofile |
( |
lua_State * |
L, |
|
|
const char * |
findex |
|
) |
| |
|
static |
| static int l_checkmode |
( |
const char * |
mode | ) |
|
|
static |
| static int nextc |
( |
RN * |
rn | ) |
|
|
static |
| static void opencheck |
( |
lua_State * |
L, |
|
|
const char * |
fname, |
|
|
const char * |
mode |
|
) |
| |
|
static |
| static void read_all |
( |
lua_State * |
L, |
|
|
FILE * |
f |
|
) |
| |
|
static |
| static int read_chars |
( |
lua_State * |
L, |
|
|
FILE * |
f, |
|
|
size_t |
n |
|
) |
| |
|
static |
| static int read_line |
( |
lua_State * |
L, |
|
|
FILE * |
f, |
|
|
int |
chop |
|
) |
| |
|
static |
| static int read_number |
( |
lua_State * |
L, |
|
|
FILE * |
f |
|
) |
| |
|
static |
| static int readdigits |
( |
RN * |
rn, |
|
|
int |
hex |
|
) |
| |
|
static |
| static int test2 |
( |
RN * |
rn, |
|
|
const char * |
set |
|
) |
| |
|
static |
| static int test_eof |
( |
lua_State * |
L, |
|
|
FILE * |
f |
|
) |
| |
|
static |
Initial value:= {
{NULL, NULL}
}
static int io_tmpfile(lua_State *L)
static int io_lines(lua_State *L)
static int io_type(lua_State *L)
static int io_read(lua_State *L)
static int io_close(lua_State *L)
static int io_popen(lua_State *L)
static int io_write(lua_State *L)
static int io_flush(lua_State *L)
static int io_input(lua_State *L)
static int io_open(lua_State *L)
static int io_output(lua_State *L)
Definition at line 734 of file liolib.c.
Initial value:= {
{"__index", NULL},
{NULL, NULL}
}
static int f_gc(lua_State *L)
static int f_tostring(lua_State *L)
Definition at line 768 of file liolib.c.
Initial value:= {
{NULL, NULL}
}
static int f_read(lua_State *L)
static int f_lines(lua_State *L)
static int f_seek(lua_State *L)
static int f_flush(lua_State *L)
static int f_setvbuf(lua_State *L)
static int f_close(lua_State *L)
static int f_write(lua_State *L)
Definition at line 753 of file liolib.c.
