From faac656ab1935ac6e1f064499217e95ab0f1c850 Mon Sep 17 00:00:00 2001
From: yggverse <yggverse@bot>
Date: Fri, 12 Apr 2024 08:01:43 +0300
Subject: [PATCH] add pango markup converter

---
 README.md     | 22 +++++++++++++
 src/Pango.php | 86 +++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 108 insertions(+)
 create mode 100644 src/Pango.php

diff --git a/README.md b/README.md
index 2082583..7be841b 100644
--- a/README.md
+++ b/README.md
@@ -207,6 +207,28 @@ var_dump(
 
 #### Link::getAlt
 
+## Pango
+
+Converter for GTK/Pango format
+
+### Pango::fromGemtext
+
+``` php
+$pango = \Yggverse\Gemini\Pango::fromGemtext(
+    $gemtext
+);
+```
+
+### Pango::fromBody
+
+``` php
+$pango = \Yggverse\Gemini\Pango::fromBody(
+    new \Yggverse\Gemini\Gemtext\Body(
+        $gemtext
+    )
+);
+```
+
 ## DokuWiki
 
 Toolkit provides DokuWiki API for Gemini.
diff --git a/src/Pango.php b/src/Pango.php
new file mode 100644
index 0000000..69670e5
--- /dev/null
+++ b/src/Pango.php
@@ -0,0 +1,86 @@
+<?php
+
+declare(strict_types=1);
+
+namespace Yggverse\Gemini;
+
+class Pango
+{
+    public static function fromGemtext(
+        string $gemtext
+    ): string
+    {
+        return self::fromBody(
+            new \Yggverse\Gemini\Gemtext\Body(
+                $gemtext
+            )
+        );
+    }
+
+    public static function fromBody(
+        \Yggverse\Gemini\Gemtext\Body $body
+    ): string
+    {
+        // Format body
+        $lines = $body->getLines();
+
+        $escaped = [];
+
+        /// Format H1
+        foreach ($body->getH1() as $index => $h1)
+        {
+            $lines[$index] = sprintf(
+                '<span size="xx-large">%s</span>',
+                htmlentities(
+                    $h1
+                )
+            );
+
+            $escaped[] = $index;
+        }
+
+        /// Format H2
+        foreach ($body->getH2() as $index => $h2)
+        {
+            $lines[$index] = sprintf(
+                '<span size="x-large">%s</span>',
+                htmlentities(
+                    $h2
+                )
+            );
+
+            $escaped[] = $index;
+        }
+
+        /// Format H3
+        foreach ($body->getH3() as $index => $h3)
+        {
+            $lines[$index] = sprintf(
+                '<span size="large">%s</span>',
+                htmlentities(
+                    $h3
+                )
+            );
+
+            $escaped[] = $index;
+        }
+
+        /// Escape entities
+        foreach ($lines as $index => $line)
+        {
+            if (!in_array($index, $escaped))
+            {
+                $lines[$index] = htmlentities(
+                    $line
+                );
+            }
+        }
+
+        // @TODO links, code, escape entities
+
+        return implode(
+            PHP_EOL,
+            $lines
+        );
+    }
+}
\ No newline at end of file