Added NAPTR processing

src/zscanner/scanner_body.rl

@@ -1168,6 +1168,10 @@
         s->r_type = KNOT_RRTYPE_SRV;
         fhold; fcall data_srv;
     }
+    action _data_naptr {
+        s->r_type = KNOT_RRTYPE_NAPTR;
+        fhold; fcall data_naptr;
+    }
     action _data_dname { // Same as NS.
         s->r_type = KNOT_RRTYPE_DNAME;
         fhold; fcall data_ns;
@@ -1264,6 +1268,12 @@
         $!_r_data_error
         %_ret . all_wchar;
 
+    data_naptr :=
+        ( sep . number16 . sep . number16 . sep . text_with_length . sep .
+          text_with_length . sep . text_with_length . sep . r_dname )
+        $!_r_data_error
+        %_ret . all_wchar;
+
     data_ds :=
         ( sep . number16 . sep . number8 . sep . number8 . sep . hex_array )
         $!_r_data_error
@@ -1360,7 +1370,7 @@
         | "AAAA"i               %_data_aaaa
         | "LOC"i                %_data_
         | "SRV"i                %_data_srv
-        | "NAPTR"i              %_data_
+        | "NAPTR"i              %_data_naptr
         | "KX"i                 %_data_
         | "CERT"i               %_data_
         | "DNAME"i              %_data_dname

src/zscanner/test/data/test6

+cid.urn.arpa. IN NAPTR 100   10   ""    ""  "!^urn:cid:.+@([^\.]+\.)(.*)$!\\2!i"   .
+example.com.    IN NAPTR 100  50  "a"    "z3950+N2L+N2C"     ""   cidserver.example.com.
+    IN NAPTR 100  50  "a"    "rcds+N2C"          ""   cidserver.example.com.
+    IN NAPTR 100  50  "s"    "http+N2L+N2C+N2R"  ""   www.example.com.