lua 二进制打包库lpack

jce序列化到lua的项目遇到一个难点，jce是类c++的，支持void,bool,byte,short,int,long,float,double,string等类型，而lua是动态类型语言，基本类型也只有number,string,function,table,usrdata....，怎么让jce中的类型正确的用Lua表示。

• 参考python的实现，python用的是struct库中的struct.pack（）和struct.unpack（）以及struct.unpack_from（）方法。于是github找发现lua也有类似的库----lpack 下载链接：https://github.com/LuaDist/lpack，使用方法同bit库，用动态链接的方法。
• 具体调用方法，提供了两个接口： pack和unpack，但是有两种调用方法，使用宏(USE_GLOBALS)来控制，第一种是使用全局接口(pack/unpack)，另外一种是将这两个接口插入到string的空间里面(string.pack/string.unpack)pack操作用于将lua变量按自定义类型打包成string类型，unpack用于解包，接口参数入下

• pack (f, ...)
  Packs values into string 
  Parameters:
  f：string Format string.
  ... Values to pack.
  Returns:
  string Packed string.
  
  unpack (s, f[, init])
  Unpacks values from a string
  Parameters:
  s ：string Packed string.
  f ：string Format string.
  init int Initial position.
  Returns:
  int Next unread position.
  Value(s) from string.

  使用例子

require("pack")
local pack=string.pack---将接口插入到string空间中
local unpack=string.unpack

str=pack(">I>I>I",100,200,300) ---I表示按int类型即4个字节打包，>表示字节序
print(#str,type(str))    ---输出12 string,3个int等于12字节,打包生成string类型
print(str)               ---但是这样不能输出，没查到原因

print(unpack(str,">I"))  ---输出 5 100 ，5表示下一个未读字节的位置，100是因为默认从位置0开始读，">I"表示只读取一个
print(unpack(str,">I>I",5))---输出13 200 300，从位置5开始读两个，下一个未读位置是13

• 打包变量类型定义

    #define OP_ZSTRING  'z'     //空字符串
    #define OP_BSTRING  'p'     //长度小于2^8的字符串
    #define OP_WSTRING  'P'     //长度小于2^16的字符串
    #define OP_SSTRING  'a'     //长度小于2^32/64的字符串*/
    #define OP_STRING   'A'     //指定长度字符串
    #define OP_FLOAT    'f'     /* float */
    #define OP_DOUBLE   'd'     /* double */
    #define OP_NUMBER   'n'     /* Lua number */
    #define OP_CHAR     'c'     /* char */
    #define OP_BYTE     'b'     /* byte = unsigned char */
    #define OP_SHORT    'h'     /* short */
    #define OP_USHORT   'H'     /* unsigned short */
    #define OP_INT      'i'     /* int */
    #define OP_UINT     'I'     /* unsigned int */
    #define OP_LONG     'l'     /* long */
    #define OP_ULONG    'L'     /* unsigned long */

• 打包字节序

•     #define OP_LITTLEENDIAN '<'     /* little endian */
      #define OP_BIGENDIAN    '>'     /* big endian */
      #define OP_NATIVE       '='     /* native endian */