Home | History | Annotate | Download | only in DHCPv6

Lines Matching defs:packet

291 sub packet {
294 my $packet = "";
295 $packet .= chr($this->{msg_type});
296 $packet .= $this->{trans_id};
297 $packet .= $this->packed_options();
298 return $packet;
428 # XXX: we aren't careful about packet boundaries and values...
431 my ($packet, $print) = @_;
433 my $msg_type = ord(substr($packet, 0, 1));
434 my $trans_id = substr($packet, 1, 3);
438 print "DHCPv6 packet\n";
447 foreach my $option (unpack_options(substr($packet, 4))) {