hsign2

--theinsektAPIs/hsign2
--experiment2, not tested!
--have changed how the code is structured
--so that any send or receive function can be used
--also any hashFunction can be used

--a signer: signs a message and turns it into a sendable string
--a verifier: verifies the sendable string and returns ok,message2, where ok is true or false, and message2 is the
--message that was signed
--so if you do: local ok, message2=verify(sign(message))
--then message2 will be equal to message, and ok will true
--if someone fails at forging a message then ok will be false and message2 will be nil

--example usage (not tested!):
--os.loadAPI("theinsektAPIs/sha256")
--local protocol="myprotocolname"
--local secret="mysupersecret"
----use this for sending
--local sign=hsign2.getPack(secret,sha256.sha256)--do once
--rednet.send(id,sign("my message, can be any type of data"),protocol)
--rednet.send(id,sign("message2"),protocol)
----use this for receiving
--local maxDelay=7 --7 seconds old messages will be considered invalid
--local verify=hsign2.getUnpack(secret,sha256.sha256,maxDelay)--do once
--local id, signedMessage,protocol=rednet.receive(protocol,timeout)
--local ok,message=verify(signedMessage)--call directly after receive, because calculates time received inside
-- if not ok then print("message was invalid") end
--id, signedMessage,protocol=rednet.receive(protocol,timeout)
--ok,message=verify(signedMessage)
-- if not ok then print("message was invalid") end



--returns a pack function, that can be used to turn a message into a packet ready for sending
--over rednet
function getSigner(secret, hashFunction)
  return function(message)
    --prepare the box that holds the data, and a time stamp
    local box={time0=os.time(),day0=os.day(), data=message,}
    --turn the box into a string
    local serializedBox=textutils.serialize(box)
    --put it in a table, and put hash of it+secret
    local packet={
      ["box"]=serializedBox,
      ["hash"]=hashFunction(serializedBox..secret),
    }
    --return the prepared packet
    return textutils.serialize(packet)
  end
end


--returns a unpack function that can unpack a packet, from the correspaonding pack function
function getVerifier(secret,hashFunction,maxDelay)
  --Todo: save time and day of last received message
  --and discard any messages with lower or equal values
  --can be saved here
  return function(packet)
    --get the time that the packet was received
    local time2=os.time()
    local day2=os.day()

    if type(packet)~="string" then
      return false,nil
    end


    packet=textutils.unserialize(packet)
    --type check packet and packet fields
    if type(packet)~="table" or type(packet["box"])~="string" or type(packet["hash"])~="string" then
      return false, nil
    end

    --get and unserialize box
    local serializedBox=packet["box"]
    local box=textutils.unserialize(serializedBox)

    --type check box
    if type(box)~="table" or type(box["time0"])~="number" or type(box["day0"])~="number" then
      return false, nil
    end

    --check that time stamps aren't to old
    if maxDelay==nil then maxDelay=10 end
    if math.abs(timeDiff(time2,day2,box["time0"],box["day0"]))>maxDelay then
      return false, nil
    end

    --check that the hash is correct
    local hashValue=hashFunction(serializedBox..secret)
    if hashValue~=packet["hash"] then
      return false, nil
    end

    --passed all tests
    return true, box["data"]
  end
end




--returns the time difference in seconds
--is used in verifier
function timeDiff(time1,day1,time2,day2)
  --converts to minecraft ingame hours
  local minecraftDiff=(day1-day2)*24+(time1-time2)
  --converts to real seconds
  local secondsDiff=minecraftDiff*((20/24)*60)
  return secondsDiff
end