1 # This file is part of NIT ( http://www.nitlanguage.org ).
3 # Copyright 2008 Jean Privat <jean@pryen.org>
5 # Licensed under the Apache License, Version 2.0 (the "License");
6 # you may not use this file except in compliance with the License.
7 # You may obtain a copy of the License at
9 # http://www.apache.org/licenses/LICENSE-2.0
11 # Unless required by applicable law or agreed to in writing, software
12 # distributed under the License is distributed on an "AS IS" BASIS,
13 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14 # See the License for the specific language governing permissions and
15 # limitations under the License.
20 import abstract_compiler
24 private var toolcontext
: ToolContext
25 private var model
: Model
26 private var modelbuilder
: ModelBuilder
27 private var mainmodule
: MModule
28 private var arguments
: Array[String]
29 private var destinationdir
: nullable String
30 private var sharedir
: nullable String
31 private var source
: nullable String
33 private var opt_dir
= new OptionString("Directory where doc is generated", "-d", "--dir")
34 private var opt_source
= new OptionString("What link for source (%f for filename, %l for first line, %L for last line)", "--source")
35 private var opt_sharedir
= new OptionString("Directory containing the nitdoc files", "--sharedir")
36 private var opt_nodot
= new OptionBool("Do not generate graphes with graphiviz", "--no-dot")
38 init(toolcontext
: ToolContext) do
39 # We need a model to collect stufs
40 self.toolcontext
= toolcontext
41 self.arguments
= toolcontext
.option_context
.rest
42 toolcontext
.option_context
.options
.clear
43 toolcontext
.option_context
.add_option
(opt_dir
)
44 toolcontext
.option_context
.add_option
(opt_source
)
45 toolcontext
.option_context
.add_option
(opt_sharedir
)
46 toolcontext
.option_context
.add_option
(opt_nodot
)
47 toolcontext
.process_options
50 if arguments
.length
< 1 then
51 toolcontext
.option_context
.usage
56 modelbuilder
= new ModelBuilder(model
, toolcontext
)
58 # Here we load an process std modules
59 var mmodules
= modelbuilder
.parse_and_build
([arguments
.first
])
60 if mmodules
.is_empty
then return
61 modelbuilder
.full_propdef_semantic_analysis
62 assert mmodules
.length
== 1
63 self.mainmodule
= mmodules
.first
66 private fun process_options
do
67 if not opt_dir
.value
is null then
68 destinationdir
= opt_dir
.value
70 destinationdir
= "nitdoc_directory"
72 if not opt_sharedir
.value
is null then
73 sharedir
= opt_sharedir
.value
75 var dir
= "NIT_DIR".environ
77 dir
= "{sys.program_name.dirname}/../share/nitdoc"
79 dir
= "{dir}/share/nitdoc"
82 if sharedir
is null then
83 print
"Error: Cannot locate nitdoc share files. Uses --sharedir or envvar NIT_DIR"
86 dir
= "{sharedir.to_s}/scripts/js-facilities.js"
87 if sharedir
is null then
88 print
"Error: Invalid nitdoc share files. Check --sharedir or envvar NIT_DIR"
92 if not opt_source
.value
is null then
95 source
= opt_source
.value
100 if arguments
.length
== 1 then
101 # Create destination dir if it's necessary
102 if not destinationdir
.file_exists
then destinationdir
.mkdir
103 sys
.system
("cp -r {sharedir.to_s}/* {destinationdir.to_s}/")
113 var overviewpage
= new NitdocOverview.with
(modelbuilder
, self.opt_nodot
.value
, destinationdir
.to_s
)
114 overviewpage
.save
("{destinationdir.to_s}/index.html")
118 var fullindex
= new NitdocFullindex.with
(model
.mmodules
)
119 fullindex
.save
("{destinationdir.to_s}/full-index.html")
123 for mmodule
in model
.mmodules
do
124 var modulepage
= new NitdocModules.with
(mmodule
, modelbuilder
)
125 modulepage
.save
("{destinationdir.to_s}/{mmodule.name}.html")
130 for mclass
in modelbuilder
.model
.mclasses
do
131 var classpage
= new NitdocMClasses.with
(mclass
, modelbuilder
, source
)
132 classpage
.save
("{destinationdir.to_s}/{mclass.name}.html")
136 # Generate QuickSearch file
137 fun quicksearch_list
do
138 var file
= new OFStream.open
("{destinationdir.to_s}/quicksearch-list.js")
139 var content
= new Buffer
140 content
.append
("var entries = \{ ")
141 for prop
in model
.mproperties
do
142 if not prop
isa MMethod then continue
143 content
.append
("\"{prop.name}\
": [")
144 for propdef
in prop
.mpropdefs
do
145 content
.append
("\{txt: \"{propdef.mproperty.full_name}\", url
:\
"{propdef.mproperty.link_anchor}\" \
}")
146 if not propdef is prop.mpropdefs.last then content.append(", ")
152 for mclass in model.mclasses do
153 content.append("\
"{mclass.name}\": [")
154 for mclassdef in mclass.mclassdefs do
155 content.append("\
{txt: \"{mclassdef.mclass.full_name}\
", url:\"{mclass.link_anchor}\
" \}")
156 if not mclassdef
is mclass
.mclassdefs
.last
then content
.append
(", ")
159 if not mclass
is model
.mclasses
.last
then content
.append
(", ")
162 content
.append
(" \};")
163 file
.write
(content
.to_s
)
172 var mbuilder
: ModelBuilder
174 # Init with Array[AModule] to get all ifnormations about each MModule containt in a program
175 # opt_nodot to inform about the graph gen
176 # destination: to know where will be saved dot files
177 init with
(mbuilder
: ModelBuilder, opt_nodot
: Bool, destination
: String) do
178 self.mbuilder
= mbuilder
179 self.opt_nodot
= opt_nodot
180 self.destinationdir
= destination
185 add
("title").text
("Overview | Nit Standard Library")
190 open
("nav").add_class
("main")
192 add
("li").add_class
("current").text
("Overview")
194 add_html
("<a href=\"full-index
.html\
">Full Index</a>")
196 open
("li").attr
("id", "liGitHub")
197 open
("a").add_class
("btn").attr
("id", "logGitHub")
198 add
("img").attr
("id", "imgGitHub").attr
("src", "resources/icons/github-icon.png")
200 open
("div").add_class
("popover bottom")
201 add
("div").add_class
("arrow").text
(" ")
202 open
("div").add_class
("githubTitle")
203 add
("h3").text
("Github Sign In")
206 add
("label").attr
("id", "lbloginGit").text
("Username")
207 add
("input").attr
("id", "loginGit").attr
("name", "login").attr
("type", "text")
208 open
("label").attr
("id", "logginMessage").text
("Hello ")
209 open
("a").attr
("id", "githubAccount")
210 add
("strong").attr
("id", "nickName").text
(" ")
215 add
("label").attr
("id", "lbpasswordGit").text
("Password")
216 add
("input").attr
("id", "passwordGit").attr
("name", "password").attr
("type", "password")
217 open
("div").attr
("id", "listBranches")
218 add
("label").attr
("id", "lbBranches").text
("Branch")
219 add
("select").add_class
("dropdown").attr
("id", "dropBranches").attr
("name", "dropBranches").attr
("tabindex", "1").text
(" ")
223 add
("label").attr
("id", "lbrepositoryGit").text
("Repository")
224 add
("input").attr
("id", "repositoryGit").attr
("name", "repository").attr
("type", "text")
227 add
("label").attr
("id", "lbbranchGit").text
("Branch")
228 add
("input").attr
("id", "branchGit").attr
("name", "branch").attr
("type", "text")
231 add
("a").attr
("id", "signIn").text
("Sign In")
242 open
("div").add_class
("page")
243 open
("div").add_class
("content fullpage")
244 add
("h1").text
("Nit Standard Library")
245 open
("article").add_class
("overview")
246 add_html
("<p>Documentation for the standard library of Nit<br />Version jenkins-component=stdlib-19<br />Date: TODAY</p>")
248 open
("article").add_class
("overview")
249 add
("h2").text
("Modules")
257 add
("footer").text
("Nit standard library. Version jenkins-component=stdlib-19.")
261 var mmodules
= list_mmodules
262 var sorted
= new Array[MModule].from
(mmodules
)
263 var sorter
= new ComparableSorter[MModule]
265 for mmodule
in sorted
do
266 var amodule
= mbuilder
.mmodule2nmodule
[mmodule
]
268 add
("a").attr
("href", "{mmodule.name}.html").text
("{mmodule.to_s} ")
269 add_html
(amodule
.short_comment
)
274 fun process_generate_dot
do
276 op
.append
("digraph dep \{ rankdir=BT; node[shape=none,margin=0,width=0,height=0,fontsize=10]; edge[dir=none,color=gray]; ranksep=0.2; nodesep=0.1;\n")
277 for mmodule
in list_mmodules
do
278 op
.append
("\"{mmodule.name}\
"[URL=\"{mmodule.name}.html\
"];\n")
279 for imported
in mmodule
.in_importation
.direct_greaters
do
280 if imported
.direct_owner
== null then
281 op
.append
("\"{mmodule.name}\
"->\"{imported.name}\
";\n")
286 generate_dot
(op
.to_s
, "dep", "Modules hierarchy")
289 private fun list_mmodules
: Set[MModule] do
290 var mmodules
= new HashSet[MModule]
291 for mmodule
in mbuilder
.model
.mmodules
do
292 var owner
= mmodule
.public_owner
293 if owner
!= null then
296 mmodules
.add
(mmodule
)
304 class NitdocFullindex
307 var mmodules
: Array[MModule]
309 init with
(mmodules
: Array[MModule]) do
310 self.mmodules
= mmodules
317 add
("title").text
("Full Index | Nit Standard Library")
322 open
("nav").add_class
("main")
325 add_html
("<a href=\"index
.html\
">Overview</a>")
327 add
("li").add_class
("current").text
("Full Index")
328 open
("li").attr
("id", "liGitHub")
329 open
("a").add_class
("btn").attr
("id", "logGitHub")
330 add
("img").attr
("id", "imgGitHub").attr
("src", "resources/icons/github-icon.png")
332 open
("div").add_class
("popover bottom")
333 add
("div").add_class
("arrow").text
(" ")
334 open
("div").add_class
("githubTitle")
335 add
("h3").text
("Github Sign In")
338 add
("label").attr
("id", "lbloginGit").text
("Username")
339 add
("input").attr
("id", "loginGit").attr
("name", "login").attr
("type", "text")
340 open
("label").attr
("id", "logginMessage").text
("Hello ")
341 open
("a").attr
("id", "githubAccount")
342 add
("strong").attr
("id", "nickName").text
(" ")
347 add
("label").attr
("id", "lbpasswordGit").text
("Password")
348 add
("input").attr
("id", "passwordGit").attr
("name", "password").attr
("type", "password")
349 open
("div").attr
("id", "listBranches")
350 add
("label").attr
("id", "lbBranches").text
("Branch")
351 add
("select").add_class
("dropdown").attr
("id", "dropBranches").attr
("name", "dropBranches").attr
("tabindex", "1").text
(" ")
355 add
("label").attr
("id", "lbrepositoryGit").text
("Repository")
356 add
("input").attr
("id", "repositoryGit").attr
("name", "repository").attr
("type", "text")
359 add
("label").attr
("id", "lbbranchGit").text
("Branch")
360 add
("input").attr
("id", "branchGit").attr
("name", "branch").attr
("type", "text")
363 add
("a").attr
("id", "signIn").text
("Sign In")
374 open
("div").add_class
("page")
375 open
("div").add_class
("content fullpage")
376 add
("h1").text
("Full Index")
380 add
("footer").text
("Nit standard library. Version jenkins-component=stdlib-19.")
389 # Add to content modules column
391 var ls
= new List[nullable MModule]
392 var sorted
= mmodules
393 var sorterp
= new ComparableSorter[MModule]
395 open
("article").add_class
("modules filterable")
396 add
("h2").text
("Modules")
398 for mmodule
in sorted
do
399 if mmodule
.public_owner
!= null and not ls
.has
(mmodule
.public_owner
) then
400 ls
.add
(mmodule
.public_owner
)
402 add
("a").attr
("href", "{mmodule.public_owner.name}.html").text
(mmodule
.public_owner
.name
)
410 # Add to content classes modules
411 fun classes_column
do
412 var sorted
= mmodules
.first
.imported_mclasses
.to_a
413 var sorterp
= new ComparableSorter[MClass]
415 open
("article").add_class
("classes filterable")
416 add
("h2").text
("Classes")
419 for mclass
in sorted
do
421 add
("a").attr
("href", "{mclass.name}.html").text
(mclass
.name
)
429 # Insert the properties column of fullindex page
430 fun properties_column
do
431 open
("article").add_class
("properties filterable")
432 add
("h2").text
("Properties")
434 var sorted_imported
= mmodules
.first
.imported_methods
.to_a
435 var sorted_redef
= mmodules
.first
.redef_methods
.to_a
436 var sorterp
= new ComparableSorter[MProperty]
437 sorterp
.sort
(sorted_imported
)
438 sorterp
.sort
(sorted_redef
)
440 for method
in sorted_imported
do
441 if method
.visibility
is none_visibility
or method
.visibility
is intrude_visibility
then continue
442 open
("li").add_class
("intro")
443 add
("span").attr
("title", "introduction").text
("I")
445 add
("a").attr
("href", "{method.local_class.name}.html").attr
("title", "").text
("{method.name} ({method.local_class.name})")
449 for method
in sorted_redef
do
450 if method
.visibility
is none_visibility
or method
.visibility
is intrude_visibility
then continue
451 open
("li").add_class
("redef")
452 add
("span").attr
("title", "redefinition").text
("R")
454 add
("a").attr
("href", "{method.local_class.name}.html").attr
("title", "").text
("{method.name} ({method.local_class.name})")
468 var mbuilder
: ModelBuilder
470 init with
(mmodule
: MModule, mbuilder
: ModelBuilder) do
471 self.mmodule
= mmodule
472 self.mbuilder
= mbuilder
479 var amodule
= mbuilder
.mmodule2nmodule
[mmodule
]
480 add
("title").text
("{mmodule.name} module | {amodule.short_comment}")
485 open
("nav").add_class
("main")
488 add_html
("<a href=\"index
.html\
">Overview</a>")
490 add
("li").add_class
("current").text
(mmodule
.name
)
492 add_html
("<a href=\"full-index
.html\
" >Full Index</a>")
494 open
("li").attr
("id", "liGitHub")
495 open
("a").add_class
("btn").attr
("id", "logGitHub")
496 add
("img").attr
("id", "imgGitHub").attr
("src", "resources/icons/github-icon.png")
498 open
("div").add_class
("popover bottom")
499 add
("div").add_class
("arrow").text
(" ")
500 open
("div").add_class
("githubTitle")
501 add
("h3").text
("Github Sign In")
504 add
("label").attr
("id", "lbloginGit").text
("Username")
505 add
("input").attr
("id", "loginGit").attr
("name", "login").attr
("type", "text")
506 open
("label").attr
("id", "logginMessage").text
("Hello ")
507 open
("a").attr
("id", "githubAccount")
508 add
("strong").attr
("id", "nickName").text
(" ")
513 add
("label").attr
("id", "lbpasswordGit").text
("Password")
514 add
("input").attr
("id", "passwordGit").attr
("name", "password").attr
("type", "password")
515 open
("div").attr
("id", "listBranches")
516 add
("label").attr
("id", "lbBranches").text
("Branch")
517 add
("select").add_class
("dropdown").attr
("id", "dropBranches").attr
("name", "dropBranches").attr
("tabindex", "1").text
(" ")
521 add
("label").attr
("id", "lbrepositoryGit").text
("Repository")
522 add
("input").attr
("id", "repositoryGit").attr
("name", "repository").attr
("type", "text")
525 add
("label").attr
("id", "lbbranchGit").text
("Branch")
526 add
("input").attr
("id", "branchGit").attr
("name", "branch").attr
("type", "text")
529 add
("a").attr
("id", "signIn").text
("Sign In")
540 open
("div").add_class
("page")
544 add
("footer").text
("Nit standard library. Version jenkins-component=stdlib-19.")
547 # Insert all tags in content part
549 open
("div").add_class
("content")
550 add
("h1").text
(mmodule
.name
)
551 add
("div").add_class
("subtitle").text
("module {mmodule.name}")
558 # Insert module comment in the content
559 fun module_comment
do
560 var amodule
= mbuilder
.mmodule2nmodule
[mmodule
]
561 var doc
= amodule
.comment
562 open
("div").attr
("id", "description")
563 add
("pre").add_class
("text_label").text
(doc
)
564 add
("textarea").add_class
("edit").attr
("rows", "1").attr
("cols", "76").attr
("id", "fileContent").text
(" ")
565 add
("a").attr
("id", "cancelBtn").text
("Cancel")
566 add
("a").attr
("id", "commitBtn").text
("Commit")
567 add
("pre").add_class
("text_label").attr
("id", "preSave").attr
("type", "2")
572 var amodule
= mbuilder
.mmodule2nmodule
[mmodule
]
573 open
("div").add_class
("menu")
575 add
("h3").text
("Module Hierarchy").attr
("style","cursor: pointer;")
576 if mmodule
.in_importation
.greaters
.length
> 0 then
577 add_html
("<h4>All dependencies</h4><ul>")
578 var sorted
= mmodule
.in_importation
.greaters
.to_a
579 var sorter
= new ComparableSorter[MModule]
582 if m
== mmodule
or m
.public_owner
!= null then continue
584 add
("a").attr
("href", "{m.name}.html").text
(m
.name
)
589 if mmodule
.in_importation
.smallers
.length
> 0 then
590 add_html
("<h4>All clients</h4><ul>")
591 var sorted
= mmodule
.in_importation
.smallers
.to_a
592 var sorter
= new ComparableSorter[MModule]
595 if m
== mmodule
or m
.public_owner
!= null then continue
597 add
("a").attr
("href", "{m.name}.html").text
(m
.name
)
603 if mmodule
.in_nesting
.direct_greaters
.length
> 0 then
604 var sorted
= mmodule
.in_nesting
.direct_greaters
.to_a
605 var sorter
= new ComparableSorter[MModule]
608 add
("h3").text
("Nested Modules").attr
("style","cursor: pointer;")
612 add
("a").attr
("href", "{m.name}.html").text
(m
.name
)
623 var amodule
= mbuilder
.mmodule2nmodule
[mmodule
]
624 var intro_mclasses
= mmodule
.intro_mclasses
625 var redef_mclasses
= mmodule
.redef_mclasses
626 var all_mclasses
= new HashSet[MClass]
627 for m
in mmodule
.in_nesting
.greaters
do
628 all_mclasses
.add_all
(m
.intro_mclasses
)
629 all_mclasses
.add_all
(m
.redef_mclasses
)
631 all_mclasses
.add_all
(intro_mclasses
)
632 all_mclasses
.add_all
(redef_mclasses
)
634 var sorted
= new Array[MClass]
635 sorted
.add_all
(all_mclasses
)
636 var sorter
= new ComparableSorter[MClass]
638 open
("div").add_class
("module")
639 open
("article").add_class
("classes filterable")
640 add
("h2").text
("Classes")
644 if redef_mclasses
.has
(c
) and c
.intro_mmodule
.public_owner
!= mmodule
then
645 open
("li").add_class
("redef")
646 add
("span").attr
("title", "refined in this module").text
("R ")
648 open
("li").add_class
("intro")
649 add
("span").attr
("title", "introduced in this module").text
("I ")
651 add
("a").attr
("href", "{name}.html").text
(name
)
660 var amodule
= mbuilder
.mmodule2nmodule
[mmodule
]
661 var mpropdefs
= new HashSet[MPropDef]
662 for m
in mmodule
.in_nesting
.greaters
do
663 for c
in m
.mclassdefs
do mpropdefs
.add_all
(c
.mpropdefs
)
665 for c
in mmodule
.mclassdefs
do mpropdefs
.add_all
(c
.mpropdefs
)
666 var sorted
= mpropdefs
.to_a
667 var sorter
= new ComparableSorter[MPropDef]
669 open
("article").add_class
("properties filterable")
670 add_html
("<h2>Properties</h2>")
673 if p
.mproperty
.visibility
<= none_visibility
then continue
675 open
("li").add_class
("intro")
676 add
("span").attr
("title", "introduction").text
("I")
678 open
("li").add_class
("redef")
679 add
("span").attr
("title", "redefinition").text
("R")
682 add
("a").attr
("href", "{p.mclassdef.mclass.name}.html").attr
("title", "").text
("{p.mproperty.name} ({p.mclassdef.mclass.name})")
690 # Nit Standard Library
695 var mbuilder
: ModelBuilder
697 init with
(mclass
: MClass, mbuilder
: ModelBuilder, source
: nullable String) do
699 self.mbuilder
= mbuilder
700 self.opt_nodot
= false
701 self.destinationdir
= ""
707 var nclass
= mbuilder
.mclassdef2nclassdef
[mclass
.intro
]
708 if nclass
isa AStdClassdef then
709 add
("title").text
("{mclass.name} class | {nclass.short_comment}")
711 add
("title").text
("{mclass.name} class")
717 open
("nav").add_class
("main")
720 add_html
("<a href=\"index
.html\
">Overview</a>")
723 var public_owner
= mclass
.public_owner
724 if public_owner
is null then
725 add_html
("<a href=\"{mclass.intro_mmodule.name}.html\
">{mclass.intro_mmodule.name}</a>")
727 add_html
("<a href=\"{public_owner.name}.html\
">{public_owner.name}</a>")
730 add
("li").add_class
("current").text
(mclass
.name
)
732 add_html
("<a href=\"full-index
.html\
" >Full Index</a>")
734 open
("li").attr
("id", "liGitHub")
735 open
("a").add_class
("btn").attr
("id", "logGitHub")
736 add
("img").attr
("id", "imgGitHub").attr
("src", "resources/icons/github-icon.png")
738 open
("div").add_class
("popover bottom")
739 add
("div").add_class
("arrow").text
(" ")
740 open
("div").add_class
("githubTitle")
741 add
("h3").text
("Github Sign In")
744 add
("label").attr
("id", "lbloginGit").text
("Username")
745 add
("input").attr
("id", "loginGit").attr
("name", "login").attr
("type", "text")
746 open
("label").attr
("id", "logginMessage").text
("Hello ")
747 open
("a").attr
("id", "githubAccount")
748 add
("strong").attr
("id", "nickName").text
(" ")
753 add
("label").attr
("id", "lbpasswordGit").text
("Password")
754 add
("input").attr
("id", "passwordGit").attr
("name", "password").attr
("type", "password")
755 open
("div").attr
("id", "listBranches")
756 add
("label").attr
("id", "lbBranches").text
("Branch")
757 add
("select").add_class
("dropdown").attr
("id", "dropBranches").attr
("name", "dropBranches").attr
("tabindex", "1").text
(" ")
761 add
("label").attr
("id", "lbrepositoryGit").text
("Repository")
762 add
("input").attr
("id", "repositoryGit").attr
("name", "repository").attr
("type", "text")
765 add
("label").attr
("id", "lbbranchGit").text
("Branch")
766 add
("input").attr
("id", "branchGit").attr
("name", "branch").attr
("type", "text")
769 add
("a").attr
("id", "signIn").text
("Sign In")
780 open
("div").add_class
("page")
783 add
("footer").text
("Nit standard library. Version jenkins-component=stdlib-19.")
786 # Insert all tags in content part
788 open
("div").add_class
("menu")
792 open
("div").add_class
("content")
797 fun properties_column
do
798 var sorted
= new Array[MProperty]
799 var sorter
= new ComparableSorter[MProperty]
800 open
("nav").add_class
("properties filterable")
801 add
("h3").text
("Properties")
803 if mclass
.virtual_types
.length
> 0 then
804 add
("h4").text
("Virtual Types")
806 sorted
= mclass
.virtual_types
.to_a
808 for prop
in sorted
do
809 add_html
("<li class=\"redef\
"><span title=\"Redefined\
">R</span><a href=\"{prop.link_anchor}\
">{prop.name}</a></li>")
813 if mclass
.constructors
.length
> 0 then
814 sorted
= mclass
.constructors
.to_a
816 add
("h4").text
("Constructors")
818 for prop
in sorted
do
819 add_html
("<li class=\"intro\
"><span title=\"Introduced\
">I</span><a href=\"{prop.link_anchor}\
">{prop.name}</a></li>")
823 add
("h4").text
("Methods")
825 var mmethods
= new HashSet[MMethod]
826 var redef_methods
= mclass
.redef_methods
827 mmethods
.add_all
(mclass
.intro_methods
)
828 mmethods
.add_all
(mclass
.inherited_methods
)
829 mmethods
.add_all
(redef_methods
)
830 sorted
= mmethods
.to_a
832 for prop
in sorted
do
833 if prop
.visibility
<= none_visibility
then continue
834 if prop
.intro_mclassdef
.mclass
== mclass
then
835 add_html
("<li class=\"intro\
"><span title=\"Introduced\
">I</span><a href=\"{prop.link_anchor}\
">{prop.name}</a></li>")
836 else if redef_methods
.has
(prop
) then
837 add_html
("<li class=\"redef\
"><span title=\"Refined\
">R</span><a href=\"{prop.link_anchor}\
">{prop.name}</a></li>")
839 add_html
("<li class=\"inherit\
"><span title=\"Inherited\
">H</span><a href=\"{prop.link_anchor}\
">{prop.name}</a></li>")
846 fun inheritance_column
do
847 var sorted
= new Array[MClass]
848 var sorterp
= new ComparableSorter[MClass]
850 add
("h3").text
("Inheritance")
851 if mclass
.parents
.length
> 0 then
852 sorted
= mclass
.parents
.to_a
854 add
("h4").text
("Superclasses")
856 for sup
in sorted
do add_html
("<li><a href=\"{sup.name}.html\
">{sup.name}</a></li>")
860 if mclass
.descendants
.length
is 0 then
861 add
("h4").text
("No Known Subclasses")
862 else if mclass
.descendants
.length
<= 100 then
863 sorted
= mclass
.descendants
.to_a
865 add
("h4").text
("Subclasses")
867 for sub
in sorted
do add_html
("<li><a href=\"{sub.name}\
">{sub.name}</a></li>")
869 else if mclass
.children
.length
<= 100 then
870 sorted
= mclass
.children
.to_a
872 add
("h4").text
("Direct Subclasses Only")
874 for sub
in sorted
do add_html
("<li><a href=\"{sub.name}\
">{sub.name}</a></li>")
877 add
("h4").text
("Too much Subclasses to list")
883 var nclass
= mbuilder
.mclassdef2nclassdef
[mclass
.intro
]
884 var sorted
= new Array[MModule]
885 sorted
.add_all
(mclass
.concerns
.keys
)
886 var sorterp
= new ComparableSorter[MModule]
887 var sorterprop
= new ComparableSorter[MProperty]
888 var sorterc
= new ComparableSorter[MClass]
891 var lmmodule
= new List[MModule]
892 # Insert the subtitle part
893 add
("h1").text
(mclass
.name
)
894 open
("div").add_class
("subtitle")
895 if mclass
.visibility
is none_visibility
then subtitle
+= "private "
896 subtitle
+= "{mclass.kind} <a href=\"{mclass.public_owner.name}.html\
">{mclass.public_owner.name}</a>::{mclass.name}"
899 add_html
("<div style=\"float
: right
;\
"><a id=\"lblDiffCommit\
"></a></div>")
900 # We add the class description
901 open
("section").add_class
("description")
902 if nclass
isa AStdClassdef and not nclass
.comment
.is_empty
then add_html
("<pre class=\"text_label\
" title=\"122\
" name=\"\
" tag=\"{mclass.mclassdefs.first.location.to_s}\
" type=\"2\
">{nclass.comment} </pre><textarea id=\"fileContent\
" class=\"edit\
" cols=\"76\
" rows=\"1\
" style=\"display
: none
;\
"></textarea><a id=\"cancelBtn\
" style=\"display
: none
;\
">Cancel</a><a id=\"commitBtn\
" style=\"display
: none
;\
">Commit</a><pre id=\"preSave\
" class=\"text_label\
" type=\"2\
"></pre>")
904 open
("section").add_class
("concerns")
905 add
("h2").add_class
("section-header").text
("Concerns")
907 for owner
in sorted
do
908 var nmodule
= mbuilder
.mmodule2nmodule
[owner
]
909 var childs
= mclass
.concerns
[owner
]
911 add_html
("<a href=\"#MOD_{owner.name}\">{owner.name}</a>: {nmodule.short_comment}")
912 if not childs
is null then
914 var sortedc
= childs
.to_a
915 var sorterpc
= new ComparableSorter[MModule]
916 sorterpc
.sort
(sortedc
)
917 for child
in sortedc
do
918 var nchild
= mbuilder
.mmodule2nmodule
[child
]
919 add_html
("<li><a href=\"#MOD_{child.name}\">{child.name}</a>: {nchild.short_comment} </li>")
927 # Insert virtual types if there is almost one
928 if mclass
.virtual_types
.length
> 0 or mclass
.arity
> 0 then
929 open
("section").add_class
("types")
930 add
("h2").text
("Formal and Virtual Types")
931 if mclass
.virtual_types
.length
> 0 then for prop
in mclass
.virtual_types
do description
(prop
)
932 if mclass
.arity
> 0 and nclass
isa AStdClassdef then
933 for prop
in nclass
.n_formaldefs
do
934 open
("article").attr
("id", "FT_Object_{prop.collect_text}")
935 open
("h3").add_class
("signature").text
("{prop.collect_text}: nullable ")
936 add_html
("<a title=\"The root of the
class hierarchy
.\
" href=\"Object.html\
">Object</a>")
938 add_html
("<div class=\"info\
">formal generic type</div>")
944 # Insert constructors if there is almost one
945 if mclass
.constructors
.length
> 0 then
946 var sortedc
= mclass
.constructors
.to_a
947 sorterprop
.sort
(sortedc
)
948 open
("section").add_class
("constructors")
949 add
("h2").add_class
("section-header").text
("Constructors")
950 for prop
in sortedc
do description
(prop
)
953 open
("section").add_class
("methods")
954 add
("h2").add_class
("section-header").text
("Methods")
955 for mmodule
, mmethods
in mclass
.all_methods
do
956 var nmodule
= mbuilder
.mmodule2nmodule
[mmodule
]
957 add_html
("<a id=\"MOD_{mmodule.name}\
"></a>")
958 if mmodule
!= mclass
.intro_mmodule
and mmodule
!= mclass
.public_owner
then
959 if mclass
.has_mmodule
(mmodule
) then
960 add_html
("<p class=\"concern-doc\
">{mmodule.name}: {nmodule.short_comment}</p>")
962 add_html
("<h3 class=\"concern-toplevel\
">Methods refined in <a href=\"{mmodule.name}.html\
">{mmodule.name}</a></h3><p class=\"concern-doc\
">{mmodule.name}: {nmodule.short_comment}</p>")
965 var sortedc
= mmethods
.to_a
966 sorterprop
.sort
(sortedc
)
967 for prop
in sortedc
do description
(prop
)
969 # Insert inherited methods
970 if mclass
.inherited_methods
.length
> 0 then
971 var sortedc
= new Array[MClass]
972 sortedc
.add_all
(mclass
.inherited
.keys
)
973 sorterc
.sort
(sortedc
)
974 add
("h3").text
("Inherited Methods")
975 for i_mclass
in sortedc
do
976 var sortedp
= mclass
.inherited
[i_mclass
].to_a
977 sorterprop
.sort
(sortedp
)
979 add_html
("Defined in <a href=\"{i_mclass.name}.html\
">{i_mclass.name}</a>: ")
980 for method
in sortedp
do
981 add_html
("<a href=\"{method.link_anchor}\
">{method.name}</a>")
982 if method
!= sortedp
.last
then add_html
(", ")
990 # Insert description tags for 'prop'
991 fun description
(prop
: MProperty) do
992 open
("article").add_class
("fun public {if prop.is_redef then "redef" else ""}").attr
("id", "{prop.anchor}")
994 if prop
.apropdef
!= null then sign
+= prop
.apropdef
.signature
995 add_html
("<h3 class=\"signature\
">{sign}</h3>")
996 add_html
("<div class=\"info\
">{if prop.is_redef then "redef" else ""} fun {prop.intro_mclassdef.namespace(mclass)}::{prop.name}</div><div style=\"float
: right
;\
"><a id=\"lblDiffCommit\
"></a></div>")
998 open
("div").add_class
("description")
999 if prop
.apropdef
is null or prop
.apropdef
.comment
== "" then
1000 add_html
("<a class=\"newComment\
" title=\"32\
" tag=\"\
">New Comment</a>")
1002 add_html
("<pre class=\"text_label\
" title=\"\
" name=\"\
" tag=\"\
" type=\"1\
">{prop.apropdef.comment}</pre>")
1004 add_html
("<textarea id=\"fileContent\
" class=\"edit\
" cols=\"76\
" rows=\"1\
" style=\"display
: none
;\
"></textarea><a id=\"cancelBtn\
" style=\"display
: none
;\
">Cancel</a><a id=\"commitBtn\
" style=\"display
: none
;\
">Commit</a><pre id=\"preSave\
" class=\"text_label\
" type=\"2\
"></pre>")
1006 if prop
.local_class
!= mclass
then add_html
("inherited from {prop.local_class.intro_mmodule.name} ")
1007 #TODO display show code if doc github
1008 add_html
("defined by the module <a href=\"{prop.intro_mclassdef.mmodule.name}.html\
">{prop.intro_mclassdef.mmodule.name}</a> {if prop.apropdef is null then "" else show_source(prop.apropdef.location)}.")
1010 for parent
in mclass
.parents
do
1011 if prop
isa MMethod then if parent
.constructors
.has
(prop
) then add_html
(" Previously defined by: <a href=\"{parent.intro_mmodule.name}.html\
">{parent.intro_mmodule.name}</a> for <a href=\"{parent.name}.html\
">{parent.name}</a>.")
1025 var destinationdir
: String
1026 var source
: nullable String
1029 add
("meta").attr
("charset", "utf-8")
1030 add
("script").attr
("type", "text/javascript").attr
("src", "scripts/jquery-1.7.1.min.js")
1031 add
("script").attr
("type", "text/javascript").attr
("src", "quicksearch-list.js")
1032 add
("script").attr
("type", "text/javascript").attr
("src", "scripts/js-facilities.js")
1033 add
("link").attr
("rel", "stylesheet").attr
("href", "styles/main.css").attr
("type", "text/css").attr
("media", "screen")
1036 redef fun body
do header
1039 # Generate a clickable graphviz image using a dot content
1040 fun generate_dot
(dot
: String, name
: String, alt
: String) do
1041 if opt_nodot
then return
1042 var file
= new OFStream.open
("{self.destinationdir}/{name}.dot")
1045 sys
.system
("\{ test -f {self.destinationdir}/{name}.png && test -f {self.destinationdir}/{name}.s.dot && diff {self.destinationdir}/{name}.dot {self.destinationdir}/{name}.s.dot >/dev/null 2>&1 ; \} || \{ cp {self.destinationdir}/{name}.dot {self.destinationdir}/{name}.s.dot && dot -Tpng -o{self.destinationdir}/{name}.png -Tcmapx -o{self.destinationdir}/{name}.map {self.destinationdir}/{name}.s.dot ; \}")
1046 open
("article").add_class
("graph")
1047 add
("img").attr
("src", "{name}.png").attr
("usemap", "#{name}").attr
("style", "margin:auto").attr
("alt", "{alt}")
1049 var fmap
= new IFStream.open
("{self.destinationdir}/{name}.map")
1050 add_html
(fmap
.read_all
)
1054 # Add a (source) link fo a given location
1055 fun show_source
(l
: Location): String
1057 if source
== null then
1058 return "({l.file.filename.simplify_path})"
1060 # THIS IS JUST UGLY ! (but there is no replace yet)
1061 var x
= source
.split_with
("%f")
1062 source
= x
.join
(l
.file
.filename
.simplify_path
)
1063 x
= source
.split_with
("%l")
1064 source
= x
.join
(l
.line_start
.to_s
)
1065 x
= source
.split_with
("%L")
1066 source
= x
.join
(l
.line_end
.to_s
)
1067 return " (<a href=\"{source.to_s}\
">show code</a>)"
1074 private fun comment
: String do
1076 if n_moduledecl
is null or n_moduledecl
.n_doc
is null then ret
1077 if n_moduledecl
.n_doc
is null then return ""
1078 for t
in n_moduledecl
.n_doc
.n_comment
do
1080 txt
= txt
.replace
("# ", "")
1081 txt
= txt
.replace
("#", "")
1087 private fun short_comment
: String do
1089 if n_moduledecl
!= null and n_moduledecl
.n_doc
!= null then
1090 var txt
= n_moduledecl
.n_doc
.n_comment
.first
.text
1091 txt
= txt
.replace
("# ", "")
1092 txt
= txt
.replace
("\n", "")
1102 redef type OTHER: MModule
1103 redef fun <(other
: OTHER): Bool do return self.name
< other
.name
1105 var amodule
: nullable AModule
1107 # Get the list of all methods in a module
1108 fun imported_methods
: Set[MMethod] do
1109 var methods
= new HashSet[MMethod]
1110 for mclass
in imported_mclasses
do
1111 for method
in mclass
.intro_methods
do
1118 # Get the list aof all refined methods in a module
1119 fun redef_methods
: Set[MMethod] do
1120 var methods
= new HashSet[MMethod]
1121 for mclass
in redef_mclasses
do
1122 for method
in mclass
.intro_methods
do
1129 redef class MPropDef
1131 redef type OTHER: MPropDef
1132 redef fun <(other
: OTHER): Bool do return self.mproperty
.name
< other
.mproperty
.name
1135 redef class MProperty
1138 redef type OTHER: MProperty
1139 redef fun <(other
: OTHER): Bool do return self.name
< other
.name
1142 var apropdef
: nullable APropdef
1144 redef init(intro_mclassdef
: MClassDef, name
: String, visibility
: MVisibility)
1150 fun local_class
: MClass do
1151 var classdef
= self.intro_mclassdef
1152 return classdef
.mclass
1155 fun class_text
: String do
1156 return local_class
.name
1159 fun link_anchor
: String do
1160 return "{class_text}.html#{anchor}"
1163 fun anchor
: String do
1164 return "PROP_{c_name}"
1172 redef type OTHER: MClass
1173 redef fun <(other
: OTHER): Bool do return self.name
< other
.name
1175 # Associate all MMethods to each MModule concerns
1176 fun all_methods
: HashMap[MModule, Set[MMethod]] do
1177 var hm
= new HashMap[MModule, Set[MMethod]]
1178 for mmodule
, childs
in concerns
do
1179 if not hm
.has_key
(mmodule
) then hm
[mmodule
] = new HashSet[MMethod]
1180 for prop
in intro_methods
do
1181 if mmodule
== prop
.intro_mclassdef
.mmodule
then
1182 prop
.is_redef
= false
1183 hm
[mmodule
].add
(prop
)
1186 for prop
in redef_methods
do
1187 if mmodule
== prop
.intro_mclassdef
.mmodule
then
1188 prop
.is_redef
= true
1189 hm
[mmodule
].add
(prop
)
1193 if childs
!= null then
1194 for child
in childs
do
1195 if not hm
.has_key
(child
) then hm
[child
] = new HashSet[MMethod]
1196 for prop
in intro_methods
do
1197 if child
== prop
.intro_mclassdef
.mmodule
then
1198 prop
.is_redef
= false
1202 for prop
in redef_methods
do
1203 if child
== prop
.intro_mclassdef
.mmodule
then
1204 prop
.is_redef
= true
1214 fun public_owner
: MModule do
1215 var owner
= intro_mmodule
1216 if owner
.public_owner
is null then
1219 return owner
.public_owner
.as(not null)
1223 # Associate Amodule to all MModule concern by 'self'
1224 fun amodule
(amodules
: HashMap[MModule, AModule]) do
1225 for owner
, childs
in concerns
do
1226 if childs
!= null then for child
in childs
do child
.amodule
= amodules
[child
]
1227 owner
.amodule
= amodules
[owner
]
1231 # Associate MClass to all MMethod include in 'inherited_methods'
1232 fun inherited
: HashMap[MClass, Set[MMethod]] do
1233 var hm
= new HashMap[MClass, Set[MMethod]]
1234 for method
in inherited_methods
do
1235 var mclass
= method
.intro_mclassdef
.mclass
1236 if not hm
.has_key
(mclass
) then hm
[mclass
] = new HashSet[MMethod]
1237 hm
[mclass
].add
(method
)
1242 # Return true if MModule concern contain subMModule
1243 fun has_mmodule
(sub
: MModule): Bool do
1244 for mmodule
, childs
in concerns
do
1245 if childs
is null then continue
1246 if childs
.has
(sub
) then return true
1251 fun mmethod
(mprop2npropdef
: Map[MProperty, APropdef]) do
1252 for const
in constructors
do
1253 if mprop2npropdef
.has_key
(const
)then
1254 const
.apropdef
= mprop2npropdef
[const
].as(AMethPropdef)
1258 for intro
in intro_methods
do
1259 if mprop2npropdef
.has_key
(intro
)then
1260 if mprop2npropdef
[intro
] isa AMethPropdef then intro
.apropdef
= mprop2npropdef
[intro
].as(AMethPropdef)
1264 for rd
in redef_methods
do
1265 if mprop2npropdef
.has_key
(rd
)then
1266 if mprop2npropdef
[rd
] isa AMethPropdef then rd
.apropdef
= mprop2npropdef
[rd
].as(AMethPropdef)
1271 fun link_anchor
: String do
1272 return "{name}.html"
1277 redef class AStdClassdef
1278 private fun comment
: String do
1280 if n_doc
!= null then
1281 for t
in n_doc
.n_comment
do
1282 var txt
= t
.text
.replace
("# ", "")
1283 txt
= txt
.replace
("#", "")
1290 private fun short_comment
: String do
1292 if n_doc
!= null then
1293 var txt
= n_doc
.n_comment
.first
.text
1294 txt
= txt
.replace
("# ", "")
1295 txt
= txt
.replace
("\n", "")
1302 redef class ASignature
1306 if not n_params
.is_empty
then
1307 ret
= "{ret}({n_params.join(", ")})"
1309 if n_type
!= null and n_type
.to_s
!= "" then ret
+= " {n_type.to_s}"
1316 var ret
= "{n_id.text}"
1317 if n_type
!= null then
1318 ret
= "{ret}: {n_type.to_s}"
1319 if n_dotdotdot
!= null then ret
= "{ret}..."
1327 var ret
= "<a href=\"{n_id.text}.html\
">{n_id.text}</a>"
1328 if n_kwnullable
!= null then ret
= "nullable {ret}"
1329 if not n_types
.is_empty
then ret
= "{ret}[{n_types.join(", ")}]"
1334 redef class APropdef
1335 private fun short_comment
: String is abstract
1336 private fun signature
: String is abstract
1337 private fun comment
: String is abstract
1340 redef class AAttrPropdef
1341 redef fun short_comment
do
1343 if n_doc
!= null then
1344 var txt
= n_doc
.n_comment
.first
.text
1345 txt
= txt
.replace
("# ", "")
1346 txt
= txt
.replace
("\n", "")
1353 redef class AMethPropdef
1354 redef fun short_comment
do
1356 if n_doc
!= null then
1357 var txt
= n_doc
.n_comment
.first
.text
1358 txt
= txt
.replace
("# ", "")
1359 txt
= txt
.replace
("\n", "")
1365 redef fun signature
: String do
1367 if n_signature
!= null then sign
= " {n_signature.to_s}"
1371 redef private fun comment
: String do
1373 if n_doc
!= null then
1374 for t
in n_doc
.n_comment
do
1375 var txt
= t
.text
.replace
("# ", "")
1376 txt
= txt
.replace
("#", "")
1384 redef class MClassDef
1385 private fun namespace
(mclass
: MClass): String do
1387 if mmodule
.public_owner
is null then
1388 return "{mmodule.full_name}::{mclass.name}"
1389 else if mclass
is self.mclass
then
1390 return "{mmodule.public_owner.name}::{mclass.name}"
1392 return "{mmodule.public_owner.name}::<a href=\"{mclass.name}.html\
">{mclass.name}</a>"
1399 return to_a
[length-1
]
1403 # Create a tool context to handle options and paths
1404 var toolcontext
= new ToolContext
1406 # Here we launch the nit index
1407 var nitdoc
= new Nitdoc(toolcontext
)