LEXICAL ANALYZER USING C

LEXICAL ANALYZER USING C
#include<stdio.h>
#include<ctype.h>
#include<string.h>
void keyw(char *p);
int i=0,id=0,kw=0,num=0,op=0;
char keys[32][10]={"auto","break","case","char","const","continue","default",
"do","double","else","enum","extern","float","for","goto",
"if","int","long","register","return","short","signed",
"sizeof","static","struct","switch","typedef","union",
"unsigned","void","volatile","while"};
main()


    {
     char ch,str[25],seps[15]=" \t\n,;(){}[]#\"<>",oper[]="!%^&*-+=~|.<>/?";
     int j;
     char fname[50];
     FILE *f1;
     //clrscr();
    printf("enter file path (drive:\\fold\\filename)\n");
    scanf("%s",fname);
    f1 = fopen(fname,"r");
    //f1 = fopen("Input","r");
     if(f1==NULL)


         {
          printf("file not found");
          exit(0);
         }
         while((ch=fgetc(f1))!=EOF)


             {
            for(j=0;j<=14;j++)


                {
                if(ch==oper[j])


                    {
                    printf("%c is an operator\n",ch);
                    op++;
                    str[i]='\0';
                    keyw(str);
                }
            }
            for(j=0;j<=14;j++)


                {
                if(i==-1)
                break;
                if(ch==seps[j])


                    {
                    if(ch=='#')


                        {
                        while(ch!='>')


                            {
                            printf("%c",ch);
                            ch=fgetc(f1);
                        }
                        printf("%c is a header file\n",ch);
                        i=-1;
                        break;
                    }
                    if(ch=='"')


                        {
                        do


                            {
                            ch=fgetc(f1);
                            printf("%c",ch);
                        }while(ch!='"');
                        printf("\b is an argument\n");
                        i=-1;
                        break;
                    }
                    str[i]='\0';
                    keyw(str);
                }
            }
            if(i!=-1)


                {
                str[i]=ch;
                i++;
            }
            else
            i=0;
             }
            printf("Keywords: %d\nIdentifiers: %d\nOperators: %d\nNumbers: %d\n",kw,id,op,num);
            //getch();
        }
        void keyw(char *p)


            {
            int k,flag=0;
            for(k=0;k<=31;k++)


                {
                if(strcmp(keys[k],p)==0)


                    {
                    printf("%s is a keyword\n",p);
                    kw++;
                    flag=1;
                    break;
                }
            }
            if(flag==0)


                {
                if(isdigit(p[0]))


                    {
                    printf("%s is a number\n",p);
                    num++;
                }
                else


                    {
                    //if(p[0]!=13&&p[0]!=10)
                    if(p[0]!='\0')


                        {
                        printf("%s is an identifier\n",p);
                        id++;
                    }
                }
            }
            i=-1;
        }
output


8 comments:

  1. Saya sangat menyukai kemudahan navigasi yang tersedia, rajabandot menawarkan akses informasi yang praktis, responsif, dan selalu memberikan pengalaman online yang memuaskan bagi pengguna. https://www.lunastudio.me/

    ReplyDelete
  2. Temukan informasi lengkap untuk pengalaman online yang lebih aman dan mudah melalui link rajabandot dengan akses cepat, stabil, serta panduan terbaru setiap hari. link rajabandot

    ReplyDelete
  3. The discussion offers valuable insights that help readers stay informed about current trends and future possibilities. lk21

    ReplyDelete
  4. Informasi tentang keamanan dan risiko digital sangat penting sebelum membahas slot togel online. Pengguna sebaiknya selalu memeriksa sumber informasi dan memahami risikonya terlebih dahulu. slot togel online

    ReplyDelete
  5. This is truly a great read for me. I have bookmarked it and I am looking forward to reading new articles. Keep up the good work!. slot 5k

    ReplyDelete
  6. This post offers useful knowledge while encouraging readers to remain curious about future developments and opportunities. revenda de seguidores barato

    ReplyDelete
  7. The insights presented throughout the content encourage readers to explore related topics and expand their understanding. slot gacor

    ReplyDelete
  8. This post offers useful knowledge while encouraging readers to remain curious about future developments and opportunities. slot gacor

    ReplyDelete