evalparse.c

功能较全面的反汇编器：反汇编器ht-2.0.15.tar.gz

  if (yychar != YYEOF)
    yychar = YYEMPTY;

  yystate = yyn;
  *++yyvsp = yylval;

  goto yynewstate;


/*-----------------------------------------------------------.
| yydefault -- do the default action for the current state.  |
`-----------------------------------------------------------*/
yydefault:
  yyn = yydefact[yystate];
  if (yyn == 0)
    goto yyerrlab;
  goto yyreduce;


/*-----------------------------.
| yyreduce -- Do a reduction.  |
`-----------------------------*/
yyreduce:
  /* yyn is the number of a rule to reduce with.  */
  yylen = yyr2[yyn];

  /* If YYLEN is nonzero, implement the default value of the action:
     `$$ = $1'.

     Otherwise, the following line sets YYVAL to garbage.
     This behavior is undocumented and Bison
     users should not rely upon it.  Assigning to YYVAL
     unconditionally makes the parser a bit smaller, and it avoids a
     GCC warning that YYVAL may be used uninitialized.  */
  yyval = yyvsp[1-yylen];


  YY_REDUCE_PRINT (yyn);
  switch (yyn)
    {
        case 2:
#line 65 "evalparse.y"
    { *(eval_scalar*)resultptr=(yyvsp[(1) - (1)].scalar); }
    break;

  case 3:
#line 68 "evalparse.y"
    { (yyval.scalar) = (yyvsp[(1) - (1)].scalar); }
    break;

  case 4:
#line 69 "evalparse.y"
    { (yyval.scalar) = (yyvsp[(1) - (1)].scalar); }
    break;

  case 5:
#line 70 "evalparse.y"
    { (yyval.scalar) = (yyvsp[(1) - (1)].scalar); }
    break;

  case 6:
#line 71 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), '*')) YYERROR; }
    break;

  case 7:
#line 72 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), '/')) YYERROR; }
    break;

  case 8:
#line 73 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), '%')) YYERROR; }
    break;

  case 9:
#line 74 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), '+')) YYERROR; }
    break;

  case 10:
#line 75 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), '-')) YYERROR; }
    break;

  case 11:
#line 76 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), '&')) YYERROR; }
    break;

  case 12:
#line 77 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), '|')) YYERROR; }
    break;

  case 13:
#line 78 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), '^')) YYERROR; }
    break;

  case 14:
#line 79 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_POW)) YYERROR; }
    break;

  case 15:
#line 80 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_SHL)) YYERROR; }
    break;

  case 16:
#line 81 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_SHR)) YYERROR; }
    break;

  case 17:
#line 82 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_EQ)) YYERROR; }
    break;

  case 18:
#line 83 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_NE)) YYERROR; }
    break;

  case 19:
#line 84 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_GT)) YYERROR; }
    break;

  case 20:
#line 85 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_GE)) YYERROR; }
    break;

  case 21:
#line 86 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_LT)) YYERROR; }
    break;

  case 22:
#line 87 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_LE)) YYERROR; }
    break;

  case 23:
#line 88 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_LAND)) YYERROR; }
    break;

  case 24:
#line 89 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_LXOR)) YYERROR; }
    break;

  case 25:
#line 90 "evalparse.y"
    { if (!scalar_op(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_LOR)) YYERROR; }
    break;

  case 26:
#line 91 "evalparse.y"
    { scalar_strop(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_STR_EQ); }
    break;

  case 27:
#line 92 "evalparse.y"
    { scalar_strop(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_STR_NE); }
    break;

  case 28:
#line 93 "evalparse.y"
    { scalar_strop(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_STR_GT); }
    break;

  case 29:
#line 94 "evalparse.y"
    { scalar_strop(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_STR_GE); }
    break;

  case 30:
#line 95 "evalparse.y"
    { scalar_strop(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_STR_LT); }
    break;

  case 31:
#line 96 "evalparse.y"
    { scalar_strop(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar), EVAL_STR_LE); }
    break;

  case 32:
#line 97 "evalparse.y"
    { scalar_negset(&(yyval.scalar), &(yyvsp[(2) - (2)].scalar)); }
    break;

  case 33:
#line 98 "evalparse.y"
    { scalar_notset(&(yyval.scalar), &(yyvsp[(2) - (2)].scalar)); }
    break;

  case 34:
