) — the simplified * pattern will happily match, but handle() produces an internallink * with a broken src; spec tests for this stay in skip.php. * - Balanced-parens inside URLs [link](foo(bar)) — matches truncate * at first `)`, producing odd output; also in skip.php. * - Title HTML attribute — DokuWiki link handler instructions have no * title-attribute slot, and plumbing one through every renderer just * for this is out of scope. The title parses cleanly but is discarded. * - Mixed text + image in the label ([prefix  suffix](url)) * — matches DW's policy: Internallink only converts the label to a * media descriptor when it matches `^{{…}}$` exactly. */ class GfmLink extends AbstractMode { // Image sub-pattern reused for both the label alternative in the main // pattern and the image-as-label detector in handle(). No capture // groups here — the lexer wraps user patterns in a capture and // additional captures would renumber unpredictably. private const IMAGE_SUB = '!\[[^\[\]\n]*\]\([^)\n]+\)'; /** @inheritdoc */ public function getSort() { return 300; } /** @inheritdoc */ public function connectTo($mode) { // Outer shape: `[text-or-image](url)`. Text class forbids brackets // and newlines; the image alternative explicitly matches one // inline image. URL slot is permissive (`[^)\n]+`) — handle() does // URL / title splitting post-entry, mirroring how DW Internallink // parses inside `[[...]]`. $pattern = '\[(?!\[)(?:[^\[\]\n]+|' . self::IMAGE_SUB . ')\]\([^)\n]+\)'; $this->Lexer->addSpecialPattern($pattern, $mode, 'gfm_link'); } /** @inheritdoc */ public function handle($match, $state, $pos, Handler $handler) { // Detect image-as-label `[](target)`. Parallels // Internallink's `^{{…}}$` check — when the label is exactly an // inline image, parse it into a media descriptor; otherwise // treat the label as plain text. if (preg_match('/^\[(' . self::IMAGE_SUB . ')\]\(([^)\n]+)\)$/', $match, $m)) { $label = $this->parseImageDescriptor($m[1]); $targetUrl = $this->extractUrl($m[2]); } else { // Plain text label can't contain `]`, so the first `](` is // the label/target separator. $sep = strpos($match, ']('); $label = Escape::unescapeBackslashes(substr($match, 1, $sep - 1)); $targetUrl = $this->extractUrl(substr($match, $sep + 2, -1)); } // Classify on the raw URL so windowssharelink detection sees the // literal `\\host\path` runs intact — GFM's `\\` → `\` collapse // would otherwise destroy the share prefix. [$call, $args] = Link::classify($targetUrl, $label); if ($call !== 'windowssharelink') { $args[0] = Escape::unescapeBackslashes($args[0]); } $handler->addCall($call, $args, $pos); return true; } /** * Extract the URL from a parenthesized payload: trim surrounding * whitespace, then take the first whitespace-delimited token. Any * trailing title is discarded (no renderer slot for it). */ private function extractUrl(string $inside): string { $inside = trim($inside); return substr($inside, 0, strcspn($inside, " \t\n")); } /** * Parse an inline image sub-match `` into the media * descriptor shape Media::parseMedia() returns, so the link handler * can treat it as a media label identically to `[[page|{{img}}]]`. */ private function parseImageDescriptor(string $imageMatch): array { $sep = strpos($imageMatch, ']('); $alt = Escape::unescapeBackslashes(substr($imageMatch, 2, $sep - 2)); $imgUrl = Escape::unescapeBackslashes($this->extractUrl(substr($imageMatch, $sep + 2, -1))); $p = MediaHelper::parseParameters($imgUrl); $type = (media_isexternal($p['src']) || link_isinterwiki($p['src'])) ? 'externalmedia' : 'internalmedia'; return [ 'type' => $type, 'src' => $p['src'], 'title' => $alt !== '' ? $alt : null, 'align' => $p['align'], 'width' => $p['width'], 'height' => $p['height'], 'cache' => $p['cache'], 'linking' => $p['linking'], ]; } }