Fix broken length of some ah dgrams

[vinegar-ip.git] / make-probes.tcl

diff --git a/make-probes.tcl b/make-probes.tcl
index ce215a8dbf6addb0346003588c515c9718b29600..a23edff8bf7d816b7011e26e365938c1489e023c 100755 (executable)
--- a/make-probes.tcl
+++ b/make-probes.tcl
@@ -727,7 +727,7 @@ define ip-proto 51 ah {mtu} {
     get next number 0 255
     get reserved hex 0 0xffff
     get spi hex32
-    get auth_data rand 0 [expr {$mtu-8}] 4
+    get auth_data rand 0 [expr {$mtu-8 > 50 ? 50 : $mtu-8}] 4
     set length [packet-len $auth_data]
     assemble ah {
      +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+