superstudio 0.8.2102

data/ext/superstudio/json_builder.h

@@ -0,0 +1,246 @@
+#ifndef JSON_BUILDER_
+#define JSON_BUILDER_
+
+#include <stdint.h>
+
+static const char* const obr = "{";
+static const char* const ob = "[";
+static const char* const oq = "\"";
+static const char* const oqc = "\":";
+static const char* const cm = ",";
+static const char* const cbr = "}";
+static const char* const cb = "]";
+static const char* const end = "\0";
+
+typedef struct JSONObject
+{
+  struct SingleValueJSON* single_values;
+  struct SingleObjectJSON* single_objects;
+  struct ArrayValueJSON* array_values;
+  struct ArrayObjectJSON* array_objects;
+
+  struct SingleValueJSON* last_single_value;
+  struct SingleObjectJSON* last_single_object;
+
+  unsigned int value_array_count;
+} JSONObject;
+
+typedef struct SingleValueJSON
+{
+  char* name;
+  char* value;
+  unsigned long value_characters;
+  unsigned long name_characters;
+  unsigned char set_flag;
+
+  unsigned char quoted;
+  struct SingleValueJSON* next_value;
+} SingleValueJSON;
+
+typedef struct SingleObjectJSON
+{
+  char* name;
+  unsigned long name_characters;
+  unsigned char set_flag;
+  int identifier_int;
+  uint64_t associated_hash;
+
+  JSONObject* value;
+  struct SingleObjectJSON* next_item;
+} SingleObjectJSON;
+
+typedef struct ArrayObjectJSON
+{
+  char* name;
+  unsigned long name_characters;
+  int identifier_int;
+  struct ArrayObjectListItem* value_list;
+  struct ArrayObjectListItem* last_list_object;
+  struct ArrayObjectJSON* next;
+
+  unsigned char set_flag;
+} ArrayObjectJSON;
+
+typedef struct ArrayObjectListItem
+{
+  struct JSONObject* array_object;
+  struct ArrayObjectListItem* next_item;
+  uint64_t associated_hash;
+
+  unsigned char set_flag;
+} ArrayObjectListItem;
+
+typedef struct ArrayValueJSON
+{
+  char* name;
+  unsigned long name_characters;
+  unsigned char quoted;
+  unsigned char set_flag;
+  struct ArrayValueListItem* value_list;
+  struct ArrayValueListItem* last_list_value;
+  struct ArrayValueJSON* next_value;
+} ArrayValueJSON;
+
+typedef struct ArrayValueListItem
+{
+  char* array_value;
+  unsigned long value_characters;
+  unsigned char set_flag;
+  struct ArrayValueListItem* next_value;
+  struct ArrayValueListItem* last_value;
+} ArrayValueListItem;
+
+typedef struct JSONDocumentBuilder
+{
+  struct SSMemoryStack* memory_stack;
+
+  unsigned long max_depth;
+  unsigned long max_real_depth;
+  unsigned long row_count;
+  unsigned long json_char_count;
+  char* resulting_json; //What's going to end up being returned to ruby
+  struct ArrayObjectJSON* root; //Root node of the JSON object, important for building, not for searching
+  struct JSONLevelBuilder* root_level;
+  unsigned long* single_object_key_lengths;
+  unsigned long* array_object_key_lengths;
+  char** single_object_key_names;
+  char** array_object_key_names;
+} JSONDocumentBuilder;
+
+typedef struct JSONLevelStrings
+{
+  unsigned long set_strings_count;
+  unsigned long* string_lengths;
+  char** row_strings;
+} JSONLevelStrings;
+
+typedef struct JSONLevelBuilder
+{
+  struct HashList* search_list; //How to find nodes and insert stuff
+
+  char* identifier; // The part from the mapping after the 4. or 2.
+  unsigned char identifier_length;
+  int identifier_int; // Internal identifier number to go ask the builder for the name of this fork from
+  uint64_t parent_hash;
+  uint64_t hash;
+
+  unsigned char set_flag;
+  unsigned char defined_flag;
+  unsigned char contains_array_value_flag;
+  unsigned char level_type; // 2 or 4
+  unsigned long assigned_count; // When building a new level, count the number of assigned columns
+
+  char** mapping_array; //Contents of the internal map from ruby
+  unsigned long* mapping_array_lengths;
+  unsigned long* quote_array; //Array of 1s and 0s indicating if quotes are to be applied
+  unsigned long* do_not_hash; //Array of 1s and 0s indicating if an item should or shouldn't be hashed (pretty much 3s for now)
+  unsigned long* depth_array; //Array showing the depth of each mapping
+  unsigned long* real_depth_array; //Array showing where calculation splits happen
+  unsigned long* repeating_array_columns; //Array showing whether or not type 3s can have repeating values or not
+  unsigned long column_count;
+  unsigned long* column_name_lengths;
+  char** column_names;
+
+  struct JSONLevelStrings* active_row_strings;
+  struct JSONLevelBuilder* next_child;
+  struct JSONLevelBuilder* next_child_array;
+  struct JSONLevelBuilder* last_child;
+} JSONLevelBuilder;
+
+typedef struct SSMemoryStack
+{
+  struct SSMemoryStackNode* stack_top;
+} SSMemoryStack;
+
+typedef struct SSMemoryStackNode
+{
+  void* memory_location;
+  struct SSMemoryStackNode* previous_node;
+} SSMemoryStackNode;
+
+typedef struct HashList
+{
+  int length;
+  unsigned long bucket_interval;
+  struct HashListNode* next;
+  struct HashListNode* last;
+  struct HashListNode** buckets;
+} HashList;
+
+typedef struct HashListNode
+{
+  uint64_t hash;
+  struct HashListNode* next;
+  struct HashListNode* bucket_next;
+  struct HashListNode* bucket_previous;
+  struct JSONObject* related_JSON_object;
+  struct JSONLevelBuilder* related_parent_level;
+
+  struct JSONLevelBuilder* single_object_info_list;
+  struct JSONLevelBuilder* array_object_info_list;
+} HashListNode;
+
+void json_builder_initialize(JSONDocumentBuilder *json_builder_initialize);
+void set_row_count(JSONDocumentBuilder *builder, unsigned long row_count);
+void initialize_search_list(JSONLevelBuilder* level, SSMemoryStack* memory_stack, unsigned long count);
+unsigned long get_row_count(JSONDocumentBuilder *builder);
+void set_column_count(JSONDocumentBuilder *builder, unsigned long count);
+unsigned long get_column_count(JSONDocumentBuilder *builder);
+void set_quote_array(JSONDocumentBuilder *builder, unsigned long* quotes);
+void set_hashing_array(JSONDocumentBuilder *builder, unsigned long* do_not_hashes);
+void set_depth_array(JSONDocumentBuilder *builder, unsigned long* depths, unsigned long max, unsigned long* real_depths, unsigned long max_real);
+void set_mapping_array(JSONDocumentBuilder *builder, char** internal_map, unsigned long* internal_map_sizes);
+void set_column_names_sizes(JSONDocumentBuilder *builder, char** column_names, unsigned long* column_string_sizes);
+void set_repeating_array_columns(JSONDocumentBuilder *builder, unsigned long* repeating);
+void consume_row(JSONDocumentBuilder *builder, 
+  char** row, 
+  unsigned long* sizes, 
+  unsigned long accessing_depth, 
+  unsigned long visible_depth, 
+  unsigned long column_count, 
+  JSONObject* parent_object, 
+  JSONLevelBuilder* level_definitions, 
+  unsigned char parent_type,
+  int parent_identifier,
+  HashList* parent_search_list);
+uint64_t calculate_run_hash(JSONLevelBuilder* level_definitions, unsigned long column_count, unsigned long* string_sizes, char** row_strings, unsigned long accessing_depth, unsigned long hashing_depth);
+uint64_t calculate_identified_hash(
+  JSONLevelBuilder* level_definitions,
+  unsigned long column_count,
+  unsigned long* string_sizes,
+  char** row_strings,
+  unsigned long accessing_depth,
+  unsigned long hashing_depth,
+  int test_identifier_length,
+  char* test_identifier);
+
+char read_type(unsigned long depth_start, char* mapped_value, unsigned long mapped_value_length);
+void read_identifier(char depth_start, char* mapped_value, int* cursor, int* identifier_characters, unsigned long mapped_value_length);
+void set_single_node_key_names(JSONDocumentBuilder *builder, char** key_array, unsigned long* key_sizes);
+void set_array_node_key_names(JSONDocumentBuilder *builder, char** key_array, unsigned long* key_sizes);
+void define_child_levels(
+  JSONDocumentBuilder *builder, 
+  JSONLevelBuilder* level_definitions, 
+  JSONLevelBuilder* child_levels, 
+  uint64_t hash, 
+  unsigned long column_count, 
+  unsigned long visible_depth
+  );
+
+void define_child_array_levels(
+  JSONDocumentBuilder *builder, 
+  JSONLevelBuilder* level_definitions, 
+  JSONLevelBuilder* child_array_start, 
+  uint64_t hash, 
+  unsigned long column_count, 
+  unsigned long accessing_depth, 
+  unsigned long visible_depth, 
+  char** row_strings, 
+  unsigned long* string_sizes);
+
+void consume_single_objects(JSONDocumentBuilder* builder, JSONLevelBuilder* child_levels, JSONObject* found_object, HashList* parent_search_list, unsigned long accessing_depth, unsigned long visible_depth);
+void consume_array_objects(JSONDocumentBuilder* builder, JSONLevelBuilder* child_array_levels, JSONObject* found_object, unsigned long accessing_depth, unsigned long visible_depth);
+
+char* finalize_json(JSONDocumentBuilder *builder);
+
+#endif

