165 lines
3.7 KiB
C++
165 lines
3.7 KiB
C++
#pragma once
|
|
|
|
#include <cstdint>
|
|
#include <unordered_map>
|
|
#include <string>
|
|
#include <memory>
|
|
|
|
namespace elna
|
|
{
|
|
namespace source
|
|
{
|
|
class symbol_table;
|
|
|
|
/**
|
|
* Generic language entity information.
|
|
*/
|
|
class info
|
|
{
|
|
public:
|
|
virtual ~info() = 0;
|
|
|
|
protected:
|
|
info();
|
|
};
|
|
|
|
/**
|
|
* Type information.
|
|
*/
|
|
class type_info final : public info
|
|
{
|
|
std::shared_ptr<class type> m_type;
|
|
|
|
public:
|
|
explicit type_info(const class type& type);
|
|
~type_info() override;
|
|
std::shared_ptr<const class type> type() const noexcept;
|
|
};
|
|
|
|
/**
|
|
* Information for a typed symbol.
|
|
*/
|
|
class typed_info : public info
|
|
{
|
|
std::shared_ptr<const class type> m_type;
|
|
|
|
protected:
|
|
typed_info(std::shared_ptr<const class type> type);
|
|
|
|
public:
|
|
~typed_info() override;
|
|
|
|
std::shared_ptr<const class type> type() const noexcept;
|
|
};
|
|
|
|
/**
|
|
* Constant information.
|
|
*/
|
|
class constant_info final : public typed_info
|
|
{
|
|
std::int32_t m_value;
|
|
|
|
public:
|
|
constant_info(std::shared_ptr<const class type> type, const std::int32_t value);
|
|
|
|
std::int32_t value() const noexcept;
|
|
};
|
|
|
|
/**
|
|
* Variable information.
|
|
*/
|
|
class variable_info final : public typed_info
|
|
{
|
|
public:
|
|
std::ptrdiff_t offset{ 0 };
|
|
|
|
explicit variable_info(std::shared_ptr<const class type> type);
|
|
};
|
|
|
|
/**
|
|
* Procedure parameter information.
|
|
*/
|
|
class parameter_info final : public typed_info
|
|
{
|
|
public:
|
|
std::ptrdiff_t offset{ 0 };
|
|
|
|
explicit parameter_info(std::shared_ptr<const class type> type);
|
|
};
|
|
|
|
/**
|
|
* Intrinsic and external procedure information.
|
|
*/
|
|
class intrinsic_info : public info
|
|
{
|
|
std::shared_ptr<const class procedure_type> m_type;
|
|
|
|
public:
|
|
explicit intrinsic_info(const class procedure_type& type);
|
|
~intrinsic_info() override;
|
|
|
|
std::shared_ptr<const class procedure_type> type() const noexcept;
|
|
std::size_t parameter_stack_size() const noexcept;
|
|
};
|
|
|
|
/**
|
|
* Procedure information.
|
|
*/
|
|
class procedure_info final : public intrinsic_info
|
|
{
|
|
std::shared_ptr<symbol_table> local_table;
|
|
|
|
public:
|
|
std::size_t local_stack_size{ 0 };
|
|
std::size_t argument_stack_size{ 0 };
|
|
|
|
procedure_info(const class procedure_type& type, std::shared_ptr<symbol_table> outer_scope);
|
|
~procedure_info() override;
|
|
|
|
std::shared_ptr<symbol_table> scope();
|
|
std::size_t stack_size() const noexcept;
|
|
};
|
|
|
|
/**
|
|
* Symbol table.
|
|
*/
|
|
class symbol_table
|
|
{
|
|
std::unordered_map<std::string, std::shared_ptr<info>> entries;
|
|
std::shared_ptr<symbol_table> outer_scope;
|
|
|
|
public:
|
|
/**
|
|
* Constructs a new symbol with an optional outer scope.
|
|
*
|
|
* \param scope Outer scope.
|
|
*/
|
|
explicit symbol_table(std::shared_ptr<symbol_table> scope = nullptr);
|
|
|
|
/**
|
|
* Looks for symbol in the table by name. Returns nullptr if the symbol
|
|
* can not be found.
|
|
*
|
|
* \param name Symbol name.
|
|
* \return Symbol from the table if found.
|
|
*/
|
|
std::shared_ptr<info> lookup(const std::string& name);
|
|
|
|
/**
|
|
* Registers new symbol.
|
|
*
|
|
* \param name Symbol name.
|
|
* \param entry Symbol information.
|
|
*/
|
|
void enter(const std::string& name, std::shared_ptr<info> entry);
|
|
|
|
/**
|
|
* Returns the outer scope or nullptr if the this is the global scope.
|
|
*
|
|
* \return Outer scope.
|
|
*/
|
|
std::shared_ptr<symbol_table> scope();
|
|
};
|
|
}
|
|
}
|