Changeset 31 in dev for BasicCompiler_Common/preprocessor.cpp

Timestamp:

Jan 13, 2007, 4:26:50 AM (18 years ago)

Author:

dai_9181

Message:

_System_LocalThis（見えないThisポインタパラメータ）を通常のパラメータ保有領域ではなく、リアルパラメータ保有領域に移動した。
メソッドとグローバル関数のオーバーロードに対応（DLL関数オーバーロードには未対応）。

File:

• BasicCompiler_Common/preprocessor.cpp (modified) (6 diffs)

BasicCompiler_Common/preprocessor.cpp

@@ -8 +8 @@
 
 
+
+//////////////////////////////////////
+// #requireの管理
+//////////////////////////////////////
+class CRequireFiles{
+    char **ppFilePath;
+    int count;
+public:
+    CRequireFiles(){
+        ppFilePath = (char **)malloc( 1 );
+        count = 0;
+    }
+    ~CRequireFiles(){
+        for( int i = 0; i < count; i++ ){
+            free( ppFilePath[i] );
+        }
+        free( ppFilePath );
+    }
+    bool IsIncluded( const char *FilePath ){
+        for( int i = 0; i < count; i++ ){
+            if( lstrcmpi( ppFilePath[i], FilePath ) == 0 ){
+                return true;
+            }
+        }
+        return false;
+    }
+    void Add( const char *FilePath ){
+        //既に読み込まれているとき
+        if( IsIncluded( FilePath ) ) return;
+
+        //追加
+        ppFilePath = (char **)realloc(ppFilePath, ( count + 1 ) * sizeof(char *) );
+        ppFilePath[count] = (char *)malloc( lstrlen(FilePath) + 1 );
+        lstrcpy( ppFilePath[count], FilePath );
+        count++;
+    }
+};
+CRequireFiles *pRequireFiles;
+
+
+//////////////////////////////////////
+// #define間するクラス
+//////////////////////////////////////
 class CDefine{
     int num;
@@ -317 +360 @@
     int i,i2,i3,sw1,FileSize,LineNum,FileLayer[255],layer,LastFileByte[255];
     char *buffer,temporary[MAX_PATH],temp2[MAX_PATH+255],*LayerDir[255];
-    DWORD AccBytes;
-    HANDLE hFile;
 
     IncludeFileInfo.ppFileNames=(char **)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,sizeof(char *));
