From 3e4c76bf41011d8f40136a4010e9ff331b00b4ea Mon Sep 17 00:00:00 2001 From: Alexander Pickering Date: Fri, 22 Dec 2017 23:03:44 -0500 Subject: Renamed files Renamed everything that needed to be rename from libctemplate to libctemplates --- Makefile | 29 ++ README.html | 420 ++++++++++++++++++++++ README.md | 20 +- ctemplate.c | 1063 ------------------------------------------------------- ctemplate.h | 56 --- ctemplate_i.h | 260 -------------- ctemplates.c | 1066 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++ ctemplates.h | 56 +++ ctemplates_i.h | 260 ++++++++++++++ 9 files changed, 1843 insertions(+), 1387 deletions(-) create mode 100644 Makefile create mode 100644 README.html delete mode 100644 ctemplate.c delete mode 100644 ctemplate.h delete mode 100644 ctemplate_i.h create mode 100644 ctemplates.c create mode 100644 ctemplates.h create mode 100644 ctemplates_i.h diff --git a/Makefile b/Makefile new file mode 100644 index 0000000..8880d3e --- /dev/null +++ b/Makefile @@ -0,0 +1,29 @@ +CFLAGS = -I. -L. -std=c99 -pedantic -Wall -Werror -O3 +CC = gcc +LIBNAME = libctemplates.a + +$(LIBNAME): ctemplates.o fbuf.o kmp.o hashmap.o + ar rc $(LIBNAME) ctemplates.o fbuf.o kmp.o hashmap.o + ranlib $(LIBNAME) + +fbuf.o : fbuf.c fbuf.h + $(CC) $(CFLAGS) -c -o fbuf.o fbuf.c + +kmp.o : kmp.c kmp.h + $(CC) $(CFLAGS) -c -o kmp.o kmp.c + +ctemplates.o: ctemplates.c ctemplates.h + $(CC) $(CFLAGS) -c -o ctemplates.o ctemplates.c + +hashmap.o: hashmap.c hashmap.h + $(CC) $(CFLAGS) -c -o hashmap.o hashmap.c + +clean: + rm -f *.o *.a template + +test: + cd t; ./test.sh + +install: $(LIBNAME) + cp $(LIBNAME) /usr/local/lib + cp ctemplates.h /usr/local/include/ diff --git a/README.html b/README.html new file mode 100644 index 0000000..f519ec9 --- /dev/null +++ b/README.html @@ -0,0 +1,420 @@ +

C TemplateS

+ +

If you found this page using a search engine, you may be looking for the +original libctemplate by Stephen C. Losen

+ +

libctemplates is a template expander written for use with HTML. It's goals are +to be simple, versitile, and fast. This library started off as a +fork of libctemplate, but eventually became a total rewrite. libctemplate, +the original, was built primarily for cgi applications. libctemplate was +tightly coupled with file streams, while libctemplateS renders templates to +strings for use in any application, FastCGI or Kore, for example. +If you think libctemplates is missing a feature, feel free to suggest it to +alexandermpickering@gmail.com, +or, even better, write it yourself and send the patch! You can find +instructions on createing and sending git patches here.

+ +

Contents

+ +
    +
  1. Installation
    2. +
  2. Usage
    3. +
  3. Quick refrence
    4. +
  4. Examples
    5. +
+ +

+ +

Installation

+ +

Run the make file. libctemplates should compile on any system with a c99 +complient c compiler. If you are on linux, run

+ +
make; make install
+
+ +

+ +

Usage

+ +

Just include the ctemplates.h header and make sure you're linking against +libctemplates.a, for example:

+ +
gcc main.c -lctemplates
+
+ +

+ +

Quick refrence

+ +

Structs

+ + + +

Functions

+ +
struct TMPL_templates* TMPL_alloc_template(char* template_string)
+
+ +

Creates a template from the given string. This can be pretty expensive +so try to only do it once for each template you need, and call render() +as many times as you need on that template.

+ +
void TMPL_free_template(struct TMPL_templates* template)
+
+ +

Frees a previously allocated template.

+ +
struct TMPL_varlist* TMPL_alloc_varlist()
+
+ +

Allocates a variable list that you can add variables and loops to.

+ +
void TMPL_free_varlist(struct TMPL_varlist* varlist)
+
+ +

Frees a previously allocated varlist, and any loops that have been added.

+ +
struct TMPL_loop* TMPL_alloc_loop()
+
+ +

Allocates a loop that you can add varlists to.

+ +
void TMPL_free_loop(struct TMPL_loop* loop)
+
+ +

Frees a previously allocated loop, and any varlists that have been added.

+ +
void TMPL_add_var_to_varlist(struct TMPL_varlist* vl, char* name, char* value)  
+
+ +

Adds a variable to a variable list

+ +
void TMPL_add_loop_to_varlist(struct TMPL_varlist* vl,char* name,struct TMPL_loop* loop)  
+
+ +

Adds a loop to a varlist

+ +
void TMPL_add_varlist_to_loop(struct TMPL_loop* l, struct TMPL_varlist* vl)  
+
+ +

Adds a varlist that should be used one iteration through the loop

+ +
char* TMPL_render(struct TMPL_templates* t, struct TMPL_varlist* vl)  
+
+ +

Turns a template and varlist into a string. the returned char* should NOT be freed. The returned char* is only valid until TMPL_render() is called again. If you need it even after TMPL_render() is called, copy it.

+ +

+ +

Examples

+ +

Hello, World!

+ +

At it's most simple, libctemplates just copies whatever template you give it. +For example:

+ +

main.c

+ +
#include <ctemplate.h>
+#include <stdio.h>
+#include <stdlib.h>
+
+char* template = "Hello, world!";
+
+int main(){
+    struct TMPL_templates* t = TMPL_alloc_template(template);
+    if(t == NULL){
+        printf("Failed to compile\n");
+        exit(-1);
+    }
+    struct TMPL_varlist* vl = TMPL_alloc_varlist();
+    char* output = TMPL_render(t,vl);
+    printf("Output: %s\n",output);
+    TMPL_free_varlist(vl);
+    TMPL_free_template(t);
+    return 0;
+}
+
+ +

output

+ +
Output: Hello, world!
+
+ +

Variable substitution

+ +

template.html

+ +
Value is:<TMPL_VAR name="varname" default="optional default">
+
+ +

main.c

+ +
#include <ctemplate.h>
+
+int main(){
+    /* 
+    It usually helps to seperate the template from the
+    C code. It does mean to need to read in a file though.
+    Try to only call TMPL_alloc_template once for each
+    template you have, and then use TMPL_render() whenever
+    you need to use them.
+    */
+    FILE* fp = fopen("template.html","r");
+    if(fp == NULL){
+        printf("Failed to open file!\n");
+        exit(-1);
+    }
+    fseek(fp,0,SEEK_END);
+    size_t file_len = ftell(fp);
+    char template[file_len];
+    fread(template,sizeof(char),file_len,fp);
+
+    struct TMPL_templates* t;
+    struct TMPL_varlist* vl;
+
+    /*
+    Render the template without a variable named "varname"
+    This will use the variable's default, if it has one.
+    If the variable has no default, and is not supplied a value,
+    it errors, and stores a message that can be retrived with
+    TMPL_get_error(...)
+    */
+    t = TMPL_alloc_template(template);
+    vl = TMPL_alloc_varlist();
+    char* without_variable = TMPL_render(t,vl);
+    printf("Without variable: %s\n",without_variable);
+    TMPL_free_template(t);
+    TMPL_free_varlist(vl);
+
+    /*
+    Now render a template with a variable, use the
+    TMPL_add_var_to_varlist(...) to supply the template with
+    variables.
+    */
+    t = TMPL_alloc_template(template);
+    vl = TMPL_alloc_varlist();
+    TMPL_add_var_to_varlist(vl,"varname","Hello, world!");
+    char* with_variable = TMPL_render(t,vl);
+    printf("With variable:%s\n",with_variable);
+    TMPL_free_template(t);
+    TMPL_free_varlist(vl);
+
+    return 0;
+}
+
+ +

output

+ +
Without variable:
+Value is:optional default
+
+
+With variable:
+Value is:Hello, world!
+
+ +

If/Elseif/Else

+ +

If and elseif statements check if strings are the same. They do a strcmp(), so be mindful not to use really long strings if you don't need them.

+ +

template.html

+ +
What happened:
+<TMPL_IF name="varname" value="1234">
+    "varname" was "1234"
+<TMPL_ELSEIF name="var2" value="pass">
+    "var2" was "pass"
+<TMPL_ELSE>
+    "varname" was not "1234", and "var2" was not "pass"
+<TMPL_END>
+
+ +

main.c

+ +
#include <stdlib.h>
+#include <stdio.h>
+#include <ctemplate.h>
+
+int main(){
+    /* 
+    Same as before, just read a file in
+    */
+    FILE* fp = fopen("template.html","r");
+    if(fp == NULL){
+        printf("Failed to open file!\n");
+        exit(-1);
+    }
+    fseek(fp,0,SEEK_END);
+    size_t file_len = ftell(fp);
+    rewind(fp);
+    char template[file_len];
+    fread(template,sizeof(char),file_len,fp);
+
+    /*
+    No need to rebuild the template each time,
+    just alloc it once.
+    */
+    struct TMPL_templates* t = TMPL_alloc_template(template);
+    struct TMPL_varlist* vl;
+
+    /*
+    If the variable the "if" or "elseif" is looking for dosn't exist,
+    the condition is considered false.
+    */
+    vl = TMPL_alloc_varlist();
+    char* without_variable = TMPL_render(t,vl);
+    printf("Without variable:\n%s\n",without_variable);
+
+    /*
+    Add a variable to make the second condition true, and reprint
+    After we call TMPL_render() again, whatever pointer it returned
+    last time may have been freed. Be sure to copy it into your own
+    buffer if you still need it.
+    */
+    TMPL_add_var_to_varlist(vl,"var2","pass");
+    char* with_one = TMPL_render(t,vl);
+    printf("With 1 variable:\n%s\n",TMPL_render(t,vl));
+
+    /*
+    Always be sure to free things!
+    */
+    TMPL_free_varlist(vl);
+    TMPL_free_template(t);
+
+    return 0;
+}
+
+ +

output

+ +
Without variable:
+
+What happened:
+
+    "varname" was not "1234", and "var2" was not "pass"
+
+
+
+With 1 variable:
+
+What happened:
+
+    "var2" was "pass"
+
+ +

Notice that the tabs in the template are preserved in the output. This is not +a minifier! Just a template expander!

+ +

Loops

+ +

Loops are special in libctemplates, loops each have their own namespace, and +only variables that have been added to the namespace are acessable in the loop.

+ +

template.html

+ +
What happened:
+<TMPL_LOOP name="myloop">
+    This time through the loop, my variable is <TMPL_VAR name="loopvar">
+<TMPL_END>
+
+ +

main.c

+ +
#include <stdlib.h>
+#include <stdio.h>
+#include <ctemplate.h>
+
+int main(){
+    /* 
+    Same as before
+    */
+    FILE* fp = fopen("template.html","r");
+    if(fp == NULL){
+        printf("Failed to open file!\n");
+        exit(-1);
+    }
+    fseek(fp,0,SEEK_END);
+    size_t file_len = ftell(fp);
+    rewind(fp);
+    char template[file_len];
+    fread(template,sizeof(char),file_len,fp);
+
+    /*
+    Same as before
+    */
+    struct TMPL_templates* t = TMPL_alloc_template(template);
+    struct TMPL_varlist* vl = TMPL_alloc_varlist();
+
+    /*
+    Now create a loop variable and add some things to it.
+    This is usually not as verbose as it looks here, since you'll
+    usually do this in a C loop.
+    */
+    struct TMPL_loop* loop = TMPL_alloc_loop();
+
+    struct TMPL_varlist* first = TMPL_alloc_varlist();
+    TMPL_add_var_to_varlist(first,"loopvar","first");
+    TMPL_add_varlist_to_loop(loop,first);
+
+    struct TMPL_varlist* second = TMPL_alloc_varlist();
+    TMPL_add_var_to_varlist(second,"loopvar","second");
+    TMPL_add_varlist_to_loop(loop,second);
+
+    struct TMPL_varlist* third = TMPL_alloc_varlist();
+    TMPL_add_var_to_varlist(third,"loopvar","third");
+    TMPL_add_varlist_to_loop(loop,third);
+
+    /*
+    Remember to add the loop to the varlist you'll eventually
+    pass to TMPL_render() with the correct name.
+    */
+    TMPL_add_loop_to_varlist(vl,"myloop",loop);
+
+    char* output = TMPL_render(t,vl);
+    printf("Output:\n%s\n",output);
+
+    /*
+    When freeing a varlist, any loops it has are automatically
+    also freed. When freeing a loop, any varlists it contains
+    are also automatically freed. This means you only need to
+    free your top-level varlist!
+    */
+    TMPL_free_varlist(vl);
+    TMPL_free_template(t);
+}
+
+ +

output

