Add links to constants with replaceable tags

Add links to constants with replaceable tags by processing them when the constant tag is being closed.
Add a test.

phpdotnet/phd/Package/Generic/XHTML.php

@@ -235,7 +235,10 @@ abstract class Package_Generic_XHTML extends Format_Abstract_XHTML {
         'refname'               => 'h1',
         'refnamediv'            => 'div',
         'releaseinfo'           => 'div',
-        'replaceable'           => 'span',
+        'replaceable'           => array(
+            /* DEFAULT */          'span',
+            'constant'          => 'format_replaceable',
+        ),
         'revhistory'            => 'format_table',
         'revision'              => 'format_row',
         'revremark'             => 'format_entry',
@@ -403,6 +406,10 @@ abstract class Package_Generic_XHTML extends Format_Abstract_XHTML {
             'ooexception'      => 'format_modifier_text',
             'oointerface'      => 'format_modifier_text',
         ),
+        'replaceable'          => array(
+            /* DEFAULT */         false,
+            'constant'         => 'format_suppressed_text',
+        ),
         /** Those are used to retrieve the class/interface name to be able to remove it from method names */
         'classname' => [
             /* DEFAULT */ false,
@@ -1681,26 +1688,92 @@ public function format_screen($open, $name, $attrs) {
         }
         return '</div>';
     }
-    public function format_constant($open, $name, $attrs)
+    public function format_constant($open, $name, $attrs, $props)
     {
         if ($open) {
+            if (str_contains($props["innerXml"], '<replaceable')) {
+                $this->pushRole("constant_group");
+                $this->cchunk["constant"] = $props["innerXml"];
+            }
             return "<strong><code>";
         }
+
+        if ($this->getRole() === "constant_group") {
+            $this->popRole();
+
+            $value = str_replace(
+                ["<replaceable xmlns=\"http://docbook.org/ns/docbook\">", "</replaceable>"],
+                ["<span class=\"replaceable\">", "</span>"],
+                strip_tags($this->cchunk["constant"], "<replaceable>")
+            );
+
+            $link = $this->createReplaceableConstantLink(strip_tags($this->cchunk["constant"], "<replaceable>"));
+            $this->cchunk["constant"] = "";
+
+            if ($link === "") {
+                return $value . '</code></strong>';
+            }
+
+            return '<a href="' . $link . '">' . $value . '</a></code></strong>';
+        }
         return "</code></strong>";
     }
-    public function format_constant_text($value, $tag) {
+
+    /**
+     * Creates a link to the first constant in the index 
+     * that matches the pattern of a constant containing a <replaceable> tag
+     * or returns an empty string if no match was found.
+     * 
+     * This works only with one set of <replaceable> tags in a constant
+     * e.g. CURLE_<replaceable>*</replaceable> or DOM_<replaceable>*</replaceable>_NODE
+     */
+    private function createReplaceableConstantLink(string $constant): string {
+        $pattern = "/" . preg_replace(
+            "/<replaceable.*<\/replaceable>/", 
+            ".*", 
+            str_replace(
+                ".", 
+                "\.", 
+                $this->convertConstantNameToId($constant)
+            )
+        ) ."/";
+
+        $matchingConstantId = "";
+        foreach ($this->indexes as $index) {
+            if (preg_match($pattern, $index["docbook_id"])) {
+                $matchingConstantId = $index["docbook_id"];
+                break;
+            }
+        }
+
+        return $matchingConstantId === "" ? "" : $this->createLink($matchingConstantId);
+    }
+
+    private function convertConstantNameToId(string $constantName): string {
         $tempLinkValue = str_replace(
             array("\\", "_"),
             array("-", "-"),
-            strtolower(trim($value, "_"))
+            strtolower(trim($constantName, "_"))
         );
-        if (str_contains($value, '::')) {
+
+        if (str_contains($constantName, '::')) {
             // class constant
             list($extensionAndClass, $constant) = explode("::", $tempLinkValue);
             $normalizedLinkFormat = $extensionAndClass . ".constants." . trim($constant, "-");
         } else {
             $normalizedLinkFormat = 'constant.' . $tempLinkValue;
         }
+
+        return $normalizedLinkFormat;
+    }
+
+    public function format_constant_text($value, $tag) {
+        if ($this->getRole() === "constant_group") {
+            return "";
+        }
+
+        $normalizedLinkFormat = $this->convertConstantNameToId($value);
+
         $link = $this->createLink($normalizedLinkFormat);
 
         if ($link === null) {
@@ -1709,6 +1782,12 @@ public function format_constant_text($value, $tag) {
 
         return '<a href="' . $link . '">' . $value . '</a>';
     }
+    public function format_replaceable($open, $name, $attrs, $props) {
+        if ($this->getRole() === "constant_group") {
+            return "";
+        }
+        return false;
+    }
     public function admonition_title($title, $lang)
     {
         return '<strong class="' .(strtolower($title)). '">' .($this->autogen($title, $lang)). '</strong>';

phpdotnet/phd/Render.php

@@ -77,7 +77,7 @@ public function execute(Reader $r) { /* {{{ */
                         $r->name === "type" ||
                         $r->name === "classsynopsis" ||
                         $r->name === "qandaset" ||
-                        in_array($r->name, ["methodsynopsis", "constructorsynopsis", "destructorsynopsis"], true)
+                        in_array($r->name, ["methodsynopsis", "constructorsynopsis", "destructorsynopsis", "constant"], true)
                     )
                 ) {
                     $innerXml = $r->readInnerXml();

tests/package/php/constant_links_001.phpt

@@ -27,6 +27,10 @@ $indices = [
         "docbook_id" => "extension-class.constants.leading-and-trailing-undescores2",
         "filename"   => "extensionname4.constantspage4",
     ],
+    [
+        "docbook_id" => "constant.extension-namespace-definitely-exists3",
+        "filename"   => "extensionname.constantspage",
+    ],
 ];
 
 $format = new TestPHPChunkedXHTML($config);
@@ -79,5 +83,12 @@ Content:
    <strong><code><a href="extensionname4.constantspage4.html#extension-class.constants.leading-and-trailing-undescores2">Extension\Class::__LEADING_AND_TRAILING_UNDESCORES2__</a></code></strong>
   </p>
  </div>
+
+ <div class="section">
+  <p class="para">4. Constant with replacable parts links to first ID in the index</p>
+  <p class="para">
+   <strong><code><a href="extensionname.constantspage.html#constant.extension-namespace-definitely-exists">Extension\Namespace\DEFINITELY_<span class="replaceable">SHOULD_EXIST</span></a></code></strong>
+  </p>
+ </div>
 
 </div>

tests/package/php/data/constant_links.xml

@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<chapter xml:id="constant_links">
+<chapter xml:id="constant_links" xmlns="http://docbook.org/ns/docbook">
 
  <section>
   <para>1. Existing constants</para>
@@ -24,5 +24,12 @@
    <constant>Extension\Class::__LEADING_AND_TRAILING_UNDESCORES2__</constant>
   </para>
  </section>
+
+ <section>
+  <para>4. Constant with replacable parts links to first ID in the index</para>
+  <para>
+   <constant>Extension\Namespace\DEFINITELY_<replaceable>SHOULD_EXIST</replaceable></constant>
+  </para>
+ </section>
 
 </chapter>