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 # Basic catalog generator for Nit packages
17 # See: <http://nitlanguage.org/catalog/>
19 # The tool scans packages and generates the HTML files of a catalog.
23 # * [X] scan packages and their `.ini`
24 # * [X] generate lists of packages
25 # * [X] generate a page per package with the readme and most metadata
26 # * [ ] link/include/be included in the documentation
27 # * [ ] propose `related packages`
28 # * [X] show directory content (a la nitls)
29 # * [X] gather git information from the working directory
30 # * [ ] gather git information from the repository
31 # * [ ] gather package information from github
32 # * [ ] gather people information from github
34 # * [ ] separate information gathering from rendering
35 # * [ ] move up information gathering in (existing or new) service modules
36 # * [X] add command line options
37 # * [ ] harden HTML (escaping, path injection, etc)
38 # * [ ] nitcorn server with RESTful API
40 # ## Issues and limitations
42 # The tool works likee the other tools and expects to find valid Nit source code in the directories
44 # * cruft and temporary files will be collected
45 # * missing source file (e.g. not yet generated by nitcc) will make information
46 # incomplete (e.g. invalid module thus partial dependency and metrics)
48 # How to use the tool as the basis of a Nit code archive on the web usable with a package manager is not clear.
51 import loader
# Scan&load packages, groups and modules
52 import doc
::doc_down
# Display mdoc
53 import md5
# To get gravatar images
54 import counter
# For statistics
55 import modelize
# To process and count classes and methods
58 # Return the associated metadata from the `ini`, if any
59 fun metadata
(key
: String): nullable String
62 if ini
== null then return null
66 # The list of maintainers
67 var maintainers
= new Array[String]
69 # The list of contributors
70 var contributors
= new Array[String]
72 # The date of the most recent commit
73 var last_date
: nullable String = null
75 # The date of the oldest commit
76 var first_date
: nullable String = null
79 # A HTML page in a catalog
81 # This is just a template with the header pre-filled and the footer injected at rendering.
82 # Therefore, once instantiated, the content can just be added to it.
86 # The associated catalog, used to groups options and other global data
89 # Placeholder to include additional things before the `</head>`.
90 var more_head
= new Template
92 # Relative path to the root directory (with the index file).
94 # Use "" for pages in the root directory
95 # Use ".." for pages in a subdirectory
104 <meta charset="utf-8">
105 <link rel="stylesheet" media="all" href="https://maxcdn.bootstrapcdn.com/bootstrap/3.3.1/css/bootstrap.min.css">
106 <link rel="stylesheet" media="all" href="{{{rootpath / "style.css"}}}">
113 <div class='container-fluid'>
115 <nav id='topmenu' class='navbar navbar-default navbar-fixed-top' role='navigation'>
116 <div class='container-fluid'>
117 <div class='navbar-header'>
118 <button type='button' class='navbar-toggle' data-toggle='collapse' data-target='#topmenu-collapse'>
119 <span class='sr-only'>Toggle menu</span>
120 <span class='icon-bar'></span>
121 <span class='icon-bar'></span>
122 <span class='icon-bar'></span>
124 <span class='navbar-brand'><a href="http://nitlanguage.org/">Nitlanguage.org</a></span>
126 <div class='collapse navbar-collapse' id='topmenu-collapse'>
127 <ul class='nav navbar-nav'>
128 <li><a href="{{{rootpath / "index.html"}}}">Catalog</a></li>
140 </div> <!-- container-fluid -->
141 <script src='https://code.jquery.com/jquery-latest.min.js'></script>
142 <script src='https://maxcdn.bootstrapcdn.com/bootstrap/3.3.1/js/bootstrap.min.js'></script>
143 <script src='https://cdnjs.cloudflare.com/ajax/libs/bootstrap-table/1.8.1/bootstrap-table-all.min.js'></script>
151 # Returns `log(self+1)`. Used to compute score of packages
152 fun score
: Float do return (self+1).to_f
.log
155 # The main class of the calatog generator that has the knowledge
159 # used to access the files and count source lines of code
160 var modelbuilder
: ModelBuilder
163 var tag2proj
= new MultiHashMap[String, MPackage]
165 # Packages by category
166 var cat2proj
= new MultiHashMap[String, MPackage]
168 # Packages by maintainer
169 var maint2proj
= new MultiHashMap[String, MPackage]
171 # Packages by contributors
172 var contrib2proj
= new MultiHashMap[String, MPackage]
174 # Dependency between packages
175 var deps
= new POSet[MPackage]
177 # Number of modules by package
178 var mmodules
= new Counter[MPackage]
180 # Number of classes by package
181 var mclasses
= new Counter[MPackage]
183 # Number of methods by package
184 var mmethods
= new Counter[MPackage]
186 # Number of line of code by package
187 var loc
= new Counter[MPackage]
189 # Number of commits by package
190 var commits
= new Counter[MPackage]
194 # The score is loosely computed using other metrics
195 var score
= new Counter[MPackage]
197 # Return a empty `CatalogPage`.
198 fun new_page
(rootpath
: String): CatalogPage
200 return new CatalogPage(self, rootpath
)
203 # Scan, register and add a contributor to a package
204 fun add_contrib
(person
: String, mpackage
: MPackage, res
: Template)
206 var projs
= contrib2proj
[person
]
207 if not projs
.has
(mpackage
) then projs
.add mpackage
212 # Regular expressions are broken, need to investigate.
215 #var re = "([^<(]*?)(<([^>]*?)>)?(\\((.*)\\))?".to_re
216 #var m = (person+" ").search(re)
217 #print "{person}: `{m or else "?"}` `{m[1] or else "?"}` `{m[3] or else "?"}` `{m[5] or else "?"}`"
219 var sp1
= person
.split_once_on
("<")
220 if sp1
.length
< 2 then
223 var sp2
= sp1
.last
.split_once_on
(">")
224 if sp2
.length
< 2 then
227 name
= sp1
.first
.trim
228 email
= sp2
.first
.trim
229 var sp3
= sp2
.last
.split_once_on
("(")
230 if sp3
.length
< 2 then
233 var sp4
= sp3
.last
.split_once_on
(")")
234 if sp4
.length
< 2 then
237 page
= sp4
.first
.trim
240 var e
= name
.html_escape
243 res
.add
"<a href=\"{page.html_escape}\
">"
245 if email
!= null then
246 # TODO get more things from github by using the email as a key
247 # "https://api.github.com/search/users?q={email}+in:email"
248 var md5
= email
.md5
.to_lower
249 res
.add
"<img src=\"https
://secure
.gravatar
.com
/avatar
/{md5}?size
=20&
;default
=retro\
"> "
252 if page
!= null then res
.add
"</a>"
256 # Recursively generate a level in the file tree of the *content* section
257 private fun gen_content_level
(ot
: OrderedTree[MConcern], os
: Array[Object], res
: Template)
265 if mdoc
!= null then d
= ": {mdoc.html_synopsis.write_to_string}"
266 res
.add
"<strong>{o.name}</strong>{d} ({o.filepath.to_s})"
267 else if o
isa MModule then
270 if mdoc
!= null then d
= ": {mdoc.html_synopsis.write_to_string}"
271 res
.add
"<strong>{o.name}</strong>{d} ({o.filepath.to_s})"
275 var subs
= ot
.sub
.get_or_null
(o
)
276 if subs
!= null then gen_content_level
(ot
, subs
, res
)
282 # Compute information and generate a full HTML page for a package
283 fun package_page
(mpackage
: MPackage): Writable
285 var res
= new_page
("..")
286 var score
= score
[mpackage
].to_f
287 var name
= mpackage
.name
.html_escape
288 res
.more_head
.add
"""<title>{{{name}}}</title>"""
291 <div class="content">
292 <h1 class="package-name">{{{name}}}</h1>
294 var mdoc
= mpackage
.mdoc_or_fallback
297 res
.add mdoc
.html_documentation
298 score
+= mdoc
.content
.length
.score
301 res
.add
"<h2>Content</h2>"
302 var ot
= new OrderedTree[MConcern]
303 for g
in mpackage
.mgroups
do
305 if g
.is_interesting
then
309 for mp
in g
.mmodules
do
313 ot
.sort_with
(alpha_comparator
)
314 gen_content_level
(ot
, ot
.roots
, res
)
319 <div class="sidebar">
322 var tryit
= mpackage
.metadata
("upstream.tryit")
323 if tryit
!= null then
325 var e
= tryit
.html_escape
326 res
.add
"<li><a href=\"{e}\
">Try<span style=\"color
:white\
">n</span>it!</a></li>\n"
328 var apk
= mpackage
.metadata
("upstream.apk")
331 var e
= apk
.html_escape
332 res
.add
"<li><a href=\"{e}\
">Android apk</a></li>\n"
335 res
.add
"""</ul>\n<ul class="box">\n"""
337 var homepage
= mpackage
.metadata
("upstream.homepage")
338 if homepage
!= null then
340 var e
= homepage
.html_escape
341 res
.add
"<li><a href=\"{e}\
">{e}</a></li>\n"
343 var maintainer
= mpackage
.metadata
("package.maintainer")
344 if maintainer
!= null then
346 add_contrib
(maintainer
, mpackage
, res
)
347 mpackage
.maintainers
.add maintainer
348 var projs
= maint2proj
[maintainer
]
349 if not projs
.has
(mpackage
) then projs
.add mpackage
351 var license
= mpackage
.metadata
("package.license")
352 if license
!= null then
354 var e
= license
.html_escape
355 res
.add
"<li><a href=\"http
://opensource
.org
/licenses
/{e}\
">{e}</a> license</li>\n"
359 res
.add
"<h3>Source Code</h3>\n<ul class=\"box\
">\n"
360 var browse
= mpackage
.metadata
("upstream.browse")
361 if browse
!= null then
363 var e
= browse
.html_escape
364 res
.add
"<li><a href=\"{e}\
">{e}</a></li>\n"
366 var git
= mpackage
.metadata
("upstream.git")
368 var e
= git
.html_escape
369 res
.add
"<li><tt>{e}</tt></li>\n"
371 var last_date
= mpackage
.last_date
372 if last_date
!= null then
373 var e
= last_date
.html_escape
374 res
.add
"<li>most recent commit: {e}</li>\n"
376 var first_date
= mpackage
.first_date
377 if first_date
!= null then
378 var e
= first_date
.html_escape
379 res
.add
"<li>oldest commit: {e}</li>\n"
381 var commits
= commits
[mpackage
]
383 res
.add
"<li>{commits} commits</li>\n"
387 res
.add
"<h3>Tags</h3>\n"
388 var tags
= mpackage
.metadata
("package.tags")
389 var ts
= new Array[String]
391 for t
in tags
.split
(",") do
393 if t
== "" then continue
397 if ts
.is_empty
then ts
.add
"none"
398 if tryit
!= null then ts
.add
"tryit"
399 if apk
!= null then ts
.add
"apk"
400 var ts2
= new Array[String]
402 tag2proj
[t
].add mpackage
404 ts2
.add
"<a href=\"../index
.html
#tag_{t}\">{t}</a>"
406 res
.add_list
(ts2
, ", ", ", ")
408 cat2proj
[cat
].add mpackage
409 score
+= ts
.length
.score
411 if deps
.has
(mpackage
) then
412 var reqs
= deps
[mpackage
].greaters
.to_a
413 reqs
.remove
(mpackage
)
414 alpha_comparator
.sort
(reqs
)
415 res
.add
"<h3>Requirements</h3>\n"
416 if reqs
.is_empty
then
419 var list
= new Array[String]
421 var direct
= deps
.has_direct_edge
(mpackage
, r
)
422 var s
= "<a href=\"{r}.html\
">"
423 if direct
then s
+= "<strong>"
425 if direct
then s
+= "</strong>"
429 res
.add_list
(list
, ", ", " and ")
432 reqs
= deps
[mpackage
].smallers
.to_a
433 reqs
.remove
(mpackage
)
434 alpha_comparator
.sort
(reqs
)
435 res
.add
"<h3>Clients</h3>\n"
436 if reqs
.is_empty
then
439 var list
= new Array[String]
441 var direct
= deps
.has_direct_edge
(r
, mpackage
)
442 var s
= "<a href=\"{r}.html\
">"
443 if direct
then s
+= "<strong>"
445 if direct
then s
+= "</strong>"
449 res
.add_list
(list
, ", ", " and ")
452 score
+= deps
[mpackage
].greaters
.length
.score
453 score
+= deps
[mpackage
].direct_greaters
.length
.score
454 score
+= deps
[mpackage
].smallers
.length
.score
455 score
+= deps
[mpackage
].direct_smallers
.length
.score
458 var contributors
= mpackage
.contributors
459 if not contributors
.is_empty
then
460 res
.add
"<h3>Contributors</h3>\n<ul class=\"box\
">"
461 for c
in contributors
do
462 add_contrib
(c
, mpackage
, res
)
466 score
+= contributors
.length
.to_f
472 for g
in mpackage
.mgroups
do
473 mmodules
+= g
.mmodules
.length
474 for m
in g
.mmodules
do
475 var am
= modelbuilder
.mmodule2node
(m
)
477 var file
= am
.location
.file
479 loc
+= file
.line_starts
.length
- 1
482 for cd
in m
.mclassdefs
do
484 for pd
in cd
.mpropdefs
do
485 if not pd
isa MMethodDef then continue
491 self.mmodules
[mpackage
] = mmodules
492 self.mclasses
[mpackage
] = mclasses
493 self.mmethods
[mpackage
] = mmethods
494 self.loc
[mpackage
] = loc
496 #score += mmodules.score
497 score
+= mclasses
.score
498 score
+= mmethods
.score
504 <li>{{{mmodules}}} modules</li>
505 <li>{{{mclasses}}} classes</li>
506 <li>{{{mmethods}}} methods</li>
507 <li>{{{loc}}} lines of code</li>
514 self.score
[mpackage
] = score
.to_i
519 # Return a short HTML sequence for a package
521 # Intended to use in lists.
522 fun li_package
(p
: MPackage): String
525 var f
= "p/{p.name}.html"
526 res
+= "<a href=\"{f}\
">{p}</a>"
527 var d
= p
.mdoc_or_fallback
528 if d
!= null then res
+= " - {d.html_synopsis.write_to_string}"
532 # List packages by group.
534 # For each key of the `map` a `<h3>` is generated.
535 # Each package is then listed.
537 # The list of keys is generated first to allow fast access to the correct `<h3>`.
538 # `id_prefix` is used to give an id to the `<h3>` element.
539 fun list_by
(map
: MultiHashMap[String, MPackage], id_prefix
: String): Template
541 var res
= new Template
542 var keys
= map
.keys
.to_a
543 alpha_comparator
.sort
(keys
)
544 var list
= [for x
in keys
do "<a href=\"#{id_prefix}{x.html_escape}\">{x.html_escape}</a>"]
545 res
.add_list
(list
, ", ", " and ")
548 var projs
= map
[k
].to_a
549 alpha_comparator
.sort
(projs
)
550 var e
= k
.html_escape
551 res
.add
"<h3 id=\"{id_prefix}{e}\
">{e} ({projs.length})</h3>\n<ul>\n"
554 res
.add li_package
(p
)
562 # List the 10 best packages from `cpt`
563 fun list_best
(cpt
: Counter[MPackage]): Template
565 var res
= new Template
569 if i
> best
.length
then break
570 var p
= best
[best
.length-i
]
572 res
.add li_package
(p
)
573 # res.add " ({cpt[p]})"
580 # Collect more information on a package using the `git` tool.
581 fun git_info
(mpackage
: MPackage)
583 var ini
= mpackage
.ini
584 if ini
== null then return
586 # TODO use real git info
587 #var repo = ini.get_or_null("upstream.git")
588 #var branch = ini.get_or_null("upstream.git.branch")
589 #var directory = ini.get_or_null("upstream.git.directory")
591 var dirpath
= mpackage
.root
.filepath
592 if dirpath
== null then return
594 # Collect commits info
595 var res
= git_run
("log", "--no-merges", "--follow", "--pretty=tformat:%ad;%aN <%aE>", "--", dirpath
)
596 var contributors
= new Counter[String]
597 var commits
= res
.split
("\n")
598 if commits
.not_empty
and commits
.last
== "" then commits
.pop
599 self.commits
[mpackage
] = commits
.length
601 var s
= l
.split_once_on
(';')
602 if s
.length
!= 2 or s
.last
== "" then continue
604 # Collect date of last and first commit
605 if mpackage
.last_date
== null then mpackage
.last_date
= s
.first
606 mpackage
.first_date
= s
.first
609 contributors
.inc
(s
.last
)
611 for c
in contributors
.sort
.reverse_iterator
do
612 mpackage
.contributors
.add c
617 # Produce a HTML table containig information on the packages
619 # `package_page` must have been called before so that information is computed.
620 fun table_packages
(mpackages
: Array[MPackage]): Template
622 alpha_comparator
.sort
(mpackages
)
623 var res
= new Template
624 res
.add
"<table data-toggle=\"table\
" data-sort-name=\"name\
" data-sort-order=\"desc\
" width=\"100%\
">\n"
625 res
.add
"<thead><tr>\n"
626 res
.add
"<th data-field=\"name\
" data-sortable=\"true\
">name</th>\n"
627 res
.add
"<th data-field=\"maint\
" data-sortable=\"true\
">maint</th>\n"
628 res
.add
"<th data-field=\"contrib\
" data-sortable=\"true\
">contrib</th>\n"
629 if deps
.not_empty
then
630 res
.add
"<th data-field=\"reqs\
" data-sortable=\"true\
">reqs</th>\n"
631 res
.add
"<th data-field=\"dreqs\
" data-sortable=\"true\
">direct<br>reqs</th>\n"
632 res
.add
"<th data-field=\"cli\
" data-sortable=\"true\
">clients</th>\n"
633 res
.add
"<th data-field=\"dcli\
" data-sortable=\"true\
">direct<br>clients</th>\n"
635 res
.add
"<th data-field=\"mod\
" data-sortable=\"true\
">modules</th>\n"
636 res
.add
"<th data-field=\"cla\
" data-sortable=\"true\
">classes</th>\n"
637 res
.add
"<th data-field=\"met\
" data-sortable=\"true\
">methods</th>\n"
638 res
.add
"<th data-field=\"loc\
" data-sortable=\"true\
">lines</th>\n"
639 res
.add
"<th data-field=\"score\
" data-sortable=\"true\
">score</th>\n"
640 res
.add
"</tr></thead>"
641 for p
in mpackages
do
643 res
.add
"<td><a href=\"p
/{p.name}.html\
">{p.name}</a></td>"
645 if p
.maintainers
.not_empty
then maint
= p
.maintainers
.first
646 res
.add
"<td>{maint}</td>"
647 res
.add
"<td>{p.contributors.length}</td>"
648 if deps
.not_empty
then
649 res
.add
"<td>{deps[p].greaters.length-1}</td>"
650 res
.add
"<td>{deps[p].direct_greaters.length}</td>"
651 res
.add
"<td>{deps[p].smallers.length-1}</td>"
652 res
.add
"<td>{deps[p].direct_smallers.length}</td>"
654 res
.add
"<td>{mmodules[p]}</td>"
655 res
.add
"<td>{mclasses[p]}</td>"
656 res
.add
"<td>{mmethods[p]}</td>"
657 res
.add
"<td>{loc[p]}</td>"
658 res
.add
"<td>{score[p]}</td>"
666 # Execute a git command and return the result
667 fun git_run
(command
: String...): String
669 # print "git {command.join(" ")}"
670 var p
= new ProcessReader("git", command
...)
677 var model
= new Model
678 var tc
= new ToolContext
680 var opt_dir
= new OptionString("Directory where the HTML files are generated", "-d", "--dir")
681 var opt_no_git
= new OptionBool("Do not gather git information from the working directory", "--no-git")
682 var opt_no_parse
= new OptionBool("Do not parse nit files (no importation information)", "--no-parse")
683 var opt_no_model
= new OptionBool("Do not analyse nit files (no class/method information)", "--no-model")
685 tc
.option_context
.add_option
(opt_dir
, opt_no_git
, opt_no_parse
, opt_no_model
)
687 tc
.process_options
(sys
.args
)
690 var modelbuilder
= new ModelBuilder(model
, tc
)
691 var catalog
= new Catalog(modelbuilder
)
693 # Get files or groups
694 var args
= tc
.option_context
.rest
695 if opt_no_parse
.value
then
696 modelbuilder
.scan_full
(args
)
698 modelbuilder
.parse_full
(args
)
701 # Scan packages and compute information
702 for p
in model
.mpackages
do
705 modelbuilder
.scan_group
(g
)
707 # Load the module to process importation information
708 if opt_no_parse
.value
then continue
710 catalog
.deps
.add_node
(p
)
711 for gg
in p
.mgroups
do for m
in gg
.mmodules
do
712 for im
in m
.in_importation
.direct_greaters
do
714 if ip
== null or ip
== p
then continue
715 catalog
.deps
.add_edge
(p
, ip
)
720 if not opt_no_git
.value
then for p
in model
.mpackages
do
724 # Run phases to modelize classes and properties (so we can count them)
725 if not opt_no_model
.value
then
726 modelbuilder
.run_phases
729 var out
= opt_dir
.value
or else "catalog.out"
732 # Generate the css (hard coded)
736 background-color: #f8f8f8;
741 text-decoration: none;
746 text-decoration: none;
758 border-bottom: solid 3px #CCC;
764 border-bottom: solid 1px #CCC;
768 list-style-type: square;
778 border: 1px solid #CCC;
779 font-family: Monospace;
781 background-color: rgb(250, 250, 250);
785 font-family: Monospace;
825 text-overflow: ellipsis;
827 border-bottom: 1px solid rgba(0,0,0,0.2);
830 css
.write_to_file
(out
/"style.css")
834 for p
in model
.mpackages
do
836 var f
= "p/{p.name}.html"
837 catalog
.package_page
(p
).write_to_file
(out
/f
)
842 var index
= catalog
.new_page
("")
843 index
.more_head
.add
"<title>Packages in Nit</title>"
846 <div class="content">
847 <h1>Packages in Nit</h1>
850 index
.add
"<h2>Highlighted Packages</h2>\n"
851 index
.add catalog
.list_best
(catalog
.score
)
853 if catalog
.deps
.not_empty
then
854 index
.add
"<h2>Most Required</h2>\n"
855 var reqs
= new Counter[MPackage]
856 for p
in model
.mpackages
do
857 reqs
[p
] = catalog
.deps
[p
].smallers
.length
- 1
859 index
.add catalog
.list_best
(reqs
)
862 index
.add
"<h2>By First Tag</h2>\n"
863 index
.add catalog
.list_by
(catalog
.cat2proj
, "cat_")
865 index
.add
"<h2>By Any Tag</h2>\n"
866 index
.add catalog
.list_by
(catalog
.tag2proj
, "tag_")
870 <div class="sidebar">
873 <li>{{{model.mpackages.length}}} packages</li>
874 <li>{{{catalog.maint2proj.length}}} maintainers</li>
875 <li>{{{catalog.contrib2proj.length}}} contributors</li>
876 <li>{{{catalog.tag2proj.length}}} tags</li>
877 <li>{{{catalog.mmodules.sum}}} modules</li>
878 <li>{{{catalog.mclasses.sum}}} classes</li>
879 <li>{{{catalog.mmethods.sum}}} methods</li>
880 <li>{{{catalog.loc.sum}}} lines of code</li>
885 index
.write_to_file
(out
/"index.html")
889 var page
= catalog
.new_page
("")
890 page
.more_head
.add
"<title>People of Nit</title>"
891 page
.add
"""<div class="content">\n<h1>People of Nit</h1>\n"""
892 page
.add
"<h2>By Maintainer</h2>\n"
893 page
.add catalog
.list_by
(catalog
.maint2proj
, "maint_")
894 page
.add
"<h2>By Contributor</h2>\n"
895 page
.add catalog
.list_by
(catalog
.contrib2proj
, "contrib_")
897 page
.write_to_file
(out
/"people.html")
901 page
= catalog
.new_page
("")
902 page
.more_head
.add
"<title>Projets of Nit</title>"
903 page
.add
"""<div class="content">\n<h1>People of Nit</h1>\n"""
904 page
.add
"<h2>Table of Projets</h2>\n"
905 page
.add catalog
.table_packages
(model
.mpackages
)
907 page
.write_to_file
(out
/"table.html")