Fix parser errors

src/parse.c

@@ -3,10 +3,10 @@
 
 #include <ctype.h> // isspace, isdigit
 #include <err.h> // err, errx
-#include <stdlib.h> // exit, EXIT_SUCCESS, EXIT_FAILURE
-#include <string.h> // strcmp
 #include <stdarg.h> // va_list
 #include <stdio.h>
+#include <stdlib.h> // exit, EXIT_SUCCESS, EXIT_FAILURE
+#include <string.h> // strcmp
 
 #include "json_obj.h"
 #include "util.h"
@@ -15,7 +15,7 @@
 #define MALLOC_DIE 201
 #define UNEXPECTED_CHAR 200
 
-#define ERROR_CONTEXT_LEN 40
+#define ERROR_CONTEXT_LEN 80
 
 char* read_string(FILE* fp);
 obj_t* read_object(FILE* fp);
@@ -50,13 +50,13 @@ void print_array(struct json_value** arr, int cur_indent, int indent_amount);
         format    - error message format string
         ...       - format string arguments
 */
-__attribute__((__noreturn__))
-void err_ctx(int exit_code, FILE* fp, const char* format, ...)
+__attribute__((__noreturn__)) void err_ctx(int exit_code, FILE* fp, const char* format, ...)
 {
     va_list args;
     static char context[ERROR_CONTEXT_LEN];
 
     va_start(args, format);
+    fputc('\n', stderr);
     vfprintf(stderr, format, args);
     fprintf(stderr, " (at index %zu)\n", ftell(fp));
     va_end(args);
@@ -128,6 +128,7 @@ char* read_string(FILE* fp)
     int c;
     size_t i = 0, result_size = 16 * sizeof(char);
     char* result = malloc_or_die(result_size);
+
     bool escaped = false;
 
     while (true) {
@@ -136,26 +137,29 @@ char* read_string(FILE* fp)
             result = realloc_or_die(result, result_size);
         }
 
-        if (escaped) {
-            result[i++] = 'c';
-            escaped = false;
-            continue;
-        }
+        c = fgetc(fp);
 
-        switch (c = fgetc(fp)) {
+        if (escaped) {
+            escaped = false;
+            result[i++] = c;
+        } else {
+            switch (c) {
             case '\\':
                 escaped = true;
                 result[i++] = c;
                 break;
-        default:
-            result[i++] = c;
-            break;
+
             case '"':
                 result[i++] = '\0';
                 return realloc_or_die(result, i);
 
             case EOF:
                 err_ctx(EARLY_EOF, fp, "(%s) unexpected EOF", __func__);
+
+            default:
+                result[i++] = c;
+                break;
+            }
         }
     }
 }
@@ -247,13 +251,13 @@ obj_t* read_object(FILE* fp)
 struct json_value** read_array(FILE* fp)
 {
     int c;
-    size_t i = 0, output_size = 16 * sizeof(struct json_value*);
-    struct json_value** output = malloc_or_die(output_size);
+    size_t i = 0, output_size = 16;
+    struct json_value** output = malloc_or_die(output_size * sizeof(struct json_value*));
 
     while (true) {
         if (i + 1 >= output_size) {
             output_size *= 2;
-            output = realloc_or_die(output, output_size);
+            output = realloc_or_die(output, output_size * sizeof(struct json_value*));
         }
 
         discard_whitespace(fp);
@@ -262,6 +266,7 @@ struct json_value** read_array(FILE* fp)
         switch (c) {
         case EOF:
             err_ctx(EARLY_EOF, fp, "(%s) unexpected EOF", __func__);
+            break;
 
         case ']':
             output[i] = NULL;
@@ -274,10 +279,9 @@ struct json_value** read_array(FILE* fp)
             ungetc(c, fp);
             output[i] = malloc_or_die(sizeof(struct json_value));
             *output[i] = parse_json_value(fp);
+            i++;
             break;
         }
-
-        i++;
     }
 }
 
@@ -321,7 +325,7 @@ bool read_boolean(FILE* fp)
         exit(EXIT_FAILURE);
 
     if (strncmp(buf, t, sizeof(t)) == 0) {
-        ungetc('e', fp);
+        ungetc(buf[4], fp);
         return true;
     }
 
@@ -329,7 +333,7 @@ bool read_boolean(FILE* fp)
         return false;
 
     fseek(fp, -sizeof(f), SEEK_CUR);
-    err_ctx(UNEXPECTED_CHAR, fp, "(%s) unexpected symbol", __func__, ftell(fp));
+    err_ctx(UNEXPECTED_CHAR, fp, "(%s) unexpected symbol", __func__);
 }
 
 // TODO: fix int overflow

src/util.c

@@ -19,12 +19,19 @@ void* malloc_or_die(size_t size)
 
 void* realloc_or_die(void* ptr, size_t size)
 {
-    ptr = realloc(ptr, size);
+    void* tmp = realloc(ptr, size);
 
-    if (ptr == NULL)
+    if (ptr == NULL) {
+        if (errno != 0) {
+            free(ptr);
             err(errno, "realloc_or_die failed");
+        }
 
-    return ptr;
+        fprintf(stderr, "\nrealloc_or_die returned NULL, ptr: %p size: %zu\n", ptr, size);
+        exit(EXIT_FAILURE);
+    }
+
+    return tmp;
 }
 
 void* calloc_or_die(size_t nmemb, size_t size)