data/ext/superstudio/json_object_array.c

@@ -0,0 +1,409 @@
+#include "json_object_array.h"
+#include "hash_linked_list.h"
+#include "ss_alloc.h"
+
+void create_array_object(JSONDocumentBuilder* builder, 
+  uint64_t hash, 
+  HashList* parent_list,
+  JSONLevelBuilder* parent_level_definitions, 
+  JSONLevelBuilder* empty_child_object, 
+  JSONLevelBuilder* empty_child_array,
+  int identifier_int
+  )
+{
+  HashListNode* found_node = NULL;
+  ArrayObjectJSON* parent_array_object = NULL;
+  found_node = hl_find_node(parent_list, hash);
+  
+  if (found_node) {
+
+  } else {
+    parent_array_object = builder->root;
+
+    if (!parent_array_object->value_list) {
+      if (identifier_int > 0) {
+        // Dev note:
+        // These are all -1 because the array that gets passed starts at 0, but numbering starts at 1
+        parent_array_object->name_characters = builder->array_object_key_lengths[identifier_int - 1];        
+        parent_array_object->name = builder->array_object_key_names[identifier_int - 1];
+
+        builder->json_char_count += 8; //quotes, colon, brackets, braces, comma maybe
+        builder->json_char_count += builder->array_object_key_lengths[identifier_int - 1];
+      } else {
+        parent_array_object->name_characters = 0;
+      }
+
+      parent_array_object->value_list = (ArrayObjectListItem*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectListItem));
+      parent_array_object->value_list->array_object = (JSONObject*)ss_alloc(builder->memory_stack, 1, sizeof(JSONObject));
+      parent_array_object->value_list->array_object->array_values = (ArrayValueJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayValueJSON));
+      parent_array_object->value_list->array_object->single_objects = (SingleObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(SingleObjectJSON));
+      parent_array_object->value_list->array_object->last_single_object = parent_array_object->value_list->array_object->single_objects;
+      parent_array_object->value_list->array_object->single_values = (SingleValueJSON*)ss_alloc(builder->memory_stack, 1, sizeof(SingleValueJSON));
+      parent_array_object->value_list->array_object->last_single_value = parent_array_object->value_list->array_object->single_values;
+      parent_array_object->value_list->array_object->array_objects = (ArrayObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectJSON));
+      parent_array_object->value_list->array_object->array_objects->next = (ArrayObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectJSON));
+      parent_array_object->value_list->associated_hash = hash;
+
+      parent_array_object->last_list_object = parent_array_object->value_list;
+      parent_array_object->set_flag = 1;
+      parent_array_object->last_list_object->set_flag = 1;
+
+      hl_insert_or_find(parent_list, hash, parent_array_object->last_list_object->array_object, parent_level_definitions, empty_child_object, empty_child_array, builder->memory_stack);
+    } else if (identifier_int == 0) {
+      parent_array_object->last_list_object->next_item = (ArrayObjectListItem*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectListItem));
+      parent_array_object->last_list_object->next_item->array_object = (JSONObject*)ss_alloc(builder->memory_stack, 1, sizeof(JSONObject));
+      parent_array_object->last_list_object->next_item->array_object->array_values = (ArrayValueJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayValueJSON));
+      parent_array_object->last_list_object->next_item->array_object->single_objects = (SingleObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(SingleObjectJSON));
+      parent_array_object->last_list_object->next_item->array_object->last_single_object = parent_array_object->last_list_object->next_item->array_object->single_objects;
+      parent_array_object->last_list_object->next_item->array_object->single_values = (SingleValueJSON*)ss_alloc(builder->memory_stack, 1, sizeof(SingleValueJSON));
+      parent_array_object->last_list_object->next_item->array_object->last_single_value = parent_array_object->last_list_object->next_item->array_object->single_values;
+      parent_array_object->last_list_object->next_item->array_object->array_objects = (ArrayObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectJSON));
+      parent_array_object->last_list_object->next_item->array_object->array_objects->next = (ArrayObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectJSON));
+      parent_array_object->last_list_object->next_item->associated_hash = hash;      
+
+      parent_array_object->set_flag = 1;
+
+      parent_array_object->last_list_object = parent_array_object->last_list_object->next_item;      
+      hl_insert_or_find(parent_list, hash, parent_array_object->last_list_object->array_object, parent_level_definitions, empty_child_object, empty_child_array, builder->memory_stack);
+    }
+  }
+}
+
+void count_increment_or_create_json_level_child_array(
+  JSONDocumentBuilder* builder,
+  JSONLevelBuilder* child_array_levels,
+  int identifier_length,
+  char* identifier,
+  int identifier_int,
+  uint64_t parent_hash,
+  uint64_t child_hash)
+{
+  unsigned char found = 0;
+
+  while(child_array_levels->set_flag && !found) {
+    if (child_array_levels->identifier_length == identifier_length) {
+      if (!memcmp(child_array_levels->identifier, identifier, identifier_length)) {
+        if (child_hash == child_array_levels->hash) {
+          found = 1;
+          child_array_levels->column_count++;
+        }
+      }
+    }
+    if (!found) {
+      child_array_levels = child_array_levels->next_child_array;
+    }
+  }
+
+  if (!child_array_levels->set_flag && !found) {
+    child_array_levels->parent_hash = parent_hash;
+    child_array_levels->hash = child_hash;
+    child_array_levels->identifier_int = identifier_int;
+    child_array_levels->identifier_length = identifier_length;
+    child_array_levels->identifier = identifier;
+
+    child_array_levels->column_count++;
+    child_array_levels->set_flag = 1;
+    child_array_levels->next_child = (JSONLevelBuilder*)ss_alloc(builder->memory_stack, 1, sizeof(JSONLevelBuilder));
+    child_array_levels->next_child_array = (JSONLevelBuilder*)ss_alloc(builder->memory_stack, 1, sizeof(JSONLevelBuilder));
+
+    child_array_levels->search_list = (HashList*)ss_alloc(builder->memory_stack, 1, sizeof(HashList));
+    initialize_search_list(child_array_levels, builder->memory_stack, builder->row_count);
+    found = 1;
+  }
+}
+
+void initialize_child_array_levels(JSONLevelBuilder* child_array_levels, SSMemoryStack* memory_stack)
+{
+  while(child_array_levels->set_flag && child_array_levels->identifier_int) {
+    if (!child_array_levels->defined_flag) {
+      child_array_levels->active_row_strings = (JSONLevelStrings*)ss_alloc(memory_stack, 1, sizeof(JSONLevelStrings));
+      child_array_levels->active_row_strings->set_strings_count = 0;
+      child_array_levels->active_row_strings->string_lengths = (unsigned long*)ss_alloc(memory_stack, child_array_levels->column_count, sizeof(unsigned long));
+      child_array_levels->active_row_strings->row_strings = (char**)ss_alloc(memory_stack, child_array_levels->column_count, sizeof(char*));
+      child_array_levels->mapping_array_lengths = (unsigned long*)ss_alloc(memory_stack, 1, sizeof(unsigned long) * child_array_levels->column_count);
+      child_array_levels->mapping_array = (char**)ss_alloc(memory_stack, 1, sizeof(char*) * child_array_levels->column_count);
+      child_array_levels->quote_array = (unsigned long*)ss_alloc(memory_stack, 1, sizeof(unsigned long) * child_array_levels->column_count);
+      child_array_levels->do_not_hash = (unsigned long*)ss_alloc(memory_stack, 1, sizeof(unsigned long) * child_array_levels->column_count);
+      child_array_levels->depth_array = (unsigned long*)ss_alloc(memory_stack, 1, sizeof(unsigned long) * child_array_levels->column_count);
+      child_array_levels->real_depth_array = (unsigned long*)ss_alloc(memory_stack, 1, sizeof(unsigned long) * child_array_levels->column_count);
+      child_array_levels->repeating_array_columns = (unsigned long*)ss_alloc(memory_stack, 1, sizeof(unsigned long) * child_array_levels->column_count);
+      child_array_levels->column_name_lengths = (unsigned long*)ss_alloc(memory_stack, 1, sizeof(unsigned long) * child_array_levels->column_count);
+      child_array_levels->column_names = (char**)ss_alloc(memory_stack, 1, sizeof(char*) * child_array_levels->column_count);
+      child_array_levels->defined_flag = 1;
+    }
+    child_array_levels = child_array_levels->next_child_array;
+  }
+}
+
+void set_array_object_child_level_definitions(
+  JSONLevelBuilder* level_definitions,
+  JSONLevelBuilder* child_array_levels,
+  uint64_t hash,
+  unsigned long column_count,
+  unsigned long accessing_depth
+  )
+{
+  unsigned long counter = 0;
+  int identifier_int;
+  int cursor;
+  unsigned char found = 0;
+  int test_identifier_length;
+  char* test_identifier;
+  JSONLevelBuilder* child_level_first_node = child_array_levels;
+  
+  while(counter < column_count) {
+    if ((read_type(accessing_depth, level_definitions->mapping_array[counter], level_definitions->mapping_array_lengths[counter]) == '4')) {
+      found = 0;
+      while(child_array_levels->set_flag && !found) {
+        read_identifier(accessing_depth, level_definitions->mapping_array[counter], &cursor, &test_identifier_length, level_definitions->mapping_array_lengths[counter]);
+        test_identifier = level_definitions->mapping_array[counter] + cursor;
+
+        identifier_int = atoi(test_identifier);
+
+        if (
+          (child_array_levels->identifier_int == identifier_int) 
+          && (child_array_levels->parent_hash == hash) 
+          && (child_array_levels->assigned_count < child_array_levels->column_count)
+          ) {
+  
+          child_array_levels->mapping_array_lengths[child_array_levels->assigned_count] = level_definitions->mapping_array_lengths[counter];
+          child_array_levels->mapping_array[child_array_levels->assigned_count] = level_definitions->mapping_array[counter];
+
+          child_array_levels->quote_array[child_array_levels->assigned_count] = level_definitions->quote_array[counter];
+          child_array_levels->do_not_hash[child_array_levels->assigned_count] = level_definitions->do_not_hash[counter];
+          child_array_levels->depth_array[child_array_levels->assigned_count] = level_definitions->depth_array[counter];
+          child_array_levels->real_depth_array[child_array_levels->assigned_count] = level_definitions->real_depth_array[counter];
+          child_array_levels->repeating_array_columns[child_array_levels->assigned_count] = level_definitions->repeating_array_columns[counter];
+          child_array_levels->column_name_lengths[child_array_levels->assigned_count] = level_definitions->column_name_lengths[counter];
+          child_array_levels->column_names[child_array_levels->assigned_count] = level_definitions->column_names[counter];
+
+          child_array_levels->assigned_count += 1;
+        }
+        child_array_levels = child_array_levels->next_child_array;
+      }
+    }
+    child_array_levels = child_level_first_node;
+    counter++;
+  }
+}
+
+void assign_array_object_data(
+  JSONLevelBuilder* level_definitions,
+  JSONLevelBuilder* child_array_levels,
+  char** row_strings,
+  unsigned long* string_sizes,
+  unsigned long column_count,
+  unsigned long accessing_depth
+  )
+{
+  unsigned long counter = 0;
+  int cursor;
+  int tmp_total_assigned = 0;
+  unsigned char found = 0;
+  unsigned long inner_counter = 0;
+  int test_identifier_length;
+  char* test_identifier;
+  JSONLevelBuilder* child_level_first_node = child_array_levels;
+
+  while(counter < column_count) {
+    if (read_type(accessing_depth, level_definitions->mapping_array[counter], level_definitions->mapping_array_lengths[counter]) == '4') {
+      found = 0;
+      read_identifier(accessing_depth, level_definitions->mapping_array[counter], &cursor, &test_identifier_length, level_definitions->mapping_array_lengths[counter]);      
+      test_identifier = level_definitions->mapping_array[counter] + cursor;
+
+      while(child_array_levels->set_flag && !found) {
+        if (!memcmp(child_array_levels->identifier, test_identifier, test_identifier_length) && (child_array_levels->active_row_strings->set_strings_count < child_array_levels->column_count)) {
+          child_array_levels->active_row_strings->string_lengths[child_array_levels->active_row_strings->set_strings_count] = string_sizes[counter];          
+          child_array_levels->active_row_strings->row_strings[child_array_levels->active_row_strings->set_strings_count] = row_strings[counter];
+
+          inner_counter = 0;
+          while(inner_counter < child_array_levels->active_row_strings->string_lengths[child_array_levels->active_row_strings->set_strings_count]) {
+            inner_counter++;
+          }
+
+          child_array_levels->active_row_strings->set_strings_count += 1;
+
+          tmp_total_assigned++;
+          found = 1;
+        }
+        child_array_levels = child_array_levels->next_child_array;
+      }
+    }
+    child_array_levels = child_level_first_node;
+    counter++;
+  }
+}
+
+void add_or_find_array_object_child_hashes(
+  JSONDocumentBuilder* builder,
+  JSONLevelBuilder* level_definitions,
+  JSONLevelBuilder* child_array_levels, 
+  unsigned long accessing_depth,
+  unsigned long visible_depth,
+  unsigned long column_count,
+  unsigned long* string_sizes,
+  char** row_strings,
+  JSONObject* related_object)
+{
+  uint64_t child_hash_to_add;
+
+  ArrayObjectJSON* related_array_objects;
+
+  JSONLevelBuilder* empty_child_object;
+  JSONLevelBuilder* empty_child_array;
+  ArrayObjectListItem* hash_tester;
+
+  int found;
+
+  while (child_array_levels->set_flag && child_array_levels->identifier_int) {
+    found = 0;
+
+    child_hash_to_add = calculate_identified_hash(level_definitions, column_count, string_sizes, row_strings, accessing_depth + 1, (accessing_depth + visible_depth + 1), child_array_levels->identifier_length, child_array_levels->identifier);
+
+    related_array_objects = related_object->array_objects;
+
+    while(related_array_objects->set_flag && !found) {
+      empty_child_object = (JSONLevelBuilder*)ss_alloc(builder->memory_stack, 1, sizeof(JSONLevelBuilder));
+      empty_child_array = (JSONLevelBuilder*)ss_alloc(builder->memory_stack, 1, sizeof(JSONLevelBuilder));
+      empty_child_object->next_child = (JSONLevelBuilder*)ss_alloc(builder->memory_stack, 1, sizeof(JSONLevelBuilder));
+      empty_child_object->next_child_array = (JSONLevelBuilder*)ss_alloc(builder->memory_stack, 1, sizeof(JSONLevelBuilder));
+      empty_child_array->next_child = (JSONLevelBuilder*)ss_alloc(builder->memory_stack, 1, sizeof(JSONLevelBuilder));
+      empty_child_array->next_child_array = (JSONLevelBuilder*)ss_alloc(builder->memory_stack, 1, sizeof(JSONLevelBuilder));
+
+      if (related_array_objects->identifier_int == child_array_levels->identifier_int) {
+        if (related_array_objects->value_list) {
+          hash_tester = related_array_objects->value_list;
+          while (hash_tester) {
+            if (hash_tester->associated_hash == child_hash_to_add) {
+              found = 1;
+              hl_insert_or_find(child_array_levels->search_list, child_hash_to_add, related_array_objects->last_list_object->array_object, child_array_levels, empty_child_object, empty_child_array, builder->memory_stack);
+              break;
+            }
+            hash_tester = hash_tester->next_item;
+          }
+        }
+
+        if (!related_array_objects->value_list && !found) {
+          found = 1;
+
+          related_array_objects->value_list = (ArrayObjectListItem*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectListItem));
+          related_array_objects->value_list->array_object = (JSONObject*)ss_alloc(builder->memory_stack, 1, sizeof(JSONObject));
+          related_array_objects->value_list->array_object->array_values = (ArrayValueJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayValueJSON));
+          related_array_objects->value_list->array_object->single_objects = (SingleObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(SingleObjectJSON));
+          related_array_objects->value_list->array_object->last_single_object = related_array_objects->value_list->array_object->single_objects;
+          related_array_objects->value_list->array_object->single_values = (SingleValueJSON*)ss_alloc(builder->memory_stack, 1, sizeof(SingleValueJSON));
+          related_array_objects->value_list->array_object->last_single_value = related_array_objects->value_list->array_object->single_values;
+          related_array_objects->value_list->array_object->array_objects = (ArrayObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectJSON));
+          related_array_objects->value_list->array_object->array_objects->set_flag = 1;
+          related_array_objects->value_list->array_object->array_objects->next = (ArrayObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectJSON));
+          related_array_objects->value_list->associated_hash = child_hash_to_add;
+
+          related_array_objects->last_list_object = related_array_objects->value_list;
+          related_array_objects->set_flag = 1;
+          related_array_objects->last_list_object->set_flag = 1;
+          hl_insert_or_find(child_array_levels->search_list, child_hash_to_add, related_array_objects->last_list_object->array_object, child_array_levels, empty_child_object, empty_child_array, builder->memory_stack);
+        } else if (!found) {
+          found = 1;
+          related_array_objects->last_list_object->next_item = (ArrayObjectListItem*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectListItem));
+          related_array_objects->last_list_object->next_item->array_object = (JSONObject*)ss_alloc(builder->memory_stack, 1, sizeof(JSONObject));
+          related_array_objects->last_list_object->next_item->array_object->array_values = (ArrayValueJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayValueJSON));
+          related_array_objects->last_list_object->next_item->array_object->single_objects = (SingleObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(SingleObjectJSON));
+          related_array_objects->last_list_object->next_item->array_object->last_single_object = related_array_objects->last_list_object->next_item->array_object->single_objects;
+          related_array_objects->last_list_object->next_item->array_object->single_values = (SingleValueJSON*)ss_alloc(builder->memory_stack, 1, sizeof(SingleValueJSON));
+          related_array_objects->last_list_object->next_item->array_object->last_single_value = related_array_objects->last_list_object->next_item->array_object->single_values;
+          related_array_objects->last_list_object->next_item->array_object->array_objects = (ArrayObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectJSON));
+          related_array_objects->last_list_object->next_item->array_object->array_objects->set_flag = 1;
+          related_array_objects->last_list_object->next_item->array_object->array_objects->next = (ArrayObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectJSON));
+          related_array_objects->last_list_object->next_item->associated_hash = child_hash_to_add;
+
+          related_array_objects->set_flag = 1;
+          related_array_objects->last_list_object->set_flag = 1;
+          related_array_objects->last_list_object = related_array_objects->last_list_object->next_item;
+
+          hl_insert_or_find(child_array_levels->search_list, child_hash_to_add, related_array_objects->last_list_object->array_object, child_array_levels, empty_child_object, empty_child_array, builder->memory_stack);
+        }
+      }
+
+      if (!related_array_objects->next) {
+        break;
+      }
+      related_array_objects = related_array_objects->next;
+    }
+    if (!found) {
+      related_array_objects->name_characters = builder->array_object_key_lengths[child_array_levels->identifier_int - 1];
+      related_array_objects->name = builder->array_object_key_names[child_array_levels->identifier_int - 1];
+
+      builder->json_char_count += 8;
+      builder->json_char_count += builder->array_object_key_lengths[child_array_levels->identifier_int - 1];
+
+      related_array_objects->value_list = (ArrayObjectListItem*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectListItem));
+      related_array_objects->value_list->array_object = (JSONObject*)ss_alloc(builder->memory_stack, 1, sizeof(JSONObject));
+      related_array_objects->value_list->array_object->array_values = (ArrayValueJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayValueJSON));
+      related_array_objects->value_list->array_object->single_objects = (SingleObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(SingleObjectJSON));
+      related_array_objects->value_list->array_object->last_single_object = related_array_objects->value_list->array_object->single_objects;
+      related_array_objects->value_list->array_object->single_values = (SingleValueJSON*)ss_alloc(builder->memory_stack, 1, sizeof(SingleValueJSON));
+      related_array_objects->value_list->array_object->last_single_value = related_array_objects->value_list->array_object->single_values;
+      related_array_objects->value_list->array_object->array_objects = (ArrayObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectJSON));
+      related_array_objects->value_list->array_object->array_objects->set_flag = 1;
+      related_array_objects->value_list->array_object->array_objects->next = (ArrayObjectJSON*)ss_alloc(builder->memory_stack, 1, sizeof(ArrayObjectJSON));
+
+      related_array_objects->value_list->associated_hash = child_hash_to_add;
+      related_array_objects->identifier_int = child_array_levels->identifier_int;
+      related_array_objects->last_list_object = related_array_objects->value_list;
+      related_array_objects->set_flag = 1;
+      related_array_objects->last_list_object->set_flag = 1;
+
+      hl_insert_or_find(child_array_levels->search_list, child_hash_to_add, related_array_objects->last_list_object->array_object, child_array_levels, empty_child_object, empty_child_array, builder->memory_stack);
+    }
+
+    child_array_levels = child_array_levels->next_child_array;
+    related_array_objects = related_object->array_objects;
+  }
+}
+
+
+
+unsigned long finalize_object_array(JSONDocumentBuilder* builder, ArrayObjectJSON* object_array, unsigned long counter)
+{
+  ArrayObjectListItem* target_object = NULL;
+  
+  while(object_array) {
+    if (object_array->set_flag) {
+      target_object = NULL;  
+      if (object_array->name_characters > 0) {
+        memcpy(builder->resulting_json + counter, cm, 1);
+        counter++;
+        memcpy(builder->resulting_json + counter, oq, 1);
+        counter++;
+        memcpy(builder->resulting_json + counter, object_array->name, object_array->name_characters);
+        counter += object_array->name_characters;
+        memcpy(builder->resulting_json + counter, oqc, 2);
+        counter += 2;
+        memcpy(builder->resulting_json + counter, ob, 1);
+        counter++;
+      }
+
+      target_object = object_array->value_list;
+      while(target_object) {
+        counter = finalize_key_values(builder, target_object->array_object->single_values, target_object->array_object, counter);
+        counter = finalize_single_objects(builder, target_object->array_object->single_objects, counter, (target_object->array_object->array_values->set_flag ));
+        counter = finalize_value_array(builder, target_object->array_object->array_values, counter);
+        counter = finalize_object_array(builder, target_object->array_object->array_objects, counter);
+
+        memcpy(builder->resulting_json + counter, cbr, 1);
+        counter++;
+
+        if (target_object->next_item) {
+          memcpy(builder->resulting_json + counter, cm, 1);
+          counter++;
+        } else {
+          memcpy(builder->resulting_json + counter, cb, 1);
+          counter++;
+        }
+        target_object = target_object->next_item; 
+      }
+    }
+    object_array = object_array->next;
+  }
+  return counter;
+}