summaryrefslogtreecommitdiff
path: root/trunk/CIAO/CCF/CCF/IDL3/SemanticAction/Impl/Uses.cpp
blob: ce32f39dea0274563d5c6737f1dfb2f346c33454 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
// file      : CCF/IDL3/SemanticAction/Impl/Uses.cpp
// author    : Boris Kolpackov <boris@dre.vanderbilt.edu>
// cvs-id    : $Id$

#include "CCF/IDL3/SemanticGraph/Component.hpp"
#include "CCF/IDL3/SemanticAction/Impl/Uses.hpp"

#include <iostream>

using std::cerr;
using std::endl;

namespace CCF
{
  namespace IDL3
  {
    namespace SemanticAction
    {
      namespace Impl
      {
        using namespace SemanticGraph;

        Uses::
        Uses (Context& c)
            : Base (c), multiple_ (false)
        {
        }

        void Uses::
        multiple ()
        {
          multiple_ = true;
        }

        void Uses::
        type (IdentifierPtr const& id)
        {
          if (ctx.trace ())
            cerr << "uses " << (multiple_ ? "multiple ": "") << id;

          type_ = 0;

          Name name (id->lexeme ());
          ScopedName from (ctx.scope ().scoped_name ());

          try
          {
            try
            {
              type_ = &resolve<SemanticGraph::Interface> (from, name);
            }
            catch (Resolve const&)
            {
              cerr << ctx.file () << ":" << id->line () << ": error: "
                   << "invalid uses declaration" << endl;
              throw;
            }
          }
          catch (NotFound const&)
          {
            cerr << ctx.file () << ":" << id->line () << ": error: "
                 << "no interface with name \'" << name
                 << "\' visible from scope \'" << from << "\'" << endl;
          }
          catch (WrongType const&)
          {
            cerr << ctx.file () << ":" << id->line () << ": error: "
                 << "declaration with name \'" << name
                 << "\' visible from scope \'" << from
                 << "\' is not an interface declaration" << endl;

            cerr << ctx.file () << ":" << id->line () << ": error: "
                 << "using non-interface type in uses declaration is "
                 << "illegal" << endl;
          }
        }

        void Uses::
        name (SimpleIdentifierPtr const& id)
        {
          if (ctx.trace ()) cerr << " " << id << endl;

          if (type_)
          {
            User* u;

            if (multiple_)
              u = &ctx.tu ().new_node<MultiUser> (ctx.file (), id->line ());
            else
              u = &ctx.tu ().new_node<SingleUser> (ctx.file (), id->line ());

            ctx.tu ().new_edge<Belongs> (*u, *type_);
            ctx.tu ().new_edge<Defines> (ctx.scope (), *u, id->lexeme ());
          }

          multiple_ = false;
        }
      }
    }
  }
}