@@ -350 +391 @@
         }
         if(buffer[i-1]=='\n'&&buffer[i]=='#'){
-            if(memcmp(buffer+i+1,"include",7)==0){
-                i2=i+8;
-                while(buffer[i2]==' '||buffer[i2]=='\t') i2++;
-
-                if(buffer[i2]=='\"') sw1=0;
-                else if(buffer[i2]=='<') sw1=1;
-                i2++;
-
-                for(i3=0;;i2++,i3++){
-                    if((buffer[i2]=='\"'&&sw1==0)||(buffer[i2]=='>'&&sw1==1)||buffer[i2]=='\n'||buffer[i2]=='\0'){
-                        temporary[i3]=0;
-                        break;
-                    }
-                    temporary[i3]=buffer[i2];
-                }
-                while(buffer[i2]!='\n'&&buffer[i2]!='\0') i2++;
-
-                if(sw1){
-                    sprintf(temp2,"%s%s",szIncludeDir,temporary);
-                    lstrcpy(temporary,temp2);
-                }
-                else GetFullPath(temporary,LayerDir[layer]);
+            bool isRequire = false;
+            if(memcmp( buffer + i + 1, "include", 7 ) == 0
+                || memcmp( buffer + i + 1, "require", 7 ) == 0){
+
+                    //#requireの場合
+                    if( buffer[i + 1] == 'r' ) isRequire = true;
+
+                    i2=i+8;
+                    while(buffer[i2]==' '||buffer[i2]=='\t') i2++;
+
+                    if(buffer[i2]=='\"') sw1=0;
+                    else if(buffer[i2]=='<') sw1=1;
+                    i2++;
+
+                    for(i3=0;;i2++,i3++){
+                        if((buffer[i2]=='\"'&&sw1==0)||(buffer[i2]=='>'&&sw1==1)||buffer[i2]=='\n'||buffer[i2]=='\0'){
+                            temporary[i3]=0;
+                            break;
+                        }
+                        temporary[i3]=buffer[i2];
+                    }
+                    while(buffer[i2]!='\n'&&buffer[i2]!='\0') i2++;
+
+                    if(sw1){
+                        sprintf(temp2,"%s%s",szIncludeDir,temporary);
+                        lstrcpy(temporary,temp2);
+                    }
+                    else GetFullPath(temporary,LayerDir[layer]);
             }
             else if(memcmp(buffer+i+1,"prompt",6)==0){
@@ -406 +453 @@
             IncludeFileInfo.FilesNum++;
 
-            //インクルードファイルを読み込む
-            hFile=CreateFile(temporary,GENERIC_READ,0,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
-            if(hFile==INVALID_HANDLE_VALUE){
-                sprintf(temp2,"インクルードファイル \"%s\" をオープンできません",temporary);
-                extern char *basbuf;
-                basbuf=base+2;
-                SetError(-1,temp2,i);
-                break;
-            }
-            FileSize=GetFileSize(hFile,NULL);
-
-            //読み込み
+            //#requireの場合では、既に読み込まれているファイルは読み込まないようにする
+            bool isFake = false;
+            if( isRequire ){
+                if( pRequireFiles->IsIncluded( temporary ) ){
+                    //既に読み込まれているとき
+                    isFake = true;
+                }
+            }
+
             char *temp3;
-            temp3=(char *)HeapAlloc(hHeap,0,FileSize+1);
-            ReadFile(hFile,temp3,FileSize,&AccBytes,NULL);
-            temp3[AccBytes]=0;
-
-            //CRLFをLFに変換
-            ChangeReturnCode(temp3);
-
-            //コメント削除
-            DeleteComment(temp3);
-
-            //#ifdefディレクティブ
-            DirectiveIfdef(temp3);
-
-            FileSize=lstrlen(temp3);
+            if( isFake ){
+                //既に読み込まれているときは空データを生成
+                temp3 = (char *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,1);;
+                FileSize = 0;
+            }
+            else{
+                //取り込まれたファイルを収集する
+                pRequireFiles->Add( temporary );
+
+                //インクルードファイルを読み込む
+                DWORD AccBytes;
+                HANDLE hFile=CreateFile(temporary,GENERIC_READ,0,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
+                if(hFile==INVALID_HANDLE_VALUE){
+                    sprintf(temp2,"インクルードファイル \"%s\" をオープンできません",temporary);
+                    extern char *basbuf;
+                    basbuf=base+2;
+                    SetError(-1,temp2,i);
+                    break;
+                }
+                FileSize=GetFileSize(hFile,NULL);
+
+                //読み込み
+                temp3=(char *)HeapAlloc(hHeap,0,FileSize+1);
+                ReadFile(hFile,temp3,FileSize,&AccBytes,NULL);
+                temp3[AccBytes]=0;
+                CloseHandle(hFile);
+
+                //CRLFをLFに変換
+                ChangeReturnCode(temp3);
+
+                //コメント削除
+                DeleteComment(temp3);
+
+                //#ifdefディレクティブ
+                DirectiveIfdef(temp3);
+
+                FileSize=lstrlen(temp3);
+            }
 
             i3=lstrlen(buffer)+FileSize;
@@ -441 +509 @@
 
             //クローズ
-            CloseHandle(hFile);
             HeapDefaultFree(temp3);
 
@@ -505 +572 @@
 
     //インクルードファイルを読み込む
+    pRequireFiles = new CRequireFiles();
     base=IncludeFiles(base);
+    delete pRequireFiles;
 
     //#define情報を破棄