From 9a4407f7a58af8cfe208436152fa32233a5ca0b3 Mon Sep 17 00:00:00 2001
From: Christian Grothoff <grothoff@gnunet.org>
Date: Sat, 25 Nov 2023 15:04:44 +0900
Subject: more strict spec parsers for payto URIs, Web URLs, and AML decision
 states

---
 src/util/url.c | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

(limited to 'src/util')

diff --git a/src/util/url.c b/src/util/url.c
index 1ac197551..73f61dee8 100644
--- a/src/util/url.c
+++ b/src/util/url.c
@@ -332,4 +332,20 @@ TALER_url_valid_charset (const char *url)
 }
 
 
+bool
+TALER_is_web_url (const char *url)
+{
+  if ( (0 != strncasecmp (url,
+                          "https://",
+                          strlen ("https://"))) &&
+       (0 != strncasecmp (url,
+                          "http://",
+                          strlen ("http://"))) )
+    return false;
+  if (! TALER_url_valid_charset (url) )
+    return false;
+  return true;
+}
+
+
 /* end of url.c */
-- 
cgit v1.2.3