Back

#include<stdio.h>
#include<string.h>
#include<ctype.h>

#define  MAXTOKEN  100
#define BUFSIZE 100

char buf[BUFSIZE];
int bufp=0;

int getint(int *);
int getch(void);
void ungetch(int);

enum { NAME, PARENS, BRACKETS };

void dcl(void);
void dirdcl(void);

int gettoken(void);
int tokentype;
char token[MAXTOKEN];
char name[MAXTOKEN];
char datatype[MAXTOKEN];
char out[1000];


int main()
{
  int type;
  char temp[MAXTOKEN];

  while (gettoken() != EOF)
   {
     strcpy(out, token);
     while ((type=gettoken()) != '\n')
       if (type == PARENS || type == BRACKETS)
           strcat(out, token);
       else if (type == '*')
        {
          sprintf(temp, "(*%s)", out);
          strcpy(out, temp);
        }
       else if (type == NAME)
        {
          sprintf(temp, "%s %s", token, out);
          strcpy(out, temp);
        }
       else
         printf("invalid input at %s\n", token);
   }

 return 0;
}


int gettoken(void)
 {
   int c, getch(void);
   void ungetch(int);
   char *p = token;

   while ((c=getch()) == ' ' || c =='\t');
   if (c=='(')
     {
        if ((c=getch()) == ')')
         {
           strcpy(token, "()");
           return tokentype = PARENS;
         }
        else
         {
           ungetch(c);
           return tokentype = '(';
         }
     }
    else if ( c == '[')
     {
       for (*p++ = c; (*p++ = getch()) != ']'; );
       *p='\0';
     return tokentype = BRACKETS;
     }
    else if (isalpha(c))
     {
       for (*p++ = c; isalnum(c=getch()); ) *p++ = c;
       *p='\0';
       ungetch(c);
       return tokentype = NAME;
     }
    else
       return tokentype = c;
 }

void dcl(void)
 {
   int ns;

   for(ns = 0; gettoken() == '*'; ) ns++;
   dirdcl();
   while (ns-- > 0) strcat(out, " pointer to");
 }

void dirdcl(void)
 {
   int type;

   if (tokentype == '(')
    {
      dcl();
      if (tokentype != ')')
        printf("error: missing )\n");
    }
   else if (tokentype == NAME)
        strcpy(name, token);
   else
       printf("error: expected name or (dcl)\n");

   while ((type=gettoken()) == PARENS || type == BRACKETS)
    if (type == PARENS)
       strcat(out, " function returning");
    else
      {
        strcat(out, " array");
        strcat(out, token);
        strcat(out, " of");
      }
}

int getch(void)
 {
    return (bufp > 0) ? buf[--bufp] : getchar();
 }

void ungetch(int c)
 {
   if (bufp >= BUFSIZE) printf("ungetch: too many characters\n");
   else
     buf[bufp++]=c;
}

Top