+ +
Output:
+What happened:
+This time through the loop, my variable is first
+This time through the loop, my variable is second
+This time through the loop, my variable is theird
+Done!
+
+ + + + diff --git a/README.md b/README.md index dbd1e2b..93029a0 100644 --- a/README.md +++ b/README.md @@ -4,15 +4,15 @@ If you found this page using a search engine, you may be looking for the original [libctemplate](http://libctemplate.sourceforge.net) by Stephen C. Losen libctemplates is a template expander written for use with HTML. It's goals are -to be simple, versitile, and fast. This is a library that started off as a +to be simple, versitile, and fast. This library started off as a fork of libctemplate, but eventually became a total rewrite. libctemplate, -the original, was built primarily for cgi applications. It was tightly coupled -with file streams, while libctemplate**s** allows you to output templates to -strings for use in any application. If you think libctemplates is missing a -feature, feel free to suggest it to +the original, was built primarily for cgi applications. libctemplate was +tightly coupled with file streams, while libctemplate**S** renders templates to +strings for use in any application, FastCGI or [Kore](kore.io), for example. +If you think libctemplates is missing a feature, feel free to suggest it to [alexandermpickering@gmail.com](mailto://alexandermpickering@gmail), or, even better, write it yourself and send the patch! You can find -instructions on createing and sending git patches [here](http://cogarr.net/source/cgit.cgi/?p=about) +instructions on createing and sending git patches [here](http://cogarr.net/source/cgit.cgi/?p=about). ## Contents @@ -27,13 +27,17 @@ instructions on createing and sending git patches [here](http://cogarr.net/sourc ## Installation Run the make file. libctemplates should compile on any system with a c99 -complient c compiler. If you are on linux, run `make; make install`. +complient c compiler. If you are on linux, run + + make; make install
## Usage Just include the ctemplates.h header and make sure you're linking against -libctemplates.a +libctemplates.a, for example: + + gcc main.c -lctemplates
## Quick refrence diff --git a/ctemplate.c b/ctemplate.c deleted file mode 100644 index 291c6f9..0000000 --- a/ctemplate.c +++ /dev/null @@ -1,1063 +0,0 @@ -/* - * C TemplateS : template expander - * Based on the original libctemplate by Stephen C. Losen - * - * Version 0.1 - * - * Copyright (c) 2017 Alexander M. Pickering (alexandermpickering@gmail.com) - * - * Distributed under the terms of the GNU General Public Liscense - * (GPL). See COPYING for more information. - * - */ - -#include -#include -#include -#include -#include -#include -#include -#include -void TMPL_free_loop(struct TMPL_loop* tl); - -struct TMPL_token* TMPL_alloc_token(){ - struct TMPL_token* ret = (struct TMPL_token*)malloc(sizeof(struct TMPL_token)); - ret->next = NULL; - return ret; -} - -void TMPL_free_token(struct TMPL_token* token){ - struct TMPL_token* cursor = token; - while(cursor != NULL){ - struct TMPL_token* this = cursor; - cursor = cursor->next; - free(this); - } -} - -/*Check if it starts with the names of any of our tokens*/ -enum TMPL_tagtype starts_with_token(char* str, size_t strlen){ - //printf("hit starts_with_token, \"%s\"\n",str); - //Make sure we get TMPL_ first - if(strlen < 5){ - return tag_null; - } - if(*str != 'T' - || *(str + 1) != 'M' - || *(str + 2) != 'P' - || *(str + 3) != 'L' - || *(str + 4) != '_'){ - //printf("Didn't even start with tmpl_\n"); - return tag_null; - } - //printf("Did start with tmpl\n"); - if(strlen > TAG_VAR_LENGTH - && *(str + 5) == 'V' - && *(str + 6) == 'A' - && *(str + 7) == 'R' - && *(str + 8) == ' '){ - //printf("Hit var\n"); - return tag_var; - }else if(strlen > TAG_IF_LENGTH - && *(str + 5) == 'I' - && *(str + 6) == 'F' - && *(str + 7) == ' '){ - return tag_if; - }else if(strlen > TAG_END_LENGTH - && *(str + 5) == 'E' - && *(str + 6) == 'N' - && *(str + 7) == 'D'){ - return tag_end; - }else if(strlen > TAG_ELSE_LENGTH - && *(str + 5) == 'E'//Check for both else and elseif - && *(str + 6) == 'L' - && *(str + 7) == 'S' - && *(str + 8) == 'E'){ - if(*(str + 9) != 'I'){ - return tag_else; - }else if(strlen > TAG_ELSEIF_LENGTH - && *(str + 9) == 'I' - && *(str + 10) == 'F' - && *(str + 11) == ' '){ - return tag_elseif; - }else{ - return tag_null; - } - }else if(strlen > TAG_LOOP_LENGTH - && *(str + 5) == 'L' - && *(str + 6) == 'O' - && *(str + 7) == 'O' - && *(str + 8) == 'P' - && *(str + 9) == ' '){ - return tag_loop; - }else if(strlen > TAG_BREAK_LENGTH - && *(str + 5) == 'B' - && *(str + 6) == 'R' - && *(str + 7) == 'E' - && *(str + 8) == 'A' - && *(str + 9) == 'K' - && *(str + 10) == ' '){ - return tag_break; - }else if(strlen > TAG_CONTINUE_LENGTH - && *(str + 5) == 'C' - && *(str + 6) == 'O' - && *(str + 7) == 'N' - && *(str + 8) == 'T' - && *(str + 9) == 'I' - && *(str + 10) == 'N' - && *(str + 11) == 'U' - && *(str + 12) == 'E' - && *(str + 13) == ' '){ - return tag_continue; - }else{ - return tag_null; - } -} - -size_t tagtype_len(enum TMPL_tagtype t){ - switch(t){ - case tag_null: - return TAG_NULL_LENGTH; - case tag_text: - return TAG_TEXT_LENGTH; - case tag_var: - return TAG_VAR_LENGTH; - case tag_if: - return TAG_IF_LENGTH; - case tag_end: - return TAG_END_LENGTH; - case tag_elseif: - return TAG_ELSEIF_LENGTH; - case tag_else: - return TAG_ELSE_LENGTH; - case tag_loop: - return TAG_LOOP_LENGTH; - case tag_break: - return TAG_BREAK_LENGTH; - case tag_continue: - return TAG_CONTINUE_LENGTH; - } - return 0; -} - -/*Quickly find the token*/ -struct TMPL_token* scan_text(char* start, size_t strlen, size_t* consumed){ - //printf("Scan starting at %p\n",start); - //printf("Size of string was %d \"%s\"\n",(int)strlen,start); - struct TMPL_token* t = TMPL_alloc_token(); - t->start = start; - enum TMPL_tagtype type = tag_null; - char* cursor = start; - while(type == tag_null){ - cursor = (char*)memchr(cursor,'<',strlen); - if(cursor == NULL){ - //printf("Cursor was null\n"); - cursor = start + (strlen > 0 ? strlen : 1); - break; - } - //printf("Return of memchr was %s\n",cursor); - type = starts_with_token(cursor+1,strlen); - if(type == tag_null){ - cursor++; - } - } - t->end = cursor; - t->length = t->end - t->start; - *consumed = t->length; - //printf("Consumed length is %d\n",(int)*consumed); - //printf("Scan_text is returning token:\n"); - char* c; - for(c = start; c < cursor; c++){ - //printf("%c",*c); - } - //printf("\n"); - return t; -} - -struct TMPL_token* scan_tag(char* start, size_t strlen, size_t* consumed){ - //printf("Scanning tag\n"); - struct TMPL_token* t = TMPL_alloc_token(); - t->start = start; - char* cursor = (char*)memchr(start,'>',strlen); - //printf("Managed to get through memchr, cursor is now %s\n",cursor); - t->end = cursor+1;//Include the '>' - t->length = t->end - t->start; - *consumed = t->length; - return t; -} - -void print_tokens(struct TMPL_token* head){ - struct TMPL_token* cursor = head; - while(cursor != NULL){ - printf("char start is %p char end is %p cursor is %p type is %d\n",cursor->start, cursor->end,(void*)cursor,(int)cursor->type); - char* i; - for(i = cursor->start; i != cursor->end; i++){ - printf("%c",*i); - } - printf("\n----\n"); - cursor = cursor->next; - } - printf("Finished printing tokens\n"); -} - -struct TMPL_varitem* TMPL_alloc_varitem(){ - struct TMPL_varitem* ret = (struct TMPL_varitem*)malloc(sizeof(struct TMPL_varitem)); - return ret; -} - -void TMPL_free_varitem(struct TMPL_varitem* vi){ - //printf("Freeing varitem\n"); - if(vi->type == vartype_var){ - ////printf("Freeing string at %p(%s)\n",vi->item.s,vi->item.s); - //free(vi->item.s); - }else{ - //printf("Freeing loop\n"); - TMPL_free_loop(vi->item.l); - } - free(vi); -} - -void TMPL_add_var_to_varlist(struct TMPL_varlist* t, char* varname, char* var){ - //printf("Adding \"%s\" to varlist under \"%s\"(%p)\n",var,varname,(void*)varname); - struct TMPL_varitem* vi = TMPL_alloc_varitem(); - vi->type = vartype_var; - size_t slen = strlen(var); - vi->item.s = (char*)malloc(sizeof(char)*slen); - memcpy(vi->item.s,var,slen); - int succ = hashmap_put(t->map,varname,vi); - if(succ != MAP_OK){ - //printf("FAiled to put item in %d\n",succ); - exit(-1); - } - //printf("Done\n"); -} - -void print_ast_helper(struct TMPL_tagnode* cursor, int level){ - int i; - for(i = 0; i < level; i++){ - printf("|"); - } - printf("} %d ->",(int)cursor->type); - switch(cursor->type){ - case tag_null: - printf("TAG NULL"); - break; - case tag_text: - printf("TAG Text %d\n", (int)cursor->TMPL_tag.text.len); - break; - case tag_var: - printf("TAG var(%s)",cursor->TMPL_tag.var.varname); - if(cursor->TMPL_tag.var.default_len > 0){ - printf(" +default:%d",(int)cursor->TMPL_tag.var.default_len); - } - printf("\n"); - break; - case tag_if: - case tag_elseif: - printf("TAG If/elseif,(%s) == (%s)\n",cursor->TMPL_tag.ifelse.varname,cursor->TMPL_tag.ifelse.testval); - level++; - for(i=0;iTMPL_tag.ifelse.tbranch,level); - if(cursor->TMPL_tag.ifelse.fbranch != NULL){ - for(i=0;iTMPL_tag.ifelse.fbranch,level); - } - level--; - break; - case tag_else: - printf("TAG Else\n"); - break; - case tag_end: - printf("TAG End\n"); - break; - case tag_loop: - printf("TAG Loop (%s), body:\n",cursor->TMPL_tag.loop.loopname); - print_ast_helper(cursor->TMPL_tag.loop.body,level+1); - break; - case tag_break: - printf("TAG Break\n"); - break; - case tag_continue: - printf("TAG Continue\n"); - break; - } - if(cursor->next != NULL){ - print_ast_helper(cursor->next,level); - } -} -void print_ast(struct TMPL_tagnode* root){ - print_ast_helper(root,0); -} - -struct TMPL_token* TMPL_tokenize(char* tmplstr, size_t strlen){ - if(strlen == 0) return NULL; - struct TMPL_token* first; - char* textcursor = tmplstr; - size_t newlength; - enum TMPL_tagtype ttype; - ttype = starts_with_token(tmplstr+1,strlen); - //printf("First ttype is %d\n",(int)ttype); - if(ttype == tag_null){ - first = scan_text(textcursor,strlen,&newlength); - first->type = tag_text; - }else{ - first = scan_tag(textcursor,strlen,&newlength); - first->type = ttype; - } - //printf("I got a first consumed length of %d\n",(int)newlength); - textcursor += newlength; - first->end = textcursor; - first->length = newlength; - strlen -= newlength; - struct TMPL_token* tokencursor = first; - struct TMPL_token* newnode; - //print_tokens(first); - while(*textcursor != '\0'){ - //printf("Getting a new token... size was %d textcursor is %d\n", (int)newlength, (int)*textcursor); - ttype = starts_with_token(textcursor+1,strlen); - //printf("Loop ttype is %d\n",(int)ttype); - if(ttype == tag_null){ - newnode = scan_text(textcursor,strlen,&newlength); - newnode->type = tag_text; - }else{ - newnode = scan_tag(textcursor,strlen,&newlength); - newnode->type = ttype; - } - tokencursor->next = newnode; - textcursor += newlength; - strlen -= newlength; - tokencursor = newnode; - } - //printf("Returning from tokenize\n"); - return first; -} -void print_varlist_helper(struct TMPL_varlist* vl, int indent); -void print_varlist(struct TMPL_varlist* vl); - -struct TMPL_tagnode* parse(struct TMPL_token* head, struct TMPL_buf* errbuf); - -struct TMPL_tagnode* alloc_tagnode(){ - struct TMPL_tagnode* t = malloc(sizeof(struct TMPL_tagnode)); - return t; -} - -//Finds a quoted string, allows for \" -size_t get_quoted_string(char* start, size_t len){ - size_t i; - int setup; - for(i = 0; i < len; i++){ - if(*(start+i) == '\\'){ - setup = 1; - }else if(*(start+i) == '"'){ - if( setup == 1){ - //Do nothing, this is \" - }else{ - return i; - } - }else{ - setup = 0; - } - } - return i; -} - -struct TMPL_tagnode* parse_text(struct TMPL_token* head, struct TMPL_buf* errbuf){ - //printf("Parsing text node\n"); - struct TMPL_tagnode* t = alloc_tagnode(); - t->TMPL_tag.text.start = head->start; - t->TMPL_tag.text.len = head->length; - t->type = head->type; - //printf("About to call parse again\n"); - struct TMPL_tagnode* n = parse(head->next, errbuf); - //printf("Parsed next\n"); - t->next = n; - return t; -} - -struct TMPL_tagnode* parse_else(struct TMPL_token* head, struct TMPL_buf* errbuf){ - struct TMPL_tagnode* branch = parse(head->next,errbuf); - return branch; -} - -struct TMPL_tagnode* parse_elseif(struct TMPL_token* head, struct TMPL_buf* errbuf){ - struct TMPL_tagnode* t = alloc_tagnode(); - //printf("Parsing elseif..., token was %s\n",head->start); - char* start_of_attribs = head->start + TAG_ELSEIF_LENGTH; - //printf("Start of attribs was %s\n",start_of_attribs); - int name_offset = kmp(start_of_attribs,head->length, ATTRIBUTE_VARNAME,ATTRIBUTE_VARNAME_LENGTH); - //printf("Found an elseif statement, offset is %d\n",name_offset); - char* start_of_name = start_of_attribs + name_offset + ATTRIBUTE_VARNAME_LENGTH; - //printf("Looking for name starting from %s\n",start_of_name); - size_t name_length = get_quoted_string(start_of_name,head->length); - //printf("Length of name was %d\n",(int)name_length); - char* name = (char*)malloc(sizeof(char)*name_length); - memcpy(name,start_of_name,name_length); - name[name_length] = '\0'; - //printf("Makeing elseif with name: %s\n",name); - t->TMPL_tag.ifelse.varname = name; - - int testval_offset = kmp(start_of_attribs,head->length, ATTRIBUTE_VALUE,ATTRIBUTE_VALUE_LENGTH); - char* start_of_value = start_of_attribs + testval_offset + ATTRIBUTE_VALUE_LENGTH; - size_t value_length = get_quoted_string(start_of_value,head->length); - char* value = (char*)malloc(sizeof(char)*value_length); - memcpy(value,start_of_value,value_length); - value[value_length] = '\0'; - t->TMPL_tag.ifelse.testval = value; - struct TMPL_token* cursor = head->next; - int nest_level = 0; - struct TMPL_token* fstart = NULL; - while(nest_level > 0 || cursor->type != tag_end){ - if(nest_level == 0 && fstart == NULL){ - if(cursor->type == tag_elseif){ - fstart = cursor; - }else if(cursor->type == tag_else){ - fstart = cursor; - } - } - if(cursor->type == tag_if || cursor->type == tag_loop){ - nest_level++; - }else if(cursor->type == tag_end){ - nest_level--; - } - cursor = cursor->next; - } - if(fstart != NULL){ - //printf("Found the fstart token to be %s\n",fstart->start); - if(fstart->type == tag_elseif){ - t->TMPL_tag.ifelse.fbranch = parse_elseif(fstart,errbuf); - }else if(fstart->type == tag_else){ - t->TMPL_tag.ifelse.fbranch = parse_else(fstart,errbuf); - }else{ - t->TMPL_tag.ifelse.fbranch = parse(fstart,errbuf); - } - }else{ - //printf("Did not find an fstart token\n"); - t->TMPL_tag.ifelse.fbranch = NULL; - } - - t->TMPL_tag.ifelse.tbranch = parse(head->next,errbuf); - t->next = NULL;//parse(cursor->next,errbuf); - - t->type = tag_elseif; - //printf("Parsed elseif statement:\n"); - //print_ast(t); - return t; - -} - -struct TMPL_tagnode* parse_if(struct TMPL_token* head, struct TMPL_buf* errbuf){ - //printf("Parsing if...\n"); - struct TMPL_tagnode* t = alloc_tagnode(); - char* start_of_attribs = head->start + TAG_IF_LENGTH; - /*Find the name of the varialbe*/ - int name_offset = kmp(start_of_attribs,head->length,ATTRIBUTE_VARNAME,ATTRIBUTE_VARNAME_LENGTH); - //printf("Found an if statement, name offset is %d\n",name_offset); - char* start_of_name = start_of_attribs + name_offset + ATTRIBUTE_VARNAME_LENGTH; - size_t name_length = get_quoted_string(start_of_name,head->length); - char* name = (char*)malloc(sizeof(char)*name_length); - memcpy(name,start_of_name,name_length); - name[name_length] = '\0'; - //printf("Found if name:\"%s\"\n",name); - t->TMPL_tag.ifelse.varname = name; - /*Find the name to check against*/ - int testval_offset = kmp(start_of_attribs,head->length, ATTRIBUTE_VALUE,ATTRIBUTE_VALUE_LENGTH); - char* start_of_value = start_of_attribs + testval_offset + ATTRIBUTE_VALUE_LENGTH; - size_t value_length = get_quoted_string(start_of_value,head->length); - char* value = (char*)malloc(sizeof(char)*value_length); - memcpy(value,start_of_value,value_length); - value[value_length] = '\0'; - //printf("Found if value:\"%s\"\n",value); - t->TMPL_tag.ifelse.testval = value; - /*Find the true branch*/ - struct TMPL_token* cursor = head->next; - int nest_level = 0; - struct TMPL_token* fstart = NULL; - while(nest_level > 0 || cursor->type != tag_end){ - if(fstart == NULL){ - if(cursor->type == tag_elseif){ - fstart = cursor; - }else if(cursor->type == tag_else){ - fstart = cursor; - } - } - if(cursor->type == tag_if || cursor->type == tag_loop){ - nest_level++; - }else if(cursor->type == tag_end){ - nest_level--; - } - cursor = cursor->next; - } - if(fstart != NULL){ - //printf("Found the fstart token to be %s\n",fstart->start); - if(fstart->type == tag_elseif){ - t->TMPL_tag.ifelse.fbranch = parse_elseif(fstart,errbuf); - }else if(fstart->type == tag_else){ - //printf("Type was else, parsing...\n"); - //printf("Tokens were:\n"); - //print_tokens(fstart); - //struct TMPL_tagnode* tn = parse_else(fstart,errbuf); - //printf("Got tagnode back:\n"); - //print_ast(tn); - t->TMPL_tag.ifelse.fbranch = parse_else(fstart,errbuf); - }else{ - t->TMPL_tag.ifelse.fbranch = parse(fstart,errbuf); - } - }else{ - //printf("Did not find an fstart token\n"); - t->TMPL_tag.ifelse.fbranch = NULL; - } - - t->TMPL_tag.ifelse.tbranch = parse(head->next,errbuf); - //Walk the tbranch and try to find if we have elseifs - t->next = parse(cursor->next,errbuf); - - t->type = tag_if; - //printf("Parsed if statement:\n"); - //print_ast(t); - return t; -} - - -struct TMPL_tagnode* parse_loop(struct TMPL_token* head, struct TMPL_buf* errbuf){ - //printf("Parsing loop that starts at %s\n",head->start); - struct TMPL_tagnode* t = alloc_tagnode(); - char* loop_start = head->start + TAG_LOOP_LENGTH; - int loop_length = head->length - TAG_LOOP_LENGTH; - int name_offset = kmp(loop_start,loop_length, ATTRIBUTE_VARNAME, ATTRIBUTE_VARNAME_LENGTH); - //printf("In parse loop, name offset was %d\n",name_offset); - if(name_offset == -1 && DEBUGGING){ - bputs(errbuf,"Parsing error: Could not find name attribute for loop near\n"); - bputsn(errbuf,head->start, ERRBUF_HINTLEN); - return NULL; - } - if(name_offset >= 0){ - char* start_of_name = loop_start + name_offset + ATTRIBUTE_VARNAME_LENGTH; - //printf("Start of name is at %s\n",start_of_name); - size_t name_size = get_quoted_string(start_of_name,head->length); - char* loopname = (char*)malloc(sizeof(char)*name_size); - loopname[name_size] = '\0'; - //printf("Loop name size is %d\n", (int)name_size); - memcpy(loopname,start_of_name,name_size); - //printf("Got loop name %s\n",loopname); - t->TMPL_tag.loop.loopname = loopname; - - } - t->type = tag_loop; - int nest_level = 0; - struct TMPL_token* cursor = head->next; - while(cursor != NULL && (nest_level > 0 || cursor->type != tag_end)){ - //printf("Trying to find end of loop, cursor is"); - //print_tokens(cursor); - if(cursor == NULL){ - bputs(errbuf,"Parse error : tried parsing loop and hit end of stream near\n"); - bputsn(errbuf,head->start,ERRBUF_HINTLEN); - return NULL; - } - if(cursor->type == tag_if || - cursor->type == tag_loop){ - nest_level++; - }else if(cursor->type == tag_end){ - nest_level--; - } - cursor = cursor->next; - } - if(cursor == NULL){ - bputs(errbuf,"Parse error: Tried parsing loop and hit end of stream near\n"); - bputsn(errbuf,head->start,ERRBUF_HINTLEN); - return NULL; - } - //printf("Found end of loop near %20s\n",cursor->start); - t->TMPL_tag.loop.body = parse(head->next,errbuf); - t->next = parse(cursor->next,errbuf); - return t; -} - -struct TMPL_tagnode* parse_variable(struct TMPL_token* head, struct TMPL_buf* errbuf){ - //printf("Parsing variable\n"); - struct TMPL_tagnode* t = alloc_tagnode(); - char* start_of_attribs = head->start + TAG_VAR_LENGTH; - int attribs_length = head->length - TAG_VAR_LENGTH; - int in_name = kmp(start_of_attribs,attribs_length,ATTRIBUTE_VARNAME,ATTRIBUTE_VARNAME_LENGTH); - int in_default = kmp(start_of_attribs,attribs_length,ATTRIBUTE_DEFAULT,ATTRIBUTE_DEFAULT_LENGTH); - //printf("parse: start of attribs is %s\n",start_of_attribs); - //printf("parse: length of 1 was %d, length of 2 was %d\n",(int)attribs_length,(int)ATTRIBUTE_VARNAME_LENGTH); - //printf("While parseing variable, kmp search gave %d\n",in_name); - if(in_name == -1 && DEBUGGING){ - char buf[ERR_MSG_LEN]; - snprintf(buf,ERR_MSG_LEN,"Parsing error: Could not find name=\"name\" near %s\n",head->start); - bputs(errbuf,buf); - } - if(in_name >= 0){ - char* start_of_name = start_of_attribs + in_name + ATTRIBUTE_VARNAME_LENGTH; - size_t name_size = get_quoted_string(start_of_name,head->length); - char* name = (char*)malloc(sizeof(char)*name_size); - memcpy(name,start_of_name,name_size); - name[name_size] = '\0'; - t->TMPL_tag.var.varname = name; - t->TMPL_tag.var.name_len = name_size; - //printf("Found a varname\n"); - } - if(in_default >= 0){ - char* start_of_default = start_of_attribs + in_default + ATTRIBUTE_DEFAULT_LENGTH; - size_t default_size = get_quoted_string(start_of_default,head->length); - char* def = (char*) malloc(sizeof(char)*default_size); - def[default_size] = '\0'; - memcpy(def,start_of_default,default_size); - t->TMPL_tag.var.defaultval = def; - t->TMPL_tag.var.default_len = default_size; - //printf("Found a default\n"); - }else{ - t->TMPL_tag.var.default_len = 0; - } - t->type = tag_var; - t->next = parse(head->next,errbuf); - //printf("Returning %p From parse_variable\n",(void*)t); - //t->TMPL_tag.var.varname - return t; -} - -struct TMPL_varlist* TMPL_alloc_varlist(){ - struct TMPL_varlist* ret = (struct TMPL_varlist*)malloc(sizeof(struct TMPL_varlist)); - ret->map = hashmap_new(); - return ret; -} - - -int TMPL_free_hashmapitems(any_t a, any_t b){ - //printf("Freeing hashmap item at %p\n",(void*)b); - struct TMPL_varitem* vi = (struct TMPL_varitem*)b; - TMPL_free_varitem(vi); - return MAP_OK; -} - -void TMPL_free_varlist(struct TMPL_varlist* vl){ - //printf("Freeing varlist:\n"); - //print_varlist(vl); - hashmap_iterate(vl->map,TMPL_free_hashmapitems,NULL); - //printf("done interatively freeing\n"); - hashmap_free(vl->map); - free(vl); -} - -struct TMPL_loop* TMPL_alloc_loop(){ - struct TMPL_loop* ret = (struct TMPL_loop*)malloc(sizeof(struct TMPL_loop)); - ret->loop_len = 0; - ret->varlist = NULL; - ret->next = NULL; - ret->tail = NULL; - return ret; -} - -void TMPL_free_loop(struct TMPL_loop* tl){ - //printf("Freeing loop\n"); - if(tl->next != NULL){ - TMPL_free_loop(tl->next); - } - TMPL_free_varlist(tl->varlist); - free(tl); -} - -void TMPL_add_varlist_to_loop(struct TMPL_loop* tl,struct TMPL_varlist* vl){ - //printf("Adding varlist to loop\n"); - //print_varlist(vl); - if(tl->loop_len == 0){// Add the first node - tl->varlist = vl; - tl->tail = tl; - tl->loop_len++; - }else{ - struct TMPL_loop* new = TMPL_alloc_loop(); - new->varlist = vl; - tl->tail->next = new; - tl->tail = new; - } -} - -void TMPL_add_loop_to_varlist(struct TMPL_varlist* vl, char* name, struct TMPL_loop* l){ - //printf("Adding loop to varlist under \"%s\"\n",name); - struct TMPL_varitem* vi = TMPL_alloc_varitem(); - vi->type = vartype_loop; - vi->item.l = l; - int err = hashmap_put(vl->map,name,vi); - if(err != MAP_OK){ - //printf("Failed to add loop to varlist:%d\n",err); - } - struct TMPL_varitem* back; - hashmap_get(vl->map,name,(void**)&back); - //printf("Trying to get %s back out: %p\n",name,(void*)back); - //printf("Varlist is now:\n"); - //print_varlist(vl); -} - - - -//Parses tokens into a syntax tree -struct TMPL_tagnode* parse(struct TMPL_token* head, struct TMPL_buf* errbuf){ - struct TMPL_tagnode* root; - if(head == NULL){ - //printf("Asked to parse null"); - return NULL; - } - //printf("In parse, type is %d\n",(int)head->type); - switch(head->type){ - case tag_text: - root = parse_text(head,errbuf); - break; - case tag_var: - root = parse_variable(head,errbuf); - break; - case tag_loop: - root = parse_loop(head,errbuf); - break; - case tag_end: - root = NULL; - //root = prase(head->next, errbuf); - break; - case tag_if: - root = parse_if(head,errbuf); - //printf("Returned from parsing if\n"); - break; - case tag_elseif: - root = NULL; - //root = parse_elseif(head,errbuf); - //printf("Returned from parsing elseif\n"); - break; - case tag_else: - root = NULL; - //root = parse_else(head,errbuf); - break; - default: - //printf("Exiting parse early\n"); - exit(-1); - break; - } - //size_t dummy; - //printf("Errbuf was %s\n",bstringify(errbuf,&dummy)); - if(errbuf->total_len > 0){ - //printf("FAiled to parse\n"); - return NULL; - } - return root; -} - -struct TMPL_templates* alloc_templates(){ - struct TMPL_templates* t = malloc(sizeof(struct TMPL_templates)); - return t; -} - -struct TMPL_templates* compile(char* tmplstr){ - size_t slen = strlen(tmplstr); - struct TMPL_templates* ret = alloc_templates(); - ret->out = alloc_tmpl_buf(); - ret->errout = alloc_tmpl_buf(); - struct TMPL_token* tokens = TMPL_tokenize(tmplstr,slen); - //printf("Tokenized %p\n",(void*)tokens); - //print_tokens(tokens); - struct TMPL_tagnode* ast = parse(tokens,ret->errout); - //printf("Ast was:\n"); - //print_ast(ast); - if(ast == NULL){ - //printf("ast was null"); - }else{ - ret->roottag = ast; - } - //printf("ret roottag is %p\n",(void*)ret->roottag); - return ret; -} - -int render_any(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist); - -int render_variable(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist){ - //printf("Rendering variable...\n"); - struct TMPL_varitem* vi; - char* varname = node->TMPL_tag.var.varname; - //printf("Looking for var name %s in\n",varname); - //print_varlist(varlist); - int err = hashmap_get(varlist->map,varname,(void**)&vi); - //printf("Err is %d\n",err); - if(err == MAP_OK){ - //printf("Rendering val: %s\n", vi->item.s); - bputs(t->out,vi->item.s); - }else if(err == MAP_MISSING){ - //printf("Missing var named %s\n",varname); - size_t has_default = node->TMPL_tag.var.default_len; - if(has_default){ - bputs(t->out,node->TMPL_tag.var.defaultval); - }else{ - /*Error, not bound and no default*/ - return -1; - } - }else{ - //printf("Failed to put in var\n"); - return -1; - } - return 0; -} - -int render_text(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist){ - struct TMPL_buf* buf = t->out; - char* text = (char*)node->TMPL_tag.text.start; - size_t length = node->TMPL_tag.text.len; - bputsn(buf,text,length); - return 0; -} - -int print_pair(any_t indent, any_t b){ - struct TMPL_varitem* vi = (struct TMPL_varitem*)b; - int* ip = (int*)indent; - int ind = *ip; - if(vi->type == vartype_var){ - int i; - for(i = 0; i < ind; i++) - printf("\t"); - printf("%s\n",vi->item.s); - }else{ - struct TMPL_loop* cursor; - printf("{\n"); - ind++; - for(cursor = vi->item.l; cursor != NULL; cursor = cursor->next){ - print_varlist_helper(cursor->varlist,ind); - } - printf("}\n"); - } - return MAP_OK; -} - -void print_varlist_helper(struct TMPL_varlist* vl, int indent){ - hashmap_iterate(vl->map, print_pair,&indent); -} - - -void print_varlist(struct TMPL_varlist* vl){ - print_varlist_helper(vl,0); -} - -int render_if(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist){ - //printf("Rendering if...\n"); - //printf("Node %p tag %p\n",(void*)node,(void*)node->TMPL_tag.ifelse.varname); - char* varname = node->TMPL_tag.ifelse.varname; - //printf("Got varname: %s\n",varname); - char* testval = node->TMPL_tag.ifelse.testval; - //printf("Got varname %s and testval %s\n",varname,testval); - struct TMPL_varitem* vi; - //printf("About to hashmap get\n"); - int err = hashmap_get(varlist->map,varname,(void**)&vi); - //printf("Found variable with key \"%s\" : \"%s\"\n",varname,vi->item.s); - struct TMPL_tagnode* cursor; - if(err == MAP_OK && strcmp(vi->item.s,testval) == 0){ - //printf("Rendering true branch\n"); - cursor = node->TMPL_tag.ifelse.tbranch; - while(cursor != NULL){ - render_any(t,cursor,varlist); - cursor = cursor->next; - } - }else if(node->TMPL_tag.ifelse.fbranch != NULL){ - //printf("Rendering false branch\n"); - //render_any(t,node->TMPL_tag.ifelse.fbranch,varlist); - cursor = node->TMPL_tag.ifelse.fbranch; - while(cursor != NULL){ - render_any(t,cursor,varlist); - cursor = cursor->next; - } - } - return 0; -} - -int render_elseif(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist){ - char* varname = node->TMPL_tag.ifelse.varname; - char* testval = node->TMPL_tag.ifelse.testval; - struct TMPL_varitem* vi; - int err = hashmap_get(varlist->map,varname,(void**)&vi); - //printf("Rendering elseif ast:\n"); - //print_ast(node); - struct TMPL_tagnode* cursor; - if(err == MAP_OK && strcmp(vi->item.s, testval) == 0){ - //printf("Rendering true branch\n"); - cursor = node->TMPL_tag.ifelse.tbranch; - while(cursor != NULL){ - render_any(t,cursor,varlist); - cursor = cursor->next; - } - }else if(node->TMPL_tag.ifelse.fbranch != NULL){ - //printf("Rendering false branch\n"); - cursor = node->TMPL_tag.ifelse.fbranch; - while(cursor != NULL){ - render_any(t,cursor,varlist); - cursor = cursor->next; - } - } - return 0; -} -void TMPL_render_helper(struct TMPL_templates* t, struct TMPL_varlist* varlist); - -int render_loop(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist){ - char* loopname = node->TMPL_tag.loop.loopname; - struct TMPL_varitem* loop; - //printf("Attempting to render loop:\n"); - //print_ast(node); - //printf("With varlist:\n"); - //print_varlist(varlist); - //printf("Looking for loop name %s\n", loopname); - int err = hashmap_get(varlist->map,loopname,(void*)&loop); - if(err != MAP_OK){ - //printf("Failed to get loop struct, %d\n",err); - return -1; - } - //printf("Got loop struct %p\n",(void*)loop); - //printf("First varlist is\n"); - //print_varlist(loop->item.l->varlist); - struct TMPL_templates* nt = (struct TMPL_templates*)malloc(sizeof(struct TMPL_templates)); - nt->out = t->out; - nt->errout = t->errout; - nt->roottag = node->TMPL_tag.loop.body; - struct TMPL_loop* cursor; - for(cursor = loop->item.l; cursor != NULL; cursor = cursor->next){ - //printf("Rendering loop.This varlist is\n"); - //print_varlist(cursor->varlist); - //int err = render_any(t,node->TMPL_tag.loop.body,cursor->varlist); - if(err != 0){ - //printf("Failed to render loop\n"); - } - TMPL_render_helper(nt,cursor->varlist); - } - //struct TMPL_buf* buf = t->out; - //printf("Done rendering loop\n"); - free(nt); - return 0; -} - -int render_any(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist){ - /*Interpret the template*/ - int err; - switch(node->type){ - case tag_text: - //printf("Rendering text\n"); - err = render_text(t,node,varlist); - if(err < 0){ - //printf("Failed to render text\n"); - } - //printf("Done rendering text\n"); - break; - case tag_var: - //printf("Rendering var\n"); - err = render_variable(t,node,varlist); - if(err < 0){ - //printf("Failed to render variable\n"); - } - break; - case tag_loop: - //printf("Rendering loop\n"); - err = render_loop(t,node,varlist); - if(err < 0){ - //printf("Failed to render loop\n"); - } - break; - case tag_if: - //printf("Rendering if\n"); - err = render_if(t,node,varlist); - if(err < 0){ - //printf("Failed to render if\n"); - } - break; - case tag_elseif: - //printf("Rendering elseif\n"); - err = render_elseif(t,node,varlist); - if(err < 0){ - //printf("Failed to render elseif\n"); - } - break; - default: - //printf("Rendering default %d\n",(int)node->type); - exit(-1); - break; - } - return err; -} - -void TMPL_render_helper(struct TMPL_templates* t, struct TMPL_varlist* varlist){ - struct TMPL_tagnode* cursor = t->roottag; - while(cursor != NULL){ - render_any(t,cursor,varlist); - cursor = cursor->next; - } - -} - -char* TMPL_render(struct TMPL_templates* t, struct TMPL_varlist* varlist){ - if(t->out != NULL){ - free_tmpl_buf(t->out); - } - t->out = alloc_tmpl_buf(); - TMPL_render_helper(t,varlist); - size_t dummy; - char* ret = bstringify(t->out,&dummy); - return ret; -} - -struct TMPL_templates* TMPL_alloc_template(char* tmplstr){ - struct TMPL_templates* n = compile(tmplstr); - ////printf("After returning from compile, rottag is %p\n",(void*)n->roottag); - - if(n != NULL){ - return n; - }else{ - TMPL_free_template(n); - return NULL; - } -} - -void TMPL_free_template(struct TMPL_templates* t){ - free_tmpl_buf(t->out); - free_tmpl_buf(t->errout); - TMPL_free_tagnode(t->roottag); - free(t); - ////printf("Freed tagnodes\n"); -} - -void TMPL_free_tagnode(struct TMPL_tagnode* tn){ - //printf("Freeing tagnode:\n"); - //print_ast(tn); - switch(tn->type){ - case tag_text: - break; - case tag_var: - free(tn->TMPL_tag.var.varname); - if(tn->TMPL_tag.var.default_len > 0){ - free(tn->TMPL_tag.var.defaultval); - } - break; - case tag_if: - case tag_elseif: - case tag_else: - free(tn->TMPL_tag.ifelse.varname); - free(tn->TMPL_tag.ifelse.testval); - TMPL_free_tagnode(tn->TMPL_tag.ifelse.tbranch); - if(tn->TMPL_tag.ifelse.fbranch){ - TMPL_free_tagnode(tn->TMPL_tag.ifelse.fbranch); - } - break; - case tag_loop: - free(tn->TMPL_tag.loop.loopname); - TMPL_free_tagnode(tn->TMPL_tag.loop.body); - break; - case tag_null: - case tag_break: - case tag_continue: - case tag_end: - break; - } - if(tn->next != NULL) - TMPL_free_tagnode(tn->next); - free(tn); -} - -char* TMPL_get_error(struct TMPL_templates* t){ - size_t dummy; - return bstringify(t->errout,&dummy); -} diff --git a/ctemplate.h b/ctemplate.h deleted file mode 100644 index 4479141..0000000 --- a/ctemplate.h +++ /dev/null @@ -1,56 +0,0 @@ -/* - * C TemplateS Library 0.1 - - * Forked from C Template Library 1.0 by Stephen C. Losen. - * - * Copyright 2017 Alexander M. Pickering Distributed under the terms - * of the GNU General Public License (GPL) - */ - -#ifndef _CTEMPLATE_H -#define _CTEMPLATE_H - -/* - * TMPL_varlist is a variable list of simple variables and/or - * loop variables - */ - -/* Holdes all the data needed for a template*/ -struct TMPL_templates; -struct TMPL_varlist; -struct TMPL_loop; - - - -/*Things to do with varlists*/ -extern struct TMPL_varlist* TMPL_alloc_varlist(); -extern struct TMPL_loop* TMPL_alloc_loop(); -extern void TMPL_add_var_to_varlist( - struct TMPL_varlist* t, - char* varname, - char* value - ); -extern void TMPL_add_loop_to_varlist( - struct TMPL_varlist* t, - char* name, - struct TMPL_loop* l - ); -extern void TMPL_add_varlist_to_loop( - struct TMPL_loop* l, - struct TMPL_varlist* t - ); - -extern void TMPL_free_varlist(struct TMPL_varlist* t); -extern void TMPL_free_loop(struct TMPL_loop* l); - - - - -extern struct TMPL_templates* TMPL_alloc_template(char* t); -extern void TMPL_free_template(struct TMPL_templates* t); - -extern char* TMPL_render(struct TMPL_templates* t,struct TMPL_varlist* varlist); - -extern char* TMPL_get_error(struct TMPL_templates* t); - - -#endif diff --git a/ctemplate_i.h b/ctemplate_i.h deleted file mode 100644 index b485298..0000000 --- a/ctemplate_i.h +++ /dev/null @@ -1,260 +0,0 @@ -/* - * C TemplateS Library 0.1 - - * Forked from C Template Library 1.0 by Stephen C. Losen. - * - * Copyright 2017 Alexander M. Pickering Distributed under the terms - * of the GNU General Public License (GPL) - */ - -#ifndef _CTEMPLATE_H -#define _CTEMPLATE_H - - - -#include "fbuf.h" -#include "kmp.h" -#include "hashmap.h" -#include "ctemplate.h" - -#define MAX_TEMPLATE_LENGTH 2147384647 - -/* -typedef struct TMPL_varlist TMPL_varlist; -typedef struct TMPL_loop TMPL_loop; -typedef struct TMPL_fmtlist TMPL_fmtlist; -typedef struct TMPL_fmtlists TMPL_fmtlists; -*/ -#define TAG_NULL_TEXT "" -#define TAG_TEXT_TEXT "" -#define TAG_VAR_TEXT "TMPL_VAR" -#define TAG_IF_TEXT "TMPL_IF" -#define TAG_ELSEIF_TEXT "TMPL_ELSEIF" -#define TAG_ELSE_TEXT "TMPL_ELSE" -#define TAG_LOOP_TEXT "TMPL_LOOP" -#define TAG_BREAK_TEXT "TMPL_BREAK" -#define TAG_CONTINUE_TEXT "TMPL_CONTINUE" -#define TAG_END_TEXT "TMPL_END" - -#define ATTRIBUTE_VARNAME "name=\"" -#define ATTRIBUTE_DEFAULT "default=\"" -#define ATTRIBUTE_VALUE "value=\"" - -#define ERRBUF_HINTLEN 50 - -#define SIZEOF(x) (sizeof(x) / sizeof(x[0])) - -#define TAG_NULL_LENGTH 0 -#define TAG_TEXT_LENGTH 0 -#define TAG_VAR_LENGTH SIZEOF(TAG_VAR_TEXT) -#define TAG_IF_LENGTH SIZEOF(TAG_IF_TEXT) -#define TAG_ELSEIF_LENGTH SIZEOF(TAG_ELSEIF_TEXT) -#define TAG_ELSE_LENGTH SIZEOF(TAG_ELSE_TEXT) -#define TAG_LOOP_LENGTH SIZEOF(TAG_LOOP_TEXT) -#define TAG_BREAK_LENGTH SIZEOF(TAG_BREAK_TEXT) -#define TAG_CONTINUE_LENGTH SIZEOF(TAG_CONTINUE_TEXT) -#define TAG_END_LENGTH SIZEOF(TAG_END_TEXT) - -//I guess it counts the backslash? -#define ATTRIBUTE_VARNAME_LENGTH SIZEOF(ATTRIBUTE_VARNAME) - 1 -#define ATTRIBUTE_DEFAULT_LENGTH SIZEOF(ATTRIBUTE_DEFAULT) - 1 -#define ATTRIBUTE_VALUE_LENGTH SIZEOF(ATTRIBUTE_VALUE) - 1 - -//Define to 0 for slight speedup improvements, no errors -#define DEBUGGING 1 -//Length of error messages -#define ERR_MSG_LEN 500 - -/*The different kind of nodes we can have*/ -enum TMPL_tagtype{ - tag_null = 0,/*Should never show up*/ - tag_text = 1,/*A text sequence*/ - tag_var = 2,/*A variable to replace*/ - tag_if = 3,/*If*/ - tag_elseif = 4,/*Else if*/ - tag_else = 5,/*Else*/ - tag_end = 6,/*end if, end loop*/ - tag_loop = 7,/*Loop*/ - tag_break = 9,/*Break*/ - tag_continue = 10,/*Skip the rest of the loop and go again*/ -}; - -struct TMPL_light_string{ - const char* start; - size_t len; -}; - -enum TMPL_vartype{ - vartype_loop, - vartype_var -}; - - -struct TMPL_varlist{ - map_t map; -}TMPL_varlist; - -struct TMPL_loop{ - struct TMPL_varlist* varlist; - size_t loop_len; - struct TMPL_loop* next; - struct TMPL_loop* tail; -}; - -struct TMPL_varitem{ - enum TMPL_vartype type; - union { - struct TMPL_loop* l; - char* s; - }item; -}; - -/*Holds all the data needed for a single node in a template*/ -struct TMPL_tagnode{ - enum TMPL_tagtype type; - struct TMPL_tagnode* next; - union{ - /*Text*/ - struct{ - const char* start; - size_t len; - }text; - /*Var*/ - struct{ - char* varname; - size_t name_len; - char* defaultval; - size_t default_len; - }var; - - /*If, elseif*/ - struct{ - char* varname; - char* testval; - struct TMPL_tagnode* tbranch; - struct TMPL_tagnode* fbranch; - }ifelse; - - /*Loop*/ - struct{ - char* loopname; - struct TMPL_tagnode* body; - }loop; - - /*Break and Continue*/ - struct{ - int level; - }breakcont; - }TMPL_tag; -}TMPL_tagnode; - -//typedef void (*TMPL_fmtfuncs) (const char*, struct TMPL_buf*); -/* - * TMPL_fmtlist is a list of format functions, which are passed to - * a template. A TMPL_VAR tag can specify a format function for - * outputting the variable with the fmt="fmtname" attribute. - */ -struct TMPL_fmtlist{ - struct TMPL_fmtlist* next; - void* fmtfunc; - char* name; -} TMPL_fmtlist; - -struct TMPL_varlist; -struct TMPL_loop; - -/* - * TMPL_varlist is a variable list of simple variables and/or - * loop variables - */ -//struct TMPL_varlist { - //struct TMPL_varlist *next; [> next variable list on a list <] - //struct TMPL_var *var; [> list of my simple variables <] - //struct TMPL_loop *loop; [> list of my loop variables <] - //struct TMPL_loop *parent; [> my parent loop variable (if any) <] -//}; - -/* TMPL_loop is a loop variable, which is a list of variable lists */ - -//struct TMPL_loop { - //struct TMPL_loop *next; [> next loop variable on a list <] - //const char *name; [> my name <] - //struct TMPL_varlist *varlist; [> list of my variable lists <] - //struct TMPL_varlist *tail; [> tail of "varlist" <] - //struct TMPL_varlist *parent; [> my parent variable list <] -//}; - -/* Holdes all the data needed for a template*/ -struct TMPL_templates{ - struct TMPL_buf* out; - struct TMPL_buf* errout; - struct TMPL_tagnode* roottag; - int linenum; - int error; -} TMPL_templates; - - -struct TMPL_token{ - char* start;//Start of token - char* end;//End of token - enum TMPL_tagtype type;//The type of token - size_t length;//Length of token, should always be end-start - struct TMPL_token* next;//The next token -}TMPL_token; - - - -typedef void (*TMPL_fmtfunc) (const char *, FILE *); - -/* - -TMPL_varlist *TMPL_add_var(TMPL_varlist *varlist, - const char *varname1, const char *value1, ... , 0); -*/ - -//TMPL_varlist *TMPL_add_var(TMPL_varlist *varlist, ...); -extern struct TMPL_varlist* TMPL_add_var(struct TMPL_varlist* varlist, ...); - -/*TMPL_varlist *TMPL_add_loop(TMPL_varlist *varlist, - const char *name, TMPL_loop *loop); - */ -extern struct TMPL_varlist* TMPL_add_loop(struct TMPL_varlist* varlist, - const char* name, struct TMPL_loop* loop); - - -//TMPL_loop *TMPL_add_varlist(TMPL_loop *loop, TMPL_varlist *varlist); -struct TMPL_loop* TMPL_add_varlist(struct TMPL_loop* loop, struct TMPL_varlist* varlist); - -//void TMPL_free_varlist(TMPL_varlist *varlist); -void TMPL_free_varlist(struct TMPL_varlist* varlist); - -//TMPL_fmtlist *TMPL_add_fmt(TMPL_fmtlist *fmtlist, - //const char *name, TMPL_fmtfunc fmtfunc); -struct TMPL_fmtlist* TMPL_add_fmt(struct TMPL_fmtlist* fmtlist, - const char* name, void* fmtfunc); - -void TMPL_free_fmtlist(struct TMPL_fmtlist* fmtlist); - -/*int TMPL_write(const char *filename, const char *tmplstr, - const TMPL_fmtlist *fmtlist, const TMPL_varlist *varlist, - FILE *out, FILE *errout); -*/ - -struct TMPL_varlist* TMPL_alloc_varlist(); -void TMPL_free_varlist(struct TMPL_varlist* t); - -struct TMPL_varitem* TMPL_alloc_varitem(); -void TMPL_free_varitem(struct TMPL_varitem* vi); - -struct TMPL_templates* TMPL_alloc_template(char* t); -void TMPL_free_template(struct TMPL_templates* t); - -char* TMPL_render(struct TMPL_templates* t, struct TMPL_varlist* varlist); - -struct TMPL_tagnode* TMPL_alloc_tagnode(enum TMPL_tagtype); -void TMPL_free_tagnode(struct TMPL_tagnode* tn); - -/* TODO: Remove this after testing is done */ -struct TMPL_token* TMPL_tokenize(char* tmplstr, size_t strlen); - - -#endif diff --git a/ctemplates.c b/ctemplates.c new file mode 100644 index 0000000..77832e6 --- /dev/null +++ b/ctemplates.c @@ -0,0 +1,1066 @@ +/* + * C TemplateS : template expander + * Based on the original libctemplate by Stephen C. Losen + * + * Version 0.1 + * + * Copyright (c) 2017 Alexander M. Pickering (alexandermpickering@gmail.com) + * + * Distributed under the terms of the GNU General Public Liscense + * (GPL). See COPYING for more information. + * + */ + +#include +#include +#include +#include +#include +#include +#include +#include + +void TMPL_free_loop(struct TMPL_loop* tl); + +/*Allocates a token*/ +struct TMPL_token* TMPL_alloc_token(){ + struct TMPL_token* ret = (struct TMPL_token*)malloc(sizeof(struct TMPL_token)); + ret->next = NULL; + return ret; +} +/*Frees an allocated token*/ +void TMPL_free_token(struct TMPL_token* token){ + struct TMPL_token* cursor = token; + while(cursor != NULL){ + struct TMPL_token* this = cursor; + cursor = cursor->next; + free(this); + } +} + +/*Check if it starts with the names of any of our tokens*/ +enum TMPL_tagtype starts_with_token(char* str, size_t strlen){ + //Make sure we get TMPL_ first + if(strlen < 5){ + return tag_null; + } + if(*str != 'T' + || *(str + 1) != 'M' + || *(str + 2) != 'P' + || *(str + 3) != 'L' + || *(str + 4) != '_'){ + return tag_null; + } + if(strlen > TAG_VAR_LENGTH + && *(str + 5) == 'V' + && *(str + 6) == 'A' + && *(str + 7) == 'R' + && *(str + 8) == ' '){ + return tag_var; + }else if(strlen > TAG_IF_LENGTH + && *(str + 5) == 'I' + && *(str + 6) == 'F' + && *(str + 7) == ' '){ + return tag_if; + }else if(strlen > TAG_END_LENGTH + && *(str + 5) == 'E' + && *(str + 6) == 'N' + && *(str + 7) == 'D'){ + return tag_end; + }else if(strlen > TAG_ELSE_LENGTH + && *(str + 5) == 'E'//Check for both else and elseif + && *(str + 6) == 'L' + && *(str + 7) == 'S' + && *(str + 8) == 'E'){ + if(*(str + 9) != 'I'){ + return tag_else; + }else if(strlen > TAG_ELSEIF_LENGTH + && *(str + 9) == 'I' + && *(str + 10) == 'F' + && *(str + 11) == ' '){ + return tag_elseif; + }else{ + return tag_null; + } + }else if(strlen > TAG_LOOP_LENGTH + && *(str + 5) == 'L' + && *(str + 6) == 'O' + && *(str + 7) == 'O' + && *(str + 8) == 'P' + && *(str + 9) == ' '){ + return tag_loop; + }else if(strlen > TAG_BREAK_LENGTH + && *(str + 5) == 'B' + && *(str + 6) == 'R' + && *(str + 7) == 'E' + && *(str + 8) == 'A' + && *(str + 9) == 'K' + && *(str + 10) == ' '){ + return tag_break; + }else if(strlen > TAG_CONTINUE_LENGTH + && *(str + 5) == 'C' + && *(str + 6) == 'O' + && *(str + 7) == 'N' + && *(str + 8) == 'T' + && *(str + 9) == 'I' + && *(str + 10) == 'N' + && *(str + 11) == 'U' + && *(str + 12) == 'E' + && *(str + 13) == ' '){ + return tag_continue; + }else{ + return tag_null; + } +} + +/*Find the lenth of a tag*/ +size_t tagtype_len(enum TMPL_tagtype t){ + switch(t){ + case tag_null: + return TAG_NULL_LENGTH; + case tag_text: + return TAG_TEXT_LENGTH; + case tag_var: + return TAG_VAR_LENGTH; + case tag_if: + return TAG_IF_LENGTH; + case tag_end: + return TAG_END_LENGTH; + case tag_elseif: + return TAG_ELSEIF_LENGTH; + case tag_else: + return TAG_ELSE_LENGTH; + case tag_loop: + return TAG_LOOP_LENGTH; + case tag_break: + return TAG_BREAK_LENGTH; + case tag_continue: + return TAG_CONTINUE_LENGTH; + } + return 0; +} + +/*Quickly find the token*/ +struct TMPL_token* scan_text(char* start, size_t strlen, size_t* consumed){ + //printf("Scan starting at %p\n",start); + //printf("Size of string was %d \"%s\"\n",(int)strlen,start); + struct TMPL_token* t = TMPL_alloc_token(); + t->start = start; + enum TMPL_tagtype type = tag_null; + char* cursor = start; + while(type == tag_null){ + cursor = (char*)memchr(cursor,'<',strlen); + if(cursor == NULL){ + //printf("Cursor was null\n"); + cursor = start + (strlen > 0 ? strlen : 1); + break; + } + //printf("Return of memchr was %s\n",cursor); + type = starts_with_token(cursor+1,strlen); + if(type == tag_null){ + cursor++; + } + } + t->end = cursor; + t->length = t->end - t->start; + *consumed = t->length; + //printf("Consumed length is %d\n",(int)*consumed); + //printf("Scan_text is returning token:\n"); + char* c; + for(c = start; c < cursor; c++){ + //printf("%c",*c); + } + //printf("\n"); + return t; +} + +struct TMPL_token* scan_tag(char* start, size_t strlen, size_t* consumed){ + //printf("Scanning tag\n"); + struct TMPL_token* t = TMPL_alloc_token(); + t->start = start; + char* cursor = (char*)memchr(start,'>',strlen); + //printf("Managed to get through memchr, cursor is now %s\n",cursor); + t->end = cursor+1;//Include the '>' + t->length = t->end - t->start; + *consumed = t->length; + return t; +} + +void print_tokens(struct TMPL_token* head){ + struct TMPL_token* cursor = head; + while(cursor != NULL){ + printf("char start is %p char end is %p cursor is %p type is %d\n",cursor->start, cursor->end,(void*)cursor,(int)cursor->type); + char* i; + for(i = cursor->start; i != cursor->end; i++){ + printf("%c",*i); + } + printf("\n----\n"); + cursor = cursor->next; + } + printf("Finished printing tokens\n"); +} + +struct TMPL_varitem* TMPL_alloc_varitem(){ + struct TMPL_varitem* ret = (struct TMPL_varitem*)malloc(sizeof(struct TMPL_varitem)); + return ret; +} + +void TMPL_free_varitem(struct TMPL_varitem* vi){ + //printf("Freeing varitem\n"); + if(vi->type == vartype_var){ + ////printf("Freeing string at %p(%s)\n",vi->item.s,vi->item.s); + //free(vi->item.s); + }else{ + //printf("Freeing loop\n"); + TMPL_free_loop(vi->item.l); + } + free(vi); +} + +void TMPL_add_var_to_varlist(struct TMPL_varlist* t, char* varname, char* var){ + //printf("Adding \"%s\" to varlist under \"%s\"(%p)\n",var,varname,(void*)varname); + struct TMPL_varitem* vi = TMPL_alloc_varitem(); + vi->type = vartype_var; + size_t slen = strlen(var); + vi->item.s = (char*)malloc(sizeof(char)*slen); + memcpy(vi->item.s,var,slen); + int succ = hashmap_put(t->map,varname,vi); + if(succ != MAP_OK){ + //printf("FAiled to put item in %d\n",succ); + exit(-1); + } + //printf("Done\n"); +} + +void print_ast_helper(struct TMPL_tagnode* cursor, int level){ + int i; + for(i = 0; i < level; i++){ + printf("|"); + } + printf("} %d ->",(int)cursor->type); + switch(cursor->type){ + case tag_null: + printf("TAG NULL"); + break; + case tag_text: + printf("TAG Text %d\n", (int)cursor->TMPL_tag.text.len); + break; + case tag_var: + printf("TAG var(%s)",cursor->TMPL_tag.var.varname); + if(cursor->TMPL_tag.var.default_len > 0){ + printf(" +default:%d",(int)cursor->TMPL_tag.var.default_len); + } + printf("\n"); + break; + case tag_if: + case tag_elseif: + printf("TAG If/elseif,(%s) == (%s)\n",cursor->TMPL_tag.ifelse.varname,cursor->TMPL_tag.ifelse.testval); + level++; + for(i=0;iTMPL_tag.ifelse.tbranch,level); + if(cursor->TMPL_tag.ifelse.fbranch != NULL){ + for(i=0;iTMPL_tag.ifelse.fbranch,level); + } + level--; + break; + case tag_else: + printf("TAG Else\n"); + break; + case tag_end: + printf("TAG End\n"); + break; + case tag_loop: + printf("TAG Loop (%s), body:\n",cursor->TMPL_tag.loop.loopname); + print_ast_helper(cursor->TMPL_tag.loop.body,level+1); + break; + case tag_break: + printf("TAG Break\n"); + break; + case tag_continue: + printf("TAG Continue\n"); + break; + } + if(cursor->next != NULL){ + print_ast_helper(cursor->next,level); + } +} +void print_ast(struct TMPL_tagnode* root){ + print_ast_helper(root,0); +} + +struct TMPL_token* TMPL_tokenize(char* tmplstr, size_t strlen){ + if(strlen == 0) return NULL; + struct TMPL_token* first; + char* textcursor = tmplstr; + size_t newlength; + enum TMPL_tagtype ttype; + ttype = starts_with_token(tmplstr+1,strlen); + //printf("First ttype is %d\n",(int)ttype); + if(ttype == tag_null){ + first = scan_text(textcursor,strlen,&newlength); + first->type = tag_text; + }else{ + first = scan_tag(textcursor,strlen,&newlength); + first->type = ttype; + } + //printf("I got a first consumed length of %d\n",(int)newlength); + textcursor += newlength; + first->end = textcursor; + first->length = newlength; + strlen -= newlength; + struct TMPL_token* tokencursor = first; + struct TMPL_token* newnode; + //print_tokens(first); + while(*textcursor != '\0'){ + //printf("Getting a new token... size was %d textcursor is %d\n", (int)newlength, (int)*textcursor); + ttype = starts_with_token(textcursor+1,strlen); + //printf("Loop ttype is %d\n",(int)ttype); + if(ttype == tag_null){ + newnode = scan_text(textcursor,strlen,&newlength); + newnode->type = tag_text; + }else{ + newnode = scan_tag(textcursor,strlen,&newlength); + newnode->type = ttype; + } + tokencursor->next = newnode; + textcursor += newlength; + strlen -= newlength; + tokencursor = newnode; + } + //printf("Returning from tokenize\n"); + return first; +} +void print_varlist_helper(struct TMPL_varlist* vl, int indent); +void print_varlist(struct TMPL_varlist* vl); + +struct TMPL_tagnode* parse(struct TMPL_token* head, struct TMPL_buf* errbuf); + +struct TMPL_tagnode* alloc_tagnode(){ + struct TMPL_tagnode* t = malloc(sizeof(struct TMPL_tagnode)); + return t; +} + +//Finds a quoted string, allows for \" +size_t get_quoted_string(char* start, size_t len){ + size_t i; + int setup = 0; + for(i = 0; i < len; i++){ + if(*(start+i) == '\\'){ + setup = 1; + }else if(*(start+i) == '"'){ + if(setup == 1){ + //Do nothing, this is \" + }else{ + return i; + } + }else{ + setup = 0; + } + } + return i; +} + +struct TMPL_tagnode* parse_text(struct TMPL_token* head, struct TMPL_buf* errbuf){ + //printf("Parsing text node\n"); + struct TMPL_tagnode* t = alloc_tagnode(); + t->TMPL_tag.text.start = head->start; + t->TMPL_tag.text.len = head->length; + t->type = head->type; + //printf("About to call parse again\n"); + struct TMPL_tagnode* n = parse(head->next, errbuf); + //printf("Parsed next\n"); + t->next = n; + return t; +} + +struct TMPL_tagnode* parse_else(struct TMPL_token* head, struct TMPL_buf* errbuf){ + struct TMPL_tagnode* branch = parse(head->next,errbuf); + return branch; +} + +struct TMPL_tagnode* parse_elseif(struct TMPL_token* head, struct TMPL_buf* errbuf){ + struct TMPL_tagnode* t = alloc_tagnode(); + //printf("Parsing elseif..., token was %s\n",head->start); + char* start_of_attribs = head->start + TAG_ELSEIF_LENGTH; + //printf("Start of attribs was %s\n",start_of_attribs); + int name_offset = kmp(start_of_attribs,head->length, ATTRIBUTE_VARNAME,ATTRIBUTE_VARNAME_LENGTH); + //printf("Found an elseif statement, offset is %d\n",name_offset); + char* start_of_name = start_of_attribs + name_offset + ATTRIBUTE_VARNAME_LENGTH; + //printf("Looking for name starting from %s\n",start_of_name); + size_t name_length = get_quoted_string(start_of_name,head->length); + //printf("Length of name was %d\n",(int)name_length); + char* name = (char*)malloc(sizeof(char)*name_length); + memcpy(name,start_of_name,name_length); + name[name_length] = '\0'; + //printf("Makeing elseif with name: %s\n",name); + t->TMPL_tag.ifelse.varname = name; + + int testval_offset = kmp(start_of_attribs,head->length, ATTRIBUTE_VALUE,ATTRIBUTE_VALUE_LENGTH); + char* start_of_value = start_of_attribs + testval_offset + ATTRIBUTE_VALUE_LENGTH; + size_t value_length = get_quoted_string(start_of_value,head->length); + char* value = (char*)malloc(sizeof(char)*value_length); + memcpy(value,start_of_value,value_length); + value[value_length] = '\0'; + t->TMPL_tag.ifelse.testval = value; + struct TMPL_token* cursor = head->next; + int nest_level = 0; + struct TMPL_token* fstart = NULL; + while(nest_level > 0 || cursor->type != tag_end){ + if(nest_level == 0 && fstart == NULL){ + if(cursor->type == tag_elseif){ + fstart = cursor; + }else if(cursor->type == tag_else){ + fstart = cursor; + } + } + if(cursor->type == tag_if || cursor->type == tag_loop){ + nest_level++; + }else if(cursor->type == tag_end){ + nest_level--; + } + cursor = cursor->next; + } + if(fstart != NULL){ + //printf("Found the fstart token to be %s\n",fstart->start); + if(fstart->type == tag_elseif){ + t->TMPL_tag.ifelse.fbranch = parse_elseif(fstart,errbuf); + }else if(fstart->type == tag_else){ + t->TMPL_tag.ifelse.fbranch = parse_else(fstart,errbuf); + }else{ + t->TMPL_tag.ifelse.fbranch = parse(fstart,errbuf); + } + }else{ + //printf("Did not find an fstart token\n"); + t->TMPL_tag.ifelse.fbranch = NULL; + } + + t->TMPL_tag.ifelse.tbranch = parse(head->next,errbuf); + t->next = NULL;//parse(cursor->next,errbuf); + + t->type = tag_elseif; + //printf("Parsed elseif statement:\n"); + //print_ast(t); + return t; + +} + +struct TMPL_tagnode* parse_if(struct TMPL_token* head, struct TMPL_buf* errbuf){ + //printf("Parsing if...\n"); + struct TMPL_tagnode* t = alloc_tagnode(); + char* start_of_attribs = head->start + TAG_IF_LENGTH; + /*Find the name of the varialbe*/ + int name_offset = kmp(start_of_attribs,head->length,ATTRIBUTE_VARNAME,ATTRIBUTE_VARNAME_LENGTH); + //printf("Found an if statement, name offset is %d\n",name_offset); + char* start_of_name = start_of_attribs + name_offset + ATTRIBUTE_VARNAME_LENGTH; + size_t name_length = get_quoted_string(start_of_name,head->length); + char* name = (char*)malloc(sizeof(char)*name_length); + memcpy(name,start_of_name,name_length); + name[name_length] = '\0'; + //printf("Found if name:\"%s\"\n",name); + t->TMPL_tag.ifelse.varname = name; + /*Find the name to check against*/ + int testval_offset = kmp(start_of_attribs,head->length, ATTRIBUTE_VALUE,ATTRIBUTE_VALUE_LENGTH); + char* start_of_value = start_of_attribs + testval_offset + ATTRIBUTE_VALUE_LENGTH; + size_t value_length = get_quoted_string(start_of_value,head->length); + char* value = (char*)malloc(sizeof(char)*value_length); + memcpy(value,start_of_value,value_length); + value[value_length] = '\0'; + //printf("Found if value:\"%s\"\n",value); + t->TMPL_tag.ifelse.testval = value; + /*Find the true branch*/ + struct TMPL_token* cursor = head->next; + int nest_level = 0; + struct TMPL_token* fstart = NULL; + while(nest_level > 0 || cursor->type != tag_end){ + if(fstart == NULL){ + if(cursor->type == tag_elseif){ + fstart = cursor; + }else if(cursor->type == tag_else){ + fstart = cursor; + } + } + if(cursor->type == tag_if || cursor->type == tag_loop){ + nest_level++; + }else if(cursor->type == tag_end){ + nest_level--; + } + cursor = cursor->next; + } + if(fstart != NULL){ + //printf("Found the fstart token to be %s\n",fstart->start); + if(fstart->type == tag_elseif){ + t->TMPL_tag.ifelse.fbranch = parse_elseif(fstart,errbuf); + }else if(fstart->type == tag_else){ + //printf("Type was else, parsing...\n"); + //printf("Tokens were:\n"); + //print_tokens(fstart); + //struct TMPL_tagnode* tn = parse_else(fstart,errbuf); + //printf("Got tagnode back:\n"); + //print_ast(tn); + t->TMPL_tag.ifelse.fbranch = parse_else(fstart,errbuf); + }else{ + t->TMPL_tag.ifelse.fbranch = parse(fstart,errbuf); + } + }else{ + //printf("Did not find an fstart token\n"); + t->TMPL_tag.ifelse.fbranch = NULL; + } + + t->TMPL_tag.ifelse.tbranch = parse(head->next,errbuf); + //Walk the tbranch and try to find if we have elseifs + t->next = parse(cursor->next,errbuf); + + t->type = tag_if; + //printf("Parsed if statement:\n"); + //print_ast(t); + return t; +} + + +struct TMPL_tagnode* parse_loop(struct TMPL_token* head, struct TMPL_buf* errbuf){ + //printf("Parsing loop that starts at %s\n",head->start); + struct TMPL_tagnode* t = alloc_tagnode(); + char* loop_start = head->start + TAG_LOOP_LENGTH; + int loop_length = head->length - TAG_LOOP_LENGTH; + int name_offset = kmp(loop_start,loop_length, ATTRIBUTE_VARNAME, ATTRIBUTE_VARNAME_LENGTH); + //printf("In parse loop, name offset was %d\n",name_offset); + if(name_offset == -1 && DEBUGGING){ + bputs(errbuf,"Parsing error: Could not find name attribute for loop near\n"); + bputsn(errbuf,head->start, ERRBUF_HINTLEN); + return NULL; + } + if(name_offset >= 0){ + char* start_of_name = loop_start + name_offset + ATTRIBUTE_VARNAME_LENGTH; + //printf("Start of name is at %s\n",start_of_name); + size_t name_size = get_quoted_string(start_of_name,head->length); + char* loopname = (char*)malloc(sizeof(char)*name_size); + loopname[name_size] = '\0'; + //printf("Loop name size is %d\n", (int)name_size); + memcpy(loopname,start_of_name,name_size); + //printf("Got loop name %s\n",loopname); + t->TMPL_tag.loop.loopname = loopname; + + } + t->type = tag_loop; + int nest_level = 0; + struct TMPL_token* cursor = head->next; + while(cursor != NULL && (nest_level > 0 || cursor->type != tag_end)){ + //printf("Trying to find end of loop, cursor is"); + //print_tokens(cursor); + if(cursor == NULL){ + bputs(errbuf,"Parse error : tried parsing loop and hit end of stream near\n"); + bputsn(errbuf,head->start,ERRBUF_HINTLEN); + return NULL; + } + if(cursor->type == tag_if || + cursor->type == tag_loop){ + nest_level++; + }else if(cursor->type == tag_end){ + nest_level--; + } + cursor = cursor->next; + } + if(cursor == NULL){ + bputs(errbuf,"Parse error: Tried parsing loop and hit end of stream near\n"); + bputsn(errbuf,head->start,ERRBUF_HINTLEN); + return NULL; + } + //printf("Found end of loop near %20s\n",cursor->start); + t->TMPL_tag.loop.body = parse(head->next,errbuf); + t->next = parse(cursor->next,errbuf); + return t; +} + +struct TMPL_tagnode* parse_variable(struct TMPL_token* head, struct TMPL_buf* errbuf){ + //printf("Parsing variable\n"); + struct TMPL_tagnode* t = alloc_tagnode(); + char* start_of_attribs = head->start + TAG_VAR_LENGTH; + int attribs_length = head->length - TAG_VAR_LENGTH; + int in_name = kmp(start_of_attribs,attribs_length,ATTRIBUTE_VARNAME,ATTRIBUTE_VARNAME_LENGTH); + int in_default = kmp(start_of_attribs,attribs_length,ATTRIBUTE_DEFAULT,ATTRIBUTE_DEFAULT_LENGTH); + //printf("parse: start of attribs is %s\n",start_of_attribs); + //printf("parse: length of 1 was %d, length of 2 was %d\n",(int)attribs_length,(int)ATTRIBUTE_VARNAME_LENGTH); + //printf("While parseing variable, kmp search gave %d\n",in_name); + if(in_name == -1 && DEBUGGING){ + char buf[ERR_MSG_LEN]; + snprintf(buf,ERR_MSG_LEN,"Parsing error: Could not find name=\"name\" near %s\n",head->start); + bputs(errbuf,buf); + } + if(in_name >= 0){ + char* start_of_name = start_of_attribs + in_name + ATTRIBUTE_VARNAME_LENGTH; + size_t name_size = get_quoted_string(start_of_name,head->length); + char* name = (char*)malloc(sizeof(char)*name_size); + memcpy(name,start_of_name,name_size); + name[name_size] = '\0'; + t->TMPL_tag.var.varname = name; + t->TMPL_tag.var.name_len = name_size; + //printf("Found a varname\n"); + } + if(in_default >= 0){ + char* start_of_default = start_of_attribs + in_default + ATTRIBUTE_DEFAULT_LENGTH; + size_t default_size = get_quoted_string(start_of_default,head->length); + char* def = (char*) malloc(sizeof(char)*default_size); + def[default_size] = '\0'; + memcpy(def,start_of_default,default_size); + t->TMPL_tag.var.defaultval = def; + t->TMPL_tag.var.default_len = default_size; + //printf("Found a default\n"); + }else{ + t->TMPL_tag.var.default_len = 0; + } + t->type = tag_var; + t->next = parse(head->next,errbuf); + //printf("Returning %p From parse_variable\n",(void*)t); + //t->TMPL_tag.var.varname + return t; +} + +struct TMPL_varlist* TMPL_alloc_varlist(){ + struct TMPL_varlist* ret = (struct TMPL_varlist*)malloc(sizeof(struct TMPL_varlist)); + ret->map = hashmap_new(); + return ret; +} + + +int TMPL_free_hashmapitems(any_t a, any_t b){ + //printf("Freeing hashmap item at %p\n",(void*)b); + struct TMPL_varitem* vi = (struct TMPL_varitem*)b; + TMPL_free_varitem(vi); + return MAP_OK; +} + +void TMPL_free_varlist(struct TMPL_varlist* vl){ + //printf("Freeing varlist:\n"); + //print_varlist(vl); + hashmap_iterate(vl->map,TMPL_free_hashmapitems,NULL); + //printf("done interatively freeing\n"); + hashmap_free(vl->map); + free(vl); +} + +struct TMPL_loop* TMPL_alloc_loop(){ + struct TMPL_loop* ret = (struct TMPL_loop*)malloc(sizeof(struct TMPL_loop)); + ret->loop_len = 0; + ret->varlist = NULL; + ret->next = NULL; + ret->tail = NULL; + return ret; +} + +void TMPL_free_loop(struct TMPL_loop* tl){ + //printf("Freeing loop\n"); + if(tl->next != NULL){ + TMPL_free_loop(tl->next); + } + TMPL_free_varlist(tl->varlist); + free(tl); +} + +void TMPL_add_varlist_to_loop(struct TMPL_loop* tl,struct TMPL_varlist* vl){ + //printf("Adding varlist to loop\n"); + //print_varlist(vl); + if(tl->loop_len == 0){// Add the first node + tl->varlist = vl; + tl->tail = tl; + tl->loop_len++; + }else{ + struct TMPL_loop* new = TMPL_alloc_loop(); + new->varlist = vl; + tl->tail->next = new; + tl->tail = new; + } +} + +void TMPL_add_loop_to_varlist(struct TMPL_varlist* vl, char* name, struct TMPL_loop* l){ + //printf("Adding loop to varlist under \"%s\"\n",name); + struct TMPL_varitem* vi = TMPL_alloc_varitem(); + vi->type = vartype_loop; + vi->item.l = l; + int err = hashmap_put(vl->map,name,vi); + if(err != MAP_OK){ + //printf("Failed to add loop to varlist:%d\n",err); + } + struct TMPL_varitem* back; + hashmap_get(vl->map,name,(void**)&back); + //printf("Trying to get %s back out: %p\n",name,(void*)back); + //printf("Varlist is now:\n"); + //print_varlist(vl); +} + + + +//Parses tokens into a syntax tree +struct TMPL_tagnode* parse(struct TMPL_token* head, struct TMPL_buf* errbuf){ + struct TMPL_tagnode* root; + if(head == NULL){ + //printf("Asked to parse null"); + return NULL; + } + //printf("In parse, type is %d\n",(int)head->type); + switch(head->type){ + case tag_text: + root = parse_text(head,errbuf); + break; + case tag_var: + root = parse_variable(head,errbuf); + break; + case tag_loop: + root = parse_loop(head,errbuf); + break; + case tag_end: + root = NULL; + //root = prase(head->next, errbuf); + break; + case tag_if: + root = parse_if(head,errbuf); + //printf("Returned from parsing if\n"); + break; + case tag_elseif: + root = NULL; + //root = parse_elseif(head,errbuf); + //printf("Returned from parsing elseif\n"); + break; + case tag_else: + root = NULL; + //root = parse_else(head,errbuf); + break; + default: + //printf("Exiting parse early\n"); + exit(-1); + break; + } + //size_t dummy; + //printf("Errbuf was %s\n",bstringify(errbuf,&dummy)); + if(errbuf->total_len > 0){ + //printf("FAiled to parse\n"); + return NULL; + } + return root; +} + +struct TMPL_templates* alloc_templates(){ + struct TMPL_templates* t = malloc(sizeof(struct TMPL_templates)); + return t; +} + +struct TMPL_templates* compile(char* tmplstr){ + size_t slen = strlen(tmplstr); + struct TMPL_templates* ret = alloc_templates(); + ret->out = alloc_tmpl_buf(); + ret->errout = alloc_tmpl_buf(); + struct TMPL_token* tokens = TMPL_tokenize(tmplstr,slen); + //printf("Tokenized %p\n",(void*)tokens); + //print_tokens(tokens); + struct TMPL_tagnode* ast = parse(tokens,ret->errout); + //printf("Ast was:\n"); + //print_ast(ast); + if(ast == NULL){ + //printf("ast was null"); + }else{ + ret->roottag = ast; + } + //printf("ret roottag is %p\n",(void*)ret->roottag); + return ret; +} + +int render_any(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist); + +int render_variable(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist){ + //printf("Rendering variable...\n"); + struct TMPL_varitem* vi; + char* varname = node->TMPL_tag.var.varname; + //printf("Looking for var name %s in\n",varname); + //print_varlist(varlist); + int err = hashmap_get(varlist->map,varname,(void**)&vi); + //printf("Err is %d\n",err); + if(err == MAP_OK){ + //printf("Rendering val: %s\n", vi->item.s); + bputs(t->out,vi->item.s); + }else if(err == MAP_MISSING){ + //printf("Missing var named %s\n",varname); + size_t has_default = node->TMPL_tag.var.default_len; + if(has_default){ + bputs(t->out,node->TMPL_tag.var.defaultval); + }else{ + /*Error, not bound and no default*/ + return -1; + } + }else{ + //printf("Failed to put in var\n"); + return -1; + } + return 0; +} + +int render_text(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist){ + struct TMPL_buf* buf = t->out; + char* text = (char*)node->TMPL_tag.text.start; + size_t length = node->TMPL_tag.text.len; + bputsn(buf,text,length); + return 0; +} + +int print_pair(any_t indent, any_t b){ + struct TMPL_varitem* vi = (struct TMPL_varitem*)b; + int* ip = (int*)indent; + int ind = *ip; + if(vi->type == vartype_var){ + int i; + for(i = 0; i < ind; i++) + printf("\t"); + printf("%s\n",vi->item.s); + }else{ + struct TMPL_loop* cursor; + printf("{\n"); + ind++; + for(cursor = vi->item.l; cursor != NULL; cursor = cursor->next){ + print_varlist_helper(cursor->varlist,ind); + } + printf("}\n"); + } + return MAP_OK; +} + +void print_varlist_helper(struct TMPL_varlist* vl, int indent){ + hashmap_iterate(vl->map, print_pair,&indent); +} + + +void print_varlist(struct TMPL_varlist* vl){ + print_varlist_helper(vl,0); +} + +int render_if(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist){ + //printf("Rendering if...\n"); + //printf("Node %p tag %p\n",(void*)node,(void*)node->TMPL_tag.ifelse.varname); + char* varname = node->TMPL_tag.ifelse.varname; + //printf("Got varname: %s\n",varname); + char* testval = node->TMPL_tag.ifelse.testval; + //printf("Got varname %s and testval %s\n",varname,testval); + struct TMPL_varitem* vi; + //printf("About to hashmap get\n"); + int err = hashmap_get(varlist->map,varname,(void**)&vi); + //printf("Found variable with key \"%s\" : \"%s\"\n",varname,vi->item.s); + struct TMPL_tagnode* cursor; + if(err == MAP_OK && strcmp(vi->item.s,testval) == 0){ + //printf("Rendering true branch\n"); + cursor = node->TMPL_tag.ifelse.tbranch; + while(cursor != NULL){ + render_any(t,cursor,varlist); + cursor = cursor->next; + } + }else if(node->TMPL_tag.ifelse.fbranch != NULL){ + //printf("Rendering false branch\n"); + //render_any(t,node->TMPL_tag.ifelse.fbranch,varlist); + cursor = node->TMPL_tag.ifelse.fbranch; + while(cursor != NULL){ + render_any(t,cursor,varlist); + cursor = cursor->next; + } + } + return 0; +} + +/*Exactly the same thing as if*/ +int render_elseif(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist){ + return render_if(t,node,varlist); + /* + char* varname = node->TMPL_tag.ifelse.varname; + char* testval = node->TMPL_tag.ifelse.testval; + struct TMPL_varitem* vi; + int err = hashmap_get(varlist->map,varname,(void**)&vi); + //printf("Rendering elseif ast:\n"); + //print_ast(node); + struct TMPL_tagnode* cursor; + if(err == MAP_OK && strcmp(vi->item.s, testval) == 0){ + //printf("Rendering true branch\n"); + cursor = node->TMPL_tag.ifelse.tbranch; + while(cursor != NULL){ + render_any(t,cursor,varlist); + cursor = cursor->next; + } + }else if(node->TMPL_tag.ifelse.fbranch != NULL){ + //printf("Rendering false branch\n"); + cursor = node->TMPL_tag.ifelse.fbranch; + while(cursor != NULL){ + render_any(t,cursor,varlist); + cursor = cursor->next; + } + } + return 0; + */ +} +void TMPL_render_helper(struct TMPL_templates* t, struct TMPL_varlist* varlist); + +int render_loop(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist){ + char* loopname = node->TMPL_tag.loop.loopname; + struct TMPL_varitem* loop; + //printf("Attempting to render loop:\n"); + //print_ast(node); + //printf("With varlist:\n"); + //print_varlist(varlist); + //printf("Looking for loop name %s\n", loopname); + int err = hashmap_get(varlist->map,loopname,(void*)&loop); + if(err != MAP_OK){ + //printf("Failed to get loop struct, %d\n",err); + return -1; + } + //printf("Got loop struct %p\n",(void*)loop); + //printf("First varlist is\n"); + //print_varlist(loop->item.l->varlist); + struct TMPL_templates* nt = (struct TMPL_templates*)malloc(sizeof(struct TMPL_templates)); + nt->out = t->out; + nt->errout = t->errout; + nt->roottag = node->TMPL_tag.loop.body; + struct TMPL_loop* cursor; + for(cursor = loop->item.l; cursor != NULL; cursor = cursor->next){ + //printf("Rendering loop.This varlist is\n"); + //print_varlist(cursor->varlist); + //int err = render_any(t,node->TMPL_tag.loop.body,cursor->varlist); + if(err != 0){ + //printf("Failed to render loop\n"); + } + TMPL_render_helper(nt,cursor->varlist); + } + //struct TMPL_buf* buf = t->out; + //printf("Done rendering loop\n"); + free(nt); + return 0; +} + +int render_any(struct TMPL_templates* t, struct TMPL_tagnode* node, struct TMPL_varlist* varlist){ + /*Interpret the template*/ + int err; + switch(node->type){ + case tag_text: + //printf("Rendering text\n"); + err = render_text(t,node,varlist); + if(err < 0){ + //printf("Failed to render text\n"); + } + //printf("Done rendering text\n"); + break; + case tag_var: + //printf("Rendering var\n"); + err = render_variable(t,node,varlist); + if(err < 0){ + //printf("Failed to render variable\n"); + } + break; + case tag_loop: + //printf("Rendering loop\n"); + err = render_loop(t,node,varlist); + if(err < 0){ + //printf("Failed to render loop\n"); + } + break; + case tag_if: + //printf("Rendering if\n"); + err = render_if(t,node,varlist); + if(err < 0){ + //printf("Failed to render if\n"); + } + break; + case tag_elseif: + //printf("Rendering elseif\n"); + err = render_elseif(t,node,varlist); + if(err < 0){ + //printf("Failed to render elseif\n"); + } + break; + default: + //printf("Rendering default %d\n",(int)node->type); + exit(-1); + break; + } + return err; +} + +void TMPL_render_helper(struct TMPL_templates* t, struct TMPL_varlist* varlist){ + struct TMPL_tagnode* cursor = t->roottag; + while(cursor != NULL){ + render_any(t,cursor,varlist); + cursor = cursor->next; + } + +} + +char* TMPL_render(struct TMPL_templates* t, struct TMPL_varlist* varlist){ + if(t->out != NULL){ + free_tmpl_buf(t->out); + } + t->out = alloc_tmpl_buf(); + TMPL_render_helper(t,varlist); + size_t dummy; + char* ret = bstringify(t->out,&dummy); + return ret; +} + +struct TMPL_templates* TMPL_alloc_template(char* tmplstr){ + struct TMPL_templates* n = compile(tmplstr); + ////printf("After returning from compile, rottag is %p\n",(void*)n->roottag); + + if(n != NULL){ + return n; + }else{ + TMPL_free_template(n); + return NULL; + } +} + +void TMPL_free_template(struct TMPL_templates* t){ + free_tmpl_buf(t->out); + free_tmpl_buf(t->errout); + TMPL_free_tagnode(t->roottag); + free(t); + ////printf("Freed tagnodes\n"); +} + +void TMPL_free_tagnode(struct TMPL_tagnode* tn){ + //printf("Freeing tagnode:\n"); + //print_ast(tn); + switch(tn->type){ + case tag_text: + break; + case tag_var: + free(tn->TMPL_tag.var.varname); + if(tn->TMPL_tag.var.default_len > 0){ + free(tn->TMPL_tag.var.defaultval); + } + break; + case tag_if: + case tag_elseif: + case tag_else: + free(tn->TMPL_tag.ifelse.varname); + free(tn->TMPL_tag.ifelse.testval); + TMPL_free_tagnode(tn->TMPL_tag.ifelse.tbranch); + if(tn->TMPL_tag.ifelse.fbranch){ + TMPL_free_tagnode(tn->TMPL_tag.ifelse.fbranch); + } + break; + case tag_loop: + free(tn->TMPL_tag.loop.loopname); + TMPL_free_tagnode(tn->TMPL_tag.loop.body); + break; + case tag_null: + case tag_break: + case tag_continue: + case tag_end: + break; + } + if(tn->next != NULL) + TMPL_free_tagnode(tn->next); + free(tn); +} + +char* TMPL_get_error(struct TMPL_templates* t){ + size_t dummy; + return bstringify(t->errout,&dummy); +} diff --git a/ctemplates.h b/ctemplates.h new file mode 100644 index 0000000..4479141 --- /dev/null +++ b/ctemplates.h @@ -0,0 +1,56 @@ +/* + * C TemplateS Library 0.1 - + * Forked from C Template Library 1.0 by Stephen C. Losen. + * + * Copyright 2017 Alexander M. Pickering Distributed under the terms + * of the GNU General Public License (GPL) + */ + +#ifndef _CTEMPLATE_H +#define _CTEMPLATE_H + +/* + * TMPL_varlist is a variable list of simple variables and/or + * loop variables + */ + +/* Holdes all the data needed for a template*/ +struct TMPL_templates; +struct TMPL_varlist; +struct TMPL_loop; + + + +/*Things to do with varlists*/ +extern struct TMPL_varlist* TMPL_alloc_varlist(); +extern struct TMPL_loop* TMPL_alloc_loop(); +extern void TMPL_add_var_to_varlist( + struct TMPL_varlist* t, + char* varname, + char* value + ); +extern void TMPL_add_loop_to_varlist( + struct TMPL_varlist* t, + char* name, + struct TMPL_loop* l + ); +extern void TMPL_add_varlist_to_loop( + struct TMPL_loop* l, + struct TMPL_varlist* t + ); + +extern void TMPL_free_varlist(struct TMPL_varlist* t); +extern void TMPL_free_loop(struct TMPL_loop* l); + + + + +extern struct TMPL_templates* TMPL_alloc_template(char* t); +extern void TMPL_free_template(struct TMPL_templates* t); + +extern char* TMPL_render(struct TMPL_templates* t,struct TMPL_varlist* varlist); + +extern char* TMPL_get_error(struct TMPL_templates* t); + + +#endif diff --git a/ctemplates_i.h b/ctemplates_i.h new file mode 100644 index 0000000..0e76fc3 --- /dev/null +++ b/ctemplates_i.h @@ -0,0 +1,260 @@ +/* + * C TemplateS Library 0.1 - + * Forked from C Template Library 1.0 by Stephen C. Losen. + * + * Copyright 2017 Alexander M. Pickering Distributed under the terms + * of the GNU General Public License (GPL) + */ + +#ifndef _CTEMPLATE_H +#define _CTEMPLATE_H + + + +#include "fbuf.h" +#include "kmp.h" +#include "hashmap.h" +#include "ctemplates.h" + +#define MAX_TEMPLATE_LENGTH 2147384647 + +/* +typedef struct TMPL_varlist TMPL_varlist; +typedef struct TMPL_loop TMPL_loop; +typedef struct TMPL_fmtlist TMPL_fmtlist; +typedef struct TMPL_fmtlists TMPL_fmtlists; +*/ +#define TAG_NULL_TEXT "" +#define TAG_TEXT_TEXT "" +#define TAG_VAR_TEXT "TMPL_VAR" +#define TAG_IF_TEXT "TMPL_IF" +#define TAG_ELSEIF_TEXT "TMPL_ELSEIF" +#define TAG_ELSE_TEXT "TMPL_ELSE" +#define TAG_LOOP_TEXT "TMPL_LOOP" +#define TAG_BREAK_TEXT "TMPL_BREAK" +#define TAG_CONTINUE_TEXT "TMPL_CONTINUE" +#define TAG_END_TEXT "TMPL_END" + +#define ATTRIBUTE_VARNAME "name=\"" +#define ATTRIBUTE_DEFAULT "default=\"" +#define ATTRIBUTE_VALUE "value=\"" + +#define ERRBUF_HINTLEN 50 + +#define SIZEOF(x) (sizeof(x) / sizeof(x[0])) + +#define TAG_NULL_LENGTH 0 +#define TAG_TEXT_LENGTH 0 +#define TAG_VAR_LENGTH SIZEOF(TAG_VAR_TEXT) +#define TAG_IF_LENGTH SIZEOF(TAG_IF_TEXT) +#define TAG_ELSEIF_LENGTH SIZEOF(TAG_ELSEIF_TEXT) +#define TAG_ELSE_LENGTH SIZEOF(TAG_ELSE_TEXT) +#define TAG_LOOP_LENGTH SIZEOF(TAG_LOOP_TEXT) +#define TAG_BREAK_LENGTH SIZEOF(TAG_BREAK_TEXT) +#define TAG_CONTINUE_LENGTH SIZEOF(TAG_CONTINUE_TEXT) +#define TAG_END_LENGTH SIZEOF(TAG_END_TEXT) + +//I guess it counts the backslash? +#define ATTRIBUTE_VARNAME_LENGTH SIZEOF(ATTRIBUTE_VARNAME) - 1 +#define ATTRIBUTE_DEFAULT_LENGTH SIZEOF(ATTRIBUTE_DEFAULT) - 1 +#define ATTRIBUTE_VALUE_LENGTH SIZEOF(ATTRIBUTE_VALUE) - 1 + +//Define to 0 for slight speedup improvements, no errors +#define DEBUGGING 1 +//Length of error messages +#define ERR_MSG_LEN 500 + +/*The different kind of nodes we can have*/ +enum TMPL_tagtype{ + tag_null = 0,/*Should never show up*/ + tag_text = 1,/*A text sequence*/ + tag_var = 2,/*A variable to replace*/ + tag_if = 3,/*If*/ + tag_elseif = 4,/*Else if*/ + tag_else = 5,/*Else*/ + tag_end = 6,/*end if, end loop*/ + tag_loop = 7,/*Loop*/ + tag_break = 9,/*Break*/ + tag_continue = 10,/*Skip the rest of the loop and go again*/ +}; + +struct TMPL_light_string{ + const char* start; + size_t len; +}; + +enum TMPL_vartype{ + vartype_loop, + vartype_var +}; + + +struct TMPL_varlist{ + map_t map; +}TMPL_varlist; + +struct TMPL_loop{ + struct TMPL_varlist* varlist; + size_t loop_len; + struct TMPL_loop* next; + struct TMPL_loop* tail; +}; + +struct TMPL_varitem{ + enum TMPL_vartype type; + union { + struct TMPL_loop* l; + char* s; + }item; +}; + +/*Holds all the data needed for a single node in a template*/ +struct TMPL_tagnode{ + enum TMPL_tagtype type; + struct TMPL_tagnode* next; + union{ + /*Text*/ + struct{ + const char* start; + size_t len; + }text; + /*Var*/ + struct{ + char* varname; + size_t name_len; + char* defaultval; + size_t default_len; + }var; + + /*If, elseif*/ + struct{ + char* varname; + char* testval; + struct TMPL_tagnode* tbranch; + struct TMPL_tagnode* fbranch; + }ifelse; + + /*Loop*/ + struct{ + char* loopname; + struct TMPL_tagnode* body; + }loop; + + /*Break and Continue*/ + struct{ + int level; + }breakcont; + }TMPL_tag; +}TMPL_tagnode; + +//typedef void (*TMPL_fmtfuncs) (const char*, struct TMPL_buf*); +/* + * TMPL_fmtlist is a list of format functions, which are passed to + * a template. A TMPL_VAR tag can specify a format function for + * outputting the variable with the fmt="fmtname" attribute. + */ +struct TMPL_fmtlist{ + struct TMPL_fmtlist* next; + void* fmtfunc; + char* name; +} TMPL_fmtlist; + +struct TMPL_varlist; +struct TMPL_loop; + +/* + * TMPL_varlist is a variable list of simple variables and/or + * loop variables + */ +//struct TMPL_varlist { + //struct TMPL_varlist *next; [> next variable list on a list <] + //struct TMPL_var *var; [> list of my simple variables <] + //struct TMPL_loop *loop; [> list of my loop variables <] + //struct TMPL_loop *parent; [> my parent loop variable (if any) <] +//}; + +/* TMPL_loop is a loop variable, which is a list of variable lists */ + +//struct TMPL_loop { + //struct TMPL_loop *next; [> next loop variable on a list <] + //const char *name; [> my name <] + //struct TMPL_varlist *varlist; [> list of my variable lists <] + //struct TMPL_varlist *tail; [> tail of "varlist" <] + //struct TMPL_varlist *parent; [> my parent variable list <] +//}; + +/* Holdes all the data needed for a template*/ +struct TMPL_templates{ + struct TMPL_buf* out; + struct TMPL_buf* errout; + struct TMPL_tagnode* roottag; + int linenum; + int error; +} TMPL_templates; + + +struct TMPL_token{ + char* start;//Start of token + char* end;//End of token + enum TMPL_tagtype type;//The type of token + size_t length;//Length of token, should always be end-start + struct TMPL_token* next;//The next token +}TMPL_token; + + + +typedef void (*TMPL_fmtfunc) (const char *, FILE *); + +/* + +TMPL_varlist *TMPL_add_var(TMPL_varlist *varlist, + const char *varname1, const char *value1, ... , 0); +*/ + +//TMPL_varlist *TMPL_add_var(TMPL_varlist *varlist, ...); +extern struct TMPL_varlist* TMPL_add_var(struct TMPL_varlist* varlist, ...); + +/*TMPL_varlist *TMPL_add_loop(TMPL_varlist *varlist, + const char *name, TMPL_loop *loop); + */ +extern struct TMPL_varlist* TMPL_add_loop(struct TMPL_varlist* varlist, + const char* name, struct TMPL_loop* loop); + + +//TMPL_loop *TMPL_add_varlist(TMPL_loop *loop, TMPL_varlist *varlist); +struct TMPL_loop* TMPL_add_varlist(struct TMPL_loop* loop, struct TMPL_varlist* varlist); + +//void TMPL_free_varlist(TMPL_varlist *varlist); +void TMPL_free_varlist(struct TMPL_varlist* varlist); + +//TMPL_fmtlist *TMPL_add_fmt(TMPL_fmtlist *fmtlist, + //const char *name, TMPL_fmtfunc fmtfunc); +struct TMPL_fmtlist* TMPL_add_fmt(struct TMPL_fmtlist* fmtlist, + const char* name, void* fmtfunc); + +void TMPL_free_fmtlist(struct TMPL_fmtlist* fmtlist); + +/*int TMPL_write(const char *filename, const char *tmplstr, + const TMPL_fmtlist *fmtlist, const TMPL_varlist *varlist, + FILE *out, FILE *errout); +*/ + +struct TMPL_varlist* TMPL_alloc_varlist(); +void TMPL_free_varlist(struct TMPL_varlist* t); + +struct TMPL_varitem* TMPL_alloc_varitem(); +void TMPL_free_varitem(struct TMPL_varitem* vi); + +struct TMPL_templates* TMPL_alloc_template(char* t); +void TMPL_free_template(struct TMPL_templates* t); + +char* TMPL_render(struct TMPL_templates* t, struct TMPL_varlist* varlist); + +struct TMPL_tagnode* TMPL_alloc_tagnode(enum TMPL_tagtype); +void TMPL_free_tagnode(struct TMPL_tagnode* tn); + +/* TODO: Remove this after testing is done */ +struct TMPL_token* TMPL_tokenize(char* tmplstr, size_t strlen); + + +#endif -- cgit v1.2.3-70-g09d2