- 1、本文档共5页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
Lua小程序十六进制字符串和二进制数据间的转换.
Lua小程序 十六进制字符串和二进制数据间的转换
从十六进制字符串转为二进制数:
1 #! /usr/local/bin/lua 2 3 4 --Note: Input hex string files content must be 5 --a upper case hex string 6 7 --Check the arguments 8 if #arg ~= 2 then 9 print(Usage:hexstr2bytes.lua Input Hex String File Output Bytes File\n);10 os.exit();11 end12 13 --Open input hex string file14 local hexstrfile = io.open(arg[1], rb);15 if nil == hexstrfile then16 print(Can not open input file!\n);17 os.exit();18 end19 20 --Read from the hex string file21 local hexstr = hexstrfile:read(*a);22 if nil == hexstr then23 print(Can not read hex string from input file!\n);24 elseif 1 == string.len(hexstr)%2 then25 print(Hex string size must be evel!\n);26 os.exit();27 else28 print(Hex String:, hexstr, \n);29 end30 31 --Close hex string file32 hexstrfile:close();33 34 --Open output binary file35 local bytesfile = io.open(arg[2], wb);36 if nil == bytesfile then37 print(Can not open output file to write!\n);38 os.exit();39 end40 41 --Convert hex string to bytes42 for i = 1, string.len(hexstr) - 1, 2 do43 local doublebytestr = string.sub(hexstr, i, i+1);44 local n = tonumber(doublebytestr, 16);45 if 0 == n then46 bytesfile:write(\00);47 else48 bytesfile:write(string.format(%c, n));49 end50 end51 52 --Close output binary file53 bytesfile:close();54 55 56
从二进制数转十六进制字符串:
1 #! /usr/local/bin/lua 2 3 4 --Check the arguments 5 if #arg ~= 2 then 6 print(Usage:bytes2hexstr.lua Input Bytes File Output Hex String File\n); 7 os.exit(); 8 end 9 10 --Open input bytes file11 local bytesfile = io.open(arg[1], rb);12 if nil == bytesfile then13 print(Can not open input file!\n);14 os.exit();15 end16 17 --Read from the bytes file18 local bytes = bytesfile:read(*a);19 if nil == bytes then20 print(Can not read bytes from input file!\n);21 os.exit();22 end23 24 --Close bytes file25 byte
文档评论(0)