readHandshake PalaceMsgTypes.LittleEndianServer connection header = do
    let userRefId  = Inbound.messageRefNumber header
        handshake = Inbound.Handshake userRefId (Inbound.PalaceProtocol connection Inbound.LittleEndian)
    return $ Inbound.HandshakeMessage handshake
readHandshake PalaceMsgTypes.LittleEndianServer connection header = do
    let userRefId  = Inbound.messageRefNumber header
        handshake = Inbound.Handshake userRefId (Inbound.PalaceProtocol connection Inbound.LittleEndian)
    return $ Inbound.HandshakeMessage handshake
readHandshake PalaceMsgTypes.LittleEndianServer connection header = do
    let userRefId  = Inbound.messageRefNumber header
        handshake = Inbound.Handshake userRefId (Inbound.PalaceProtocol connection Inbound.LittleEndian)
    return $ Inbound.HandshakeMessage handshake