MLE-27078 Added incorrect test to capture doc format error

Author: rjrudin

.copyrightconfig

@@ -11,4 +11,4 @@ startyear: 2010
 #   - Dotfiles already skipped automatically
 # Enable by removing the leading '# ' from the next line and editing values.
 # filesexcluded: third_party/*, docs/generated/*.md, assets/*.png, scripts/temp_*.py, vendor/lib.js
-filesexcluded: .github/*, README.md, Jenkinsfile, gradle/*, docker-compose.yaml, docker-compose.yml, *.gradle, gradle.properties, gradlew, gradlew.bat, **/test/resources/**, *.md, pom.xml, *.properties, *.json, *.xml, CODEOWNERS, *.txt
+filesexcluded: .github/*, README.md, Jenkinsfile, gradle/*, docker-compose.yaml, docker-compose.yml, *.gradle, gradle.properties, gradlew, gradlew.bat, **/test/resources/**, *.md, pom.xml, *.properties, *.json, *.xml, CODEOWNERS, *.txt, *.xqy

marklogic-client-api/src/test/java/com/marklogic/client/test/document/ReadJsonAsBinaryTest.java

@@ -0,0 +1,59 @@
+/*
+ * Copyright (c) 2010-2026 Progress Software Corporation and/or its subsidiaries or affiliates. All Rights Reserved.
+ */
+package com.marklogic.client.test.document;
+
+import com.fasterxml.jackson.databind.ObjectMapper;
+import com.marklogic.client.DatabaseClient;
+import com.marklogic.client.document.*;
+import com.marklogic.client.io.DocumentMetadataHandle;
+import com.marklogic.client.io.Format;
+import com.marklogic.client.io.InputStreamHandle;
+import com.marklogic.client.io.JacksonHandle;
+import com.marklogic.client.test.AbstractClientTest;
+import com.marklogic.client.test.Common;
+import org.junit.jupiter.api.Disabled;
+import org.junit.jupiter.api.Test;
+
+import static org.junit.jupiter.api.Assertions.assertEquals;
+
+class ReadJsonAsBinaryTest extends AbstractClientTest {
+
+	@Test
+	@Disabled("See MLE-27191 for description of the server bug")
+	void test() {
+		try (DatabaseClient client = Common.newClient()) {
+			final String uri = "/a.json";
+			writeJsonAsBinary(uri, client);
+
+			GenericDocumentManager docManager = client.newDocumentManager();
+
+			// A multipart request returns the correct document format.
+			try (DocumentPage page = docManager.read(uri)) {
+				DocumentRecord record = page.next();
+				assertEquals(uri, record.getUri());
+				assertEquals("application/json", record.getMimetype());
+				assertEquals(Format.BINARY, record.getFormat());
+			}
+
+			// But a request for a single URI does not!
+			try (InputStreamHandle handle = docManager.read(uri, new InputStreamHandle())) {
+				assertEquals("application/json", handle.getMimetype());
+				assertEquals(Format.BINARY, handle.getFormat(), "Unfortunately due to MLE-27191, the " +
+					"format is JSON instead of binary. So this assertion will fail until that bug is fixed. " +
+					"For a Java Client user, the workaround is to use the read method above and get a DocumentPage " +
+					"back, as a multipart response seems to identify the correct headers.");
+			}
+
+		}
+	}
+
+	private void writeJsonAsBinary(String uri, DatabaseClient client) {
+		JSONDocumentManager jsonDocManager = client.newJSONDocumentManager();
+		DocumentMetadataHandle metadata = new DocumentMetadataHandle()
+			.withPermission("rest-reader", DocumentMetadataHandle.Capability.READ, DocumentMetadataHandle.Capability.UPDATE);
+
+		jsonDocManager.setWriteTransform(new ServerTransform("toBinary"));
+		jsonDocManager.write(uri, metadata, new JacksonHandle(new ObjectMapper().createObjectNode().put("a", 1)));
+	}
+}

test-app/src/main/ml-modules/transforms/toBinary.xqy

@@ -0,0 +1,16 @@
+xquery version "1.0-ml";
+
+module namespace transform = "http://marklogic.com/rest-api/transform/toBinary";
+
+(:
+Demonstrates how a transform can be used to store JSON or XML as a binary document. This is useful for a use case of
+a document with a URI that ends in e.g. ".json" or ".xml" but the user wants to treat the content as binary data so
+it is not indexed.
+:)
+declare function transform($context as map:map, $params as map:map, $content as document-node()) as document-node()
+{
+    let $node := $content/node()
+    let $enc := xdmp:base64-encode(xdmp:quote($node))
+    let $bin := xs:hexBinary(xs:base64Binary($enc))
+    return document { binary { $bin } }
+};