[206] | 1 | #include "stdafx.h"
|
---|
| 2 |
|
---|
[193] | 3 | #include <jenga/include/smoothie/Smoothie.h>
|
---|
| 4 | #include <jenga/include/smoothie/SmoothieException.h>
|
---|
[206] | 5 | #include <jenga/include/smoothie/LexicalAnalysis.h>
|
---|
[193] | 6 |
|
---|
| 7 | #include <TypeDef.h>
|
---|
| 8 | #include <Compiler.h>
|
---|
[195] | 9 | #include <NamespaceSupporter.h>
|
---|
[193] | 10 |
|
---|
| 11 | TypeDef::TypeDef( const NamespaceScopes &namespaceScopes, const string &name, const string &baseName, int nowLine )
|
---|
[206] | 12 | : Symbol( namespaceScopes, name )
|
---|
[193] | 13 | , baseName( baseName )
|
---|
| 14 | {
|
---|
[299] | 15 | if( !compiler.StringToType( baseName, baseType ) ){
|
---|
[193] | 16 | SmoothieException::Throw(3, baseName, nowLine );
|
---|
| 17 | return;
|
---|
| 18 | }
|
---|
| 19 | }
|
---|
[206] | 20 | /*
|
---|
[193] | 21 | bool TypeDef::IsEqualSymbol( const NamespaceScopes &namespaceScopes, const string &name ) const
|
---|
| 22 | {
|
---|
| 23 | if( GetName() != name ){
|
---|
| 24 | return false;
|
---|
| 25 | }
|
---|
[199] | 26 | return compiler.GetNamespaceSupporter().IsSameAreaNamespace( this->namespaceScopes, namespaceScopes );
|
---|
[193] | 27 | }
|
---|
| 28 | bool TypeDef::IsEqualSymbol( const string &fullName ) const
|
---|
| 29 | {
|
---|
| 30 | char AreaName[VN_SIZE] = ""; //オブジェクト変数
|
---|
| 31 | char NestName[VN_SIZE] = ""; //入れ子メンバ
|
---|
[206] | 32 | bool isNest = SplitMemberName( fullName.c_str(), AreaName, NestName );
|
---|
[193] | 33 |
|
---|
| 34 | if( IsEqualSymbol( NamespaceScopes( AreaName ), NestName ) ){
|
---|
| 35 | return true;
|
---|
| 36 | }
|
---|
| 37 |
|
---|
| 38 | if( isNest ){
|
---|
| 39 | // 静的メンバを考慮
|
---|
| 40 |
|
---|
| 41 | char AreaName2[VN_SIZE] = ""; //オブジェクト変数
|
---|
| 42 | char NestName2[VN_SIZE] = ""; //入れ子メンバ
|
---|
[206] | 43 | bool isNest = SplitMemberName( AreaName, AreaName2, NestName2 );
|
---|
[193] | 44 | lstrcat( NestName2, "." );
|
---|
| 45 | lstrcat( NestName2, NestName );
|
---|
| 46 |
|
---|
| 47 | return IsEqualSymbol( NamespaceScopes( AreaName2 ), NestName2 );
|
---|
| 48 | }
|
---|
| 49 |
|
---|
| 50 | return false;
|
---|
[206] | 51 | }*/
|
---|
[193] | 52 |
|
---|
| 53 |
|
---|
| 54 |
|
---|
| 55 | TypeDefCollection::TypeDefCollection(){
|
---|
| 56 | }
|
---|
| 57 | TypeDefCollection::~TypeDefCollection(){
|
---|
| 58 | }
|
---|
| 59 | void TypeDefCollection::Add( const NamespaceScopes &namespaceScopes, const string &name, const string &baseName, int nowLine ){
|
---|
| 60 | TypeDef typeDef( namespaceScopes, name, baseName, nowLine );
|
---|
| 61 | this->push_back( typeDef );
|
---|
| 62 | }
|
---|
| 63 | int TypeDefCollection::GetIndex( const NamespaceScopes &namespaceScopes, const string &name ) const{
|
---|
| 64 | int max = (int)(*this).size();
|
---|
| 65 | for( int i=0; i<max; i++ ){
|
---|
| 66 | if( (*this)[i].IsEqualSymbol( namespaceScopes, name ) ){
|
---|
| 67 | return i;
|
---|
| 68 | }
|
---|
| 69 | }
|
---|
| 70 | return -1;
|
---|
| 71 | }
|
---|
| 72 | int TypeDefCollection::GetIndex( const string &fullName ) const{
|
---|
| 73 | char AreaName[VN_SIZE] = ""; //オブジェクト変数
|
---|
| 74 | char NestName[VN_SIZE] = ""; //入れ子メンバ
|
---|
[206] | 75 | bool isNest = SplitMemberName( fullName.c_str(), AreaName, NestName );
|
---|
[193] | 76 |
|
---|
| 77 | return GetIndex( NamespaceScopes( AreaName ), NestName );
|
---|
| 78 | }
|
---|
| 79 |
|
---|
| 80 | void TypeDefCollection::Add( const NamespaceScopes &namespaceScopes, const string &expression, int nowLine ){
|
---|
| 81 | int i;
|
---|
| 82 | char temporary[VN_SIZE];
|
---|
| 83 |
|
---|
| 84 | for(i=0;;i++){
|
---|
| 85 | if(expression[i]=='='||expression[i]=='\0'){
|
---|
| 86 | temporary[i]=0;
|
---|
| 87 | break;
|
---|
| 88 | }
|
---|
| 89 | temporary[i]=expression[i];
|
---|
| 90 | }
|
---|
| 91 |
|
---|
| 92 | if(expression[i]!='='){
|
---|
| 93 | SmoothieException::Throw(10,"TypeDef",nowLine);
|
---|
| 94 | return;
|
---|
| 95 | }
|
---|
| 96 |
|
---|
| 97 | const char *pTemp=expression.c_str()+i+1;
|
---|
| 98 |
|
---|
| 99 | //識別文字のエラーチェック(新しい型)
|
---|
| 100 | i=0;
|
---|
| 101 | for(;;i++){
|
---|
| 102 | if(temporary[i]=='\0') break;
|
---|
| 103 | if(!IsVariableChar(temporary[i])){
|
---|
| 104 | SmoothieException::Throw(10,"TypeDef",nowLine);
|
---|
| 105 | return;
|
---|
| 106 | }
|
---|
| 107 | }
|
---|
| 108 |
|
---|
| 109 | //識別文字のエラーチェック(コピー元の型)
|
---|
| 110 | if(pTemp[0]=='*'&&pTemp[1]==1&&(pTemp[2]==ESC_FUNCTION||pTemp[2]==ESC_SUB)){
|
---|
| 111 | //関数ポインタ
|
---|
| 112 | if(pTemp[3]!='('){
|
---|
| 113 | SmoothieException::Throw(10,"TypeDef",nowLine);
|
---|
| 114 | return;
|
---|
| 115 | }
|
---|
| 116 | }
|
---|
| 117 | else{
|
---|
| 118 | i=0;
|
---|
| 119 | while(pTemp[i]=='*') i++;
|
---|
| 120 | for(;;i++){
|
---|
| 121 | if(pTemp[i]=='\0') break;
|
---|
| 122 | if(!IsVariableChar(pTemp[i])){
|
---|
| 123 | SmoothieException::Throw(10,"TypeDef",nowLine);
|
---|
| 124 | return;
|
---|
| 125 | }
|
---|
| 126 | }
|
---|
| 127 | }
|
---|
| 128 |
|
---|
| 129 | //識別子が重複している場合はエラーにする
|
---|
| 130 | if(lstrcmp(temporary,pTemp)==0){
|
---|
| 131 | SmoothieException::Throw(1,NULL,nowLine);
|
---|
| 132 | return;
|
---|
| 133 | }
|
---|
| 134 |
|
---|
| 135 |
|
---|
| 136 |
|
---|
| 137 | //////////////////////////
|
---|
| 138 | // TypeDef情報を追加
|
---|
| 139 | //////////////////////////
|
---|
| 140 |
|
---|
| 141 | Add( namespaceScopes, temporary, pTemp, nowLine );
|
---|
| 142 | }
|
---|
| 143 |
|
---|
[272] | 144 | void TypeDefCollection::CollectTypeDefs(){
|
---|
[193] | 145 |
|
---|
| 146 | // 名前空間管理
|
---|
[199] | 147 | NamespaceScopes &namespaceScopes = compiler.GetNamespaceSupporter().GetLivingNamespaceScopes();
|
---|
[193] | 148 | namespaceScopes.clear();
|
---|
| 149 |
|
---|
| 150 | // Importsされた名前空間の管理
|
---|
[199] | 151 | NamespaceScopesCollection &importedNamespaces = compiler.GetNamespaceSupporter().GetImportedNamespaces();
|
---|
[193] | 152 | importedNamespaces.clear();
|
---|
| 153 |
|
---|
| 154 | int i=-1, i2;
|
---|
| 155 | char temporary[VN_SIZE];
|
---|
| 156 | while(1){
|
---|
| 157 | extern char *basbuf;
|
---|
| 158 |
|
---|
| 159 | i++;
|
---|
| 160 |
|
---|
| 161 | if( basbuf[i] == 1 && basbuf[i+1] == ESC_NAMESPACE ){
|
---|
| 162 | for(i+=2,i2=0;;i2++,i++){
|
---|
| 163 | if( IsCommandDelimitation( basbuf[i] ) ){
|
---|
| 164 | temporary[i2]=0;
|
---|
| 165 | break;
|
---|
| 166 | }
|
---|
| 167 | temporary[i2]=basbuf[i];
|
---|
| 168 | }
|
---|
| 169 | namespaceScopes.push_back( temporary );
|
---|
| 170 |
|
---|
| 171 | continue;
|
---|
| 172 | }
|
---|
| 173 | else if( basbuf[i] == 1 && basbuf[i+1] == ESC_ENDNAMESPACE ){
|
---|
| 174 | if( namespaceScopes.size() <= 0 ){
|
---|
| 175 | SmoothieException::Throw(12, "End Namespace", i );
|
---|
| 176 | }
|
---|
| 177 | else{
|
---|
| 178 | namespaceScopes.pop_back();
|
---|
| 179 | }
|
---|
| 180 |
|
---|
| 181 | i += 2;
|
---|
| 182 | continue;
|
---|
| 183 | }
|
---|
| 184 | else if( basbuf[i] == 1 && basbuf[i+1] == ESC_IMPORTS ){
|
---|
| 185 | for(i+=2,i2=0;;i2++,i++){
|
---|
| 186 | if( IsCommandDelimitation( basbuf[i] ) ){
|
---|
| 187 | temporary[i2]=0;
|
---|
| 188 | break;
|
---|
| 189 | }
|
---|
| 190 | temporary[i2]=basbuf[i];
|
---|
| 191 | }
|
---|
[199] | 192 | if( !compiler.GetNamespaceSupporter().ImportsNamespace( temporary ) )
|
---|
[193] | 193 | {
|
---|
| 194 | SmoothieException::Throw(64,temporary,i );
|
---|
| 195 | }
|
---|
| 196 |
|
---|
| 197 | continue;
|
---|
| 198 | }
|
---|
| 199 | else if( basbuf[i] == 1 && basbuf[i+1] == ESC_CLEARNAMESPACEIMPORTED ){
|
---|
| 200 | importedNamespaces.clear();
|
---|
| 201 | continue;
|
---|
| 202 | }
|
---|
| 203 |
|
---|
| 204 | if( basbuf[i]==1 ){
|
---|
| 205 | char temporary[VN_SIZE];
|
---|
| 206 | if(basbuf[i+1]==ESC_TYPEDEF){
|
---|
| 207 | int i2 = 0;
|
---|
| 208 | for(i+=2;;i2++,i++){
|
---|
| 209 | if(basbuf[i]=='\n'){
|
---|
| 210 | temporary[i2]=0;
|
---|
| 211 | break;
|
---|
| 212 | }
|
---|
| 213 | temporary[i2]=basbuf[i];
|
---|
| 214 | if(basbuf[i]=='\0') break;
|
---|
| 215 | }
|
---|
| 216 | Add( namespaceScopes, temporary, i );
|
---|
| 217 |
|
---|
| 218 | continue;
|
---|
| 219 | }
|
---|
| 220 | else if( basbuf[i+1] == ESC_CONST && basbuf[i+2] == 1 && basbuf[i+3] == ESC_ENUM ){
|
---|
| 221 | int i2 = 0;
|
---|
| 222 | for(i+=4;;i2++,i++){
|
---|
| 223 | if(!IsVariableChar(basbuf[i])){
|
---|
| 224 | temporary[i2]=0;
|
---|
| 225 | break;
|
---|
| 226 | }
|
---|
| 227 | temporary[i2]=basbuf[i];
|
---|
| 228 | if(basbuf[i]=='\0') break;
|
---|
| 229 | }
|
---|
| 230 | Add( namespaceScopes, temporary, "Long", i );
|
---|
| 231 | }
|
---|
| 232 | }
|
---|
| 233 |
|
---|
| 234 | //次の行
|
---|
| 235 | for(;;i++){
|
---|
| 236 | if(IsCommandDelimitation(basbuf[i])) break;
|
---|
| 237 | }
|
---|
| 238 | if(basbuf[i]=='\0') break;
|
---|
| 239 | }
|
---|
| 240 | }
|
---|