metrics: type phase attributes with Phase instead of private subclasses
[nit.git] / src / metrics / model_hyperdoc.nit
index 8d8a10e..6cffa50 100644 (file)
@@ -19,6 +19,21 @@ module model_hyperdoc
 
 import model
 import metrics_base
+import phase
+import frontend
+
+redef class ToolContext
+       var model_hyperdoc_phase: Phase = new ModelHyperdocPhase(self, null)
+end
+
+private class ModelHyperdocPhase
+       super Phase
+       redef fun process_mainmodule(mainmodule, given_mmodules)
+       do
+               if not toolcontext.opt_generate_hyperdoc.value and not toolcontext.opt_all.value then return
+               generate_model_hyperdoc(toolcontext, toolcontext.modelbuilder.model)
+       end
+end
 
 # Genetate a HTML file for the model.
 # The generated file contains the description of each entity of the model
@@ -28,17 +43,50 @@ do
        buf.append("<html>\n<body>\n")
        buf.append("<h1>Model</h1>\n")
 
+       buf.append("<h2>Projects</h2>\n")
+       for mproject in model.mprojects do
+               buf.append("<h3 id='project-{mproject}'>Project {mproject}</h3>\n")
+               buf.append("<dl>\n")
+               buf.append("<dt>groups</dt>\n")
+               for x in mproject.mgroups do
+                       buf.append("<dd>{linkto(x)}</dd>\n")
+               end
+               buf.append("</dl>\n")
+       end
+
+       buf.append("<h2>Groups</h2>\n")
+       for mproject in model.mprojects do
+               for mgroup in mproject.mgroups do
+                       buf.append("<h3 id='group-{mgroup}'>Group {mgroup}</h3>\n")
+                       buf.append("<dl>\n")
+                       buf.append("<dt>project</dt>\n")
+                       buf.append("<dd>{linkto(mproject)}</dd>\n")
+                       buf.append("<dt>filepath</dt>\n")
+                       buf.append("<dd>{mgroup.filepath}</dd>\n")
+                       var p = mgroup.parent
+                       if p != null then
+                               buf.append("<dt>parent group</dt>\n")
+                               buf.append("<dd>{linkto(p)}</dd>\n")
+                       end
+                       buf.append("<dt>nested groups</dt>\n")
+                       for x in mgroup.in_nesting.direct_smallers do
+                               buf.append("<dd>{linkto(x)}</dd>\n")
+                       end
+                       buf.append("<dt>modules</dt>\n")
+                       for x in mgroup.mmodules do
+                               buf.append("<dd>{linkto(x)}</dd>\n")
+                       end
+               end
+               buf.append("</dl>\n")
+       end
+
        buf.append("<h2>Modules</h2>\n")
        for mmodule in model.mmodules do
                buf.append("<h3 id='module-{mmodule}'>{mmodule}</h3>\n")
                buf.append("<dl>\n")
-               buf.append("<dt>direct owner</dt>\n")
-               var own = mmodule.direct_owner
-               if own != null then buf.append("<dd>{linkto(own)}</dd>\n")
-               buf.append("<dt>nested</dt>\n")
-               for x in mmodule.in_nesting.direct_greaters do
-                       buf.append("<dd>{linkto(x)}</dd>\n")
-               end
+               buf.append("<dt>group</dt>\n")
+               var grp = mmodule.mgroup
+               if grp != null then buf.append("<dd>{linkto(grp)}</dd>\n")
                buf.append("<dt>direct import</dt>\n")
                for x in mmodule.in_importation.direct_greaters do
                        buf.append("<dd>{linkto(x)}</dd>\n")
@@ -148,7 +196,11 @@ end
 
 private fun linkto(o: Object): String
 do
-       if o isa MModule then
+       if o isa MProject then
+               return "<a href='#project-{o}'>{o}</a>"
+       else if o isa MGroup then
+               return "<a href='#group-{o}'>{o}</a>"
+       else if o isa MModule then
                return "<a href='#module-{o}'>{o}</a>"
        else if o isa MClass then
                return "<a href='#class-{o}'>{o}</a>"