第六遍遍历源代码，生成函数链表。

思路，未完成。

 

#include <io.h>
#include <time.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <fcntl.h>
#include <sys/stat.h>
#include <unistd.h>
#include <tchar.h>
#include <dirent.h>
#include <wchar.h>
#include <winsock2.h>
#include <Windows.h>

struct localIty{
    struct localIty *next;
    char name[64];            /*变量名称*/
    char *bintype;            /*类型柜*/
    time_t identifier;        /*编号标识符*/
    //....
}


struct funChain{
    struct defSue *next;
    char name[64];            /*函数名*/
    char pou;                /*参数数量0-255*/
    char Retvt;                /*返回类型*/
    char pcrc;                /*去特殊符号与注释后 参数表的CRC值*/
    char *fun;                /*指向一个结构体字符串*/
}

struct funChain *fcP,fC;

int lstat(const char *str, struct stat *sb)
{
    int fd, rv;

    if ((fd = open(str, 0)) < 0)
        return (-1);
    rv = fstat(fd, sb);
    (void)close(fd);
    return (rv);
}

//第六遍遍历源代码，生成函数链表。
int funFollect(char *file)
{
    int fd;
    char *pl;
    struct stat fst;
    unsigned long int i,n,s,k40,k41,k123,k125,ret;
    unsigned char var[64],funname[64],temp[4096],buf[3200000];
    
    fd = open(file,O_RDONLY|O_BINARY,00700);
    if(fd == -1)return printf("open file - %s error...\n",file);
    fstat( fd, &fst );
    
    lseek( fd, 0, SEEK_SET );//再定位文件指针到文件头
    
    if(fst.st_size == 0)return printf("file size is zeero...\n");
    else if(fst.st_size > 3200000)return printf("sory file size too large...\n");
    //直接读内存缓冲区
    ret=read(fd,&buf,fst.st_size);
    if(ret != fst.st_size)return printf("file read size is something the matter...\n");
    //开始循环提取一行数据
    for(i=0;i<ret;i++)
    {
        pl=&buf[i];
        //pl 就是一行的数据 ,函数定义有一个特点必须有['{']开始['}']结束，就是[返回类型 函数名称 参数表 定义块]
        for(n=0;pl[i]!=0x20 && pl[i]!=0x09 && pl[i]!=0x0d && pl[i]!=0x0a && pl[i];n++,i++)
            var[n] = pl[i];
        var[n] = 0;
        //循环查找类型表分析var是否在表内
        if(...)
        {
            k40=0;k41=0;k123=0;k125=0;
            //直接跳过Space tab...
            for(;pl[i]==0x20 || pl[i]==0x09 || pl[i]==0x0d || pl[i]==0x0a;i++);
            for(n=0;pl[i]!=0x20 && pl[i]!=0x09 && pl[i]!=',' && pl[i]!=0x0d && pl[i]!=0x0a && pl[i];n++,i++)
            {
                if(pl[i]==40){k40=i+1;n++,i++;break;}
                funname[n] = pl[i];
            }
            funname[n] = 0;
            //直接跳过Space tab...
            for(;pl[i]==0x20 || pl[i]==0x09 || pl[i]==0x0d || pl[i]==0x0a;i++);
            //如果是定义的话会有一个';'结束符号
            if(!k40)for(n=i;pl[n]!=';' && pl[n];n++)if(pl[n]==40)k40=n+1;
            //循环查找综合表，分析funname是否在表内
            if(... && k40)
            {
                for(n=k40,s=0;pl[n];n++)
                {
                    if(pl[n]==40)s++;
                    else if(pl[n]==41)s--;
                    //注意用户语法格式[fun((char *)abc,){...}]
                    if(pl[n]==41 && s==0){k41 = n;break;}
                }
                if(k41)
                {
                    for(i=k41+1;pl[i]==0x20 || pl[i]==0x09 || pl[i]==0x0d || pl[i]==0x0a;i++);
                    if(pl[i]==123)
                    {
                        k123 = i+1;
                        for(i++,s=0;pl[i];i++)
                        {
                            if(pl[i]==123)s++;
                            else if(pl[n]==125)s--;
                            if(pl[i]==125 && s==0){k125 = i;break;}
                        }
                        if(k40&k41&k123&k125)//检查参数
                        {
                            
                            
                        }
                        else
                        {
                            //函数定义有问题
                        }
                        //跳出一个函数块
                        for(i++;pl[i]==0x20 || pl[i]==0x09 || pl[i]==0x0d || pl[i]==0x0a;i++);
                        continue;
                    }
                    else
                    {
                        //判断是否是参数列表，这是另一种风格的写法
                        
                        //可能语法有问题
                    }
                }
                else
                {
                    //不正确的函数定义
                }
            }
            else
            {
                //定义全局或其它类型
                //提取变量名称，判断是否重复定义
            }
        }
        else
        {
            //输出行号并告知var未定义
        }
    }
    close(fd);
}


void ListFolderContents(const char *root)
{
    DIR *sdir;
    DWORD attrib;
    char subdir[512],dupdir[1024];
    struct dirent *ptr;
    struct stat stbuf;
    
    sdir = opendir(root);
    
    while((ptr = readdir(sdir))!=NULL)
    {
        if(strcmp(ptr->d_name,".")==0 || strcmp(ptr->d_name,"..")==0)continue;
        //判断是目录还是文件或者链接
        sprintf(subdir,"%s%s",root,ptr->d_name);
        lstat(subdir,&stbuf);
        //printf("[root=%s]\nsubdir: %s            stbuf.st_mode=%x            isdir=%d\n",root,subdir,stbuf.st_mode,S_ISDIR(stbuf.st_mode));
        //Sleep(3000);//调试
        unsigned len = MultiByteToWideChar(0, 0, subdir, strlen(subdir), NULL, 0);
        if (len == 0) return printf("error ---001----------\n");
        else
        {
            memset(dupdir,0,1024);
            len = MultiByteToWideChar(0, 0, subdir, strlen(subdir), dupdir, len);
            if (len == 0) return printf("error ---002----------\n");
        }
        printf("%s\n",subdir);//遍历输出全部的文件
        //Sleep(1000);
        attrib = GetFileAttributesW(dupdir);
        //printf("[attrib=%d][attrib=%ul]\n",attrib,attrib);
        //遍历子目录
        //if(S_ISDIR(stbuf.st_mode)) //linux
        if(attrib != INVALID_FILE_ATTRIBUTES && (attrib & FILE_ATTRIBUTE_DIRECTORY) != 0)
        {
            strcat(subdir,"\\");
            ListFolderContents(subdir);
        }
    }
    closedir(sdir);
}


int main(int argc, char *argv[])
{
    int len;
    static char ServicePath[512];
    
    memset(fC,0,sizeof(struct funChain));
    fcP = &fC;
    
    if( !GetModuleFileName( GetModuleHandle(NULL), ServicePath, 256 ) )  
    {
        return printf("Cannot install service (%d)\n", GetLastError());  
    }
    for(len=strlen(ServicePath);len>0;len--)
        if(ServicePath[len]==0x5c){ServicePath[len+1]=0;break;}
    
    ListFolderContents(ServicePath);//windows
    
}