Return to ClassDeclRep.cpp CVS log

Up to [Pegasus] / pegasus / src / Pegasus / Common

Pegasus import

//BEGIN_LICENSE
//
// Copyright (c) 2000 The Open Group, BMC Software, Tivoli Systems, IBM
//
// 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 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.
//
//END_LICENSE
//BEGIN_HISTORY
//
// Author:
//
// $Log: ClassDeclRep.cpp,v $
// Revision 1.1.1.1  2001/01/14 19:50:39  mike
// Pegasus import
//
//
//END_HISTORY

#include "ClassDecl.h"
#include "DeclContext.h"
#include "Indentor.h"
#include "Name.h"
#include "QualifierNames.h"
#include "XmlWriter.h"

PEGASUS_NAMESPACE_BEGIN

ClassDeclRep::ClassDeclRep(
    const String& className, 
    const String& superClassName)
    : _className(className), _superClassName(superClassName), _resolved(false)
{
    if (!Name::legal(className))
	throw IllegalName();

    if (superClassName.getLength() && !Name::legal(superClassName))
	throw IllegalName();
}

ClassDeclRep::~ClassDeclRep()
{

}

Boolean ClassDeclRep::isAssociation() const
{
    Uint32 pos = findQualifier(QualifierNames::ASSOCIATION);
    
    if (pos == Uint32(-1))
	return false;

    Boolean flag;

    const Value& value = getQualifier(pos).getValue();

    if (value.getType() != Type::BOOLEAN)
	return false;

    value.get(flag);
    return flag;
}

Boolean ClassDeclRep::isAbstract() const
{
    Uint32 pos = findQualifier(QualifierNames::ABSTRACT);
    
    if (pos == Uint32(-1))
	return false;

    Boolean flag;
    const Value& value = getQualifier(pos).getValue();

    if (value.getType() != Type::BOOLEAN)
	return false;

    value.get(flag);
    return flag;
}

void ClassDeclRep::setSuperClassName(const String& superClassName) 
{
    if (!Name::legal(superClassName))
	throw IllegalName();

    _superClassName = superClassName; 
}

void ClassDeclRep::addProperty(const Property& x)
{
    if (!x)
	throw UnitializedHandle();

    if (findProperty(x.getName()) != Uint32(-1))
	throw AlreadyExists();

    if (findMethod(x.getName()) != Uint32(-1))
	throw AlreadyExists();

    if (!isAssociation() && x.getValue().getType() == Type::REFERENCE)
	throw AddedReferenceToClass(_className);

    _properties.append(x);
}

void ClassDeclRep::removeProperty(Uint32 pos)
{
    if (pos >= _properties.getSize())
	throw OutOfBounds();
}

Uint32 ClassDeclRep::findProperty(const String& name)
{
    for (Uint32 i = 0, n = _properties.getSize(); i < n; i++)
    {
	if (Name::equal(_properties[i].getName(), name))
	    return i;
    }

    return Uint32(-1);
}

Property ClassDeclRep::getProperty(Uint32 pos)
{
    if (pos >= _properties.getSize())
	throw OutOfBounds();

    return _properties[pos];
}

Uint32 ClassDeclRep::getPropertyCount() const
{
    return _properties.getSize();
}

void ClassDeclRep::addMethod(const Method& x)
{
    if (!x)
	throw UnitializedHandle();

    if (findMethod(x.getName()) != Uint32(-1))
	throw AlreadyExists();

    if (findProperty(x.getName()) != Uint32(-1))
	throw AlreadyExists();

    _methods.append(x);
}

Uint32 ClassDeclRep::findMethod(const String& name)
{
    for (Uint32 i = 0, n = _methods.getSize(); i < n; i++)
    {
	if (Name::equal(_methods[i].getName(), name))
	    return i;
    }

    return Uint32(-1);
}

Method ClassDeclRep::getMethod(Uint32 pos)
{
    if (pos >= _methods.getSize())
	throw OutOfBounds();

    return _methods[pos];
}

Uint32 ClassDeclRep::getMethodCount() const
{
    return _methods.getSize();
}