#line 99 "evalparse.y"
    { scalar_lnotset(&(yyval.scalar), &(yyvsp[(2) - (2)].scalar)); }
    break;

  case 35:
#line 100 "evalparse.y"
    { (yyval.scalar) = (yyvsp[(2) - (3)].scalar); }
    break;

  case 36:
#line 101 "evalparse.y"
    { scalar_miniif(&(yyval.scalar), &(yyvsp[(1) - (5)].scalar), &(yyvsp[(3) - (5)].scalar), &(yyvsp[(5) - (5)].scalar)); }
    break;

  case 37:
#line 103 "evalparse.y"
    {
			scalar_concat(&(yyval.scalar), &(yyvsp[(1) - (3)].scalar), &(yyvsp[(3) - (3)].scalar));
			scalar_destroy(&(yyvsp[(1) - (3)].scalar));
			scalar_destroy(&(yyvsp[(3) - (3)].scalar));
		}
    break;

  case 38:
#line 109 "evalparse.y"
    {
			int r=evalfunc(&(yyval.scalar), (yyvsp[(1) - (4)].ident), &(yyvsp[(3) - (4)].scalars));
			scalarlist_destroy(&(yyvsp[(3) - (4)].scalars));
			free((yyvsp[(1) - (4)].ident));
			if (!r) YYERROR;
		}
    break;

  case 39:
#line 116 "evalparse.y"
    {
			int r=evalsymbol(&(yyval.scalar), (yyvsp[(1) - (1)].ident));
			free((yyvsp[(1) - (1)].ident));
			if (!r) YYERROR;
		}
    break;

  case 40:
#line 124 "evalparse.y"
    {
			eval_scalarlist s;
			s.count=0;
			s.scalars=NULL;
			(yyval.scalars) = s;
		}
    break;

  case 41:
#line 130 "evalparse.y"
    { (yyval.scalars) = (yyvsp[(1) - (1)].scalars); }
    break;

  case 42:
#line 133 "evalparse.y"
    { scalarlist_set(&(yyval.scalars), &(yyvsp[(1) - (1)].scalar)); }
    break;

  case 43:
#line 135 "evalparse.y"
    {
			scalarlist_concat(&(yyval.scalars), &(yyvsp[(1) - (3)].scalars), &(yyvsp[(3) - (3)].scalars));
			scalarlist_destroy_gentle(&(yyvsp[(1) - (3)].scalars));
			scalarlist_destroy_gentle(&(yyvsp[(3) - (3)].scalars));
		}
    break;

  case 44:
#line 142 "evalparse.y"
    { (yyval.ident) = (yyvsp[(1) - (1)].ident); }
    break;


/* Line 1267 of yacc.c.  */
#line 1775 "evalparse.c"
      default: break;
    }
  YY_SYMBOL_PRINT ("-> $$ =", yyr1[yyn], &yyval, &yyloc);

  YYPOPSTACK (yylen);
  yylen = 0;
  YY_STACK_PRINT (yyss, yyssp);

  *++yyvsp = yyval;


  /* Now `shift' the result of the reduction.  Determine what state
     that goes to, based on the state we popped back to and the rule
     number reduced by.  */

  yyn = yyr1[yyn];

  yystate = yypgoto[yyn - YYNTOKENS] + *yyssp;
  if (0 <= yystate && yystate <= YYLAST && yycheck[yystate] == *yyssp)
    yystate = yytable[yystate];
  else
    yystate = yydefgoto[yyn - YYNTOKENS];

  goto yynewstate;


