conf_yacc.c

在LINUX下实现HA的源代码

/* yyresume: */

  /* First try to decide what to do without reference to look-ahead token.  */

  yyn = yypact[yystate];
  if (yyn == YYPACT_NINF)
    goto yydefault;

  /* Not known => get a look-ahead token if don't already have one.  */

  /* YYCHAR is either YYEMPTY or YYEOF or a valid look-ahead symbol.  */
  if (yychar == YYEMPTY)
    {
      YYDPRINTF ((stderr, "Reading a token: "));
      yychar = YYLEX;
    }

  if (yychar <= YYEOF)
    {
      yychar = yytoken = YYEOF;
      YYDPRINTF ((stderr, "Now at end of input.\n"));
    }
  else
    {
      yytoken = YYTRANSLATE (yychar);
      YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc);
    }

  /* If the proper action on seeing token YYTOKEN is to reduce or to
     detect an error, take that action.  */
  yyn += yytoken;
  if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken)
    goto yydefault;
  yyn = yytable[yyn];
  if (yyn <= 0)
    {
      if (yyn == 0 || yyn == YYTABLE_NINF)
	goto yyerrlab;
      yyn = -yyn;
      goto yyreduce;
    }

  if (yyn == YYFINAL)
    YYACCEPT;

  /* Shift the look-ahead token.  */
  YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc);

  /* Discard the token being shifted unless it is eof.  */
  if (yychar != YYEOF)
    yychar = YYEMPTY;

  *++yyvsp = yylval;


  /* Count tokens shifted since error; after three, turn off error
     status.  */
  if (yyerrstatus)
    yyerrstatus--;

  yystate = yyn;
  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 3:
#line 66 "conf_yacc.y"
    {
		MAKE_WARNINGS_GO_AWAY
	}
    break;

  case 4:
#line 71 "conf_yacc.y"
    {
#ifdef DEBUG
		int i;
#endif
		strncpy(current->scriptname, (yyvsp[-2]), CONFIGSTRINGLENGTH);

		tempname = strdup(current->scriptname);
		strncpy(current->appname,basename(tempname), CONFIGSTRINGLENGTH);
		free(tempname);
#ifdef DEBUG
		printf("insert to hash table: [%s][%s]\n", current->appname
			, current);
#endif
		g_hash_table_insert(scripts, current->appname, current);

#ifdef DEBUG
		printf("uid=%ld\ngid=%ld\n", current->uid, current->gid);
		printf("scriptname = %s\n", current->scriptname);
		printf("appname = %s\n", current->appname);
		
		for (i=1;i<MAXEVENTS;i++)
		{
		   printf("event (%i) = %s\n", i, current->event[i].args);
		}
#endif
		if (0) {
			YYERROR;
		}
	}
    break;

  case 5:
#line 103 "conf_yacc.y"
    {
		int i;
		struct passwd* mypasswd = NULL;
		struct group* mygroup = NULL;
		current = (RecoveryInfo *) malloc(sizeof(RecoveryInfo));
		if (!current)
		{
		   printf("out of memory. Failed to parse config file\n");
		   return(5);
		}
		else 
		{
		   for (i=1;i<MAXEVENTS;i++)
	           {
		      current->event[i].inuse = FALSE;
		      current->event[i].args[0] = '\0';
	 	   }
		   /*
		   strncpy(current->uid, $1, CONFIGUIDLENGTH);
		   strncpy(current->gid, $3, CONFIGGIDLENGTH);			
		   */
		   mypasswd = getpwnam((yyvsp[-2]));
		   mygroup = getgrnam((yyvsp[0]));
		   if(mypasswd){   
			current->uid = mypasswd->pw_uid;
			current->gid = mypasswd->pw_gid;
			if(mygroup){
				if(mygroup->gr_gid != current->gid){
					printf("User [%s] is not in group [%s]\n"
					, (yyvsp[-2]), (yyvsp[0]));
					return(1);
				}
			}else{
		   		printf("Cannot find group id for group:[%s]\n"
					, (yyvsp[0]));
				return(2);
			}
		   }else{
		   	printf("Cannot find user id for user:[%s]\n", (yyvsp[-2]));
			return(3);
		   } 	
		 }
	}
    break;

  case 7:
#line 149 "conf_yacc.y"
    {
	}
    break;

  case 8:
#line 153 "conf_yacc.y"
    {
#ifdef DEBUG
		printf("eventindex = %d\n", eventindex);
		printf("string = %s\n", (yyvsp[0]));
		printf("string(yylval) = %s\n", yylval);
		printf("strlen = %d\n", strlen((yyvsp[0])));
#endif
		if (!current || eventindex >= MAXEVENTS) return(4);

		current->event[eventindex].inuse = TRUE;

		/* remove quotes */
		length = strlen((yyvsp[0]))-2;
		if (length <= 2) 
			current->event[eventindex].args[0] = '\0';
		else
		{	
			if (length > CONFIGSTRINGLENGTH)
				length = CONFIGSTRINGLENGTH;
			strncpy(current->event[eventindex].args,
                       		 &yylval[1], length);
			current->event[eventindex].args[length] = '\0';
		}
	}
    break;

  case 9:
