diff -r 000000000000 -r 876b1a06bc25 tools/icheck/parser/src/shared/cplusplus/CheckSpecifier.cpp --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/tools/icheck/parser/src/shared/cplusplus/CheckSpecifier.cpp Wed Aug 25 15:49:42 2010 +0300 @@ -0,0 +1,439 @@ +/**************************************************************************** +** +** Copyright (C) 2010 Nokia Corporation and/or its subsidiary(-ies). +** All rights reserved. +** Contact: Nokia Corporation (qt-info@nokia.com) +** +** This file is part of the Qt Mobility Components. +** +** $QT_BEGIN_LICENSE:LGPL$ +** No Commercial Usage +** This file contains pre-release code and may not be distributed. +** You may use this file in accordance with the terms and conditions +** contained in the Technology Preview License Agreement accompanying +** this package. +** +** GNU Lesser General Public License Usage +** Alternatively, this file may be used under the terms of the GNU Lesser +** General Public License version 2.1 as published by the Free Software +** Foundation and appearing in the file LICENSE.LGPL included in the +** packaging of this file. Please review the following information to +** ensure the GNU Lesser General Public License version 2.1 requirements +** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html. +** +** In addition, as a special exception, Nokia gives you certain additional +** rights. These rights are described in the Nokia Qt LGPL Exception +** version 1.1, included in the file LGPL_EXCEPTION.txt in this package. +** +** If you have questions regarding the use of this file, please contact +** Nokia at qt-info@nokia.com. +** +** +** +** +** +** +** +** +** $QT_END_LICENSE$ +** +****************************************************************************/ +// Copyright (c) 2008 Roberto Raggi +// +// Permission is hereby granted, free of charge, to any person obtaining a copy +// of this software and associated documentation files (the "Software"), to deal +// in the Software without restriction, including without limitation the rights +// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell +// copies of the Software, and to permit persons to whom the Software is +// furnished to do so, subject to the following conditions: +// +// The above copyright notice and this permission notice shall be included in +// all copies or substantial portions of the Software. +// +// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, +// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN +// THE SOFTWARE. + +#include "CheckSpecifier.h" +#include "Semantic.h" +#include "AST.h" +#include "Token.h" +#include "TranslationUnit.h" +#include "Literals.h" +#include "Names.h" +#include "CoreTypes.h" +#include "Symbols.h" +#include "Control.h" +#include "Scope.h" + +using namespace CPlusPlus; + +CheckSpecifier::CheckSpecifier(Semantic *semantic) + : SemanticCheck(semantic), + _specifier(0), + _scope(0) +{ } + +CheckSpecifier::~CheckSpecifier() +{ } + +FullySpecifiedType CheckSpecifier::check(SpecifierListAST *specifier, Scope *scope) +{ + FullySpecifiedType previousType = switchFullySpecifiedType(FullySpecifiedType()); + Scope *previousScope = switchScope(scope); + SpecifierListAST *previousSpecifier = switchSpecifier(specifier); + accept(specifier); + (void) switchSpecifier(previousSpecifier); + (void) switchScope(previousScope); + return switchFullySpecifiedType(previousType); +} + +FullySpecifiedType CheckSpecifier::check(ObjCTypeNameAST *typeName, Scope *scope) +{ + FullySpecifiedType previousType = switchFullySpecifiedType(FullySpecifiedType()); + Scope *previousScope = switchScope(scope); + + accept(typeName); + + (void) switchScope(previousScope); + return switchFullySpecifiedType(previousType); +} + +SpecifierListAST *CheckSpecifier::switchSpecifier(SpecifierListAST *specifier) +{ + SpecifierListAST *previousSpecifier = _specifier; + _specifier = specifier; + return previousSpecifier; +} + +FullySpecifiedType CheckSpecifier::switchFullySpecifiedType(const FullySpecifiedType &type) +{ + FullySpecifiedType previousType = _fullySpecifiedType; + _fullySpecifiedType = type; + return previousType; +} + +Scope *CheckSpecifier::switchScope(Scope *scope) +{ + Scope *previousScope = _scope; + _scope = scope; + return previousScope; +} + +bool CheckSpecifier::visit(SimpleSpecifierAST *ast) +{ + switch (tokenKind(ast->specifier_token)) { + case T_CONST: + if (_fullySpecifiedType.isConst()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setConst(true); + break; + + case T_VOLATILE: + if (_fullySpecifiedType.isVolatile()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setVolatile(true); + break; + + case T_FRIEND: + if (_fullySpecifiedType.isFriend()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setFriend(true); + break; + + case T_REGISTER: + if (_fullySpecifiedType.isRegister()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setRegister(true); + break; + + case T_STATIC: + if (_fullySpecifiedType.isStatic()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setStatic(true); + break; + + case T_EXTERN: + if (_fullySpecifiedType.isExtern()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setExtern(true); + break; + + case T_MUTABLE: + if (_fullySpecifiedType.isMutable()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setMutable(true); + break; + + case T_TYPEDEF: + if (_fullySpecifiedType.isTypedef()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setTypedef(true); + break; + + case T_INLINE: + if (_fullySpecifiedType.isInline()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setInline(true); + break; + + case T_VIRTUAL: + if (_fullySpecifiedType.isVirtual()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setVirtual(true); + break; + + case T_EXPLICIT: + if (_fullySpecifiedType.isExplicit()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setExplicit(true); + break; + + case T_SIGNED: + if (_fullySpecifiedType.isSigned()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setSigned(true); + break; + + case T_UNSIGNED: + if (_fullySpecifiedType.isUnsigned()) + translationUnit()->error(ast->specifier_token, + "duplicate `%s'", spell(ast->specifier_token)); + _fullySpecifiedType.setUnsigned(true); + break; + + case T_CHAR: + if (_fullySpecifiedType) + translationUnit()->error(ast->specifier_token, + "duplicate data type in declaration"); + _fullySpecifiedType.setType(control()->integerType(IntegerType::Char)); + break; + + case T_WCHAR_T: + if (_fullySpecifiedType) + translationUnit()->error(ast->specifier_token, + "duplicate data type in declaration"); + _fullySpecifiedType.setType(control()->integerType(IntegerType::WideChar)); + break; + + case T_BOOL: + if (_fullySpecifiedType) + translationUnit()->error(ast->specifier_token, + "duplicate data type in declaration"); + _fullySpecifiedType.setType(control()->integerType(IntegerType::Bool)); + break; + + case T_SHORT: + if (_fullySpecifiedType) { + IntegerType *intType = control()->integerType(IntegerType::Int); + if (_fullySpecifiedType.type() != intType) + translationUnit()->error(ast->specifier_token, + "duplicate data type in declaration"); + } + _fullySpecifiedType.setType(control()->integerType(IntegerType::Short)); + break; + + case T_INT: + if (_fullySpecifiedType) { + Type *tp = _fullySpecifiedType.type(); + IntegerType *shortType = control()->integerType(IntegerType::Short); + IntegerType *longType = control()->integerType(IntegerType::Long); + IntegerType *longLongType = control()->integerType(IntegerType::LongLong); + if (tp == shortType || tp == longType || tp == longLongType) + break; + translationUnit()->error(ast->specifier_token, + "duplicate data type in declaration"); + } + _fullySpecifiedType.setType(control()->integerType(IntegerType::Int)); + break; + + case T_LONG: + if (_fullySpecifiedType) { + Type *tp = _fullySpecifiedType.type(); + IntegerType *intType = control()->integerType(IntegerType::Int); + IntegerType *longType = control()->integerType(IntegerType::Long); + FloatType *doubleType = control()->floatType(FloatType::Double); + if (tp == longType) { + _fullySpecifiedType.setType(control()->integerType(IntegerType::LongLong)); + break; + } else if (tp == doubleType) { + _fullySpecifiedType.setType(control()->floatType(FloatType::LongDouble)); + break; + } else if (tp != intType) { + translationUnit()->error(ast->specifier_token, + "duplicate data type in declaration"); + } + } + _fullySpecifiedType.setType(control()->integerType(IntegerType::Long)); + break; + + case T_FLOAT: + if (_fullySpecifiedType) + translationUnit()->error(ast->specifier_token, + "duplicate data type in declaration"); + _fullySpecifiedType.setType(control()->floatType(FloatType::Float)); + break; + + case T_DOUBLE: + if (_fullySpecifiedType) { + IntegerType *longType = control()->integerType(IntegerType::Long); + if (_fullySpecifiedType.type() == longType) { + _fullySpecifiedType.setType(control()->floatType(FloatType::LongDouble)); + break; + } + translationUnit()->error(ast->specifier_token, + "duplicate data type in declaration"); + } + _fullySpecifiedType.setType(control()->floatType(FloatType::Double)); + break; + + case T_VOID: + if (_fullySpecifiedType) + translationUnit()->error(ast->specifier_token, + "duplicate data type in declaration"); + _fullySpecifiedType.setType(control()->voidType()); + break; + + default: + break; + } // switch + + return false; +} + +bool CheckSpecifier::visit(ClassSpecifierAST *ast) +{ + unsigned sourceLocation = ast->firstToken(); + + if (ast->name) + sourceLocation = ast->name->firstToken(); + + const Name *className = semantic()->check(ast->name, _scope); + Class *klass = control()->newClass(sourceLocation, className); + klass->setStartOffset(tokenAt(ast->firstToken()).offset); + klass->setEndOffset(tokenAt(ast->lastToken()).offset); + ast->symbol = klass; + unsigned classKey = tokenKind(ast->classkey_token); + if (classKey == T_CLASS) + klass->setClassKey(Class::ClassKey); + else if (classKey == T_STRUCT) + klass->setClassKey(Class::StructKey); + else if (classKey == T_UNION) + klass->setClassKey(Class::UnionKey); + klass->setVisibility(semantic()->currentVisibility()); + _scope->enterSymbol(klass); + _fullySpecifiedType.setType(klass); + + for (BaseSpecifierListAST *it = ast->base_clause_list; it; it = it->next) { + BaseSpecifierAST *base = it->value; + const Name *baseClassName = semantic()->check(base->name, _scope); + BaseClass *baseClass = control()->newBaseClass(ast->firstToken(), baseClassName); + base->symbol = baseClass; + if (base->virtual_token) + baseClass->setVirtual(true); + if (base->access_specifier_token) { + int accessSpecifier = tokenKind(base->access_specifier_token); + int visibility = semantic()->visibilityForAccessSpecifier(accessSpecifier); + baseClass->setVisibility(visibility); + } + klass->addBaseClass(baseClass); + } + + int visibility = semantic()->visibilityForClassKey(classKey); + int previousVisibility = semantic()->switchVisibility(visibility); + int previousMethodKey = semantic()->switchMethodKey(Function::NormalMethod); + + DeclarationAST *previousDeclaration = 0; + for (DeclarationListAST *it = ast->member_specifier_list; it; it = it->next) { + DeclarationAST *declaration = it->value; + semantic()->check(declaration, klass->members()); + + if (previousDeclaration && declaration && + declaration->asEmptyDeclaration() != 0 && + previousDeclaration->asFunctionDefinition() != 0) + translationUnit()->warning(declaration->firstToken(), "unnecessary semicolon after function body"); + + previousDeclaration = declaration; + } + + (void) semantic()->switchMethodKey(previousMethodKey); + (void) semantic()->switchVisibility(previousVisibility); + + return false; +} + +bool CheckSpecifier::visit(NamedTypeSpecifierAST *ast) +{ + const Name *name = semantic()->check(ast->name, _scope); + _fullySpecifiedType.setType(control()->namedType(name)); + return false; +} + +bool CheckSpecifier::visit(ElaboratedTypeSpecifierAST *ast) +{ + const Name *name = semantic()->check(ast->name, _scope); + _fullySpecifiedType.setType(control()->namedType(name)); + return false; +} + +bool CheckSpecifier::visit(EnumSpecifierAST *ast) +{ + unsigned sourceLocation = ast->firstToken(); + if (ast->name) + sourceLocation = ast->name->firstToken(); + + const Name *name = semantic()->check(ast->name, _scope); + Enum *e = control()->newEnum(sourceLocation, name); + e->setStartOffset(tokenAt(ast->firstToken()).offset); + e->setEndOffset(tokenAt(ast->lastToken()).offset); + e->setVisibility(semantic()->currentVisibility()); + _scope->enterSymbol(e); + _fullySpecifiedType.setType(e); + for (EnumeratorListAST *it = ast->enumerator_list; it; it = it->next) { + EnumeratorAST *enumerator = it->value; + const Identifier *id = identifier(enumerator->identifier_token); + if (! id) + continue; + const NameId *enumeratorName = control()->nameId(id); + Declaration *decl = control()->newDeclaration(enumerator->firstToken(), + enumeratorName); + e->addMember(decl); + } + return false; +} + +bool CheckSpecifier::visit(TypeofSpecifierAST *ast) +{ + semantic()->check(ast->expression, _scope); + return false; +} + +bool CheckSpecifier::visit(AttributeSpecifierAST * /*ast*/) +{ + return false; +} + +bool CheckSpecifier::visit(ObjCTypeNameAST * /*ast*/) +{ + // TODO: implement this (EV) +// _fullySpecifiedType = FullySpecifiedType(); + return true; +} + +