#include "stdafx.h" void Messenger::Output( const std::string &message ) { //////////////////////////////////////////////////////////////////// // エディットコントロールに出力 //////////////////////////////////////////////////////////////////// extern HWND hMainDlg; // 出力先のエディットコントロールが無効化されていたときはクリアして有効化する if( !IsWindowEnabled( GetDlgItem(hMainDlg,IDC_ERRORLIST) ) ) { SetDlgItemText( hMainDlg, IDC_ERRORLIST, "" ); EnableWindow( GetDlgItem( hMainDlg, IDC_ERRORLIST ), TRUE ); } // エディットコントロールに出力 int i2 = GetWindowTextLength(GetDlgItem(hMainDlg,IDC_ERRORLIST)); SendDlgItemMessage(hMainDlg,IDC_ERRORLIST,EM_SETSEL,i2,i2); SendDlgItemMessage(hMainDlg,IDC_ERRORLIST,EM_REPLACESEL,0,(LPARAM)(message + "\r\n").c_str()); // ログに出力 trace( message ); // 標準出力 std::cout << message << std::endl; } int Messenger::GetNextErrorLine() { extern HWND hMainDlg; int index = GetWindowTextLength(GetDlgItem(hMainDlg,IDC_ERRORLIST)); return static_cast(SendMessage(GetDlgItem(hMainDlg,IDC_ERRORLIST),EM_LINEFROMCHAR,index,0)); } ErrorInfo::ErrorInfo( int errorCode, const std::string &keyword, int sourceIndex ) : errorCode( errorCode ) , keyword( keyword ) , sourceFilePath( "" ) , sourceLineNum( -1 ) { if( sourceIndex != -1 ) { compiler.GetCurrentSource().GetLineInfo( sourceIndex, sourceLineNum, sourceFilePath ); } errorLineNum = compiler.messenger.GetNextErrorLine(); } std::string ErrorInfo::GetMessageString() const { extern HANDLE hHeap; int i2; char temporary[64]; char tempKeyWord[1024]; lstrcpy(tempKeyWord,keyword.c_str()); for(i2=0;;i2++){ if(tempKeyWord[i2]=='\0') break; if(tempKeyWord[i2]==1){ GetDefaultNameFromES(tempKeyWord[i2+1],temporary); SlideString(tempKeyWord+i2+2,lstrlen(temporary)-2); memcpy(tempKeyWord+i2,temporary,lstrlen(temporary)); } } if( errorCode == -1 || errorCode == -2 ) { // 部分エラー return keyword; } char msg[1024]; if(errorCode==3) { for( int i3=0; ; i3++ ) { if( !IsVariableChar( tempKeyWord[i3] ) ) { temporary[i3] = 0; break; } temporary[i3] = tempKeyWord[i3]; } #if defined(JPN) //日本語 sprintf(msg,"\"%s\" 無効な識別子です",temporary); #else //英語 sprintf(msg,"\"%s\" Invalid identifier.",temporary); #endif } if(errorCode==30){ #if defined(JPN) //日本語 if(temporary[0]) sprintf(msg,"\"%s\" の使い方が不正です",tempKeyWord); else lstrcpy(msg,"文法が間違っています"); #else //英語 if(temporary[0]) sprintf(msg,"How to use the \"%s\" is wrong.",tempKeyWord); else lstrcpy(msg,"Syntax Error."); #endif } ///////////////////// // ワーニングエラー ///////////////////// #if defined(JPN) //////////////////// //日本語 //////////////////// if(errorCode==-101) sprintf(msg,"[警告] %sに強制変換されています。データが失われる可能性があります。",tempKeyWord); if(errorCode==-102) sprintf(msg,"[警告] %sに強制変換されています。",tempKeyWord); if(errorCode==-103) sprintf(msg,"[警告] \"%s\" 型が指定されていません。Double型として扱います。",tempKeyWord); if(errorCode==-104) sprintf(msg,"[警告] \"%s\" 戻り値の型が指定されていません。Double型として扱います。",tempKeyWord); if(errorCode==-105) sprintf(msg,"[警告] 一時オブジェクトの解放を行えません。キャスト用オブジェクトを用意してください。",tempKeyWord); if(errorCode==-106) sprintf(msg,"[警告] DLLファイル \"%s\" が見つかりません。",tempKeyWord); if(errorCode==-107) sprintf(msg,"[警告] DLL関数 \"%s\" を参照できません。",tempKeyWord); if(errorCode==-108) lstrcpy(msg,"[警告] Catch節、Finally節を持たない意味のないTryスコープです。"); if(errorCode==-120) sprintf(msg,"[警告] VarPtr関数の引数にオブジェクト インスタンスが指定されました。オブジェクトの先頭アドレスを取得したいときはObjPtr関数に切り替えをお願いします。m(__)m(この警告はVarPtr→ObjPtrへの切り替えが完了したら消します(切り替えは \"適材箇所に限り\" ですので、ご注意ください!))",tempKeyWord); #else #endif /////////////// // 一般エラー /////////////// #if defined(JPN) //////////////////// //日本語 //////////////////// if(errorCode==1) lstrcpy(msg,"文法が間違っています。"); if(errorCode==2) sprintf(msg,"左のオペランドが、左辺値になっていません。"); //errorCode==3は予約されています if(errorCode==4) sprintf(msg,"%sの相互関係が一致しません。",tempKeyWord); if(errorCode==5) sprintf(msg,"ダブルクォートの数が一致しません。"); if(errorCode==6) sprintf(msg,"\"%s\" ジャンプ先が不正です。",tempKeyWord); if(errorCode==7) lstrcpy(msg,"DLL名が長すぎます(拡張子を含め、16文字以下にして下さい)。"); if(errorCode==8) lstrcpy(msg,"コンパイラが認識できない文字コードが含まれています。"); if(errorCode==9) sprintf(msg,"型が違います。"); if(errorCode==10) sprintf(msg,"\"%s\" のパラメータ指定が間違っています。",tempKeyWord); if(errorCode==11) sprintf(msg,"\"%s\" 型が違います。",tempKeyWord); if(errorCode==12) sprintf(msg,"%s の使い方が不正です。",tempKeyWord); if(errorCode==13) sprintf(msg,"\"%s\" を参照できません。",tempKeyWord); if(errorCode==14) sprintf(msg,"\"%s\" 配列指定が不正です。",tempKeyWord); if(errorCode==15) sprintf(msg,"\"%s\" はすでに定義されています。",tempKeyWord); if(errorCode==16) sprintf(msg,"\"%s\" 配列、またはポインタ以外の変数に添え字が指定されています。",tempKeyWord); if(errorCode==17) sprintf(msg,"リソース データが不正です。"); if(errorCode==18) sprintf(msg,"\"%s\"はポインタ変数型です。文字列演算を指定することはできません。",tempKeyWord); if(errorCode==19) sprintf(msg,"\"%s\"は値参照型です。ByVal指定することはできません。",tempKeyWord); if(errorCode==20) lstrcpy(msg,"全角スペースが含まれています(全角スペースはコンパイラが認識できないので、半角スペースまたはタブ文字にしてください)。"); if(errorCode==21) sprintf(msg,"If制御のブロック指定が不正です。"); if(errorCode==22) sprintf(msg,"%s に対する End %s が見つかりません。",tempKeyWord,tempKeyWord); if(errorCode==23) sprintf(msg,"リソース ファイル \"%s\" の読み込みに失敗。",tempKeyWord); if(errorCode==24) lstrcpy(msg,"Export指定の関数のパラメータには実体オブジェクトを利用することはできません(BytePtr型などを利用して下さい)。"); if(errorCode==25) sprintf(msg,"DLL関数にオブジェクトを引き渡すことはできません(%s)。",tempKeyWord); if(errorCode==26) sprintf(msg,"\"%s\" 戻り値の型が指定されていません。",tempKeyWord); if(errorCode==27) sprintf(msg,"\"%s\" は定義されていません。",tempKeyWord); if(errorCode==28) sprintf(msg,"構造体パラメータは参照渡しにしてください(%s)。",tempKeyWord); if(errorCode==29) sprintf(msg,"配列ポインタを要素と同時に引渡すときは、ポインタ参照(ByRef)にしてください。"); //errorCode==30は予約されています if(errorCode==31) sprintf(msg,"\"%s\" は構造体です(メンバの参照はピリオド \".\" で区切ってください)。",tempKeyWord); if(errorCode==32) sprintf(msg,"\"%s\" は構造体ポインタです(メンバの参照は \"->\" で区切ってください)。",tempKeyWord); if(errorCode==33) sprintf(msg,"定数式にリテラル値、または定数以外のものが含まれています。"); if(errorCode==34) sprintf(msg,"定数はモジュールレベルで宣言して下さい。"); if(errorCode==35) sprintf(msg,"インクルードファイル \"%s\" をオープンできません",tempKeyWord); if(errorCode==38) sprintf(msg,"\"%s\" 戻り値が存在しないプロシージャです。",tempKeyWord); if(errorCode==39) sprintf(msg,"\"%s\" はオブジェクトポインタではありません(\"->\" 参照はできません)。",tempKeyWord); if(errorCode==40) lstrcpy(msg,"DLL関数の戻り値としてオブジェクトを受け取ることはできません。"); if(errorCode==41) lstrcpy(msg,"初期データが不正です。"); if(errorCode==42) lstrcpy(msg,"閉じカッコ \")\" の後に不正な文字が含まれています。"); if(errorCode==43) lstrcpy(msg,"ダブルクォートの後に不正な文字が含まれています。"); if(errorCode==45) sprintf(msg,"実数に対して \"%s\" 演算子は利用できません。",tempKeyWord); if(errorCode==46) lstrcpy(msg,"配列の添え字に整数以外の値が与えられています。"); if(errorCode==47) lstrcpy(msg,"As演算子の右辺値に型名以外の識別子が指定されています。"); if(errorCode==48) sprintf(msg,"%s演算子に対して型名が指定されています。",tempKeyWord); if(errorCode==49) lstrcpy(msg,"添え字に整数以外の型が指定されています。"); if(errorCode==50) sprintf(msg,"%sに変換できません。",tempKeyWord); if(errorCode==51) lstrcpy(msg,"オブジェクト、構造体のアラインメント値は 1, 2, 4, 8, 16 のいずれかでなければなりません。"); if(errorCode==52) sprintf(msg,"\"%s\" オーバーロードを解決できません。",tempKeyWord); if(errorCode==53) sprintf(msg,"\"%s\" 出力ファイルの書き込みに失敗しました。実行されている可能性があります。",tempKeyWord); if(errorCode==54) sprintf(msg,"対応する%sが存在しません。",tempKeyWord); if(errorCode==55) sprintf(msg,"\"%s\" は対応するForステートメントで利用されるカウンタ変数ではありません。",tempKeyWord); if(errorCode==56) lstrcpy(msg,"ゼロ割りが行われました。"); if(errorCode==57) lstrcpy(msg,"8進数のリテラル表記が不正です。"); if(errorCode==58) lstrcpy(msg,"16進数のリテラル表記が不正です。"); if(errorCode==59) sprintf(msg,"マニフェスト ファイル \"%s\" の読み込みに失敗。",tempKeyWord); if(errorCode==60) lstrcpy(msg,"Staticステートメントはグローバル領域では使用できません。"); if(errorCode==61) sprintf(msg,"\"%s\" は定数です。書き込みアクセスはできません。",tempKeyWord); if(errorCode==62) sprintf(msg,"グローバル領域でのReturnは禁止されています。",tempKeyWord); if(errorCode==63) lstrcpy(msg,"名前空間が正しく閉じられていません。"); if(errorCode==64) sprintf(msg,"\"%s\" 無効な名前空間です。",tempKeyWord); if(errorCode==65) sprintf(msg,"ローカル領域で%sは使用できません。",tempKeyWord); if(errorCode==66) sprintf(msg,"%s 要求されている関数ポインタのパラメータまたは戻り値が一致しません。", tempKeyWord ); if(errorCode==67) sprintf(msg,"%s 要求されているデリゲートのパラメータまたは戻り値が一致しません。", tempKeyWord ); if(errorCode==68) sprintf(msg,"\"%s\" 不正な関数名です。", tempKeyWord); if(errorCode==69) sprintf(msg,"\"%s\" 不正なメソッド名です。", tempKeyWord); if(errorCode==70) lstrcpy(msg,"一つのTryに対して複数のFinallyを記述できません。"); if(errorCode==71) lstrcpy(msg,"Finallyの後ろにCatchを記述することはできません。"); if(errorCode==72) lstrcpy(msg,"Catchのパラメータの型が指定されていません。"); if(errorCode==73) lstrcpy(msg,"\"%s\" Catchのパラメータの型はクラス型でなければなりません。"); if(errorCode==74) sprintf(msg,"\"%s\" 型として認識できません。",tempKeyWord); //オブジェクト関連 if(errorCode==102) sprintf(msg,"\"%s\" オブジェクトは定義されていません。",tempKeyWord); if(errorCode==103) sprintf(msg,"\"%s\" メンバは定義されていません。",tempKeyWord); if(errorCode==104) sprintf(msg,"\"%s\" 参照方法が違います。",tempKeyWord); if(errorCode==105) sprintf(msg,"\"%s\" 自身のクラスを継承することはできません。",tempKeyWord); if(errorCode==106) sprintf(msg,"\"%s\" 存在しないクラスです。",tempKeyWord); if(errorCode==107) sprintf(msg,"Privateメンバ \"%s\" にアクセスすることはできません。",tempKeyWord); if(errorCode==108) sprintf(msg,"Protectedメンバ \"%s\" にアクセスすることはできません。",tempKeyWord); if(errorCode==109) sprintf(msg,"Privateメンバ関数 \"%s\" を呼び出すことはできません。",tempKeyWord); if(errorCode==110) sprintf(msg,"Protectedメンバ関数 \"%s\" を呼び出すことはできません。",tempKeyWord); if(errorCode==111) lstrcpy(msg,"InheritsはClass定義内の先頭に記述する必要があります。"); if(errorCode==112) sprintf(msg,"\"%s\" はクラス型ではないため、初期パラメータを指定することはできません。",tempKeyWord); if(errorCode==113) sprintf(msg,"\"%s\" コンストラクタへ渡すパラメータが不正です。",tempKeyWord); if(errorCode==114) lstrcpy(msg,"デストラクタはパラメータを持てません。"); if(errorCode==115) lstrcpy(msg,"コンストラクタ及びデストラクタは戻り値を持てません。"); //if(errorCode==116) lstrcpy(msg,"コンストラクタ及びデストラクタはパブリックアクセスにしなければなりません。"); if(errorCode==117) lstrcpy(msg,"デストラクタの名前が \"~クラス名\" になっていません。"); if(errorCode==118) lstrcpy(msg,"参照する基底クラスが存在しません。"); if(errorCode==119) sprintf(msg,"\"%s\" メンバは基底クラスで定義されていません。",tempKeyWord); if(errorCode==120) lstrcpy(msg,"デストラクトするオブジェクトの型が不明です。"); if(errorCode==121) lstrcpy(msg,"New演算子にはクラス以外の型を指定できません。"); if(errorCode==122) lstrcpy(msg,"Delete演算子にポインタ以外の型が指定されています。"); if(errorCode==123) lstrcpy(msg,"ループ継承が行われました。"); if(errorCode==124) lstrcpy(msg,"循環参照が行われました。"); if(errorCode==125) sprintf(msg,"\"%s\" は抽象クラスです。インスタンス化することはできません。",tempKeyWord); if(errorCode==126) lstrcpy(msg,"オペレータのオーバーロードをクラスの外で行うことはできません。"); if(errorCode==127) lstrcpy(msg,"Override修飾子の指定が無い状況でオーバーライドを行うことはできません。"); if(errorCode==128) lstrcpy(msg,"オーバーライドを行うときはアクセシビリティを同一にしなければなりません。"); if(errorCode==129) sprintf(msg,"静的メンバ \"%s\" は定義されていません。",tempKeyWord); if(errorCode==130) sprintf(msg,"\"%s\" はオブジェクト定数です。書き込みアクセスはできません。",tempKeyWord); if(errorCode==131) lstrcpy(msg,"Const定義されたメソッド内でクラスメンバへの書き込みアクセスはできません。"); if(errorCode==132) lstrcpy(msg,"明示的なコンストラクタ呼び出しと初期値の指定を同時に行うことはできません。"); if(errorCode==133) lstrcpy(msg,"Thisに代入はできません。"); if(errorCode==134) lstrcpy( msg,"ObjPtr関数にはオブジェクト インスタンス以外を指定できません。" ); if(errorCode==135) lstrcpy( msg, "クラス以外の型を継承元として指定することはできません。" ); if(errorCode==136) sprintf( msg, "\"%s\" 非仮想関数に対してオーバーライドしようとしました。", tempKeyWord ); if(errorCode==137) lstrcpy(msg,"ImplementsはClass定義内の先頭に記述する必要があります。"); if(errorCode==138) sprintf(msg,"%s はインターフェイスではありません。Implementsできるのはインターフェイスに限ります。",tempKeyWord); if(errorCode==139) sprintf(msg,"%s はインターフェイスではありません。",tempKeyWord); if(errorCode==140) lstrcpy(msg,"Align修飾子を構造体以外の型に指定することはできません。"); if(errorCode==141) lstrcpy(msg,"Blittable修飾子をクラス以外の型に指定することはできません。"); if(errorCode==142) lstrcpy(msg,"不正なThis参照です。"); if(errorCode==143) sprintf(msg,"\"%s\" ジェネリクス型に型パラメータが指定されていません。",tempKeyWord); //Enum関連 if(errorCode==150) sprintf(msg,"\"%s\" 値が定義されていません。",tempKeyWord); if(errorCode==151) sprintf(msg,"\"%s\" 列挙リストに登録されていません。",tempKeyWord); //リンカ if(errorCode==200) sprintf(msg,"\"%s\" 未解決です (リンク エラー)。",tempKeyWord); if(errorCode==201) sprintf(msg,"\"%s\" の読み込みに失敗。",tempKeyWord); if(errorCode==202) sprintf(msg,"\"%s\" は存在しません。",tempKeyWord); if(errorCode==203) sprintf(msg,"\"%s\" は存在しますが、読み込めません(古いバージョンのコンパイラでビルドされた可能性があります)。",tempKeyWord); //原因不明 if(errorCode==300) lstrcpy(msg,"内部エラー"); // ベースライブラリ不整合 if( errorCode == 400 ) sprintf( msg, "\"%s\" が存在しません。標準ライブラリの内容が古い可能性があります。", tempKeyWord ); #else //////////////////// //英語 //////////////////// if(errorCode==1) lstrcpy(msg,"Syntax Error."); if(errorCode==2) sprintf(msg,"Left operand must be l-value."); //errorCode==3は予約されています if(errorCode==4) sprintf(msg,"Correlation of %s is wrong.",tempKeyWord); if(errorCode==5) sprintf(msg,"Correlation of double quotes is wrong."); if(errorCode==6) sprintf(msg,"\"%s\" Label not found.",tempKeyWord); if(errorCode==7) lstrcpy(msg,"The DLL name is too long. Must be 16 characters or less."); if(errorCode==8) lstrcpy(msg,"The inaccurate characters are contained."); if(errorCode==9) sprintf(msg,"Type is wrong."); if(errorCode==10) sprintf(msg,"\"%s\" Rule of parameter is wrong.",tempKeyWord); if(errorCode==11) sprintf(msg,"\"%s\" Type is wrong.",tempKeyWord); if(errorCode==12) sprintf(msg,"\"%s\" Not a valid use.",tempKeyWord); if(errorCode==13) sprintf(msg,"Cannot refer to \"%s\".",tempKeyWord); if(errorCode==14) sprintf(msg,"\"%s\" Array argument(s) out of bound.",tempKeyWord); if(errorCode==15) sprintf(msg,"\"%s\" is already defined.",tempKeyWord); if(errorCode==16) sprintf(msg,"\"%s\" Argument(s) following variable which is not pointer or array.",tempKeyWord); if(errorCode==17) sprintf(msg,"Invalid resource data."); if(errorCode==18) sprintf(msg,"\"%s\" Invalid operation on a pointer variable.",tempKeyWord); if(errorCode==19) sprintf(msg,"\"%s\" is already to be passed by value. You cannot use \"ByVal\".",tempKeyWord); if(errorCode==21) sprintf(msg,"Wrong structure of \"If\" block."); if(errorCode==22) sprintf(msg,"No matching \"End %s\" found for \"%s\".",tempKeyWord,tempKeyWord); if(errorCode==23) sprintf(msg,"Cannot read the resource file \"%s\".",tempKeyWord); if(errorCode==24) lstrcpy(msg,"Must not use String type as an argument for exported function. (Use BytePtr type instead.)"); if(errorCode==27) sprintf(msg,"\"%s\" Undefined procedure.",tempKeyWord); if(errorCode==28) sprintf(msg,"\"%s\" Structure must not be passed by value. (Use \"ByRef\".)",tempKeyWord); if(errorCode==29) sprintf(msg,"Array must not be passed by value. (Use \"ByRef\".)"); //errorCode==30は予約されています if(errorCode==31) sprintf(msg,"\"%s\" is a struct. (Use period \".\" to refer to the members.)",tempKeyWord); if(errorCode==32) sprintf(msg,"\"%s\" is a pointer of struct. (Use arrow \"->\" to refer to the members.)",tempKeyWord); if(errorCode==33) sprintf(msg,"Constant formula has a thing that is not literal value or constant value."); if(errorCode==34) sprintf(msg,"Constant formula must be defined in the module level."); if(errorCode==38) sprintf(msg,"\"%s\" is a procedure without a return value.",tempKeyWord); if(errorCode==39) sprintf(msg,"\"%s\" is not object pointer. \"->\" is invalid.",tempKeyWord); if(errorCode==40) lstrcpy(msg,"Cannot set a object to return value."); if(errorCode==41) lstrcpy(msg,"Init data is wrong."); if(errorCode==42) lstrcpy(msg,"The inaccurate characters are contained after the closing parenthesis \")\"."); if(errorCode==43) lstrcpy(msg,"The inaccurate characters are contained after the double quote."); //オブジェクト関連 if(errorCode==102) sprintf(msg,"\"%s\" The object is not defined.",tempKeyWord); if(errorCode==103) sprintf(msg,"\"%s\" The member is not defined.",tempKeyWord); if(errorCode==104) sprintf(msg,"\"%s\" The reference character is different.",tempKeyWord); if(errorCode==105) sprintf(msg,"\"%s\" An own class is not inheritable.",tempKeyWord); if(errorCode==106) sprintf(msg,"\"%s\" It class is not defined.",tempKeyWord); if(errorCode==107) sprintf(msg,"\"%s\" Cannot access the private member.",tempKeyWord); if(errorCode==108) sprintf(msg,"\"%s\" Cannot access the protected member.",tempKeyWord); if(errorCode==109) sprintf(msg,"\"%s\" Cannot call the private member.",tempKeyWord); if(errorCode==110) sprintf(msg,"\"%s\" Cannot call the protected member.",tempKeyWord); if(errorCode==111) lstrcpy(msg,"The Inherits phrase must be described to the 1st line of class module"); if(errorCode==112) sprintf(msg,"\"%s\" is not class object. Therefor you cannot set the parameter for constructor.",tempKeyWord); if(errorCode==113) sprintf(msg,"\"%s\" The parameter for constructor is wrong.",tempKeyWord); if(errorCode==114) lstrcpy(msg,"Destructor cannot have a parameter."); if(errorCode==115) lstrcpy(msg,"Constructor and Destructor cannot have a return value."); if(errorCode==116) lstrcpy(msg,"Constructor and Destructor must be public access."); if(errorCode==117) lstrcpy(msg,"Destructors name must be \"~ClassName\"."); if(errorCode==118) lstrcpy(msg,"Super class is not found."); if(errorCode==119) sprintf(msg,"\"%s\" The member is not defined in the super class.",tempKeyWord); //Enum関連 if(errorCode==150) sprintf(msg,"\"%s\" The value is not set",tempKeyWord); if(errorCode==151) sprintf(msg,"\"%s\" is not found from enum lists.",tempKeyWord); //リンカ if(errorCode==200) sprintf(msg,"\"%s\" Unknown error.",tempKeyWord); #endif return msg; } std::string ErrorInfo::GetFullMessageString() const { if( sourceLineNum != -1 ) { char temporary[1024]; sprintf( temporary, "%s(%d) : %s", sourceFilePath.c_str(), sourceLineNum + 1, GetMessageString().c_str() ); return temporary; } return GetMessageString(); } void ErrorMessenger::Output( const ErrorInfo &errorInfo ) { if( errorInfo.GetErrorCode() == 3 ) { if( errorInfo.GetKeyword().size() <= 0 ) { // ありえない throw; } if( Jenga::Common::IsExistString( synonymKeyWords, errorInfo.GetKeyword() ) ) { // 既にエラーが出力されている場合は無視 return; } synonymKeyWords.push_back( errorInfo.GetKeyword() ); } errorInfos.push_back( errorInfo ); // 文字列を出力 Messenger::Output( errorInfo.GetFullMessageString() ); } void ErrorMessenger::Output( int errorCode, const std::string &keyword, int sourceIndex ) { Output( ErrorInfo( errorCode, keyword, sourceIndex ) ); } void ErrorMessenger::Output( int errorCode, const char *keyword, int sourceIndex ) { if( !keyword ) { keyword = ""; } Output( errorCode, std::string( keyword ), sourceIndex ); } void ErrorMessenger::OutputFatalError() { Output( 300, "", cp ); } void ErrorMessenger::ClearSynonymKeyWords() { synonymKeyWords.clear(); } int ErrorMessenger::GetErrorCount() const { int count = 0; BOOST_FOREACH( const ErrorInfo &errorInfo, errorInfos ) { if( !errorInfo.IsWarning() ) { count ++; } } return count; } bool ErrorMessenger::HasError() const { return ( GetErrorCount() > 0 ); } int ErrorMessenger::GetWarningCount() const { int count = 0; BOOST_FOREACH( const ErrorInfo &errorInfo, errorInfos ) { if( errorInfo.IsWarning() ) { count ++; } } return count; } void ErrorMessenger::ShowErrorLine( int errorLineNum ) { const ErrorInfo *pErrorInfo = NULL; BOOST_FOREACH( const ErrorInfo &errorInfo, errorInfos ) { if( errorInfo.GetErrorLineNum() == errorLineNum ) { pErrorInfo = &errorInfo; break; } } if( !pErrorInfo ) { // 該当なし return; } if( pErrorInfo->GetSourceLineNum() == -1 ) { return; } HANDLE hFile; DWORD dw; char FileName[MAX_PATH]; char temporary[MAX_PATH]; lstrcpy( FileName, pErrorInfo->GetSourceFilePath().c_str() ); if(IsWindow(hOwnerEditor)){ if(FileName){ while( !IsFileExist( FileName ) ){ char temp2[MAX_PATH],temp3[MAX_PATH]; _splitpath(FileName,NULL,NULL,temp2,temp3); lstrcat(temp2,temp3); sprintf(temporary,"\"%s\" が見つかりません。格納されているディレクトリを指定してください。",temp2); if(!GetFolder(hOwnerEditor,temp3,temporary)) return; if(temp3[lstrlen(temp3)-1]!='\\') lstrcat(temp3,"\\"); sprintf(FileName,"%s%s",temp3,temp2); } hFile=CreateFile( ( ActiveBasic::Common::Environment::GetAbdevRootPath() + "\\pgm.tmp" ).c_str(), GENERIC_WRITE,0,NULL,CREATE_ALWAYS,FILE_ATTRIBUTE_ARCHIVE|FILE_ATTRIBUTE_HIDDEN|FILE_ATTRIBUTE_TEMPORARY,NULL); WriteFile(hFile,FileName,lstrlen(FileName),&dw,NULL); CloseHandle(hFile); SendMessage(hOwnerEditor,WM_SHOWERROR,pErrorInfo->GetSourceLineNum(),0); } } }