@verb #322:"parse_KEXINIT" this none this rxdo #55
@program #322:"parse_KEXINIT" this none this
{packet} = args
cookie = packet[1..16]
packet[1..16] = {}
{packet, kex_algorithms} = this:parse_string(packet)
{packet, server_host_key_algorithms} = this:parse_string(packet)
{packet, encryption_algorithms_client_to_server} = this:parse_string(packet)
{packet, encryption_algorithms_server_to_client} = this:parse_string(packet)
{packet, mac_algorithms_client_to_server} = this:parse_string(packet)
{packet, mac_algorithms_server_to_client} = this:parse_string(packet)
{packet, compression_algorithms_client_to_server} = this:parse_string(packet)
{packet, compression_algorithms_server_to_client} = this:parse_string(packet)
{packet, languages_client_to_server} = this:parse_string(packet)
{packet, languages_server_to_client} = this:parse_string(packet)
first_kex_packet_follows = packet[1]
kex_algorithms = $string_utils:explode(kex_algorithms, ",")
return {cookie, kex_algorithms, server_host_key_algorithms, encryption_algorithms_client_to_server, encryption_algorithms_server_to_client, mac_algorithms_client_to_server, mac_algorithms_server_to_client, compression_algorithms_client_to_server, compression_algorithms_server_to_client, languages_client_to_server, languages_server_to_client, first_kex_packet_follows}
"Last modified by manta (#7165) on Wed Mar  7 10:10:31 2001 MST."
"This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:06 2002 MDT)."
"Last modified by Dax (#789) on Sat Aug 17 14:50:06 2002 MDT."
.