hexmanager/hexdecode.lua at master · nielsvoss/hexmanager · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
require('hexpatterns')
require('hexconfig')

HexDecode = {}

function HexDecode.decode_pattern(pattern_iota)
    local angles = pattern_iota.angles
    local use_short_names = HexConfig.get('use_short_names_when_decoding') == 'true'

    local pattern = HexPatterns.from_angles(angles)
    if pattern then
        local pattern_name = pattern.translation
        if use_short_names then
            pattern_name = pattern.name
        end

        if HexPatterns.is_dynamic(pattern) then
            return pattern_name..' ('..angles..')'
        else
            return pattern_name
        end
    end

    if angles:match("^aqaa") or angles:match("^dedd") then
       return 'Numerical Reflection ('..angles..')'
    end

    return 'Unknown ('..angles..')'
end

function HexDecode.decode_nonlist(iota)
    if type(iota) == 'number' then
        return '- '..tostring(iota)
    elseif type(iota) == 'boolean' then
        return '- '..tostring(iota)
    elseif type(iota) == 'string' then
        return '- "'..iota..'"'
    elseif iota.angles then
       return HexDecode.decode_pattern(iota)
    elseif iota.null then
        return "- null"
    elseif iota.garbage then
        return "- garbage"
    elseif iota.x and iota.y and iota.z then
        return '<'..tostring(iota.x)..', '..tostring(iota.y)..', '..tostring(iota.z)..'>'
    elseif iota.uuid then
        return '- entity('..iota.uuid..') // Entity name: '..iota.name
    elseif iota.iotaType then
        return '- iota_type('..iota.iotaType..')'
    elseif iota.entityType then
        return '- entity_type('..iota.entityType..')'
    elseif iota.isItem then
        return '- item_type('..iota.itemType..')'
    elseif iota.gate then
        return '- gate('..iota.gate..')'
    elseif iota.moteUuid then
        return '- mote('..iota.moteUuid..', '..iota.itemID..') // Nexus UUID: '..iota.nexusUuid
    elseif iota.matrix then
        return '- garbage // Matricies are currently unsuppored by the decoder'
    else
        return '- garbage // Unrecognized Iota Type'
    end
end

local function decode_iotas_aux(iotas, indentation_level)
    local lines = {}
    for _,iota in ipairs(iotas) do
        local indentation = string.rep(' ', 4 * indentation_level)

        -- Check if iota is a list
        if type(iota) == 'table' and (iota == {} or iota[1]) then
            table.insert(lines, indentation..'[')
            for _,line in ipairs(decode_iotas_aux(iota, indentation_level + 1)) do
                table.insert(lines, line)
            end
            table.insert(lines, indentation..']')
        else
            local decoded = HexDecode.decode_nonlist(iota)
            if decoded == 'Introspection' then
                table.insert(lines, indentation..'{')
                indentation_level = indentation_level + 1
            elseif decoded == 'Retrospection' then
                if indentation_level > 0 then
                    indentation_level = indentation_level - 1
                end
                indentation = string.rep(' ', 4 * indentation_level)
                table.insert(lines, indentation..'}')
            else
                table.insert(lines, indentation..decoded)
            end
        end
    end
    return lines
end


function HexDecode.decode_iotas(iotas)
   return decode_iotas_aux(iotas, 0)
end