Lines Matching refs:token

45 /* A quoted string value-- too long for a general "token" */
147 char *name; /* token name */
149 int token; /* value */
232 get_token(register FILE *fp, register char *token);
234 parseQuoteString(register FILE *fp, register char *token);
312 print_error(string, token, type)
314 char *token;
319 else if (token)
320 fprintf(stderr, "%s(%s): On or around line %d\n", string, token, Line);
663 char token[MAXTOKEN];
670 if ((type = get_token(fp, token)) != LEFTBRACKET){
671 print_error("Expected \"{\"", token, type);
674 type = get_token(fp, token);
681 print_error("Not valid for object identifier", token, type);
686 cp = (char *)Malloc((unsigned)strlen(token) + 1);
687 strcpy(cp, token);
689 type = get_token(fp, token);
691 type = get_token(fp, token);
693 oid->subid = atoi(token);
694 if ((type = get_token(fp, token)) != RIGHTPAREN){
695 print_error("Unexpected a closing parenthesis", token, type);
699 print_error("Expected a number", token, type);
707 oid->subid = atoi(token);
709 type = get_token(fp, token);
749 char token[MAXTOKEN];
758 type = get_token(fp,token);
760 if( (type = get_token(fp,token)) == LABEL){
768 strcpy(ti->enterprise_label,token);
771 type = get_token(fp,token);
775 type = get_token(fp,token);
777 print_error("{ expected in VARIABLES clause",token,type);
781 type = get_token(fp,token);
786 print_error("LABEL expected in VARIABLES1 clause",token,type);
808 (char *)Malloc((unsigned)strlen(token) + 1);
809 strcpy(ip->label, token);
811 type = get_token(fp, token);
816 type = get_token(fp, token);
823 print_error(", or } expected in VARIABLES clause",token,type);
832 type = get_token(fp,token);
834 print_error("Bad DESCRIPTION",token,type);
846 type = get_token(fp,token);
848 print_error("Bad DESCRIPTION",token,type);
857 type = get_token(fp,token);
860 if( (type = get_token(fp,token)) == NUMBER){
861 ti->value = atoi(token);
867 print_error("Expected a number",token,type);
872 print_error("Expected \"enterprise name\"",token,type);
876 print_error("Expected \"ENTERPRISE\"",token,type);
900 char token[MAXTOKEN];
907 type = get_token(fp, token);
909 print_error("Bad format", token, type);
1029 char token[MAXTOKEN];
1038 type = get_token(fp, token);
1040 while((type = get_token(fp, token)) != ENDOFFILE){
1046 print_error("Expected \"}\"", token, type);
1049 if (!strcmp(token, "TEXTUAL-CONVENTION")){
1051 type = get_token(fp, token);
1052 type = get_token(fp, token);
1060 print_error("No more textual conventions possible.", token, type);
1069 print_error("Textual convention doesn't map to real type.", token,
1076 w = get_tc(token, &ep);
1079 print_error("Textual convention doesn't map to real type.", token, type);
1100 while((type = get_token(fp, token)) != ENDOFFILE){
1116 (char *)Malloc((unsigned)strlen(token) + 1);
1117 strcpy(ep->label, token);
1118 type = get_token(fp, token);
1120 print_error("Expected \"(\"", token, type);
1124 type = get_token(fp, token);
1126 print_error("Expected integer", token, type);
1130 ep->value = atoi(token);
1131 type = get_token(fp, token);
1133 print_error("Expected \")\"", token, type);
1140 print_error("Expected \"}\"", token, type);
1161 char token[MAXTOKEN];
1174 type = get_token(fp, token);
1176 print_error("Bad format for OBJECT TYPE", token, type);
1190 type = get_token(fp, token);
1192 tctype = get_tc(token, &(np->enums));
1195 print_error("No known translation for type", token, type);
1206 strcpy(syntax, token);
1224 strcpy(syntax, token);
1227 while((type = get_token(fp, token)) != ENDOFFILE){
1243 (char *)Malloc((unsigned)strlen(token) + 1);
1244 strcpy(ep->label, token);
1245 type = get_token(fp, token);
1247 print_error("Expected \"(\"", token, type);
1251 type = get_token(fp, token);
1253 print_error("Expected integer", token, type);
1257 ep->value = atoi(token);
1258 type = get_token(fp, token);
1260 print_error("Expected \")\"", token, type);
1267 print_error("Expected \"}\"", token, type);
1280 strcpy(syntax, token);
1283 while((type = get_token(fp, token)) != ENDOFFILE){
1299 (char *)Malloc((unsigned)strlen(token) + 1);
1300 strcpy(ep->label, token);
1301 type = get_token(fp, token);
1303 print_error("Expected \"(\"", token, type);
1307 type = get_token(fp, token);
1309 print_error("Expected integer", token, type);
1313 ep->value = atoi(token);
1314 type = get_token(fp, token);
1316 print_error("Expected \")\"", token, type);
1323 print_error("Expected \"}\"", token, type);
1336 strcpy(syntax, token);
1355 print_error("Bad syntax", token, type);
1371 strcpy(syntax, token);
1374 print_error("Bad syntax", token, type);
1379 type = get_token(fp, token);
1381 print_error("Bad DESCRIPTION", token, type);
1392 type = get_token(fp, token);
1426 type = get_token(fp, token);
1428 print_error("Should be STATUS", token, nexttype);
1432 type = get_token(fp, token);
1434 print_error("Bad status", token, type);
1441 type = get_token(fp, token);
1445 type = get_token(fp, token);
1447 print_error("Bad DESCRIPTION", token, type);
1463 type = get_token(fp, token);
1465 print_error("Bad DESCRIPTION", token, type);
1476 type = get_token(fp, token);
1479 print_error("{ expected in INDEX clause",token,type);
1483 type = get_token(fp, token);
1488 print_error("LABEL expected in INDEX clause",token,type);
1510 (char *)Malloc((unsigned)strlen(token) + 1);
1511 strcpy(ip->label, token);
1513 type = get_token(fp, token);
1518 type = get_token(fp, token);
1525 print_error(", or } expected in INDEX clause",token,type);
1537 print_error("Bad Object Identifier", token, type);
1544 print_error("Bad format of optional clauses", token,type);
1549 type = get_token(fp, token);
1552 print_error("Bad format", token, type);
1591 char token[MAXTOKEN];
1609 type = get_token(fp, token);
1613 type = get_token(fp, token);
1615 print_error("Bad DESCRIPTION", token, type);
1634 type = get_token(fp, token);
1670 char token[MAXTOKEN];
1687 type = get_token(fp, token);
1691 type = get_token(fp, token);
1693 print_error("Bad DESCRIPTION", token, type);
1712 type = get_token(fp, token);
1748 char token[MAXTOKEN];
1765 type = get_token(fp, token);
1767 type = get_token(fp, token);
1805 char token[MAXTOKEN];
1822 type = get_token(fp, token);
1824 type = get_token(fp, token);
1855 char token[MAXTOKEN];
1869 type = get_token(fp, token);
1897 char token[MAXTOKEN];
1927 type = get_token(fp, token);
1940 print_error(token, "is a reserved word", type);
1943 strncpy(name, token, MAXTOKEN);
1944 type = get_token(fp, token);
2075 if (!parse_asntype(fp, name, &type, token)){
2112 * Parses a token from the file. The type of the token parsed is returned,
2113 * and the text is placed in the string pointed to by token.
2116 get_token(fp, token)
2118 register char *token;
2122 register char *cp = token;
2136 print_error("TRACE", token, ENDOFFILE);
2140 return parseQuoteString(fp, token);
2144 * Accumulate characters until end of token is found. Then attempt to
2145 * match this token as a reserved word. If a match is found, return the
2153 if (!isspace(ch) && *token == 0){
2163 if ((tp->hash == hash) && (strcmp(tp->name, token) == 0))
2167 if (tp->token == CONTINUE)
2170 print_error("TRACE", token, tp->token);
2172 return (tp->token);
2175 if (token[0] == '-' && token[1] == '-'){
2187 print_error("TRACE", token, ENDOFFILE);
2192 return get_token(fp, token);
2194 for(cp = token; *cp; cp++)
2198 print_error("TRACE", token, LABEL);
2203 print_error("TRACE", token, NUMBER);
2205 number_value = atoi(token); /* octet string size */
2216 print_error("TRACE", token, ENDOFFILE);
2270 parseQuoteString(fp, token)
2272 register char *token;
2279 *token = '\0'; /* make the token empty */
2312 print_error("TRACE", token, QUOTESTRING);
2320 print_error("TRACE", token, NULL);