void ClassDeclRep::resolve(
    DeclContext* declContext,
    const String& nameSpace)
{
    if (_resolved)
	throw ClassAlreadyResolved(_className);

    if (!declContext)
	throw NullPointer();

    if (_superClassName.getLength())
    {
	//----------------------------------------------------------------------
	// First check to see if the super-class really exists:
	//----------------------------------------------------------------------

	ConstClassDecl superClass 
	    = declContext->lookupClassDecl(nameSpace, _superClassName);

	if (!superClass)
	    throw NoSuchSuperClass(_superClassName);

	if (!superClass._rep->_resolved)
	    throw ClassNotResolved(_superClassName);

	//----------------------------------------------------------------------
	// Iterate all the properties of this class. Resolve each one and
	// mark inherited properties with the appropriate class-origin.
	//----------------------------------------------------------------------

	for (Uint32 i = 0, n = _properties.getSize(); i < n; i++)
	{
	    Property& property = _properties[i];
	    Uint32 pos = superClass.findProperty(property.getName());

	    if (pos == Uint32(-1))
	    {
		Property dummy;
		property.resolve(declContext, nameSpace, false, dummy);
	    }
	    else
	    {
		ConstProperty superClassProperty = superClass.getProperty(pos);
		property.resolve(
		    declContext, nameSpace, false, superClassProperty);

		_properties[i].setClassOrigin(
		    superClassProperty.getClassOrigin());
	    }
	}

	//----------------------------------------------------------------------
	// Now prepend all properties inherited from the super-class (that 
	// are not overriden by this sub-class).
	//----------------------------------------------------------------------

	// Iterate super-class properties:

	Uint32 m = 0;

	for (Uint32 i = 0, n = superClass.getPropertyCount(); i < n; i++)
	{
	    Property property = Property(superClass.getProperty(i));
	    String classOrigin = property.getClassOrigin();

	    // Be sure that this class does not have a method with that
	    // name.

	    if (findMethod(property.getName()) != Uint32(-1))
	    {
		String tmp = property.getName();
		tmp.append(
		    "; attempt to override property with method of same name");
		throw InvalidPropertyOverride(tmp);
	    }

	    // Find the property in this class; if not found, then adopt it.
	    // Otherwise, change the class-origin and propagated flag
	    // accordingly.

	    Uint32 pos = Uint32(-1);

	    for (Uint32 j = m, n = _properties.getSize(); j < n; j++)
	    {
		if (Name::equal(_properties[j].getName(), property.getName()))
		{
		    pos = j;
		    break;
		}
	    }

	    if (pos == Uint32(-1))
	    {
		property.setClassOrigin(classOrigin);
		property.setPropagated(true);
		_properties.insert(m++, property);
	    }
	}

	//----------------------------------------------------------------------
	// Iterate all the methods of this class. Resolve each one and
	// mark inherited methods with the appropriate class-origin.
	//----------------------------------------------------------------------

	for (Uint32 i = 0, n = _methods.getSize(); i < n; i++)
	{
	    Method& method = _methods[i];
	    Uint32 pos = superClass.findMethod(method.getName());

	    if (pos == Uint32(-1))
	    {
		Method dummy;
		method.resolve(declContext, nameSpace, dummy);
	    }
	    else
	    {
		ConstMethod superClassMethod = superClass.getMethod(pos);
		method.resolve(declContext, nameSpace, superClassMethod);
		_methods[i].setClassOrigin(superClassMethod.getClassOrigin());
	    }
	}

	//----------------------------------------------------------------------
	// Now prepend all methods inherited from the super-class (that 
	// are not overriden by this sub-class).
	//----------------------------------------------------------------------

	// Iterate super-class methods:

	m = 0;

	for (Uint32 i = 0, n = superClass.getMethodCount(); i < n; i++)
	{
	    Method method = Method(superClass.getMethod(i));
	    String classOrigin = method.getClassOrigin();

	    // Be sure that this class does not have a property with that
	    // name.

	    if (findProperty(method.getName()) != Uint32(-1))
	    {
		String tmp = method.getName();
		tmp.append(
		    "; attempt to override method with property of same name");
		throw InvalidMethodOverride(tmp);
	    }

	    // Find the method in this class; if not found, then adopt it.
	    // Otherwise, change the class-origin and propagated flag
	    // accordingly.

	    Uint32 pos = Uint32(-1);

	    for (Uint32 j = m, n = _methods.getSize(); j < n; j++)
	    {
		if (Name::equal(
		    _methods[j].getName(), method.getName()))
		{
		    pos = j;
		    break;
		}
	    }

	    if (pos == Uint32(-1))
	    {
		_methods.insert(m++, method);
	    }
	    else
	    {
		_methods[pos].resolve(declContext, nameSpace, method);
		_methods[pos].setClassOrigin(classOrigin);
	    }
	}

	//----------------------------------------------------------------------
	// Validate the qualifiers of this class:
	//----------------------------------------------------------------------

	_qualifiers.resolve(
	    declContext,
	    nameSpace,
	    Scope::CLASS,
	    false,
	    superClass._rep->_qualifiers);
    }
    else
    {
	//----------------------------------------------------------------------
	// Resolve each property:
	//----------------------------------------------------------------------

	for (Uint32 i = 0, n = _properties.getSize(); i < n; i++)
	    _properties[i].resolve(declContext, nameSpace, false);

	//----------------------------------------------------------------------
	// Resolve each method:
	//----------------------------------------------------------------------

	for (Uint32 i = 0, n = _methods.getSize(); i < n; i++)
	{
	    _methods[i].resolve(declContext, nameSpace);
	}

	//----------------------------------------------------------------------
	// Resolve the qualifiers:
	//----------------------------------------------------------------------

	QualifierList dummy;

	_qualifiers.resolve(
	    declContext,
	    nameSpace,
	    Scope::CLASS,
	    false,
	    dummy);
    }

    _resolved = true;
}