/*------------------------------------.
| yyerrlab -- here on detecting error |
`------------------------------------*/
yyerrlab:
  /* If not already recovering from an error, report this error.  */
  if (!yyerrstatus)
    {
      ++yynerrs;
#if ! YYERROR_VERBOSE
      yyerror (YY_("syntax error"));
#else
      {
	YYSIZE_T yysize = yysyntax_error (0, yystate, yychar);
	if (yymsg_alloc < yysize && yymsg_alloc < YYSTACK_ALLOC_MAXIMUM)
	  {
	    YYSIZE_T yyalloc = 2 * yysize;
	    if (! (yysize <= yyalloc && yyalloc <= YYSTACK_ALLOC_MAXIMUM))
	      yyalloc = YYSTACK_ALLOC_MAXIMUM;
	    if (yymsg != yymsgbuf)
	      YYSTACK_FREE (yymsg);
	    yymsg = (char *) YYSTACK_ALLOC (yyalloc);
	    if (yymsg)
	      yymsg_alloc = yyalloc;
	    else
	      {
		yymsg = yymsgbuf;
		yymsg_alloc = sizeof yymsgbuf;
	      }
	  }

	if (0 < yysize && yysize <= yymsg_alloc)
	  {
	    (void) yysyntax_error (yymsg, yystate, yychar);
	    yyerror (yymsg);
	  }
	else
	  {
	    yyerror (YY_("syntax error"));
	    if (yysize != 0)
	      goto yyexhaustedlab;
	  }
      }
#endif
    }



  if (yyerrstatus == 3)
    {
      /* If just tried and failed to reuse look-ahead token after an
	 error, discard it.  */

      if (yychar <= YYEOF)
	{
	  /* Return failure if at end of input.  */
	  if (yychar == YYEOF)
	    YYABORT;
	}
      else
	{
	  yydestruct ("Error: discarding",
		      yytoken, &yylval);
	  yychar = YYEMPTY;
	}
    }

  /* Else will try to reuse look-ahead token after shifting the error
     token.  */
  goto yyerrlab1;


/*---------------------------------------------------.
| yyerrorlab -- error raised explicitly by YYERROR.  |
`---------------------------------------------------*/
yyerrorlab:

  /* Pacify compilers like GCC when the user code never invokes
     YYERROR and the label yyerrorlab therefore never appears in user
     code.  */
  if (/*CONSTCOND*/ 0)
     goto yyerrorlab;

  /* Do not reclaim the symbols of the rule which action triggered
     this YYERROR.  */
  YYPOPSTACK (yylen);
  yylen = 0;
  YY_STACK_PRINT (yyss, yyssp);
  yystate = *yyssp;
  goto yyerrlab1;


/*-------------------------------------------------------------.
| yyerrlab1 -- common code for both syntax error and YYERROR.  |
`-------------------------------------------------------------*/
yyerrlab1:
  yyerrstatus = 3;	/* Each real token shifted decrements this.  */

  for (;;)
    {
      yyn = yypact[yystate];
      if (yyn != YYPACT_NINF)
	{
	  yyn += YYTERROR;
	  if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR)
	    {
	      yyn = yytable[yyn];
	      if (0 < yyn)
		break;
	    }
	}

      /* Pop the current state because it cannot handle the error token.  */
      if (yyssp == yyss)
	YYABORT;


      yydestruct ("Error: popping",
		  yystos[yystate], yyvsp);
      YYPOPSTACK (1);
      yystate = *yyssp;
      YY_STACK_PRINT (yyss, yyssp);
    }

  if (yyn == YYFINAL)
    YYACCEPT;

  *++yyvsp = yylval;


  /* Shift the error token.  */
  YY_SYMBOL_PRINT ("Shifting", yystos[yyn], yyvsp, yylsp);

  yystate = yyn;
  goto yynewstate;


/*-------------------------------------.
| yyacceptlab -- YYACCEPT comes here.  |
`-------------------------------------*/
yyacceptlab:
  yyresult = 0;
  goto yyreturn;

/*-----------------------------------.
| yyabortlab -- YYABORT comes here.  |
`-----------------------------------*/
yyabortlab:
  yyresult = 1;
  goto yyreturn;

#ifndef yyoverflow
/*-------------------------------------------------.
| yyexhaustedlab -- memory exhaustion comes here.  |
`-------------------------------------------------*/
yyexhaustedlab:
  yyerror (YY_("memory exhausted"));
  yyresult = 2;
  /* Fall through.  */
#endif

yyreturn:
  if (yychar != YYEOF && yychar != YYEMPTY)
     yydestruct ("Cleanup: discarding lookahead",
		 yytoken, &yylval);
  /* Do not reclaim the symbols of the rule which action triggered
     this YYABORT or YYACCEPT.  */
  YYPOPSTACK (yylen);
  YY_STACK_PRINT (yyss, yyssp);
  while (yyssp != yyss)
    {
      yydestruct ("Cleanup: popping",
		  yystos[*yyssp], yyvsp);
      YYPOPSTACK (1);
    }
#ifndef yyoverflow
  if (yyss != yyssa)
    YYSTACK_FREE (yyss);
#endif
#if YYERROR_VERBOSE
  if (yymsg != yymsgbuf)
    YYSTACK_FREE (yymsg);
#endif
  /* Make sure YYID is used.  */
  return YYID (yyresult);
}


#line 145 "evalparse.y"