1 files changed, 128 insertions, 0 deletions
diff --git a/reporting/templates/index.tmpl b/reporting/templates/index.tmpl
new file mode 100644
index 0000000..0889624
--- /dev/null
+++ b/reporting/templates/index.tmpl
@@ -0,0 +1,128 @@
+{ head("Lintian") }
+  <div id="front">
+    <div id="info">
+      <p>
+        Lintian dissects <a href="https://www.debian.org/">Debian</a>
+        <a href="https://packages.debian.org/">packages</a> and tries to find
+        bugs and policy violations. It contains automated checks for many
+        aspects of <a href="https://www.debian.org/doc/debian-policy/">Debian
+        policy</a> as well as some checks for common errors.
+      </p>
+
+      <p>
+        For more information, see the <a href="{$path_prefix}manual/index.html">User
+        Manual</a>.
+      </p>
+
+      <p>
+        Auto-generated documentation of the Lintian Perl Library API can
+        be found <a href="{$path_prefix}library-api/index.html">here</a>.
+      </p>
+
+
+      <p>
+        Lintian is available in the Debian
+        <a href="https://packages.debian.org/lintian">lintian package</a>.
+      </p>
+    </div> <!-- info -->
+    <div class="clear"></div>
+  </div> <!-- front -->
+
+  <nav id="index">
+    <h2>Indices and links</h2>
+
+    <ul>
+      <li><a href="{$path_prefix}maintainers.html">Index of Lintian reports per package maintainers</a></li>
+      <li><a href="{$path_prefix}tags.html">List of emitted tags sorted alphabetically</a></li>
+      <li><a href="{$path_prefix}tags-severity.html">List of emitted tags grouped by severity</a></li>
+      <li><a href="{$path_prefix}tags-all.html">List of all tags sorted alphabetically</a></li>
+      <li>Lists of packages that have names starting with:
+        <ul>
+          <li><a href="{$path_prefix}packages_1.html">0-9, A-F</a></li>
+          <li><a href="{$path_prefix}packages_2.html">G-L</a></li>
+          <li><a href="{$path_prefix}packages_3.html">M-R</a></li>
+          <li><a href="{$path_prefix}packages_4.html">S-Z</a></li>
+        </ul>
+      </li>
+      <li>Download the lintian output for off-line processing: <a href="{resource_path('lintian.log.gz')}">lintian.log.gz</a></li>
+    </ul>
+  </nav> <!-- index -->
+
+  <div id="archives">
+    <h2>Archives</h2>
+    <p>The following archives are processed by Lintian:</p>
+    <table>
+      <tr><th>Archive name</th><th>Attribute</th><th>Attribute value</th></tr>
+{
+        for my $archive_info (@archives) {
+          my $name = $archive_info->{'name'};
+          my $archs = join(' ', @{$archive_info->{'architectures'}});
+          my $distributions = join(' ', @{$archive_info->{'distributions'}});
+          my $components = join(' ', @{$archive_info->{'components'}});
+          my $timestamp = $archive_info->{'timestamp'};
+          $OUT .= qq{      <tr><td rowspan="4">${name}</td><td>Architectures</td><td>$archs</td></tr>\n};
+          $OUT .= qq{      <tr><td>Distributions/Suites</td><td>$distributions</td></tr>\n};
+          $OUT .= qq{      <tr><td>Components</td><td>$components</td></tr>\n};
+          $OUT .= qq{      <tr><td>Mirror timestamp</td><td>$timestamp</td></tr>\n};
+        }
+}
+    </table>
+  </div>
+
+  <div id="stats">
+    <h2>Statistics</h2>
+    <table>
+      <tr><td>Last updated:</td>     <td>{$timestamp}</td></tr>
+      <tr><td>Maintainers:</td>      <td>{$delta{maintainers}}</td></tr>
+      <tr><td>Package groups:</td>     <td>{$delta{'groups-known'}}</td></tr>
+      <tr><td>Rescheduled groups:</td> <td>{$delta{'groups-backlog'}}</td></tr>
+      <tr><td>Groups with processing errors:</td> <td>{$delta{'groups-with-errors'}}</td></tr>
+      <tr><td>Source packages:</td>  <td>{$delta{'source-packages'}}</td></tr>
+      <tr><td>Binary packages:</td>  <td>{$delta{'binary-packages'}}</td></tr>
+      <tr><td>&mu;deb packages:</td> <td>{$delta{'udeb-packages'}}</td></tr>
+      <tr>
+        <td><span class="type-E">E</span> Errors:</td>
+        <td>{$delta{errors}}</td>
+      </tr>
+      <tr>
+        <td><span class="type-W">W</span> Warnings:</td>
+        <td>{$delta{warnings}}</td>
+      </tr>
+      <tr>
+        <td><span class="type-I">I</span> Info tags:</td>
+        <td>{$delta{info}}</td>
+      </tr>
+      <tr>
+        <td><span class="type-P">P</span> Pedantic tags:</td>
+        <td>{$delta{pedantic}}</td>
+      </tr>
+      <tr>
+        <td><span class="type-O">O</span> Overridden tags:</td>
+        <td>{$delta{overridden}}</td>
+      </tr>
+      <tr>
+        <td><span class="type-X">X</span> Experimental tags:</td>
+        <td>{$delta{experimental}}</td>
+      </tr>
+      <tr><td>Lintian version:</td>  <td>{$version}</td></tr>
+    </table>
+
+    <p>
+      (The numbers in parentheses describe the changes since the last Lintian
+      report, published on {$previous}.)
+    </p>
+
+{
+    if ($graphs) {
+        my $graph_link = resource_path('statistics.svg');
+        $OUT .= qq(  <p>\n);
+        $OUT .= qq(    Evolution of Lintian tags over the past\n);
+        $OUT .= qq(    $graphs_days days:</p>\n);
+        $OUT .= qq(  <div class="graph"><a href="${graph_link}"><img class="graph"\n);
+        $OUT .= qq(    src="${graph_link}" alt="The beforementioned graph of Lintian\n);
+        $OUT .= qq(    tags" /></a></div>\n);
+    }
+}
+
+  </div> <!-- stats -->
+{ foot() }