Question

我正在玩Feed The Beast并想创建一个网络。我已经可以将二进制代码从一台计算机发送到另一台计从字符串中获取二进制代码的方法如下：

function toBinString(s)
  bytes = {string.byte(s,i,string.len(s))}
  binary = ""

  for i,number in ipairs(bytes) do
    c = 0

    while(number>0) do
      binary = (number%2)..binary
      number = number - (number%2)
      number = number/2
      c = c+1
    end

    while(c<8) do
      binary = "0"..binary
      c = c+1
    end
  end

  return binary
end

function toBin(s)
  binary = toBinString(s)    
  ret = {}
  c = 1

  for i=1,string.len(binary) do
    char = string.sub(binary,i,i)

    if(tonumber(char)==0) then
      ret[c] = 0
      c = c+1
    elseif(tonumber(char)==1) then
      ret[c] = 1
      c = c+1
    elseif(tonumber(char)) then
      print("Error: expected \'0\' or \'1\' but got \'",char,"\'.")
    end
  end

  return ret
end

如何获取string.byte(...)中使用的字符串？

Answer 1

这是一种可能性：

function toBinAndBack(s)
  local bin = toBin(s)
  local r = {}
  for i=1,#bin,8 do
    local n = 0
    for j=0,7 do
      n = n + (2^(7-j)) * bin[i+j]
    end
    r[#r+1] = n
  end
  return string.char(unpack(r)):reverse()
end

最后需要reverse，因为您在toBinString中反向编码字符串。此外，我必须更换此行：bytes = {string.byte(s,i,string.len(s))} bytes = {string.byte(s,1,-1)}以使您的代码正常工作。

请注意，使用unpack()会限制可以解码的字符串的大小。如果要解码任意长的字符串，可以用这个替换最后一行（return string.char(unpack(r)):reverse()）：

for i=1,#r do
  r[i] = string.char(r[i])
end
return table.concat(r):reverse()

二进制代码到字符串

1 个答案: