69 void memrevifle(void *ptr, size_t len) {  in memrevifle()  argument
71                     *e = (unsigned char *)p+len-1,  in memrevifle()
77     len /= 2;  in memrevifle()
78     while(len--) {  in memrevifle()
95     size_t len, free;  member
114     buf->len = buf->free = 0;  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()
131     mp_realloc(L, buf->b, buf->len + buf->free, 0); /* realloc to 0 = free */  in mp_buf_free()
154 void mp_cur_init(mp_cur *cursor, const unsigned char *s, size_t len) {  in mp_cur_init()  argument
156     cursor->left = len;  in mp_cur_init()
174 void mp_encode_bytes(lua_State *L, mp_buf *buf, const unsigned char *s, size_t len) {  in mp_encode_bytes()  argument
178     if (len < 32) {  in mp_encode_bytes()
179         hdr[0] = 0xa0 | (len&0xff); /* fix raw */  in mp_encode_bytes()
181     } else if (len <= 0xff) {  in mp_encode_bytes()
183         hdr[1] = len;  in mp_encode_bytes()
185     } else if (len <= 0xffff) {  in mp_encode_bytes()
187         hdr[1] = (len&0xff00)>>8;  in mp_encode_bytes()
188         hdr[2] = len&0xff;  in mp_encode_bytes()
192         hdr[1] = (len&0xff000000)>>24;  in mp_encode_bytes()
193         hdr[2] = (len&0xff0000)>>16;  in mp_encode_bytes()
194         hdr[3] = (len&0xff00)>>8;  in mp_encode_bytes()
195         hdr[4] = len&0xff;  in mp_encode_bytes()
199     mp_buf_append(L,buf,s,len);  in mp_encode_bytes()
342     size_t len;  in mp_encode_lua_string()  local
345     s = lua_tolstring(L,-1,&len);  in mp_encode_lua_string()
346     mp_encode_bytes(L,buf,(const unsigned char*)s,len);  in mp_encode_lua_string()
382     size_t len = lua_objlen(L,-1), j;  in mp_encode_lua_table_as_array()  local
384     size_t len = lua_rawlen(L,-1), j;  in mp_encode_lua_table_as_array()
387     mp_encode_array(L,buf,len);  in mp_encode_lua_table_as_array()
388     for (j = 1; j <= len; j++) {  in mp_encode_lua_table_as_array()
397     size_t len = 0;  in mp_encode_lua_table_as_map()  local
406         len++;  in mp_encode_lua_table_as_map()
410     mp_encode_map(L,buf,len);  in mp_encode_lua_table_as_map()
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()
545 void mp_decode_to_lua_array(lua_State *L, mp_cur *c, size_t len) {  in mp_decode_to_lua_array()  argument
546     assert(len <= UINT_MAX);  in mp_decode_to_lua_array()
550     while(len--) {  in mp_decode_to_lua_array()
558 void mp_decode_to_lua_hash(lua_State *L, mp_cur *c, size_t len) {  in mp_decode_to_lua_hash()  argument
559     assert(len <= UINT_MAX);  in mp_decode_to_lua_hash()
561     while(len--) {  in mp_decode_to_lua_hash()
787     size_t len;  in mp_unpack_full()  local
793     s = luaL_checklstring(L,1,&len); /* if no match, exits */  in mp_unpack_full()
798             offset, len);  in mp_unpack_full()
799     else if (offset > len)  in mp_unpack_full()
801             "Start offset %d greater than input length %d.", offset, len);  in mp_unpack_full()
805     mp_cur_init(&c,(const unsigned char *)s+offset,len-offset);  in mp_unpack_full()
823         int offset = len - c.left;  in mp_unpack_full()