1 # This file is part of NIT ( http://www.nitlanguage.org ).
3 # Licensed under the Apache License, Version 2.0 (the "License");
4 # you may not use this file except in compliance with the License.
5 # You may obtain a copy of the License at
7 # http://www.apache.org/licenses/LICENSE-2.0
9 # Unless required by applicable law or agreed to in writing, software
10 # distributed under the License is distributed on an "AS IS" BASIS,
11 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12 # See the License for the specific language governing permissions and
13 # limitations under the License.
15 # Modelisation of a Nit project
19 private import more_collections
22 # A Nit project, thas encompass a product
26 # The name of the project
27 redef var name
: String
29 # The model of the project
30 redef var model
: Model
32 # The root of the group tree
33 var root
: nullable MGroup writable = null
35 # The group tree, as a POSet
36 var mgroups
= new POSet[MGroup]
38 redef fun to_s
do return name
40 init(name
: String, model
: Model)
44 model
.mprojects
.add
(self)
45 model
.mproject_by_name
.add_one
(name
, self)
48 # MProject are always roots of the concerns hierarchy
49 redef fun parent_concern
do return null
52 # A group of modules in a project
56 # The name of the group
57 # empty name for a default group in a single-module project
58 redef var name
: String
60 # The englobing project
61 var mproject
: MProject
63 # The parent group if any
64 # see `in_nesting` for more
65 var parent
: nullable MGroup
67 # fully qualified name
71 if p
== null then return name
72 return "{p.full_name}/{name}"
75 # The group is the group tree on the project (`mproject.mgroups`)
76 # nested groups (children) are smallers
77 # nesting group (see `parent`) is bigger
78 var in_nesting
: POSetElement[MGroup]
80 # Is `self` the root of its project?
81 fun is_root
: Bool do return mproject
.root
== self
83 # The filepath (usualy a directory) of the group, if any
84 var filepath
: nullable String writable
86 init (name
: String, mproject
: MProject, parent
: nullable MGroup)
89 self.mproject
= mproject
91 var tree
= mproject
.mgroups
92 self.in_nesting
= tree
.add_node
(self)
93 if parent
!= null then
94 tree
.add_edge
(self, parent
)
98 redef fun model
do return mproject
.model
100 redef fun parent_concern
do
101 if not is_root
then return parent
105 redef fun to_s
do return name
109 # projects of the model
110 var mprojects
= new Array[MProject]
112 # Collections of project grouped by their names
113 private var mproject_by_name
: MultiHashMap[String, MProject] = new MultiHashMap[String, MProject]
115 # Return all project named `name`
116 # If such a project is not yet loaded, null is returned (instead of an empty array)
117 fun get_mprojects_by_name
(name
: String): nullable Array[MProject]
119 if mproject_by_name
.has_key
(name
) then
120 return mproject_by_name
[name
]