dane/storybook
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
706e87a123
storybook/cyoa.c
Dane Johnson 706e87a123 Init commit
2021-12-17 13:54:05 -06:00

1018 lines
31 KiB
C
Raw Blame History

/* A recursive-descent parser generated by peg 0.1.18 */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#define YYRULECOUNT 18
#line 1 "cyoa.leg"
#include <stdio.h>
#include <stdlib.h>
#include <assert.h>
typedef struct page_t page_t;
typedef struct footer_t footer_t;
typedef struct page_node_t page_node_t;
typedef struct choicelist choicelist;
struct page_node_t {
page_t *page;
page_node_t *next;
};
#define FOOTER_END 1
#define FOOTER_GOTO 2
#define FOOTER_CHOICES 3
struct footer_t {
int type;
union {
choicelist *choices;
char *link;
};
};
struct page_t {
char *id;
char *body;
footer_t footer;
};
typedef struct statcheck_t statcheck_t;
typedef struct statchange_t statchange_t;
typedef struct choice_t choice_t;
#define STATCHECK_GT 1
#define STATCHECK_LT 2
struct statcheck_t {
char *stat;
int value;
int rel;
};
struct statchange_t {
char *stat;
int addend;
};
#define CHOICE_STATCHECK 0x1
#define CHOICE_STATCHANGE 0x2
struct choice_t {
int flags;
int option;
char *flavor;
statcheck_t statcheck;
char *redirect;
statchange_t statchange;
};
struct choicelist {
choice_t *choice;
choicelist *next;
};
page_node_t *pages;
choice_t *make_choice();
void add_page(page_t*);
void add_choice(page_t*, choice_t*);
page_t *emit_ending();
page_t *emit_goto(char*);
page_t *emit_choices();
void append_body(page_t *page, char *str);
union value {
page_t *page;
char *string;
choice_t *choice;
};
#define YYSTYPE union value
#ifndef YY_MALLOC
#define YY_MALLOC(C, N) malloc(N)
#endif
#ifndef YY_REALLOC
#define YY_REALLOC(C, P, N) realloc(P, N)
#endif
#ifndef YY_FREE
#define YY_FREE(C, P) free(P)
#endif
#ifndef YY_LOCAL
#define YY_LOCAL(T) static T
#endif
#ifndef YY_ACTION
#define YY_ACTION(T) static T
#endif
#ifndef YY_RULE
#define YY_RULE(T) static T
#endif
#ifndef YY_PARSE
#define YY_PARSE(T) T
#endif
#ifndef YYPARSE
#define YYPARSE yyparse
#endif
#ifndef YYPARSEFROM
#define YYPARSEFROM yyparsefrom
#endif
#ifndef YYRELEASE
#define YYRELEASE yyrelease
#endif
#ifndef YY_BEGIN
#define YY_BEGIN ( yy->__begin= yy->__pos, 1)
#endif
#ifndef YY_END
#define YY_END ( yy->__end= yy->__pos, 1)
#endif
#ifdef YY_DEBUG
# define yyprintf(args) fprintf args
#else
# define yyprintf(args)
#endif
#ifndef YYSTYPE
#define YYSTYPE int
#endif
#ifndef YY_STACK_SIZE
#define YY_STACK_SIZE 128
#endif
#ifndef YY_BUFFER_SIZE
#define YY_BUFFER_SIZE 1024
#endif
#ifndef YY_PART
typedef struct _yycontext yycontext;
typedef void (*yyaction)(yycontext *yy, char *yytext, int yyleng);
typedef struct _yythunk { int begin, end; yyaction action; struct _yythunk *next; } yythunk;
struct _yycontext {
char *__buf;
int __buflen;
int __pos;
int __limit;
char *__text;
int __textlen;
int __begin;
int __end;
int __textmax;
yythunk *__thunks;
int __thunkslen;
int __thunkpos;
YYSTYPE __;
YYSTYPE *__val;
YYSTYPE *__vals;
int __valslen;
#ifdef YY_CTX_MEMBERS
YY_CTX_MEMBERS
#endif
};
#ifdef YY_CTX_LOCAL
#define YY_CTX_PARAM_ yycontext *yyctx,
#define YY_CTX_PARAM yycontext *yyctx
#define YY_CTX_ARG_ yyctx,
#define YY_CTX_ARG yyctx
#ifndef YY_INPUT
#define YY_INPUT(yy, buf, result, max_size) \
{ \
int yyc= getchar(); \
result= (EOF == yyc) ? 0 : (*(buf)= yyc, 1); \
yyprintf((stderr, "<%c>", yyc)); \
}
#endif
#else
#define YY_CTX_PARAM_
#define YY_CTX_PARAM
#define YY_CTX_ARG_
#define YY_CTX_ARG
yycontext _yyctx= { 0, 0 };
yycontext *yyctx= &_yyctx;
#ifndef YY_INPUT
#define YY_INPUT(buf, result, max_size) \
{ \
int yyc= getchar(); \
result= (EOF == yyc) ? 0 : (*(buf)= yyc, 1); \
yyprintf((stderr, "<%c>", yyc)); \
}
#endif
#endif
YY_LOCAL(int) yyrefill(yycontext *yy)
{
int yyn;
while (yy->__buflen - yy->__pos < 512)
{
yy->__buflen *= 2;
yy->__buf= (char *)YY_REALLOC(yy, yy->__buf, yy->__buflen);
}
#ifdef YY_CTX_LOCAL
YY_INPUT(yy, (yy->__buf + yy->__pos), yyn, (yy->__buflen - yy->__pos));
#else
YY_INPUT((yy->__buf + yy->__pos), yyn, (yy->__buflen - yy->__pos));
#endif
if (!yyn) return 0;
yy->__limit += yyn;
return 1;
}
YY_LOCAL(int) yymatchDot(yycontext *yy)
{
if (yy->__pos >= yy->__limit && !yyrefill(yy)) return 0;
++yy->__pos;
return 1;
}
YY_LOCAL(int) yymatchChar(yycontext *yy, int c)
{
if (yy->__pos >= yy->__limit && !yyrefill(yy)) return 0;
if ((unsigned char)yy->__buf[yy->__pos] == c)
{
++yy->__pos;
yyprintf((stderr, " ok yymatchChar(yy, %c) @ %s\n", c, yy->__buf+yy->__pos));
return 1;
}
yyprintf((stderr, " fail yymatchChar(yy, %c) @ %s\n", c, yy->__buf+yy->__pos));
return 0;
}
YY_LOCAL(int) yymatchString(yycontext *yy, const char *s)
{
int yysav= yy->__pos;
while (*s)
{
if (yy->__pos >= yy->__limit && !yyrefill(yy)) return 0;
if (yy->__buf[yy->__pos] != *s)
{
yy->__pos= yysav;
return 0;
}
++s;
++yy->__pos;
}
return 1;
}
YY_LOCAL(int) yymatchClass(yycontext *yy, unsigned char *bits)
{
int c;
if (yy->__pos >= yy->__limit && !yyrefill(yy)) return 0;
c= (unsigned char)yy->__buf[yy->__pos];
if (bits[c >> 3] & (1 << (c & 7)))
{
++yy->__pos;
yyprintf((stderr, " ok yymatchClass @ %s\n", yy->__buf+yy->__pos));
return 1;
}
yyprintf((stderr, " fail yymatchClass @ %s\n", yy->__buf+yy->__pos));
return 0;
}
YY_LOCAL(void) yyDo(yycontext *yy, yyaction action, int begin, int end)
{
while (yy->__thunkpos >= yy->__thunkslen)
{
yy->__thunkslen *= 2;
yy->__thunks= (yythunk *)YY_REALLOC(yy, yy->__thunks, sizeof(yythunk) * yy->__thunkslen);
}
yy->__thunks[yy->__thunkpos].begin= begin;
yy->__thunks[yy->__thunkpos].end= end;
yy->__thunks[yy->__thunkpos].action= action;
++yy->__thunkpos;
}
YY_LOCAL(int) yyText(yycontext *yy, int begin, int end)
{
int yyleng= end - begin;
if (yyleng <= 0)
yyleng= 0;
else
{
while (yy->__textlen < (yyleng + 1))
{
yy->__textlen *= 2;
yy->__text= (char *)YY_REALLOC(yy, yy->__text, yy->__textlen);
}
memcpy(yy->__text, yy->__buf + begin, yyleng);
}
yy->__text[yyleng]= '\0';
return yyleng;
}
YY_LOCAL(void) yyDone(yycontext *yy)
{
int pos;
for (pos= 0; pos < yy->__thunkpos; ++pos)
{
yythunk *thunk= &yy->__thunks[pos];
int yyleng= thunk->end ? yyText(yy, thunk->begin, thunk->end) : thunk->begin;
yyprintf((stderr, "DO [%d] %p %s\n", pos, thunk->action, yy->__text));
thunk->action(yy, yy->__text, yyleng);
}
yy->__thunkpos= 0;
}
YY_LOCAL(void) yyCommit(yycontext *yy)
{
if ((yy->__limit -= yy->__pos))
{
memmove(yy->__buf, yy->__buf + yy->__pos, yy->__limit);
}
yy->__begin -= yy->__pos;
yy->__end -= yy->__pos;
yy->__pos= yy->__thunkpos= 0;
}
YY_LOCAL(int) yyAccept(yycontext *yy, int tp0)
{
if (tp0)
{
fprintf(stderr, "accept denied at %d\n", tp0);
return 0;
}
else
{
yyDone(yy);
yyCommit(yy);
}
return 1;
}
YY_LOCAL(void) yyPush(yycontext *yy, char *text, int count)
{
yy->__val += count;
while (yy->__valslen <= yy->__val - yy->__vals)
{
long offset= yy->__val - yy->__vals;
yy->__valslen *= 2;
yy->__vals= (YYSTYPE *)YY_REALLOC(yy, yy->__vals, sizeof(YYSTYPE) * yy->__valslen);
yy->__val= yy->__vals + offset;
}
}
YY_LOCAL(void) yyPop(yycontext *yy, char *text, int count) { yy->__val -= count; }
YY_LOCAL(void) yySet(yycontext *yy, char *text, int count) { yy->__val[count]= yy->__; }
#endif /* YY_PART */
#define YYACCEPT yyAccept(yy, yythunkpos0)
YY_RULE(int) yy_StatName(yycontext *yy); /* 18 */
YY_RULE(int) yy_StatChange(yycontext *yy); /* 17 */
YY_RULE(int) yy_StatCheck(yycontext *yy); /* 16 */
YY_RULE(int) yy_Redirect(yycontext *yy); /* 15 */
YY_RULE(int) yy_Spacing(yycontext *yy); /* 14 */
YY_RULE(int) yy_Choice(yycontext *yy); /* 13 */
YY_RULE(int) yy_Goto(yycontext *yy); /* 12 */
YY_RULE(int) yy_Ending(yycontext *yy); /* 11 */
YY_RULE(int) yy_TextLine(yycontext *yy); /* 10 */
YY_RULE(int) yy_Footer(yycontext *yy); /* 9 */
YY_RULE(int) yy_Newline(yycontext *yy); /* 8 */
YY_RULE(int) yy_Identifier(yycontext *yy); /* 7 */
YY_RULE(int) yy_Body(yycontext *yy); /* 6 */
YY_RULE(int) yy_Header(yycontext *yy); /* 5 */
YY_RULE(int) yy_EndOfFile(yycontext *yy); /* 4 */
YY_RULE(int) yy_Page(yycontext *yy); /* 3 */
YY_RULE(int) yy_BlankLine(yycontext *yy); /* 2 */
YY_RULE(int) yy_Story(yycontext *yy); /* 1 */
YY_ACTION(void) yy_1_Choice(yycontext *yy, char *yytext, int yyleng)
{
#define __ yy->__
#define yypos yy->__pos
#define yythunkpos yy->__thunkpos
yyprintf((stderr, "do yy_1_Choice\n"));
{
#line 120
__.choice = make_choice(); ;
}
#undef yythunkpos
#undef yypos
#undef yy
}
YY_ACTION(void) yy_1_Goto(yycontext *yy, char *yytext, int yyleng)
{
#define i yy->__val[-1]
#define __ yy->__
#define yypos yy->__pos
#define yythunkpos yy->__thunkpos
yyprintf((stderr, "do yy_1_Goto\n"));
{
#line 115
__.string = strndup(yytext, yyleng); ;
}
#undef yythunkpos
#undef yypos
#undef yy
#undef i
}
YY_ACTION(void) yy_3_Footer(yycontext *yy, char *yytext, int yyleng)
{
#define g yy->__val[-1]
#define __ yy->__
#define yypos yy->__pos
#define yythunkpos yy->__thunkpos
yyprintf((stderr, "do yy_3_Footer\n"));
{
#line 111
__.page = emit_ending(); ;
}
#undef yythunkpos
#undef yypos
#undef yy
#undef g
}
YY_ACTION(void) yy_2_Footer(yycontext *yy, char *yytext, int yyleng)
{
#define g yy->__val[-1]
#define __ yy->__
#define yypos yy->__pos
#define yythunkpos yy->__thunkpos
yyprintf((stderr, "do yy_2_Footer\n"));
{
#line 110
__.page = emit_goto(g.string); ;
}
#undef yythunkpos
#undef yypos
#undef yy
#undef g
}
YY_ACTION(void) yy_1_Footer(yycontext *yy, char *yytext, int yyleng)
{
#define g yy->__val[-1]
#define __ yy->__
#define yypos yy->__pos
#define yythunkpos yy->__thunkpos
yyprintf((stderr, "do yy_1_Footer\n"));
{
#line 109
__.page = emit_ending(); ;
}
#undef yythunkpos
#undef yypos
#undef yy
#undef g
}
YY_ACTION(void) yy_1_TextLine(yycontext *yy, char *yytext, int yyleng)
{
#define __ yy->__
#define yypos yy->__pos
#define yythunkpos yy->__thunkpos
yyprintf((stderr, "do yy_1_TextLine\n"));
{
#line 107
__.string = strndup(yytext, yyleng); ;
}
#undef yythunkpos
#undef yypos
#undef yy
}
YY_ACTION(void) yy_1_Body(yycontext *yy, char *yytext, int yyleng)
{
#define b yy->__val[-1]
#define t yy->__val[-2]
#define __ yy->__
#define yypos yy->__pos
#define yythunkpos yy->__thunkpos
yyprintf((stderr, "do yy_1_Body\n"));
{
#line 105
__ = b; append_body(b.page, t.string);;
}
#undef yythunkpos
#undef yypos
#undef yy
#undef b
#undef t
}
YY_ACTION(void) yy_1_Header(yycontext *yy, char *yytext, int yyleng)
{
#define __ yy->__
#define yypos yy->__pos
#define yythunkpos yy->__thunkpos
yyprintf((stderr, "do yy_1_Header\n"));
{
#line 100
__.string = strndup(yytext, yyleng); ;
}
#undef yythunkpos
#undef yypos
#undef yy
}
YY_ACTION(void) yy_1_Page(yycontext *yy, char *yytext, int yyleng)
{
#define b yy->__val[-1]
#define h yy->__val[-2]
#define __ yy->__
#define yypos yy->__pos
#define yythunkpos yy->__thunkpos
yyprintf((stderr, "do yy_1_Page\n"));
{
#line 97
__.page = b.page; __.page->id = h.string;
}
#undef yythunkpos
#undef yypos
#undef yy
#undef b
#undef h
}
YY_ACTION(void) yy_1_Story(yycontext *yy, char *yytext, int yyleng)
{
#define p yy->__val[-1]
#define __ yy->__
#define yypos yy->__pos
#define yythunkpos yy->__thunkpos
yyprintf((stderr, "do yy_1_Story\n"));
{
#line 95
add_page(p.page); ;
}
#undef yythunkpos
#undef yypos
#undef yy
#undef p
}
YY_RULE(int) yy_StatName(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos;
yyprintf((stderr, "%s\n", "StatName")); if (!yymatchClass(yy, (unsigned char *)"\000\000\000\000\000\000\000\000\376\377\377\007\376\377\377\007\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l1;
l2:;
{ int yypos3= yy->__pos, yythunkpos3= yy->__thunkpos; if (!yymatchClass(yy, (unsigned char *)"\000\000\000\000\000\000\000\000\376\377\377\007\376\377\377\007\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l3; goto l2;
l3:; yy->__pos= yypos3; yy->__thunkpos= yythunkpos3;
}
yyprintf((stderr, " ok %s @ %s\n", "StatName", yy->__buf+yy->__pos));
return 1;
l1:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "StatName", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_StatChange(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos;
yyprintf((stderr, "%s\n", "StatChange")); if (!yymatchChar(yy, '(')) goto l4;
{ int yypos5= yy->__pos, yythunkpos5= yy->__thunkpos; if (!yymatchChar(yy, '+')) goto l6; goto l5;
l6:; yy->__pos= yypos5; yy->__thunkpos= yythunkpos5; if (!yymatchChar(yy, '-')) goto l4;
}
l5:; if (!yymatchClass(yy, (unsigned char *)"\000\000\000\000\000\000\377\003\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l4;
l7:;
{ int yypos8= yy->__pos, yythunkpos8= yy->__thunkpos; if (!yymatchClass(yy, (unsigned char *)"\000\000\000\000\000\000\377\003\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l8; goto l7;
l8:; yy->__pos= yypos8; yy->__thunkpos= yythunkpos8;
} if (!yy_Spacing(yy)) goto l4; if (!yy_StatName(yy)) goto l4; if (!yymatchChar(yy, ')')) goto l4;
yyprintf((stderr, " ok %s @ %s\n", "StatChange", yy->__buf+yy->__pos));
return 1;
l4:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "StatChange", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_StatCheck(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos;
yyprintf((stderr, "%s\n", "StatCheck")); if (!yymatchChar(yy, '<')) goto l9; if (!yy_StatName(yy)) goto l9; if (!yy_Spacing(yy)) goto l9; if (!yymatchClass(yy, (unsigned char *)"\000\000\000\000\000\000\377\003\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l9;
l10:;
{ int yypos11= yy->__pos, yythunkpos11= yy->__thunkpos; if (!yymatchClass(yy, (unsigned char *)"\000\000\000\000\000\000\377\003\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l11; goto l10;
l11:; yy->__pos= yypos11; yy->__thunkpos= yythunkpos11;
}
{ int yypos12= yy->__pos, yythunkpos12= yy->__thunkpos;
{ int yypos14= yy->__pos, yythunkpos14= yy->__thunkpos; if (!yymatchChar(yy, '+')) goto l15; goto l14;
l15:; yy->__pos= yypos14; yy->__thunkpos= yythunkpos14; if (!yymatchChar(yy, '-')) goto l12;
}
l14:; goto l13;
l12:; yy->__pos= yypos12; yy->__thunkpos= yythunkpos12;
}
l13:; if (!yymatchChar(yy, '>')) goto l9;
yyprintf((stderr, " ok %s @ %s\n", "StatCheck", yy->__buf+yy->__pos));
return 1;
l9:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "StatCheck", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_Redirect(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos;
yyprintf((stderr, "%s\n", "Redirect"));
{ int yypos17= yy->__pos, yythunkpos17= yy->__thunkpos; if (!yy_StatCheck(yy)) goto l17; goto l18;
l17:; yy->__pos= yypos17; yy->__thunkpos= yythunkpos17;
}
l18:; if (!yy_Spacing(yy)) goto l16; if (!yymatchChar(yy, '[')) goto l16; if (!yy_Identifier(yy)) goto l16; if (!yymatchChar(yy, ']')) goto l16; if (!yy_Spacing(yy)) goto l16;
{ int yypos19= yy->__pos, yythunkpos19= yy->__thunkpos; if (!yy_StatChange(yy)) goto l19; goto l20;
l19:; yy->__pos= yypos19; yy->__thunkpos= yythunkpos19;
}
l20:; if (!yy_Newline(yy)) goto l16;
yyprintf((stderr, " ok %s @ %s\n", "Redirect", yy->__buf+yy->__pos));
return 1;
l16:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "Redirect", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_Spacing(yycontext *yy)
{
yyprintf((stderr, "%s\n", "Spacing"));
l22:;
{ int yypos23= yy->__pos, yythunkpos23= yy->__thunkpos;
{ int yypos24= yy->__pos, yythunkpos24= yy->__thunkpos; if (!yymatchChar(yy, ' ')) goto l25; goto l24;
l25:; yy->__pos= yypos24; yy->__thunkpos= yythunkpos24; if (!yymatchChar(yy, '\t')) goto l23;
}
l24:; goto l22;
l23:; yy->__pos= yypos23; yy->__thunkpos= yythunkpos23;
}
yyprintf((stderr, " ok %s @ %s\n", "Spacing", yy->__buf+yy->__pos));
return 1;
}
YY_RULE(int) yy_Choice(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos;
yyprintf((stderr, "%s\n", "Choice")); yyDo(yy, yy_1_Choice, yy->__begin, yy->__end); if (!yymatchClass(yy, (unsigned char *)"\000\000\000\000\000\000\377\003\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l26;
l27:;
{ int yypos28= yy->__pos, yythunkpos28= yy->__thunkpos; if (!yymatchClass(yy, (unsigned char *)"\000\000\000\000\000\000\377\003\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l28; goto l27;
l28:; yy->__pos= yypos28; yy->__thunkpos= yythunkpos28;
} if (!yymatchChar(yy, ')')) goto l26; if (!yy_Spacing(yy)) goto l26; yyText(yy, yy->__begin, yy->__end); {
#define yytext yy->__text
#define yyleng yy->__textlen
if (!(YY_BEGIN)) goto l26;
#undef yytext
#undef yyleng
}
{ int yypos31= yy->__pos, yythunkpos31= yy->__thunkpos; if (!yy_Redirect(yy)) goto l31; goto l26;
l31:; yy->__pos= yypos31; yy->__thunkpos= yythunkpos31;
} if (!yymatchDot(yy)) goto l26;
l29:;
{ int yypos30= yy->__pos, yythunkpos30= yy->__thunkpos;
{ int yypos32= yy->__pos, yythunkpos32= yy->__thunkpos; if (!yy_Redirect(yy)) goto l32; goto l30;
l32:; yy->__pos= yypos32; yy->__thunkpos= yythunkpos32;
} if (!yymatchDot(yy)) goto l30; goto l29;
l30:; yy->__pos= yypos30; yy->__thunkpos= yythunkpos30;
} yyText(yy, yy->__begin, yy->__end); {
#define yytext yy->__text
#define yyleng yy->__textlen
if (!(YY_END)) goto l26;
#undef yytext
#undef yyleng
} if (!yy_Redirect(yy)) goto l26;
yyprintf((stderr, " ok %s @ %s\n", "Choice", yy->__buf+yy->__pos));
return 1;
l26:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "Choice", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_Goto(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos; yyDo(yy, yyPush, 1, 0);
yyprintf((stderr, "%s\n", "Goto")); if (!yymatchString(yy, "GOTO")) goto l33; if (!yy_Spacing(yy)) goto l33; yyText(yy, yy->__begin, yy->__end); {
#define yytext yy->__text
#define yyleng yy->__textlen
if (!(YY_BEGIN)) goto l33;
#undef yytext
#undef yyleng
} if (!yy_Identifier(yy)) goto l33; yyDo(yy, yySet, -1, 0); yyText(yy, yy->__begin, yy->__end); {
#define yytext yy->__text
#define yyleng yy->__textlen
if (!(YY_END)) goto l33;
#undef yytext
#undef yyleng
} if (!yy_Newline(yy)) goto l33; yyDo(yy, yy_1_Goto, yy->__begin, yy->__end);
yyprintf((stderr, " ok %s @ %s\n", "Goto", yy->__buf+yy->__pos)); yyDo(yy, yyPop, 1, 0);
return 1;
l33:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "Goto", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_Ending(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos;
yyprintf((stderr, "%s\n", "Ending")); if (!yymatchString(yy, "THE END")) goto l34; if (!yy_Newline(yy)) goto l34;
yyprintf((stderr, " ok %s @ %s\n", "Ending", yy->__buf+yy->__pos));
return 1;
l34:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "Ending", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_TextLine(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos;
yyprintf((stderr, "%s\n", "TextLine")); yyText(yy, yy->__begin, yy->__end); {
#define yytext yy->__text
#define yyleng yy->__textlen
if (!(YY_BEGIN)) goto l35;
#undef yytext
#undef yyleng
}
l36:;
{ int yypos37= yy->__pos, yythunkpos37= yy->__thunkpos;
{ int yypos38= yy->__pos, yythunkpos38= yy->__thunkpos; if (!yy_Newline(yy)) goto l38; goto l37;
l38:; yy->__pos= yypos38; yy->__thunkpos= yythunkpos38;
} if (!yymatchDot(yy)) goto l37; goto l36;
l37:; yy->__pos= yypos37; yy->__thunkpos= yythunkpos37;
} if (!yy_Newline(yy)) goto l35; yyText(yy, yy->__begin, yy->__end); {
#define yytext yy->__text
#define yyleng yy->__textlen
if (!(YY_END)) goto l35;
#undef yytext
#undef yyleng
} yyDo(yy, yy_1_TextLine, yy->__begin, yy->__end);
yyprintf((stderr, " ok %s @ %s\n", "TextLine", yy->__buf+yy->__pos));
return 1;
l35:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "TextLine", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_Footer(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos; yyDo(yy, yyPush, 1, 0);
yyprintf((stderr, "%s\n", "Footer"));
{ int yypos40= yy->__pos, yythunkpos40= yy->__thunkpos; if (!yy_Ending(yy)) goto l41; yyDo(yy, yy_1_Footer, yy->__begin, yy->__end); goto l40;
l41:; yy->__pos= yypos40; yy->__thunkpos= yythunkpos40; if (!yy_Goto(yy)) goto l42; yyDo(yy, yySet, -1, 0); yyDo(yy, yy_2_Footer, yy->__begin, yy->__end); goto l40;
l42:; yy->__pos= yypos40; yy->__thunkpos= yythunkpos40; if (!yy_Choice(yy)) goto l39;
l43:;
{ int yypos44= yy->__pos, yythunkpos44= yy->__thunkpos; if (!yy_Choice(yy)) goto l44; goto l43;
l44:; yy->__pos= yypos44; yy->__thunkpos= yythunkpos44;
} yyDo(yy, yy_3_Footer, yy->__begin, yy->__end);
}
l40:;
yyprintf((stderr, " ok %s @ %s\n", "Footer", yy->__buf+yy->__pos)); yyDo(yy, yyPop, 1, 0);
return 1;
l39:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "Footer", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_Newline(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos;
yyprintf((stderr, "%s\n", "Newline"));
{ int yypos46= yy->__pos, yythunkpos46= yy->__thunkpos; if (!yymatchString(yy, "\r\n")) goto l47; goto l46;
l47:; yy->__pos= yypos46; yy->__thunkpos= yythunkpos46; if (!yymatchChar(yy, '\r')) goto l48; goto l46;
l48:; yy->__pos= yypos46; yy->__thunkpos= yythunkpos46; if (!yymatchChar(yy, '\n')) goto l45;
}
l46:;
yyprintf((stderr, " ok %s @ %s\n", "Newline", yy->__buf+yy->__pos));
return 1;
l45:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "Newline", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_Identifier(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos;
yyprintf((stderr, "%s\n", "Identifier")); if (!yymatchClass(yy, (unsigned char *)"\000\000\000\000\000\000\000\000\376\377\377\007\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l49; if (!yymatchClass(yy, (unsigned char *)"\000\000\000\000\000\000\377\003\376\377\377\207\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l49;
l50:;
{ int yypos51= yy->__pos, yythunkpos51= yy->__thunkpos; if (!yymatchClass(yy, (unsigned char *)"\000\000\000\000\000\000\377\003\376\377\377\207\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l51; goto l50;
l51:; yy->__pos= yypos51; yy->__thunkpos= yythunkpos51;
}
yyprintf((stderr, " ok %s @ %s\n", "Identifier", yy->__buf+yy->__pos));
return 1;
l49:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "Identifier", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_Body(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos; yyDo(yy, yyPush, 2, 0);
yyprintf((stderr, "%s\n", "Body"));
{ int yypos53= yy->__pos, yythunkpos53= yy->__thunkpos; if (!yy_Footer(yy)) goto l54; goto l53;
l54:; yy->__pos= yypos53; yy->__thunkpos= yythunkpos53; if (!yy_TextLine(yy)) goto l52; yyDo(yy, yySet, -2, 0); if (!yy_Body(yy)) goto l52; yyDo(yy, yySet, -1, 0); yyDo(yy, yy_1_Body, yy->__begin, yy->__end);
}
l53:;
yyprintf((stderr, " ok %s @ %s\n", "Body", yy->__buf+yy->__pos)); yyDo(yy, yyPop, 2, 0);
return 1;
l52:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "Body", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_Header(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos;
yyprintf((stderr, "%s\n", "Header")); yyText(yy, yy->__begin, yy->__end); {
#define yytext yy->__text
#define yyleng yy->__textlen
if (!(YY_BEGIN)) goto l55;
#undef yytext
#undef yyleng
} if (!yy_Identifier(yy)) goto l55; yyText(yy, yy->__begin, yy->__end); {
#define yytext yy->__text
#define yyleng yy->__textlen
if (!(YY_END)) goto l55;
#undef yytext
#undef yyleng
} yyDo(yy, yy_1_Header, yy->__begin, yy->__end); if (!yy_Newline(yy)) goto l55;
l56:;
{ int yypos57= yy->__pos, yythunkpos57= yy->__thunkpos; if (!yy_BlankLine(yy)) goto l57; goto l56;
l57:; yy->__pos= yypos57; yy->__thunkpos= yythunkpos57;
}
yyprintf((stderr, " ok %s @ %s\n", "Header", yy->__buf+yy->__pos));
return 1;
l55:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "Header", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_EndOfFile(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos;
yyprintf((stderr, "%s\n", "EndOfFile"));
{ int yypos59= yy->__pos, yythunkpos59= yy->__thunkpos; if (!yymatchDot(yy)) goto l59; goto l58;
l59:; yy->__pos= yypos59; yy->__thunkpos= yythunkpos59;
}
yyprintf((stderr, " ok %s @ %s\n", "EndOfFile", yy->__buf+yy->__pos));
return 1;
l58:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "EndOfFile", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_Page(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos; yyDo(yy, yyPush, 2, 0);
yyprintf((stderr, "%s\n", "Page")); if (!yy_Header(yy)) goto l60; yyDo(yy, yySet, -2, 0); if (!yy_Body(yy)) goto l60; yyDo(yy, yySet, -1, 0); yyDo(yy, yy_1_Page, yy->__begin, yy->__end);
l61:;
{ int yypos62= yy->__pos, yythunkpos62= yy->__thunkpos; if (!yy_BlankLine(yy)) goto l62; goto l61;
l62:; yy->__pos= yypos62; yy->__thunkpos= yythunkpos62;
}
yyprintf((stderr, " ok %s @ %s\n", "Page", yy->__buf+yy->__pos)); yyDo(yy, yyPop, 2, 0);
return 1;
l60:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "Page", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_BlankLine(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos;
yyprintf((stderr, "%s\n", "BlankLine")); if (!yy_Spacing(yy)) goto l63; if (!yy_Newline(yy)) goto l63;
yyprintf((stderr, " ok %s @ %s\n", "BlankLine", yy->__buf+yy->__pos));
return 1;
l63:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "BlankLine", yy->__buf+yy->__pos));
return 0;
}
YY_RULE(int) yy_Story(yycontext *yy)
{ int yypos0= yy->__pos, yythunkpos0= yy->__thunkpos; yyDo(yy, yyPush, 1, 0);
yyprintf((stderr, "%s\n", "Story"));
l65:;
{ int yypos66= yy->__pos, yythunkpos66= yy->__thunkpos; if (!yy_BlankLine(yy)) goto l66; goto l65;
l66:; yy->__pos= yypos66; yy->__thunkpos= yythunkpos66;
} if (!yy_Page(yy)) goto l64; yyDo(yy, yySet, -1, 0); yyDo(yy, yy_1_Story, yy->__begin, yy->__end);
l67:;
{ int yypos68= yy->__pos, yythunkpos68= yy->__thunkpos; if (!yy_Page(yy)) goto l68; yyDo(yy, yySet, -1, 0); yyDo(yy, yy_1_Story, yy->__begin, yy->__end); goto l67;
l68:; yy->__pos= yypos68; yy->__thunkpos= yythunkpos68;
} if (!yy_EndOfFile(yy)) goto l64;
yyprintf((stderr, " ok %s @ %s\n", "Story", yy->__buf+yy->__pos)); yyDo(yy, yyPop, 1, 0);
return 1;
l64:; yy->__pos= yypos0; yy->__thunkpos= yythunkpos0;
yyprintf((stderr, " fail %s @ %s\n", "Story", yy->__buf+yy->__pos));
return 0;
}
#ifndef YY_PART
typedef int (*yyrule)(yycontext *yy);
YY_PARSE(int) YYPARSEFROM(YY_CTX_PARAM_ yyrule yystart)
{
int yyok;
if (!yyctx->__buflen)
{
yyctx->__buflen= YY_BUFFER_SIZE;
yyctx->__buf= (char *)YY_MALLOC(yyctx, yyctx->__buflen);
yyctx->__textlen= YY_BUFFER_SIZE;
yyctx->__text= (char *)YY_MALLOC(yyctx, yyctx->__textlen);
yyctx->__thunkslen= YY_STACK_SIZE;
yyctx->__thunks= (yythunk *)YY_MALLOC(yyctx, sizeof(yythunk) * yyctx->__thunkslen);
yyctx->__valslen= YY_STACK_SIZE;
yyctx->__vals= (YYSTYPE *)YY_MALLOC(yyctx, sizeof(YYSTYPE) * yyctx->__valslen);
yyctx->__begin= yyctx->__end= yyctx->__pos= yyctx->__limit= yyctx->__thunkpos= 0;
}
yyctx->__begin= yyctx->__end= yyctx->__pos;
yyctx->__thunkpos= 0;
yyctx->__val= yyctx->__vals;
yyok= yystart(yyctx);
if (yyok) yyDone(yyctx);
yyCommit(yyctx);
return yyok;
}
YY_PARSE(int) YYPARSE(YY_CTX_PARAM)
{
return YYPARSEFROM(YY_CTX_ARG_ yy_Story);
}
YY_PARSE(yycontext *) YYRELEASE(yycontext *yyctx)
{
if (yyctx->__buflen)
{
yyctx->__buflen= 0;
YY_FREE(yyctx, yyctx->__buf);
YY_FREE(yyctx, yyctx->__text);
YY_FREE(yyctx, yyctx->__thunks);
YY_FREE(yyctx, yyctx->__vals);
}
return yyctx;
}
#endif
#line 138 "cyoa.leg"
void add_page(page_t *page) {
page_node_t *mynode = (page_node_t*) malloc(sizeof(page_node_t));
mynode->page = page;
mynode->next = NULL;
page_node_t *curr = pages;
page_node_t *prev = NULL;
if (curr) {
for(; curr; prev = curr, curr = curr->next);
prev->next = mynode;
} else {
pages = mynode;
}
}
void add_choice(page_t *page, choice_t* choice) {
assert(page != choice);
choicelist *mychoices = (choicelist *) malloc(sizeof(choicelist));
mychoices->choice = choice;
mychoices->next = NULL;
choicelist *curr = page->footer.choices;
choicelist *prev = NULL;
if (curr) {
for(; curr; prev = curr, curr = curr->next);
prev->next = mychoices;
} else {
page->footer.choices = mychoices;
}
}
static inline page_t *make_page() {
page_t *mypage = (page_t*) malloc(sizeof(page_t));
mypage->id = NULL;
mypage->body = NULL;
return mypage;
}
inline choice_t *make_choice() {
choice_t *mychoice = (choice_t*) malloc(sizeof(choice_t));
mychoice->flags = 0x0;
printf("choice 0x%x\n", mychoice);
return mychoice;
}
page_t *emit_goto(char *id) {
page_t *mypage = make_page();
mypage->footer.type = FOOTER_GOTO;
mypage->footer.link = id;
return mypage;
}
page_t *emit_ending() {
page_t *mypage = make_page();
mypage->footer.type = FOOTER_END;
return mypage;
}
page_t *emit_choices() {
page_t *mypage = make_page();
mypage->footer.type = FOOTER_CHOICES;
mypage->footer.choices = NULL;
printf("page 0x%x\n", mypage);
return mypage;
}
void append_body(page_t *page, char *str) {
if (page->body) {
int size = strlen(page->body) + strlen(str) + 1;
char *newstring = (char*) calloc(size, sizeof(char));
strcpy(newstring, str);
strcat(newstring, page->body);
free(page->body);
page->body = newstring;
} else {
page->body = str;
}
}
void print_page(page_t *page) {
printf("HEADER: %s\nBODY: %s\n", page->id, page->body);
switch (page->footer.type) {
case FOOTER_END:
printf("THE END\n");
break;
case FOOTER_GOTO:
printf("GOTO %s\n", page->footer.link);
break;
case FOOTER_CHOICES:
printf("CHOICES:\n");
break;
}
}
int main() {
if (!yyparse()) {
printf("Parsing Error!\n");
return 1;
} else {
for (page_node_t *curr = pages; curr; curr = curr->next) {
print_page(curr->page);
}
}
return 0;
}
/* Local Variables: */
/* mode: text */
/* End: */
Reference in New Issue View Git Blame Copy Permalink