Odpowiednik funkcji pack i unpack z PHP w TCL (binary..)

[Kamil D.]

Witam!

Czy ktoś z Was wie może jak zastąpić:

unpack('Vtype/Vsize/Vkey', $data);
pack('VVVVVVVv', GG_LOGIN, 0x16, $uid, $this->_loginHash($password,
(int)$aData['key']),

(http://anakin.us/phplibgadu.phps)

na TCLowe odpowiedniki? Nie bardzo rozumiem funkcji binary (bo o nią chodzi?)
i mi to nie idzie..

Pozdrawiam

[Googie]

Post by Kamil D.
Witam!
unpack('Vtype/Vsize/Vkey', $data);
pack('VVVVVVVv', GG_LOGIN, 0x16, $uid, $this->_loginHash($password,
(int)$aData['key']),
(http://anakin.us/phplibgadu.phps)
na TCLowe odpowiedniki? Nie bardzo rozumiem funkcji binary (bo o nią
chodzi?) i mi to nie idzie..
Pozdrawiam

pack i unpack są mniej więcej odpowiednikami 'binary format' i 'binary
scan', tylko oczywiście inaczej się ich używa.

Podam Ci przykład użycia binary format i scan, a resztę mam nadzieję że
wymyślisz z manuala Tcl (
http://www.tcl.tk/man/tcl8.4/TclCmd/binary.htm ):

1. Konwersja stringa na kod ascii:

binary scan $string c* asciiVariable
puts $asciiVariable

2. Konwersja odwrotna (z ascii do stringa):

puts [binary format c* $asciiString]


Musisz przetłumaczyć sobie odpowiednie parametry z
http://pl2.php.net/pack (chodzi o literki i ich typy danych) na
odpowiednie parametry z
http://www.tcl.tk/man/tcl8.4/TclCmd/binary.htm .

[Kamil D.]

[...]

Dzięki za odpowiedź i przykłady. Myślę, że teraz sobie poradzę :)

Pozdrawiam