fix absolute paths in api doc

Author: ylecornec

docs/BUILD.bazel

@@ -1,5 +1,27 @@
 load("@io_bazel_stardoc//stardoc:stardoc.bzl", "stardoc")
 load("@rules_python//python:defs.bzl", "py_binary")
+load("@rules_haskell//docs/pandoc:pandoc.bzl", "set_site_end_location")
+load("@bazel_skylib//rules:common_settings.bzl", "bool_flag")
+
+bool_flag(
+    name = "render_dev_website",
+    build_setting_default = False,
+)
+
+config_setting(
+    name = "dev_website_config",
+    flag_values = {
+        "render_dev_website": "True",
+    },
+)
+
+set_site_end_location(
+    name = "set_site_end_location",
+    site_end_location = select({
+        ":dev_website_config": "/api",
+        "//conditions:default": "",
+    }),
+)
 
 libraries = [
     "defs",
@@ -49,6 +71,7 @@ libraries = [
             outs = ["haskell/%s.html" % lib],
             cmd = """\
 $(execpath //docs/pandoc) \
+  -V path_prefix=$(SITE_END_LOCATION)\
   -f markdown \
   -t html \
   -s \
@@ -57,8 +80,9 @@ $(execpath //docs/pandoc) \
   --toc \
   --toc-depth=2 \
   -o $(OUTS) \
-  $(execpath :%s_md)
-""" % lib,
+  $(execpath :{}_md)
+""".format(lib),
+            toolchains = [":set_site_end_location"],
             tools = ["//docs/pandoc"],
         ),
     )
@@ -90,6 +114,7 @@ genrule(
     outs = ["nav.html"],
     cmd = """\
 $(execpath //docs/pandoc) \
+  -V path_prefix=$(SITE_END_LOCATION)\
   -f markdown \
   -t html \
   -s \
@@ -99,6 +124,7 @@ $(execpath //docs/pandoc) \
   --metadata-file=$(execpath :metadata) \
   <<<""
 """,
+    toolchains = [":set_site_end_location"],
     tools = ["//docs/pandoc"],
 )
 
@@ -115,6 +141,7 @@ genrule(
     cmd = """\
 # Render overview page body.
 $(execpath //docs/pandoc) \
+  -V path_prefix=$(SITE_END_LOCATION)\
   -f markdown \
   -t html \
   -s \
@@ -125,6 +152,7 @@ $(execpath //docs/pandoc) \
   <<<""
 # Render full overview page including navigation sidebar.
 $(execpath //docs/pandoc) \
+  -V path_prefix=$(SITE_END_LOCATION)\
   -f html \
   -t html \
   -s \
@@ -137,6 +165,7 @@ $(execpath //docs/pandoc) \
   --metadata-file=$(execpath :metadata) \
   index_body.html
 """,
+    toolchains = [":set_site_end_location"],
     tools = ["//docs/pandoc"],
 )
 

docs/pandoc/pandoc.bzl

@@ -76,3 +76,15 @@ pandoc_toolchain(
 """,
             **kwargs
         )
+
+def _set_site_end_location(ctx):
+    return [
+        platform_common.TemplateVariableInfo({
+            "SITE_END_LOCATION": ctx.attr.site_end_location,
+        }),
+    ]
+
+set_site_end_location = rule(
+    implementation = _set_site_end_location,
+    attrs = {"site_end_location": attr.string()},
+)

docs/templates/index.html

@@ -15,7 +15,7 @@
 $-- Translation of Skydoc Jinja templates to pandoc
 $-- https://github.com/bazelbuild/skydoc/blob/b8a32e0/skydoc/templates
 $for(module)$
-<h2><a href="/haskell/$module.name$.html" id="$module.name$">$module.summary$</a></h2>
+<h2><a href="$path_prefix$/haskell/$module.name$.html" id="$module.name$">$module.summary$</a></h2>
 <table class="overview-table">
   <colgroup>
     <col class="col-name" />
@@ -25,7 +25,7 @@ <h2><a href="/haskell/$module.name$.html" id="$module.name$">$module.summary$</a
 $for(module.symbol)$
     <tr>
       <td>
-        <a href="/haskell/$module.name$.html#$module.symbol.name$">
+        <a href="$path_prefix$/haskell/$module.name$.html#$module.symbol.name$">
           <code>$module.symbol.name$</code>
         </a>
       </td>

docs/templates/nav.html

@@ -18,14 +18,14 @@
         <span class="mdl-layout-title">Bazel</span>
         <nav class="drawer-nav">
           <ul class="drawer-nav">
-            <li><a href="/index.html">Overview</a></li>
+            <li><a href="$path_prefix$/index.html">Overview</a></li>
 $for(module)$
             <li>
-              <a href="/haskell/$module.name$.html">$module.summary$</a>
+              <a href="$path_prefix$/haskell/$module.name$.html">$module.summary$</a>
               <ul>
 $for(module.symbol)$
                 <li>
-                  <a href="/haskell/$module.name$.html#$module.symbol.name$" $if(module.symbol.summary)$title="$module.symbol.summary$"$endif$>
+                  <a href="$path_prefix$/haskell/$module.name$.html#$module.symbol.name$" $if(module.symbol.summary)$title="$module.symbol.summary$"$endif$>
                     $module.symbol.name$
                   </a>
                 </li>

serve-docs.sh

@@ -16,7 +16,7 @@ finish() {
 
 trap finish EXIT
 
-bazel build //docs:api_html
+bazel build //docs:api_html --//docs:render_dev_website
 mkdir "$SCRATCH/api"
 unzip -d "$SCRATCH/api" bazel-bin/docs/api_html-stardoc.zip