logo

libbulletml

Library of Bullet Markup Language (forked from https://shinh.skr.jp/libbulletml/index_en.html )git clone https://anongit.hacktivis.me/git/libbulletml.git/

calc.yy (3268B)

    

  1. /* Ãæ´Öµ­Ë¡ÅÅÂî -- calc */
  3. %{
  4. typedef double NumType;
  6. #define YYSTYPE double
  7. #define YYERROR_VERBOSE
  9. #include <cmath>
  10. #include <cctype>
  11. #include <cstring>
  13. #include <vector>
  14. #include <sstream>
  16. #include <string.h>
  18. #include "calc.h"
  19. #include "formula.h"
  20. #include "formula-variables.h"
  22. extern void yyerror(const char* s);
  23. extern int yylex();
  25. const char* yyinStr;
  27. typedef Formula<NumType> CalcFormula;
  28. typedef Number<NumType> CalcNumber;
  29. typedef Random<NumType> CalcRandom;
  30. typedef Rank<NumType> CalcRank;
  31. typedef Param<NumType> CalcParam;
  32. typedef Operator CalcOperator;
  34. namespace {
  35. 	CalcFormula* formula;
  36. 	std::vector<CalcFormula*> formulas;
  38. 	CalcFormula* f(double d) { return formulas[(int)d]; }
  40. 	int paramId;
  41. }
  43. %}
  45. /* BISONÀë¸À */
  46. %token NUM RAND RANK PARAM
  47. %left '-' '+'
  48. %left '*' '/'
  49. %left NEG     /* negation--ñ¹à¥Þ¥¤¥Ê¥¹ */
  50. %right '^'    /* ¤Ù¤­¾è´Ø¿ô        */
  52. /* ʸˡµ¬Â§¤¬Â³¤¯ */
  53. %%
  54. input:    /* ¶õʸ»úÎó */
  55.         | input line
  56. ;
  58. line:     '\n'
  59. | exp '\n'  { formula = f($1); return 0; }
  60. ;
  62. exp:    NUM {
  63. 	        $$ = formulas.size();
  64. 	        formulas.push_back(new CalcFormula(new CalcNumber($1)));
  65.         }
  66.         | RAND {
  67. 	        $$ = formulas.size();
  68.             formulas.push_back(new CalcFormula(new CalcRandom()));
  69.         }
  70.         | RANK {
  71. 			$$ = formulas.size();
  72. 			formulas.push_back(new CalcFormula(new CalcRank()));
  73. 		}
  74.         | PARAM {
  75. 			$$ = formulas.size();
  76. 			formulas.push_back(new CalcFormula(new CalcParam(paramId)));
  77. 		}
  78.         | exp '+' exp {
  79. 		    $$ = formulas.size();
  80. 			formulas.push_back(new CalcFormula(f($1), op_add, f($3)));
  81. 		}
  82.         | exp '-' exp {
  83. 		    $$ = formulas.size();
  84. 			formulas.push_back(new CalcFormula(f($1), op_sub, f($3)));
  85. 		}
  86.         | exp '*' exp {
  87. 		    $$ = formulas.size();
  88. 			formulas.push_back(new CalcFormula(f($1), op_mul, f($3)));
  89. 		}
  90.         | exp '/' exp {
  91. 		    $$ = formulas.size();
  92. 			formulas.push_back(new CalcFormula(f($1), op_div, f($3)));
  93. 		}
  94.         | '-' exp  %prec NEG {
  95. 		    $$ = $2;
  96. 			f($2)->setHeadSub();
  97. 		}
  98.         | '(' exp ')' {
  99. 		    $$ = $2;
  100. 		}
  101. ;
  102. %%
  104. /**
  105.  * »ú¶ç²òÀÏ´ï¤Ï¡¢¿ôÃͤòÆɤá¤Ð¡¢double·¿¤ÎÃͤò¥¹¥¿¥Ã¥¯¤ËÀѤó¤Ç
  106.  * ¥È¡¼¥¯¥ó¡ÖNUM¡×¤òÊÖ¤·¡¢¿ôÃͰʳ°¤òÆɤá¤Ð¡¢¤½¤Îʸ»ú¤Î¥¢¥¹¥­¡¼Éä¹æ¤òÊÖ¤¹¡£
  107.  * ¶õÇò¤È¥¿¥Ö¤ÏÆɤßÈô¤Ð¤µ¤ì¤ë¡£¥Õ¥¡¥¤¥ë¤¬½ª¤ï¤ë¤È0¤òÊÖ¤¹¡£
  108.  */
  110. #include <ctype.h>
  111. #include <stdio.h>
  113. int yylex ()
  114. {
  115. 	int c;
  117. 	/* ¶õÇòÎà¤òÆɤßÈô¤Ð¤¹  */
  118. 	while ((c = *(yyinStr++)) == ' ' || c == '\t')
  119. 		;
  120. 	/* ¿ôÃͤò½èÍý¤¹¤ë   */
  121. 	if (c == '.' || isdigit (c))
  122.     {
  123. 		yyinStr--;
  124. 		sscanf (yyinStr, "%lf", &yylval);
  125. 		while ((c = *(++yyinStr)) == '.' || isdigit(c)) {}
  126. 		return NUM;
  127.     }
  129. 	// ÊÑ¿ô¤ò½èÍý¤¹¤ë */
  130. 	if (c == '$') {
  131. 		if (strncmp(yyinStr, "rand", 4) == 0) {
  132. 			yyinStr += 4;
  133. 			return RAND;
  134. 		}
  135. 		else if (strncmp(yyinStr, "rank", 4) == 0) {
  136. 		    yyinStr += 4;
  137. 			return RANK;
  138.         }
  139. 		else {
  140. 			std::istringstream iss(std::string(yyinStr).substr(0, 1));
  141. 			iss >> paramId;
  142. 			yyinStr++;
  143. 			return PARAM;
  144. 		}
  145. 	}
  147. 	/* ¥Õ¥¡¥¤¥ë¤Î½ª¤ï¤ê¤ò½èÍý¤¹¤ë  */
  148. 	if (c == '\0')
  149. 		return 0;
  150. 	/* 1ʸ»ú¤òÊÖ¤¹ */
  151. 	return c;
  152. }
  154. void yyerror(const char* s) {
  155. 	printf("yyerror: %s\n", s);
  156. }
  158. std::auto_ptr<CalcFormula> calc(const std::string& str) {
  159. 	std::string fml = str + '\n';
  160. 	yyinStr = fml.c_str();
  161. 	yyparse();
  162. 	return std::auto_ptr<CalcFormula>(formula);
  163. }