+static void
+gre_sre_print(netdissect_options *ndo, uint16_t af, uint8_t sreoff,
+ uint8_t srelen, const u_char *bp, u_int len)
+{
+ switch (af) {
+ case GRESRE_IP:
+ ND_PRINT((ndo, ", (rtaf=ip"));
+ gre_sre_ip_print(ndo, sreoff, srelen, bp, len);
+ ND_PRINT((ndo, ") "));
+ break;
+ case GRESRE_ASN:
+ ND_PRINT((ndo, ", (rtaf=asn"));
+ gre_sre_asn_print(ndo, sreoff, srelen, bp, len);
+ ND_PRINT((ndo, ") "));
+ break;
+ default:
+ ND_PRINT((ndo, ", (rtaf=0x%x) ", af));
+ }
+}
+
+static void
+gre_sre_ip_print(netdissect_options *ndo, uint8_t sreoff, uint8_t srelen,
+ const u_char *bp, u_int len)
+{
+ struct in_addr a;
+ const u_char *up = bp;
+
+ if (sreoff & 3) {
+ ND_PRINT((ndo, ", badoffset=%u", sreoff));
+ return;
+ }
+ if (srelen & 3) {
+ ND_PRINT((ndo, ", badlength=%u", srelen));
+ return;
+ }
+ if (sreoff >= srelen) {
+ ND_PRINT((ndo, ", badoff/len=%u/%u", sreoff, srelen));
+ return;
+ }
+
+ for (;;) {
+ if (len < 4 || srelen == 0)
+ return;
+
+ memcpy(&a, bp, sizeof(a));
+ ND_PRINT((ndo, " %s%s",
+ ((bp - up) == sreoff) ? "*" : "",
+ inet_ntoa(a)));
+
+ bp += 4;
+ len -= 4;
+ srelen -= 4;
+ }
+}
+
+static void
+gre_sre_asn_print(netdissect_options *ndo, uint8_t sreoff, uint8_t srelen,
+ const u_char *bp, u_int len)
+{
+ const u_char *up = bp;
+
+ if (sreoff & 1) {
+ ND_PRINT((ndo, ", badoffset=%u", sreoff));
+ return;
+ }
+ if (srelen & 1) {
+ ND_PRINT((ndo, ", badlength=%u", srelen));
+ return;
+ }
+ if (sreoff >= srelen) {
+ ND_PRINT((ndo, ", badoff/len=%u/%u", sreoff, srelen));
+ return;
+ }
+
+ for (;;) {
+ if (len < 2 || srelen == 0)
+ return;
+
+ ND_PRINT((ndo, " %s%x",
+ ((bp - up) == sreoff) ? "*" : "",
+ EXTRACT_16BITS(bp)));
+
+ bp += 2;
+ len -= 2;
+ srelen -= 2;
+ }