[IPL/HW02] Implemented semi-working bison grammar and updated parts of flex regex

1 files changed, 91 insertions, 0 deletions

diff --git a/Year 2/Implementation of Programming Languages/Homework 02/codefold.y b/Year 2/Implementation of Programming Languages/Homework 02/codefold.y
new file mode 100644
index 0000000..980f684
--- /dev/null
+++ b/Year 2/Implementation of Programming Languages/Homework 02/codefold.y
@@ -0,0 +1,91 @@
+%{
+#include <stdio.h>
+#include <string.h>
+
+int yylex();
+int yyerror(char *s);
+
+#define LBRACKET_SPAN "<span class=\"bracket\">(</span>"
+#define RBRACKET_SPAN "<span class=\"bracket\">)</span>"
+
+char* span(char *c, char *s);
+char* detailsfr(char *s);
+char* lrbrackets();
+char* concatperm2(char *first, char *second);
+char* concatperm3(char *first, char *second, char *third);
+%}
+
+%token LBRACKET RBRACKET OTHER NEWLINE SPACE TAB
+
+%define api.value.type {char*}
+
+%%
+
+start:
+	 | NEWLINE start  { printf("\n"); }
+	 | SPACE start    { printf(" "); }
+	 | TAB start      { printf("\t"); }
+	 | stlist start   { printf("%s", $1); free($1); }
+	 | terminal start { printf("%s", $1); free($1); }
+
+stlist: LBRACKET RBRACKET      { $$ = lrbrackets(); } 
+	  | LBRACKET list RBRACKET { $$ = concatperm3(LBRACKET_SPAN, $2, RBRACKET_SPAN); }
+	  | LBRACKET NEWLINE list RBRACKET { $$ = detailsfr(concatperm3(LBRACKET_SPAN, $3, RBRACKET_SPAN)); }
+	  | LBRACKET list NEWLINE RBRACKET { $$ = detailsfr(concatperm3(LBRACKET_SPAN, $2, RBRACKET_SPAN)); }
+	  ;
+
+list: terminal
+	| list terminal { $$ = concatperm2($1, $2); }
+	| stlist
+	| list stlist   { $$ = concatperm2($1, $2); }
+	;
+
+terminal: OTHER
+		/* | terminal OTHER { $$ = concatperm2($1, span("test", $2)); free($2); } */
+		;
+
+%%
+
+
+char* span(char *c, char *s) {
+	char* str = (char*)malloc(strlen(c) + strlen(s) + 1 + 22);
+	sprintf(str, "<span class=\"%s\">%s</span>", c, s);
+	return str;
+}
+char* detailsfr(char *s) {
+	char* str = (char*)malloc(strlen(s) + 1 + 19);
+	sprintf(str, "<details>%s</details>", s);
+	free(s);
+	return str;
+}
+char* lrbrackets() {
+	char* str = (char*)malloc(strlen(LBRACKET_SPAN) + strlen(RBRACKET_SPAN) + 1);
+	sprintf(str, "%s%s", LBRACKET_SPAN, RBRACKET_SPAN);
+	return str;
+}
+
+char* concatperm2(char *first, char *second) {
+	char* concat = (char*)malloc(strlen(first) + strlen(second) + 1);
+	sprintf(concat, "%s%s", first, second);
+	free(first); free(second);
+	return concat;
+}
+char* concatperm3(char *first, char *second, char *third) {
+	char* concat = (char*)malloc(strlen(first) + strlen(second) + strlen(third) + 1);
+	sprintf(concat, "%s%s%s", first, second, third);
+	free(second);
+	return concat;
+}
+
+
+int yyerror(char *s) {
+	printf("Error: %s\n", s);
+	return 0;
+}
+
+int main(int argc, char **argv) {
+/* #ifdef YYDEBUG */
+/*   yydebug = 1; */
+/* #endif */
+	yyparse();
+}