Drop secondary (length) index

Drop secondary indexes to simplify tape operation and disallow placement
of quotes around values other than domain names and text.

Additionally, no attempt is made to parse symbols for which no symbolic
constants have been specified and use of pretty TTL notation, e.g. 1m2s,
is only allowed if the pretty_ttl option is enabled.

Fixes NLnetLabs#30.
Fixes NLnetLabs#31.
Fixes NLnetLabs#50.

Author: k0ekk0ek

CMakeLists.txt

@@ -136,14 +136,12 @@ target_include_directories(
 target_sources(zone PRIVATE
   src/zone.c
   src/types.c
-  src/table.c
   src/log.c
   src/parser.c
-  src/lexer.c
+  src/fallback/parser.c
   src/generic/base16.c
   src/generic/base32.c
-  src/generic/base64.c
-  src/fallback/parser.c)
+  src/generic/base64.c)
 
 add_executable(zone-bench src/bench.c src/fallback/bench.c)
 target_include_directories(

include/zone.h

@@ -202,19 +202,6 @@ struct zone_table {
   const zone_symbol_t *symbols; // sorted for use with bsearch
 };
 
-ZONE_EXPORT int
-zone_compare(const void *s1, const void *s2)
-zone_nonnull_all();
-
-zone_always_inline()
-zone_nonnull_all()
-inline zone_symbol_t *zone_lookup(
-  const zone_table_t *table, const zone_string_t *string)
-{
-  const zone_symbol_t key = { *string, 0 };
-  return bsearch(&key, table->symbols, table->length, sizeof(key), zone_compare);
-}
-
 // @private
 //
 // bsearch is quite slow compared to a hash table, but a hash table is either
@@ -371,21 +358,6 @@ struct zone_type_info {
 #define ZONE_BLOCK_SIZE (64)
 #define ZONE_WINDOW_SIZE (256 * ZONE_BLOCK_SIZE) // 16KB
 
-// @private
-// non-delimiting tokens may contain (escaped) newlines. tracking newlines
-// within tokens by taping them makes the lex operation more complex, resulting
-// in a significantly larger binary and slower operation, and may introduce an
-// infinite loop if the tape may not be sufficiently large enough. tokens
-// containing newlines is very much an edge case, therefore the scanner
-// implements an unlikely slow path that tracks the number of escaped newlines
-// during tokenization and registers them with each consecutive newline token.
-// this mode of operation nicely isolates location tracking in the scanner and
-// accommodates parallel processing should that ever be desired
-typedef struct zone_index zone_index_t;
-struct zone_index {
-  const char *data;
-  uint32_t newlines; // number of escaped newlines (stored per newline)
-};
 
 // tape capacity must be large enough to hold every token from a single
 // worst-case read (e.g. 64 consecutive line feeds). in practice a single
@@ -405,6 +377,17 @@ struct zone_rdata_block {
   uint8_t octets[ 65535 + 4096 /* nsec padding */ ];
 };
 
+// @private
+// non-delimiting tokens may contain (escaped) newlines. tracking newlines
+// within tokens by taping them makes the lex operation more complex, resulting
+// in a significantly larger binary and slower operation, and may introduce an
+// infinite loop if the tape may not be sufficiently large enough. tokens
+// containing newlines is very much an edge case, therefore the scanner
+// implements an unlikely slow path that tracks the number of escaped newlines
+// during tokenization and registers them with each consecutive newline token.
+// this mode of operation nicely isolates location tracking in the scanner and
+// accommodates parallel processing should that ever be desired
+
 // @private
 typedef struct zone_file zone_file_t;
 struct zone_file {
@@ -413,7 +396,11 @@ struct zone_file {
   uint16_t last_type;
   uint32_t last_ttl, default_ttl;
   uint16_t last_class;
-  size_t line;
+  // non-terminating line feeds, i.e. escaped line feeds, line feeds in quoted
+  // sections or within parentheses, are counted, but deferred for consistency
+  // in error reports
+  size_t span; /**< number of lines spanned by record */
+  size_t line; /**< starting line of record */
   const char *name;
   const char *path;
   FILE *handle;
@@ -426,15 +413,15 @@ struct zone_file {
   } buffer;
   // indexer state is kept per-file
   struct {
-    uint32_t newlines; // number of escaped newlines
     uint64_t in_comment;
     uint64_t in_quoted;
     uint64_t is_escaped;
     uint64_t follows_contiguous;
-    // vector of tokens generated by the indexer. guaranteed to be large
-    // enough to hold every token for a single read + terminators
-    zone_index_t *head, *tail, tape[ZONE_TAPE_SIZE + 2];
-  } indexer;
+  } state;
+  // vector of tokens generated by the indexer. guaranteed to be large
+  // enough to hold every token for a single read + terminators
+  struct { const char **head, **tail, *tape[ZONE_TAPE_SIZE + 2]; } fields;
+  struct { uint16_t *head, *tail, tape[ZONE_TAPE_SIZE + 1]; } lines;
 };
 
 typedef struct zone_parser zone_parser_t;

include/zone/attributes.h

@@ -40,38 +40,29 @@
 #endif
 
 #define zone_nonnull(params) zone_attribute((__nonnull__ params))
-#define zone_nonnull_all() zone_attribute((__nonnull__))
+#define zone_nonnull_all zone_attribute((__nonnull__))
 
 #if _MSC_VER
-# define zone_always_inline() __forceinline
-# define zone_never_inline() __declspec(noinline)
-# define zone_noreturn() __declspec(noreturn)
-# define zone_allocator(...)
+# define zone_really_inline __forceinline
+# define zone_never_inline __declspec(noinline)
+# define zone_warn_unused_result
 
-# define zone_unlikely(x)
+# define zone_likely(params) (params)
+# define zone_unlikely(params) (params)
 
 # define zone_format(params)
 # define zone_format_printf(string_index, first_to_check)
 #else // _MSC_VER
-# define zone_always_inline() zone_attribute((always_inline))
-# define zone_never_inline() zone_attribute((noinline))
-# if zone_has_attribute(noreturn)
-#   define zone_noreturn() zone_attribute((noreturn))
+# define zone_really_inline inline zone_attribute((always_inline))
+# define zone_never_inline zone_attribute((noinline))
+# if zone_has_attribute(warn_unused_result)
+#   define zone_warn_unused_result zone_attribute((warn_unused_result))
 # else
-#   define zone_noreturn()
+#   define zone_warn_unused_result
 # endif
 
-# if zone_has_attribute(malloc)
-#   if zone_gcc
-#     define zone_allocator(...) zone_attribute((malloc(__VA_ARGS__)))
-#   else
-#     define zone_allocator(...) zone_attribute((malloc))
-#   endif
-# else
-#   define zone_allocator(...)
-# endif
-
-# define zone_unlikely(params) __builtin_expect((params), 0)
+# define zone_likely(params) __builtin_expect(!!(params), 1)
+# define zone_unlikely(params) __builtin_expect(!!(params), 0)
 
 # if zone_has_attribute(format)
 #   define zone_format(params) zone_attribute((__format__ params))

src/bench.c

@@ -7,7 +7,6 @@
  *
  */
 #include <assert.h>
-#include <setjmp.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
@@ -28,24 +27,24 @@
 #endif
 
 #if HAVE_HASWELL
-extern zone_return_t zone_bench_haswell_lex(zone_parser_t *, size_t *);
-extern zone_return_t zone_haswell_parse(zone_parser_t *, void *);
+extern int32_t zone_bench_haswell_lex(zone_parser_t *, size_t *);
+extern int32_t zone_haswell_parse(zone_parser_t *);
 #endif
 
 #if HAVE_WESTMERE
-extern zone_return_t zone_bench_westmere_lex(zone_parser_t *, size_t *);
-extern zone_return_t zone_westmere_parse(zone_parser_t *, void *);
+extern int32_t zone_bench_westmere_lex(zone_parser_t *, size_t *);
+extern int32_t zone_westmere_parse(zone_parser_t *);
 #endif
 
-extern zone_return_t zone_bench_fallback_lex(zone_parser_t *, size_t *);
-extern zone_return_t zone_fallback_parse(zone_parser_t *, void *);
+extern int32_t zone_bench_fallback_lex(zone_parser_t *, size_t *);
+extern int32_t zone_fallback_parse(zone_parser_t *);
 
 typedef struct target target_t;
 struct target {
   const char *name;
   uint32_t instruction_set;
-  zone_return_t (*bench_lex)(zone_parser_t *, size_t *);
-  zone_return_t (*parse)(zone_parser_t *, void *);
+  int32_t (*bench_lex)(zone_parser_t *, size_t *);
+  int32_t (*parse)(zone_parser_t *);
 };
 
 static const target_t targets[] = {
@@ -58,7 +57,7 @@ static const target_t targets[] = {
   { "fallback", 0, &zone_bench_fallback_lex, &zone_fallback_parse }
 };
 
-extern zone_return_t zone_open(
+extern int32_t zone_open(
   zone_parser_t *,
   const zone_options_t *,
   zone_cache_t *,
@@ -68,29 +67,19 @@ extern zone_return_t zone_open(
 extern void zone_close(
   zone_parser_t *);
 
-static zone_return_t bench_lex(zone_parser_t *parser, const target_t *target)
+static int32_t bench_lex(zone_parser_t *parser, const target_t *target)
 {
   size_t tokens = 0;
-  zone_return_t result;
-  volatile jmp_buf environment;
-
-  switch ((result = setjmp((void *)environment))) {
-    case 0:
-      parser->environment = environment;
-      result = target->bench_lex(parser, &tokens);
-      assert(result == ZONE_SUCCESS);
-      break;
-    default:
-      assert(result < 0);
-      assert(parser->environment == environment);
-      break;
-  }
+  int32_t result;
+
+  if ((result = target->bench_lex(parser, &tokens)) < 0)
+    return result;
 
   printf("Lexed %zu tokens\n", tokens);
-  return result;
+  return 0;
 }
 
-static zone_return_t bench_accept(
+static int32_t bench_accept(
   zone_parser_t *parser,
   const zone_name_t *owner,
   uint16_t type,
@@ -111,23 +100,13 @@ static zone_return_t bench_accept(
   return ZONE_SUCCESS;
 }
 
-static zone_return_t bench_parse(zone_parser_t *parser, const target_t *target)
+static int32_t bench_parse(zone_parser_t *parser, const target_t *target)
 {
   size_t records = 0;
-  zone_return_t result;
-  volatile jmp_buf environment;
-
-  switch ((result = setjmp((void *)environment))) {
-    case 0:
-      parser->environment = environment;
-      result = target->parse(parser, &records);
-      assert(result == ZONE_SUCCESS);
-      break;
-    default:
-      assert(result < 0);
-      assert(parser->environment == environment);
-      break;
-  }
+  int32_t result;
+
+  parser->user_data = &records;
+  result = target->parse(parser);
 
   printf("Parsed %zu records\n", records);
   return result;
@@ -207,7 +186,7 @@ int main(int argc, char *argv[])
   if (optind > argc || argc - optind < 2)
     usage(program);
 
-  zone_return_t (*bench)(zone_parser_t *, const target_t *) = 0;
+  int32_t (*bench)(zone_parser_t *, const target_t *) = 0;
   if (strcasecmp(argv[optind], "lex") == 0)
     bench = &bench_lex;
   else if (strcasecmp(argv[optind], "parse") == 0)

src/fallback/bench.c

@@ -15,16 +15,18 @@
 diagnostic_push()
 clang_diagnostic_ignored(missing-prototypes)
 
-zone_return_t zone_bench_fallback_lex(zone_parser_t *parser, size_t *tokens)
+int32_t zone_bench_fallback_lex(zone_parser_t *parser, size_t *tokens)
 {
-  zone_token_t token;
-  zone_return_t result;
+  token_t token;
 
   (*tokens) = 0;
-  while ((result = lex(parser, &token)) >= 0 && token.data != zone_end_of_file)
+  lex(parser, &token);
+  while (token.code > 0) {
     (*tokens)++;
+    lex(parser, &token);
+  }
 
-  return result;
+  return token.code ? -1 : 0;
 }
 
 diagnostic_pop()