#line 178 "conf_yacc.y"
    {
		current->event[eventindex].inuse = TRUE;
		strncpy(current->event[eventindex].args,(yyvsp[0]), CONFIGSTRINGLENGTH);
		current->event[eventindex].args[CONFIGSTRINGLENGTH-1] = '\0';
	}
    break;

  case 10:
#line 184 "conf_yacc.y"
    {
		current->event[eventindex].inuse = TRUE;
		current->event[eventindex].args[0] = '\0';
	}
    break;

  case 11:
#line 189 "conf_yacc.y"
    { eventindex = (int) APPHB_HUP; }
    break;

  case 12:
#line 190 "conf_yacc.y"
    { eventindex = (int) APPHB_NOHB; }
    break;

  case 13:
#line 191 "conf_yacc.y"
    { eventindex =(int) APPHB_HBAGAIN; }
    break;

  case 14:
#line 192 "conf_yacc.y"
    { eventindex = (int) APPHB_HBWARN; }
    break;

  case 15:
#line 193 "conf_yacc.y"
    { eventindex = (int) APPHB_HBUNREG; }
    break;


    }

/* Line 1037 of yacc.c.  */
#line 1254 "y.tab.c"

  yyvsp -= yylen;
  yyssp -= yylen;


  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
      yyn = yypact[yystate];

      if (YYPACT_NINF < yyn && yyn < YYLAST)
	{
	  YYSIZE_T yysize = 0;
	  int yytype = YYTRANSLATE (yychar);
	  const char* yyprefix;
	  char *yymsg;
	  int yyx;

	  /* Start YYX at -YYN if negative to avoid negative indexes in
	     YYCHECK.  */
	  int yyxbegin = yyn < 0 ? -yyn : 0;

	  /* Stay within bounds of both yycheck and yytname.  */
	  int yychecklim = YYLAST - yyn;
	  int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS;
	  int yycount = 0;

	  yyprefix = ", expecting ";
	  for (yyx = yyxbegin; yyx < yyxend; ++yyx)
	    if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR)
	      {
		yysize += yystrlen (yyprefix) + yystrlen (yytname [yyx]);
		yycount += 1;
		if (yycount == 5)
		  {
		    yysize = 0;
		    break;
		  }
	      }
	  yysize += (sizeof ("syntax error, unexpected ")
		     + yystrlen (yytname[yytype]));
	  yymsg = (char *) YYSTACK_ALLOC (yysize);
	  if (yymsg != 0)
	    {
	      char *yyp = yystpcpy (yymsg, "syntax error, unexpected ");
	      yyp = yystpcpy (yyp, yytname[yytype]);

	      if (yycount < 5)
		{
		  yyprefix = ", expecting ";
		  for (yyx = yyxbegin; yyx < yyxend; ++yyx)
		    if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR)
		      {
			yyp = yystpcpy (yyp, yyprefix);
			yyp = yystpcpy (yyp, yytname[yyx]);
			yyprefix = " or ";
		      }
		}
	      yyerror (yymsg);
	      YYSTACK_FREE (yymsg);
	    }
	  else
	    yyerror ("syntax error; also virtual memory exhausted");
	}
      else
#endif /* YYERROR_VERBOSE */
	yyerror ("syntax error");
    }



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

      if (yychar <= YYEOF)
        {
          /* If at end of input, pop the error token,
	     then the rest of the stack, then return failure.  */
	  if (yychar == YYEOF)
	     for (;;)
	       {

		 YYPOPSTACK;
		 if (yyssp == yyss)
		   YYABORT;
		 yydestruct ("Error: popping",
                             yystos[*yyssp], yyvsp);
	       }
        }
      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:

#ifdef __GNUC__
  /* Pacify GCC when the user code never invokes YYERROR and the label
     yyerrorlab therefore never appears in user code.  */
  if (0)
     goto yyerrorlab;
#endif

yyvsp -= yylen;
  yyssp -= yylen;
  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;
      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:
  yydestruct ("Error: discarding lookahead",
              yytoken, &yylval);
  yychar = YYEMPTY;
  yyresult = 1;
  goto yyreturn;

#ifndef yyoverflow
/*----------------------------------------------.
| yyoverflowlab -- parser overflow comes here.  |
`----------------------------------------------*/
yyoverflowlab:
  yyerror ("parser stack overflow");
  yyresult = 2;
  /* Fall through.  */
#endif

yyreturn:
#ifndef yyoverflow
  if (yyss != yyssa)
    YYSTACK_FREE (yyss);
#endif
  return yyresult;
}


#line 196 "conf_yacc.y"