Site render up and running

custom/4coder_base_types.cpp

@@ -4869,9 +4869,9 @@ internal i32
 string_compare(String_Const_char a, String_Const_char b){
     i32 result = 0;
     for (umem i = 0; i < a.size || i < b.size; i += 1){
-        char ca = (i < a.size)?0:a.str[i];
+        char ca = (i < a.size)?a.str[i]:0;
-        char cb = (i < b.size)?0:b.str[i];
+        char cb = (i < b.size)?b.str[i]:0;
-        i32 dif = (ca) != (cb);
+        i32 dif = ((ca) - (cb));
         if (dif != 0){
             result = (dif > 0)?1:-1;
             break;
@@ -4883,9 +4883,9 @@ internal i32
 string_compare(String_Const_u8 a, String_Const_u8 b){
     i32 result = 0;
     for (umem i = 0; i < a.size || i < b.size; i += 1){
-        u8 ca = (i < a.size)?0:a.str[i];
+        u8 ca = (i < a.size)?a.str[i]:0;
-        u8 cb = (i < b.size)?0:b.str[i];
+        u8 cb = (i < b.size)?b.str[i]:0;
-        i32 dif = (ca) != (cb);
+        i32 dif = ((ca) - (cb));
         if (dif != 0){
             result = (dif > 0)?1:-1;
             break;
@@ -4897,9 +4897,9 @@ internal i32
 string_compare(String_Const_u16 a, String_Const_u16 b){
     i32 result = 0;
     for (umem i = 0; i < a.size || i < b.size; i += 1){
-        u16 ca = (i < a.size)?0:a.str[i];
+        u16 ca = (i < a.size)?a.str[i]:0;
-        u16 cb = (i < b.size)?0:b.str[i];
+        u16 cb = (i < b.size)?b.str[i]:0;
-        i32 dif = (ca) != (cb);
+        i32 dif = ((ca) - (cb));
         if (dif != 0){
             result = (dif > 0)?1:-1;
             break;
@@ -4911,9 +4911,9 @@ internal i32
 string_compare(String_Const_u32 a, String_Const_u32 b){
     i32 result = 0;
     for (umem i = 0; i < a.size || i < b.size; i += 1){
-        u32 ca = (i < a.size)?0:a.str[i];
+        u32 ca = (i < a.size)?a.str[i]:0;
-        u32 cb = (i < b.size)?0:b.str[i];
+        u32 cb = (i < b.size)?b.str[i]:0;
-        i32 dif = (ca) != (cb);
+        i32 dif = ((ca) - (cb));
         if (dif != 0){
             result = (dif > 0)?1:-1;
             break;

custom/4coder_doc_content_types.h

@@ -23,6 +23,55 @@ enum{
      November,
      December,
 };
+char *doc_month_names[] = {
+    "None",
+    "January",
+    "February",
+    "March",
+    "April",
+    "May",
+    "June",
+    "July",
+    "August",
+    "September",
+    "October",
+    "November",
+    "December",
+};
+char *doc_day_names[] = {
+    "0",
+    "1st",
+    "2nd",
+    "3rd",
+    "4th",
+    "5th",
+    "6th",
+    "7th",
+    "8th",
+    "9th",
+    "10th",
+    "11th",
+    "12th",
+    "13th",
+    "14th",
+    "15th",
+    "16th",
+    "17th",
+    "18th",
+    "19th",
+    "20th",
+    "21st",
+    "22nd",
+    "23rd",
+    "24th",
+    "25th",
+    "26th",
+    "27th",
+    "28th",
+    "29th",
+    "30th",
+    "31st",
+};
 
 struct Doc_Date{
     i32 day;
@@ -58,6 +107,11 @@ enum{
     DocCodeLanguage_Cpp,
     DocCodeLanguage_Bat,
 };
+char *doc_language_name[] = {
+    "none",
+    "C++",
+    "Batch",
+};
 struct Doc_Code_Sample{
     Doc_Code_Sample *next;
     String_Const_u8 contents;

docs/4ed_doc_content_types.cpp

@@ -18,7 +18,7 @@ doc_date_now(void){
     Doc_Date date = {};
     date.day = time->tm_mday;
     date.month = time->tm_mon + 1;
-    date.year = 1990 + time->tm_year;
+    date.year = 1900 + time->tm_year;
     return(date);
              }
 
@@ -203,15 +203,16 @@ make_doc_function(Arena *arena, Doc_Cluster *cluster, API_Call *call){
     result.sig = new_doc_block(arena, result.page, "Signature");
     new_doc_block_jump(arena, result.page, result.sig);
     
-    String_Const_u8 opener = push_u8_stringf(arena, "%.*s %.*s(",
+       String_Const_u8 opener = push_u8_stringf(arena, "%.*s\n%.*s(",
                                              string_expand(call->return_type),
                                              string_expand(call->name));
     
-    u8 *buffer = push_array(arena, u8, opener.size);
+    umem indent_size = call->name.size + 1;
-    for (umem i = 0; i < opener.size; i += 1){
+    u8 *buffer = push_array(arena, u8, indent_size);
+    for (umem i = 0; i < indent_size; i += 1){
         buffer[i] = ' ';
     }
-    String_Const_u8 indent = SCu8(buffer, opener.size);
+    String_Const_u8 indent = SCu8(buffer, indent_size);
     
     List_String_Const_u8 list = {};
     string_list_push(arena, &list, opener);

docs/4ed_doc_custom_api.cpp

@@ -22,7 +22,7 @@ doc_custom_app_ptr(Arena *arena, Doc_Function *func){
 
 function Doc_Cluster*
 doc_custom_api(Arena *arena, API_Definition *api_def){
-    Doc_Cluster *cluster = new_doc_cluster(arena, "Custom Layer Boundary API", "custom api");
+    Doc_Cluster *cluster = new_doc_cluster(arena, "Custom Layer Boundary API", "custom_api");
     
     doc_custom_api__global(arena, api_def, cluster);
     doc_custom_api__buffer(arena, api_def, cluster);

docs/4ed_doc_custom_api_global.cpp

@@ -344,7 +344,7 @@ doc_custom_api__global(Arena *arena, API_Definition *api_def, Doc_Cluster *clust
         doc_paragraph(arena, det);
         doc_text(arena, det, "1. When there is only one scope in the parameters, that scope is the result. {A} -> A;");
         doc_paragraph(arena, det);
-        doc_text(arena, det, "2. When there are two or more parameters that are the same scope, the result is the that scope again. {A, A, ...} -> A;");
+        doc_text(arena, det, "2. When there are two or more parameters that are the same scope, the result is that scope again. {A, A, ..., A} -> A;");
         doc_paragraph(arena, det);
         doc_text(arena, det, "3. When any scope in the parameters is the special global scope, it is as if it is not there. {A, G} -> A");
         doc_paragraph(arena, det);
@@ -354,7 +354,7 @@ doc_custom_api__global(Arena *arena, API_Definition *api_def, Doc_Cluster *clust
         doc_paragraph(arena, det);
         doc_text(arena, det, "6. When the parameter set is empty the result is the global scope. {} -> G");
         doc_paragraph(arena, det);
-        doc_text(arena, det, "For a set-theoretic definition one can think of scopes as being keyed by a set of 'atoms'. Getting the key for a scope with multiple dependencies is defined by the operation of union of sets of atoms. The global scope is keyed by the empty set. A scope continues to exist as long all the atoms in it's key set exist.");
+        doc_text(arena, det, "For a set-theoretic definition one can think of scopes as being keyed by sets of 'atoms'. Getting the key for a scope with multiple dependencies is defined by the operation of union of sets. The global scope is keyed by the empty set. A scope continues to exist for as long all of the atoms in it's key set exist.");
     }
     
     ////////////////////////////////

project.4coder

@@ -79,6 +79,10 @@ command_list = {
    .out = "*compilation*", .footer_panel = true, .save_dirty_files = true,
    .cmd = { { "custom\\bin\\build_one_time 4ed_generate_keycodes.cpp ..\\build", .os = "win" }, }, },
  
+ { .name = "build site render",
+   .out = "*compilation*", .footer_panel = true, .save_dirty_files = true,
+   .cmd = { { "custom\\bin\\build_one_time site/4ed_site_render_main.cpp ..\\build", .os = "win" }, }, },
+ 
  { .name = "generate custom api master list",
    .out = "*run*", .footer_panel = false, .save_dirty_files = false,
    .cmd = { { "..\\build\\api_parser 4ed_api_implementation.cpp", .os = "win"   }, }, },
@@ -86,6 +90,7 @@ command_list = {
 
 fkey_command[1]  = "build x64";
 fkey_command[2]  = "build custom api docs";
+fkey_command[3]  = "build site render";
 fkey_command[4]  = "run one time";
 fkey_command[5]  = "build C++ lexer generator";
 fkey_command[6]  = "build token tester";

site/4ed_site_render_main.cpp

@@ -0,0 +1,508 @@
+/*
+ * Mr. 4th Dimention - Allen Webster
+ *
+ * 12.12.2019
+ *
+ * Render website static pages
+ *
+ */
+
+// TOP
+
+#include "4coder_base_types.h"
+#include "../4ed_api_definition.h"
+#include "4coder_doc_content_types.h"
+#include "../docs/4ed_doc_helper.h"
+
+#include "4coder_base_types.cpp"
+#include "4coder_stringf.cpp"
+#include "4coder_malloc_allocator.cpp"
+#include "../4ed_api_definition.cpp"
+#include "../docs/4ed_doc_content_types.cpp"
+#include "4coder_file.cpp"
+
+#include "generated/custom_api_constructor.cpp"
+#include "../docs/4ed_doc_custom_api.cpp"
+
+#include <stdio.h>
+
+////////////////////////////////
+
+char html_header[] = R"HTMLFOO(
+<html lang="en-US">
+
+<head>
+<link rel='shortcut icon' type='image/x-icon' href='4coder_icon.ico' />
+<link href="https://fonts.googleapis.com/css?family=Inconsolata:700&display=swap" rel="stylesheet">
+<title>%.*s</title>
+<style>
+body {
+  font-family: 'Inconsolata', monospace;
+  background: #0C0C0C;
+  color: #FF00FF;
+}
+
+h1 {
+  margin-top: 0;
+  margin-bottom: .4em;
+font-size: 1.9em;
+  color: #00A000;
+}
+
+h2 {
+  margin-top: 0;
+  margin-bottom: .666em;
+  font-size: 1.5em;
+  color: #00A000;
+}
+
+h3 {
+  margin-top: 0;
+  margin-bottom: 0;
+  font-size: 1.17em;
+  color: #90B080;
+background: #001300;
+padding: 0 .25em 0 .25em;
+display: inline;
+}
+
+ul {
+  margin-top: 0;
+  margin-bottom: 0;
+}
+
+li {
+  margin-top: 5px;
+}
+
+li.firstli {
+  margin-top: 0px;
+}
+
+pre {
+margin: 0;
+}
+
+.root {
+  width: 50%%;
+  margin: auto;
+}
+
+@media only screen and (max-width: 1000px) {
+  .root {
+    width: 70%%;
+  }
+}
+@media only screen and (max-width: 800px) {
+  .root {
+    width: 90%%;
+  }
+}
+
+.center {
+  text-align: center;
+}
+
+.normal {
+  font-size: 1em;
+  color: #90B080;
+  text-align: justify;
+}
+
+.normal li {
+  text-align: left;
+}
+
+.small {
+  font-size: .8em;
+  color: #90B080;
+  text-align: justify;
+}
+
+.small li {
+  text-align: left;
+}
+
+.normal a:link, .small a:link,
+h1 a:link, h2 a:link, a:link {
+  color: #D08F20;
+}
+.normal a:visited, .small a:visited,
+h1 a:visited, h2 a:visited, a:visited {
+  color: #744F14;
+}
+.normal a:hover, .small a:hover,
+h1 a:hover, h2 a:hover, a:hover {
+  color: #E0AF60;
+}
+
+.sample_code {
+font-size: 1em;
+    color: #90B080;
+padding: 3px;
+background: #323232;
+}
+
+.sample_code div{
+padding: .5em;
+background: #181818;
+}
+
+.comment {
+  margin-left: 14px;
+  margin-right: 14px;
+  font-size: 1.25em;
+  color: #2090F0;
+}
+
+.emphasize {
+  color: #00A000;
+}
+
+.spacer {
+  height: 2.5em;
+}
+
+.small_spacer {
+  height: 1em;
+}
+
+.very_small_spacer {
+  height: .5em;
+}
+
+.bottom_spacer {
+  height: 20em;
+}
+
+</style>
+
+</head>
+
+<body>
+<div class="root">
+)HTMLFOO";
+
+char html_footer[] = R"HTMLFOO(
+<div class="bottom_spacer"></div>
+    </div>
+    </body>
+    </html>
+)HTMLFOO";
+
+function void
+render_doc_page_to_html__content(Arena *scratch, Doc_Content_List *list, FILE *out){
+    fprintf(out, "<div class=\"normal\">");
+    
+    for (Doc_Content *content = list->first;
+         content != 0;
+         content = content->next){
+        switch (content->emphasis){
+            case DocContentEmphasis_Normal:
+            {
+                // do nothing
+            }break;
+            
+            case DocContentEmphasis_SmallHeader:
+            {
+                fprintf(out, "<h3>");
+            }break;
+            
+            case DocContentEmphasis_Heavy:
+            {
+                fprintf(out, "<span class=\"emphasize\">");
+            }break;
+            
+            case DocContentEmphasis_Stylish:
+            {
+                fprintf(out, "<span class=\"comment\">");
+            }break;
+            
+            case DocContentEmphasis_Code:
+            {
+                fprintf(out, "<code><pre>");
+            }break;
+            }
+        
+        b32 close_link = false;
+        if (content->page_link.size > 0){
+            fprintf(out, "<a href=\"%.*s.html\">", string_expand(content->page_link));
+        }
+        else if (content->block_link.size > 0){
+            fprintf(out, "<a href=\"#%.*s\">", string_expand(content->block_link));
+        }
+        fprintf(out, "%.*s", string_expand(content->text));
+        if (close_link){
+            fprintf(out, "</a>");
+        }
+        
+        switch (content->emphasis){
+            case DocContentEmphasis_Normal:
+            {
+                // do nothing
+            }break;
+            
+            case DocContentEmphasis_SmallHeader:
+            {
+                fprintf(out, "</h3>");
+            }break;
+            
+            case DocContentEmphasis_Heavy:
+            case DocContentEmphasis_Stylish:
+            {
+                fprintf(out, "</span>");
+            }break;
+            
+            case DocContentEmphasis_Code:
+            {
+                fprintf(out, "</code></pre>");
+            }break;
+        }
+        fprintf(out, " ");
+    }
+    
+    fprintf(out, "</div>\n");
+}
+
+function void
+render_doc_page_to_html__code(Arena *scratch, Doc_Code_Sample_List *code, FILE *out){
+    for (Doc_Code_Sample *node = code->first;
+         node != 0;
+         node = node->next){
+        fprintf(out, "<div class=\"comment\">%s</div>", doc_language_name[node->language]);
+        fprintf(out, "<div class=\"very_small_spacer\"></div>\n");
+        fprintf(out, "<div class=\"sample_code\"><div>"
+                "<code><pre>%.*s</pre></code>"
+                "</div></div>",
+                string_expand(node->contents));
+        if (node->next != 0){
+        fprintf(out, "<div class=\"small_spacer\"></div>\n");
+        }
+    }
+}
+
+function void
+render_doc_page_to_html__table(Arena *scratch, Vec2_i32 dim, Doc_Content_List *vals, FILE *out){
+    
+}
+
+function void
+render_doc_page_to_html(Arena *scratch, Doc_Page *page, FILE *file){
+    Temp_Memory_Block temp(scratch);
+    
+    Doc_Cluster *cluster = page->owner;
+    
+    fprintf(file, html_header, string_expand(page->title));
+    
+    fprintf(file, "<div class=\"small_spacer\"></div>\n");
+    
+    fprintf(file, "<div class=\"small\">&gt; <a href=\"%.*s.html\">%.*s</a></div>\n",
+            string_expand(cluster->name),
+            string_expand(cluster->title));
+    
+    fprintf(file, "<div class=\"small_spacer\"></div>\n");
+        
+    fprintf(file, "<h1>%.*s</h1>\n", string_expand(page->name));
+    
+    fprintf(file, "<div class=\"small\">");
+    fprintf(file, "%s %s %d",
+            doc_month_names[cluster->gen_date.month],
+            doc_day_names[cluster->gen_date.day],
+            cluster->gen_date.year);
+    fprintf(file, "</div>\n");
+    
+    fprintf(file, "<div class=\"spacer\"></div>\n");
+    
+    for (Doc_Block *block = page->first_block;
+         block != 0;
+         block = block->next){
+        if (block->name.size > 0 &&
+            !string_match(block->name, string_u8_litexpr("brief"))){
+        fprintf(file, "<h2>%.*s</h2>\n", string_expand(block->name));
+        }
+        
+        for (Doc_Paragraph *par = block->first_par;
+             par != 0;
+             par = par->next){
+            switch (par->kind){
+                case DocParagraphKind_Text:
+                {
+                    render_doc_page_to_html__content(scratch, &par->text, file);
+                }break;
+                
+                case DocParagraphKind_Code:
+                {
+                    render_doc_page_to_html__code(scratch, &par->code, file);
+                }break;
+                
+                case DocParagraphKind_Table:
+                {
+                    render_doc_page_to_html__table(scratch, par->table.dim, par->table.vals, file);
+                }break;
+            }
+            
+            if (par->next != 0){
+                fprintf(file, "<div class=\"small_spacer\"></div>\n");
+            }
+        }
+        
+        if (block->next != 0){
+        fprintf(file, "<div class=\"spacer\"></div>\n");
+        }
+    }
+    
+    fprintf(file, html_footer);
+}
+
+function void
+render_doc_page_to_html(Arena *scratch, Doc_Page *page, String_Const_u8 docs_root){
+    Temp_Memory_Block temp(scratch);
+    String_Const_u8 file_name = push_u8_stringf(scratch, "%.*s%.*s.html",
+                                                string_expand(docs_root),
+                                                string_expand(page->name));
+    
+    FILE *file = fopen((char*)file_name.str, "wb");
+    if (file == 0){
+        printf("could not open %s\n", file_name.str);
+        return;
+    }
+    
+    render_doc_page_to_html(scratch, page, file);
+    fclose(file);
+}
+
+function void
+sort_doc_page_array(Doc_Page **ptrs, i32 first, i32 one_past_last){
+    if (first + 1 < one_past_last){
+        i32 pivot_index = one_past_last - 1;
+        String_Const_u8 pivot_name = ptrs[pivot_index]->name;
+        i32 j = first;
+        for (i32 i = first; i < pivot_index; i += 1){
+            String_Const_u8 name = ptrs[i]->name;
+            if (string_compare(name, pivot_name) < 0){
+                Swap(Doc_Page*, ptrs[j], ptrs[i]);
+                j += 1;
+            }
+        }
+        Swap(Doc_Page*, ptrs[j], ptrs[pivot_index]);
+        sort_doc_page_array(ptrs, first, j);
+        sort_doc_page_array(ptrs, j + 1, one_past_last);
+    }
+}
+
+function void
+render_doc_cluster_to_html(Arena *scratch, Doc_Cluster *cluster,
+                           FILE *file, FILE *file_index){
+    {
+        Temp_Memory_Block temp(scratch);
+        
+        fprintf(file, html_header, string_expand(cluster->title));
+        
+        
+        fprintf(file, "<div class=\"small_spacer\"></div>\n");
+        fprintf(file, "<h1>%.*s</h1>\n", string_expand(cluster->title));
+        fprintf(file, "<div class=\"spacer\"></div>\n");
+        
+        // TODO(allen): Cluster description.
+        fprintf(file, "<div class=\"normal\">More documentation under construction</div>\n");
+        
+        fprintf(file, "<div class=\"spacer\"></div>\n");
+        
+        fprintf(file, "<h2><a href=\"docs/%.*s_index.html\">Index</a></h2>\n",
+                string_expand(cluster->name));
+        
+        fprintf(file, html_footer);
+    }
+    
+{
+        Temp_Memory_Block temp(scratch);
+        
+        fprintf(file_index, html_header, string_expand(cluster->title));
+    
+    fprintf(file_index, "<div class=\"small_spacer\"></div>\n");
+    fprintf(file_index, "<h1>%.*s Index</h1>\n", string_expand(cluster->title));
+    fprintf(file_index, "<div class=\"spacer\"></div>\n");
+    
+    Doc_Page **ptrs = push_array(scratch, Doc_Page*, cluster->page_count);
+    i32 counter = 0;
+    for (Doc_Page *node = cluster->first_page;
+         node != 0;
+         node = node->next){
+        ptrs[counter] = node;
+        counter += 1;
+    }
+    
+    sort_doc_page_array(ptrs, 0, counter);
+    
+    for (i32 i = 0; i < counter; i += 1){
+        Doc_Page *node = ptrs[i];
+    fprintf(file_index, "<div class=\"normal\">");
+        fprintf(file_index, "<a href=\"%.*s.html\">%.*s</a>",
+                string_expand(node->name),
+                string_expand(node->name));
+        fprintf(file_index, "</div>\n");
+    }
+    
+    fprintf(file_index, html_footer);
+}
+}
+
+function void
+render_doc_cluster_to_html(Arena *scratch, Doc_Cluster *cluster, String_Const_u8 docs_root){
+    Temp_Memory_Block temp(scratch);
+    String_Const_u8 file_name = push_u8_stringf(scratch, "%.*s%.*s.html",
+                                                string_expand(docs_root),
+                                                string_expand(cluster->name));
+    
+    String_Const_u8 indx_name = push_u8_stringf(scratch, "%.*s%.*s_index.html",
+                                                string_expand(docs_root),
+                                                string_expand(cluster->name));
+    
+    FILE *file = fopen((char*)file_name.str, "wb");
+    if (file == 0){
+        printf("could not open %s\n", file_name.str);
+        return;
+    }
+    
+    FILE *file_index = fopen((char*)indx_name.str, "wb");
+    if (file_index == 0){
+        printf("could not open %s\n", indx_name.str);
+        return;
+    }
+    
+    render_doc_cluster_to_html(scratch, cluster,
+                               file, file_index);
+    fclose(file);
+}
+
+////////////////////////////////
+
+int main(){
+    Arena arena = make_arena_malloc();
+    
+    String_Const_u8 self = string_u8_litexpr(__FILE__);
+    umem code_pos = string_find_first(self, string_u8_litexpr("code"));
+    String_Const_u8 root = string_prefix(self, code_pos + 5);
+    String_Const_u8 outside_root = string_prefix(self, code_pos);
+    String_Const_u8 build_root = push_u8_stringf(&arena, "%.*sbuild/",
+                                             string_expand(outside_root));
+    String_Const_u8 site_root = push_u8_stringf(&arena, "%.*ssite/",
+                                             string_expand(build_root));
+    String_Const_u8 docs_root = push_u8_stringf(&arena, "%.*sdocs/",
+                                                string_expand(site_root));
+    
+    API_Definition *api_def = custom_api_construct(&arena);
+    Doc_Cluster *cluster = doc_custom_api(&arena, api_def);
+    
+    for (Doc_Page *node = cluster->first_page;
+         node != 0;
+         node = node->next){
+        render_doc_page_to_html(&arena, node, docs_root);
+    }
+    render_doc_cluster_to_html(&arena, cluster, docs_root);
+    
+    return(0);
+}
+
+// BOTTOM
+