Introduce INetContentType::scan

...for use in <https://gerrit.libreoffice.org/#/c/8737/> "new methodINetURLObject::getData()
for data urls."

Change-Id: Id381d7c328153fbea44c0efb80532b2961c6c2b7

4 files changed, 168 insertions, 25 deletions

diff --git a/svl/CppunitTest_svl_inetcontenttype.mk b/svl/CppunitTest_svl_inetcontenttype.mk
new file mode 100644
index 000000000000..30cd296c0ae0
--- /dev/null
+++ b/svl/CppunitTest_svl_inetcontenttype.mk
@@ -0,0 +1,30 @@
+# -*- Mode: makefile-gmake; tab-width: 4; indent-tabs-mode: t -*-
+#
+# This file is part of the LibreOffice project.
+#
+# This Source Code Form is subject to the terms of the Mozilla Public
+# License, v. 2.0. If a copy of the MPL was not distributed with this
+# file, You can obtain one at http://mozilla.org/MPL/2.0/.
+#
+
+$(eval $(call gb_CppunitTest_CppunitTest,svl_inetcontenttype))
+
+$(eval $(call gb_CppunitTest_add_exception_objects,svl_inetcontenttype, \
+    svl/qa/unit/test_INetContentType \
+))
+
+$(eval $(call gb_CppunitTest_use_api,svl_inetcontenttype, \
+    udkapi \
+))
+
+$(eval $(call gb_CppunitTest_use_externals,svl_inetcontenttype, \
+    boost_headers \
+))
+
+$(eval $(call gb_CppunitTest_use_libraries,svl_inetcontenttype, \
+    sal \
+    svl \
+    tl \
+))
+
+# vim: set noet sw=4 ts=4:
diff --git a/svl/Module_svl.mk b/svl/Module_svl.mk
index 2e5e6a06dae3..f52c7a4bfb72 100644
--- a/svl/Module_svl.mk
+++ b/svl/Module_svl.mk
@@ -32,6 +32,7 @@ $(eval $(call gb_Module_add_l10n_targets,svl,\
 $(eval $(call gb_Module_add_check_targets,svl,\
 	CppunitTest_svl_lngmisc \
 	CppunitTest_svl_qa_cppunit \
+	CppunitTest_svl_inetcontenttype \
 	CppunitTest_svl_items \
 ))
 
diff --git a/svl/qa/unit/test_INetContentType.cxx b/svl/qa/unit/test_INetContentType.cxx
new file mode 100644
index 000000000000..a2ce362a10a0
--- /dev/null
+++ b/svl/qa/unit/test_INetContentType.cxx
@@ -0,0 +1,92 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/*
+ * This file is part of the LibreOffice project.
+ *
+ * This Source Code Form is subject to the terms of the Mozilla Public
+ * License, v. 2.0. If a copy of the MPL was not distributed with this
+ * file, You can obtain one at http://mozilla.org/MPL/2.0/.
+ */
+
+#include <sal/config.h>
+
+#include <cstring>
+
+#include <cppunit/TestAssert.h>
+#include <cppunit/TestFixture.h>
+#include <cppunit/TestSuite.h>
+#include <cppunit/extensions/HelperMacros.h>
+#include <cppunit/plugin/TestPlugIn.h>
+#include <rtl/ustring.hxx>
+#include <svl/inettype.hxx>
+#include <tools/inetmime.hxx>
+
+namespace {
+
+class Test: public CppUnit::TestFixture {
+public:
+    void testBad();
+
+    void testFull();
+
+    void testFollow();
+
+    CPPUNIT_TEST_SUITE(Test);
+    CPPUNIT_TEST(testBad);
+    CPPUNIT_TEST(testFull);
+    CPPUNIT_TEST(testFollow);
+    CPPUNIT_TEST_SUITE_END();
+};
+
+void Test::testBad() {
+    OUString in("foo=bar");
+    CPPUNIT_ASSERT_EQUAL(
+        static_cast<sal_Unicode const *>(0),
+        INetContentTypes::scan(in.getStr(), in.getStr() + in.getLength()));
+    OUString t;
+    OUString s;
+    INetContentTypeParameterList ps;
+    CPPUNIT_ASSERT(!INetContentTypes::parse(in, t, s, &ps));
+    CPPUNIT_ASSERT(t.isEmpty());
+    CPPUNIT_ASSERT(s.isEmpty());
+    CPPUNIT_ASSERT_EQUAL(
+        static_cast<INetContentTypeParameter const *>(0), ps.find("foo"));
+}
+
+void Test::testFull() {
+    OUString in("foo/bar;baz=boz");
+    CPPUNIT_ASSERT_EQUAL(
+        in.getStr() + in.getLength(),
+        INetContentTypes::scan(in.getStr(), in.getStr() + in.getLength()));
+    OUString t;
+    OUString s;
+    INetContentTypeParameterList ps;
+    CPPUNIT_ASSERT(INetContentTypes::parse(in, t, s, &ps));
+    CPPUNIT_ASSERT_EQUAL(OUString("foo"), t);
+    CPPUNIT_ASSERT_EQUAL(OUString("bar"), s);
+    INetContentTypeParameter const * p = ps.find("baz");
+    CPPUNIT_ASSERT(p != 0);
+    CPPUNIT_ASSERT_EQUAL(OUString("boz"), p->m_sValue);
+}
+
+void Test::testFollow() {
+    OUString in("foo/bar;baz=boz;base64,");
+    CPPUNIT_ASSERT_EQUAL(
+        in.getStr() + std::strlen("foo/bar;baz=boz"),
+        INetContentTypes::scan(in.getStr(), in.getStr() + in.getLength()));
+    OUString t;
+    OUString s;
+    INetContentTypeParameterList ps;
+    CPPUNIT_ASSERT(!INetContentTypes::parse(in, t, s));
+    CPPUNIT_ASSERT(t.isEmpty());
+    CPPUNIT_ASSERT(s.isEmpty());
+    CPPUNIT_ASSERT_EQUAL(
+        static_cast<INetContentTypeParameter const *>(0), ps.find("baz"));
+}
+
+CPPUNIT_TEST_SUITE_REGISTRATION(Test);
+
+}
+
+CPPUNIT_PLUGIN_IMPLEMENT();
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/svl/source/misc/inettype.cxx b/svl/source/misc/inettype.cxx
index 310d5088efd5..bfd812e3da15 100644
--- a/svl/source/misc/inettype.cxx
+++ b/svl/source/misc/inettype.cxx
@@ -779,46 +779,66 @@ bool INetContentTypes::GetExtensionFromURL(OUString const & rURL,
 }
 
 // static
-bool INetContentTypes::parse(OUString const & rMediaType,
-                             OUString & rType, OUString & rSubType,
-                             INetContentTypeParameterList * pParameters)
+sal_Unicode const * INetContentTypes::scan(
+    sal_Unicode const * pBegin, sal_Unicode const * pEnd, OUString * pType,
+    OUString * pSubType, INetContentTypeParameterList * pParameters)
 {
-    sal_Unicode const * p = rMediaType.getStr();
-    sal_Unicode const * pEnd = p + rMediaType.getLength();
-
-    p = INetMIME::skipLinearWhiteSpaceComment(p, pEnd);
-    sal_Unicode const * pToken = p;
-    bool bDowncase = false;
+    sal_Unicode const * p = INetMIME::skipLinearWhiteSpaceComment(pBegin, pEnd);
+    sal_Unicode const * pTypeBegin = p;
     while (p != pEnd && INetMIME::isTokenChar(*p))
     {
-        bDowncase = bDowncase || rtl::isAsciiUpperCase(*p);
         ++p;
     }
-    if (p == pToken)
-        return false;
-    rType = OUString(pToken, p - pToken);
-    if (bDowncase)
-        rType= rType.toAsciiLowerCase();
+    if (p == pTypeBegin)
+        return 0;
+    sal_Unicode const * pTypeEnd = p;
 
     p = INetMIME::skipLinearWhiteSpaceComment(p, pEnd);
     if (p == pEnd || *p++ != '/')
-        return false;
+        return 0;
 
     p = INetMIME::skipLinearWhiteSpaceComment(p, pEnd);
-    pToken = p;
-    bDowncase = false;
+    sal_Unicode const * pSubTypeBegin = p;
     while (p != pEnd && INetMIME::isTokenChar(*p))
     {
-        bDowncase = bDowncase || rtl::isAsciiUpperCase(*p);
         ++p;
     }
-    if (p == pToken)
-        return false;
-    rSubType = OUString(pToken, p - pToken);
-    if (bDowncase)
-        rSubType = rSubType.toAsciiLowerCase();
+    if (p == pSubTypeBegin)
+        return 0;
+    sal_Unicode const * pSubTypeEnd = p;
 
-    return INetMIME::scanParameters(p, pEnd, pParameters) == pEnd;
+    if (pType != 0)
+    {
+        *pType = OUString(pTypeBegin, pTypeEnd - pTypeBegin).toAsciiLowerCase();
+    }
+    if (pSubType != 0)
+    {
+        *pSubType = OUString(pSubTypeBegin, pSubTypeEnd - pSubTypeBegin)
+            .toAsciiLowerCase();
+    }
+
+    return INetMIME::scanParameters(p, pEnd, pParameters);
+}
+
+bool INetContentTypes::parse(
+    OUString const & rMediaType, OUString & rType, OUString & rSubType,
+    INetContentTypeParameterList * pParameters)
+{
+    sal_Unicode const * b = rMediaType.getStr();
+    sal_Unicode const * e = b + rMediaType.getLength();
+    OUString t;
+    OUString s;
+    INetContentTypeParameterList p;
+    if (scan(b, e, &t, &s, pParameters == 0 ? 0 : &p) == e) {
+        rType = t;
+        rSubType = s;
+        if (pParameters != 0) {
+            *pParameters = p;
+        }
+        return true;
+    } else {
+        return false;
+    }
 }
 
 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */