Lua: scrittura di valori esadecimali come file binario

Question

Ho diversi valori esadecimali che cerco di scrivere su un file. Sembra che Lua non lo supporti immediatamente, poiché sono tutti trattati come stringhe anziché come valori. Ho calcolato che avrei dovuto suddividere un valore esadecimale più lungo, ad esempio AABBCC in AA, BB, CC e utilizzare string.char() su tutti i loro valori decimali consecutivi per portare a termine il lavoro.

Esiste una funzione integrata che consente di scrivere direttamente tali valori senza prima convertirli? Ho usato caratteri di escape come "0xAA" e "\ xAA", ma quelli non funzionavano.

Modifica: Lasciatemi fare un esempio. Sto guardando un file di prova in un editor esadecimale:

00000000 00 00 00 00 00 00 ...... 

E voglio scrivere su di esso nel modo seguente con il "AABBCC" stringa:

00000000 AA BB CC 00 00 00 ...... 

quello che ottengo anche se con i caratteri di escape è:

00000000 41 41 42 42 43 43 AABBCC 

Answer 1

Io uso le seguenti funzioni per la conversione tra una stringa esadecimale e un "binario non elaborato":

function string.fromhex(str) 
    return (str:gsub('..', function (cc) 
     return string.char(tonumber(cc, 16)) 
    end)) 
end 

function string.tohex(str) 
    return (str:gsub('.', function (c) 
     return string.format('%02X', string.byte(c)) 
    end)) 
end 

Essi possono essere utilizzati come segue:

("Hello world!"):tohex()    --> 48656C6C6F20776F726C6421 
("48656C6C6F20776F726C6421"):fromhex() --> Hello world! 

Answer 2

In modo da avere una stringa come questa:

value = 'AABBCC' 

E vuoi stamparlo (o trasformarlo in una stringa) in questo modo?

'101010101011101111001100' 

Che ne dici di questo?

function hex2bin(str) 
    local map = { 
     ['0'] = '0000' 
     ['1'] = '0001' 
     ['2'] = '0010' 
     -- etc. up to 'F' 
    } 
    return str:gsub('[0-9A-F]', map) 
end 

Nota che lascia intatto qualsiasi carattere che non possa essere interpretato come esadecimale.

Answer 3

Esiste una tale funzione perché è così facile scriverne una.

function writeHex(str,fh) 
    for byte in str:gmatch'%x%x' do 
     fh:write(string.char(tonumber(byte,16))) 
    end 
end 

Questo semplicemente scrive i valori nel file indicato dal filehandle fh.