1*088332b5SXin Li /* 2*088332b5SXin Li ** $Id: lzio.h $ 3*088332b5SXin Li ** Buffered streams 4*088332b5SXin Li ** See Copyright Notice in lua.h 5*088332b5SXin Li */ 6*088332b5SXin Li 7*088332b5SXin Li 8*088332b5SXin Li #ifndef lzio_h 9*088332b5SXin Li #define lzio_h 10*088332b5SXin Li 11*088332b5SXin Li #include "lua.h" 12*088332b5SXin Li 13*088332b5SXin Li #include "lmem.h" 14*088332b5SXin Li 15*088332b5SXin Li 16*088332b5SXin Li #define EOZ (-1) /* end of stream */ 17*088332b5SXin Li 18*088332b5SXin Li typedef struct Zio ZIO; 19*088332b5SXin Li 20*088332b5SXin Li #define zgetc(z) (((z)->n--)>0 ? cast_uchar(*(z)->p++) : luaZ_fill(z)) 21*088332b5SXin Li 22*088332b5SXin Li 23*088332b5SXin Li typedef struct Mbuffer { 24*088332b5SXin Li char *buffer; 25*088332b5SXin Li size_t n; 26*088332b5SXin Li size_t buffsize; 27*088332b5SXin Li } Mbuffer; 28*088332b5SXin Li 29*088332b5SXin Li #define luaZ_initbuffer(L, buff) ((buff)->buffer = NULL, (buff)->buffsize = 0) 30*088332b5SXin Li 31*088332b5SXin Li #define luaZ_buffer(buff) ((buff)->buffer) 32*088332b5SXin Li #define luaZ_sizebuffer(buff) ((buff)->buffsize) 33*088332b5SXin Li #define luaZ_bufflen(buff) ((buff)->n) 34*088332b5SXin Li 35*088332b5SXin Li #define luaZ_buffremove(buff,i) ((buff)->n -= (i)) 36*088332b5SXin Li #define luaZ_resetbuffer(buff) ((buff)->n = 0) 37*088332b5SXin Li 38*088332b5SXin Li 39*088332b5SXin Li #define luaZ_resizebuffer(L, buff, size) \ 40*088332b5SXin Li ((buff)->buffer = luaM_reallocvchar(L, (buff)->buffer, \ 41*088332b5SXin Li (buff)->buffsize, size), \ 42*088332b5SXin Li (buff)->buffsize = size) 43*088332b5SXin Li 44*088332b5SXin Li #define luaZ_freebuffer(L, buff) luaZ_resizebuffer(L, buff, 0) 45*088332b5SXin Li 46*088332b5SXin Li 47*088332b5SXin Li LUAI_FUNC void luaZ_init (lua_State *L, ZIO *z, lua_Reader reader, 48*088332b5SXin Li void *data); 49*088332b5SXin Li LUAI_FUNC size_t luaZ_read (ZIO* z, void *b, size_t n); /* read next n bytes */ 50*088332b5SXin Li 51*088332b5SXin Li 52*088332b5SXin Li 53*088332b5SXin Li /* --------- Private Part ------------------ */ 54*088332b5SXin Li 55*088332b5SXin Li struct Zio { 56*088332b5SXin Li size_t n; /* bytes still unread */ 57*088332b5SXin Li const char *p; /* current position in buffer */ 58*088332b5SXin Li lua_Reader reader; /* reader function */ 59*088332b5SXin Li void *data; /* additional data */ 60*088332b5SXin Li lua_State *L; /* Lua state (for reader) */ 61*088332b5SXin Li }; 62*088332b5SXin Li 63*088332b5SXin Li 64*088332b5SXin Li LUAI_FUNC int luaZ_fill (ZIO *z); 65*088332b5SXin Li 66*088332b5SXin Li #endif 67