From 97a61bb2dece69f6da11488511365c15517ef22d Mon Sep 17 00:00:00 2001
From: Sergey Linev <S.Linev@gsi.de>
Date: Tue, 30 Jun 2026 11:56:44 +0200
Subject: [PATCH] [http] add root.json.gz and item.json.gz testing

This invokes content zipping on the server side
which had problems when external civetweb was used.
Problem seems to be gone now, but let be sure that
it does not appear again.
---
 net/http/test/CMakeLists.txt |  5 +++--
 net/http/test/test_suite.cxx | 37 +++++++++++++++++++++++++++++++++---
 2 files changed, 37 insertions(+), 5 deletions(-)

diff --git a/net/http/test/CMakeLists.txt b/net/http/test/CMakeLists.txt
index bddab5160b8af..e38ef6cd33463 100644
--- a/net/http/test/CMakeLists.txt
+++ b/net/http/test/CMakeLists.txt
@@ -14,10 +14,11 @@ if(WIN32)
   return()
 endif()
 
-# curl is required for tests
+# curl and gunzip are required for tests
 find_program(CURL_EXECUTABLE curl)
+find_program(GUNZIP_EXECUTABLE gunzip)
 
-if(NOT CURL_EXECUTABLE)
+if(NOT CURL_EXECUTABLE OR NOT GUNZIP_EXECUTABLE)
   return()
 endif()
 
diff --git a/net/http/test/test_suite.cxx b/net/http/test/test_suite.cxx
index dc0c2c21ac9f1..76e8b39ce3ad2 100644
--- a/net/http/test/test_suite.cxx
+++ b/net/http/test/test_suite.cxx
@@ -3,9 +3,9 @@ TString server_url;
 TString unix_socket;
 
 // submit requests to server
-std::string execute_request(const char *url, const char *post = nullptr)
+std::string execute_request(const char *url, const char *post = nullptr, bool isgzip = false)
 {
-   TString fname = TString::Format("http_server_%d.output", server_hash),
+   TString fname = TString::Format("http_server_%d.output%s", server_hash, isgzip ? ".gz" : ""),
            pname, exec;
 
    if (post) {
@@ -25,8 +25,19 @@ std::string execute_request(const char *url, const char *post = nullptr)
 
    if (gSystem->Exec(exec) != 0)
       res = "<fail>";
-   else
+   else if (isgzip) {
+      exec = TString::Format("gunzip %s", fname.Data());
+      printf("Execute %s\n", exec.Data());
+      if (gSystem->Exec(exec) != 0)
+         res = "<fail>";
+      else {
+         fname.Resize(fname.Length() - 3);
+         res = THttpServer::ReadFileContent(fname.Data());
+      }
+
+   } else {
       res = THttpServer::ReadFileContent(fname.Data());
+   }
 
    gSystem->Unlink(fname);
    if (!pname.IsNull())
@@ -57,6 +68,17 @@ void test_suite(THttpServer &serv)
                   "  \"fTitle\" : \"title1\"\n"
                   "}") << "result of root.json request";
 
+   // check GZIP JSON representation for the object
+   res = execute_request("/obj1/root.json.gz", nullptr, true);
+   EXPECT_EQ(res, "{\n"
+                  "  \"_typename\" : \"TNamed\",\n"
+                  "  \"fUniqueID\" : 0,\n"
+                  "  \"fBits\" : 8,\n"
+                  "  \"fName\" : \"obj1\",\n"
+                  "  \"fTitle\" : \"title1\"\n"
+                  "}") << "result of root.json,gz request";
+
+
    // check XML representation for the object
    res = execute_request("/obj1/root.xml");
    EXPECT_EQ(res, "<Object class=\"TNamed\">\n"
@@ -88,6 +110,15 @@ void test_suite(THttpServer &serv)
                   "  \"_title\" : \"title1\"\n"
                   "}") << "result of item.json request";
 
+   // check item.json.gz request hierarchy request
+   res = execute_request("/obj1/item.json.gz", nullptr, true);
+
+   EXPECT_EQ(res, "{\n"
+                  "  \"_name\" : \"obj1\",\n"
+                  "  \"_root_version\" : " + std::to_string(gROOT->GetVersionCode()) + ",\n"
+                  "  \"_kind\" : \"ROOT.TNamed\",\n"
+                  "  \"_title\" : \"title1\"\n"
+                  "}") << "result of item.json.gz request";
 
    // check multi request to several objects
    res = execute_request("/multi.json?number=2", "/obj1/root.json\n/obj2/root.json\n");