void ClassDeclRep::toXml(Array<Sint8>& out) const
{
    // Class opening element:

    out << "<CLASS ";
    out << " NAME=\"" << _className << "\" ";

    if (_superClassName.getLength())
	out << " SUPERCLASS=\"" << _superClassName << "\" ";

    out << ">\n";

    // Qualifiers:

    _qualifiers.toXml(out);

    // Parameters:

    for (Uint32 i = 0, n = _properties.getSize(); i < n; i++)
	_properties[i].toXml(out);

    // Methods:

    for (Uint32 i = 0, n = _methods.getSize(); i < n; i++)
	_methods[i].toXml(out);

    // Class closing element:

    out << "</CLASS>\n";
}

void ClassDeclRep::print() const
{
    Array<Sint8> tmp;
    toXml(tmp);
    tmp.append('\0');
    XmlWriter::indentedPrint(std::cout, tmp.getData(), 4);
    // cout << tmp.getData() << endl;
}

ClassDeclRep::ClassDeclRep()
{

}

ClassDeclRep::ClassDeclRep(const ClassDeclRep& x) : 
    Sharable(),
    _className(x._className),
    _superClassName(x._superClassName),
    _resolved(x._resolved)
{
    x._qualifiers.cloneTo(_qualifiers);

    _properties.reserve(x._properties.getSize());

    for (Uint32 i = 0, n = x._properties.getSize(); i < n; i++)
	_properties.append(x._properties[i].clone());

    _methods.reserve(x._methods.getSize());

    for (Uint32 i = 0, n = x._methods.getSize(); i < n; i++)
	_methods.append(x._methods[i].clone());
}

ClassDeclRep& ClassDeclRep::operator=(const ClassDeclRep& x) 
{ 
    return *this; 
}

Boolean ClassDeclRep::identical(const ClassDeclRep* x) const
{
    if (_className != x->_className)
	return false;

    if (_superClassName != x->_superClassName)
	return false;

    if (!_qualifiers.identical(x->_qualifiers))
	return false;

    // Compare properties:

    {
	const Array<Property>& tmp1 = _properties;
	const Array<Property>& tmp2 = x->_properties;

	if (tmp1.getSize() != tmp2.getSize())
	    return false;

	for (Uint32 i = 0, n = tmp1.getSize(); i < n; i++)
	{
	    if (!tmp1[i].identical(tmp2[i]))
		return false;
	}
    }

    // Compare methods:

    {
	const Array<Method>& tmp1 = _methods;
	const Array<Method>& tmp2 = x->_methods;

	if (tmp1.getSize() != tmp2.getSize())
	    return false;

	for (Uint32 i = 0, n = tmp1.getSize(); i < n; i++)
	{
	    if (!tmp1[i].identical(tmp2[i]))
		return false;

	    if (tmp1[i].getClassOrigin() != tmp2[i].getClassOrigin())
		return false;

	    if (tmp1[i].getPropagated() != tmp2[i].getPropagated())
		return false;
	}
    }

    if (_resolved != x->_resolved)
	return false;

    return true;
}

PEGASUS_NAMESPACE_END