108     mp_buf *buf = NULL;  in mp_buf_new()  local
111     buf = (mp_buf*)mp_realloc(L, NULL, 0, sizeof(*buf));  in mp_buf_new()
113     buf->b = NULL;  in mp_buf_new()
114     buf->len = buf->free = 0;  in mp_buf_new()
115     return buf;  in mp_buf_new()
118 void mp_buf_append(lua_State *L, mp_buf *buf, const unsigned char *s, size_t len) {  in mp_buf_append()  argument
119     if (buf->free < len) {  in mp_buf_append()
120         size_t newsize = (buf->len+len)*2;  in mp_buf_append()
122         buf->b = (unsigned char*)mp_realloc(L, buf->b, buf->len + buf->free, newsize);  in mp_buf_append()
123         buf->free = newsize - buf->len;  in mp_buf_append()
125     memcpy(buf->b+buf->len,s,len);  in mp_buf_append()
126     buf->len += len;  in mp_buf_append()
127     buf->free -= len;  in mp_buf_append()
130 void mp_buf_free(lua_State *L, mp_buf *buf) {  in mp_buf_free()  argument
131     mp_realloc(L, buf->b, buf->len + buf->free, 0); /* realloc to 0 = free */  in mp_buf_free()
132     mp_realloc(L, buf, sizeof(*buf), 0);  in mp_buf_free()
174 void mp_encode_bytes(lua_State *L, mp_buf *buf, const unsigned char *s, size_t len) {  in mp_encode_bytes()  argument
198     mp_buf_append(L,buf,hdr,hdrlen);  in mp_encode_bytes()
199     mp_buf_append(L,buf,s,len);  in mp_encode_bytes()
203 void mp_encode_double(lua_State *L, mp_buf *buf, double d) {  in mp_encode_double()  argument
212         mp_buf_append(L,buf,b,5);  in mp_encode_double()
217         mp_buf_append(L,buf,b,9);  in mp_encode_double()
221 void mp_encode_int(lua_State *L, mp_buf *buf, int64_t n) {  in mp_encode_int()  argument
290     mp_buf_append(L,buf,b,enclen);  in mp_encode_int()
293 void mp_encode_array(lua_State *L, mp_buf *buf, int64_t n) {  in mp_encode_array()  argument
313     mp_buf_append(L,buf,b,enclen);  in mp_encode_array()
316 void mp_encode_map(lua_State *L, mp_buf *buf, int64_t n) {  in mp_encode_map()  argument
336     mp_buf_append(L,buf,b,enclen);  in mp_encode_map()
341 void mp_encode_lua_string(lua_State *L, mp_buf *buf) {  in mp_encode_lua_string()  argument
346     mp_encode_bytes(L,buf,(const unsigned char*)s,len);  in mp_encode_lua_string()
349 void mp_encode_lua_bool(lua_State *L, mp_buf *buf) {  in mp_encode_lua_bool()  argument
351     mp_buf_append(L,buf,&b,1);  in mp_encode_lua_bool()
355 void mp_encode_lua_integer(lua_State *L, mp_buf *buf) {  in mp_encode_lua_integer()  argument
361     mp_encode_int(L, buf, (int64_t)i);  in mp_encode_lua_integer()
367 void mp_encode_lua_number(lua_State *L, mp_buf *buf) {  in mp_encode_lua_number()  argument
371         mp_encode_lua_integer(L, buf);  in mp_encode_lua_number()
373         mp_encode_double(L,buf,(double)n);  in mp_encode_lua_number()
377 void mp_encode_lua_type(lua_State *L, mp_buf *buf, int level);
380 void mp_encode_lua_table_as_array(lua_State *L, mp_buf *buf, int level) {  in mp_encode_lua_table_as_array()  argument
387     mp_encode_array(L,buf,len);  in mp_encode_lua_table_as_array()
391         mp_encode_lua_type(L,buf,level+1);  in mp_encode_lua_table_as_array()
396 void mp_encode_lua_table_as_map(lua_State *L, mp_buf *buf, int level) {  in mp_encode_lua_table_as_map()  argument
410     mp_encode_map(L,buf,len);  in mp_encode_lua_table_as_map()
415         mp_encode_lua_type(L,buf,level+1); /* encode key */  in mp_encode_lua_table_as_map()
416         mp_encode_lua_type(L,buf,level+1); /* encode val */  in mp_encode_lua_table_as_map()
466 void mp_encode_lua_table(lua_State *L, mp_buf *buf, int level) {  in mp_encode_lua_table()  argument
468         mp_encode_lua_table_as_array(L,buf,level);  in mp_encode_lua_table()
470         mp_encode_lua_table_as_map(L,buf,level);  in mp_encode_lua_table()
473 void mp_encode_lua_null(lua_State *L, mp_buf *buf) {  in mp_encode_lua_null()  argument
477     mp_buf_append(L,buf,b,1);  in mp_encode_lua_null()
480 void mp_encode_lua_type(lua_State *L, mp_buf *buf, int level) {  in mp_encode_lua_type()  argument
487     case LUA_TSTRING: mp_encode_lua_string(L,buf); break;  in mp_encode_lua_type()
488     case LUA_TBOOLEAN: mp_encode_lua_bool(L,buf); break;  in mp_encode_lua_type()
491         mp_encode_lua_number(L,buf); break;  in mp_encode_lua_type()
494             mp_encode_lua_integer(L, buf);  in mp_encode_lua_type()
496             mp_encode_lua_number(L, buf);  in mp_encode_lua_type()
500     case LUA_TTABLE: mp_encode_lua_table(L,buf,level); break;  in mp_encode_lua_type()
501     default: mp_encode_lua_null(L,buf); break;  in mp_encode_lua_type()
513     mp_buf *buf;  in mp_pack()  local
518     buf = mp_buf_new(L);  in mp_pack()
524         mp_encode_lua_type(L,buf,0);  in mp_pack()
526         lua_pushlstring(L,(char*)buf->b,buf->len);  in mp_pack()
531         buf->free += buf->len;  in mp_pack()
532         buf->len = 0;  in mp_pack()
534     mp_buf_free(L, buf);  in mp_pack()