create a cairo canvas unit test, if only I could use the XCanvas API.

Change-Id: I3b0fdbe92db751e59ecb3f3b59f27e160b3ca226

2 files changed, 99 insertions, 0 deletions

diff --git a/cppcanvas/Module_cppcanvas.mk b/cppcanvas/Module_cppcanvas.mk
index fad05f1c60a0..9894f9c83eca 100644
--- a/cppcanvas/Module_cppcanvas.mk
+++ b/cppcanvas/Module_cppcanvas.mk
@@ -24,4 +24,11 @@ $(eval $(call gb_Module_add_targets,cppcanvas,\
 	Library_mtfrenderer \
 ))
 
+# FIXME: should generalize these ...
+ifeq ($(ENABLE_CAIRO_CANVAS),TRUE)
+$(eval $(call gb_Module_add_check_targets,cppcanvas,\
+    CppunitTest_cppcanvas_test \
+))
+endif
+
 # vim: set noet sw=4 ts=4:
diff --git a/cppcanvas/qa/unit/test.cxx b/cppcanvas/qa/unit/test.cxx
new file mode 100644
index 000000000000..03d0e7368939
--- /dev/null
+++ b/cppcanvas/qa/unit/test.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 <test/bootstrapfixture.hxx>
+
+#include <osl/file.hxx>
+#include <osl/process.h>
+#include <vcl/svapp.hxx>
+#include <vcl/wrkwin.hxx>
+#include <vcl/canvastools.hxx>
+
+#include <comphelper/processfactory.hxx>
+#include <com/sun/star/lang/XInitialization.hpp>
+#include <com/sun/star/lang/XMultiServiceFactory.hpp>
+
+#include <com/sun/star/rendering/XBitmap.hpp>
+#include <com/sun/star/rendering/XCanvas.hpp>
+#include <com/sun/star/rendering/XBitmapCanvas.hpp>
+
+using namespace ::com::sun::star;
+
+class CanvasTest : public test::BootstrapFixture
+{
+public:
+    CanvasTest() : BootstrapFixture(true, false) {}
+
+    void testComposite();
+
+    CPPUNIT_TEST_SUITE(CanvasTest);
+    CPPUNIT_TEST(testComposite);
+    CPPUNIT_TEST_SUITE_END();
+};
+
+void CanvasTest::testComposite()
+{
+#ifdef LINUX
+    Window* pWin = new WorkWindow( (Window *)NULL );
+    CPPUNIT_ASSERT( pWin != NULL );
+
+    uno::Reference<rendering::XCanvas> xCanvas = pWin->GetCanvas ();
+    CPPUNIT_ASSERT( xCanvas.is() );
+
+    // a huge canvas ...
+    Size aSize (1, 1);
+    uno::Reference<rendering::XBitmap> xBitmap;
+    xBitmap = xCanvas->getDevice ()->createCompatibleAlphaBitmap(
+                        vcl::unotools::integerSize2DFromSize( aSize ) );
+    CPPUNIT_ASSERT( xBitmap.is() );
+
+    uno::Reference< rendering::XBitmapCanvas > xBitmapCanvas( xBitmap, uno::UNO_QUERY );
+    CPPUNIT_ASSERT( xBitmapCanvas.is() );
+
+    BitmapEx aBitmapEx;
+    {
+        // clear the canvas and basic sanity check ...
+        xBitmapCanvas->clear();
+        CPPUNIT_ASSERT( aBitmapEx.Create( xBitmapCanvas, aSize ) );
+        CPPUNIT_ASSERT( aBitmapEx.IsAlpha() );
+        CPPUNIT_ASSERT( aBitmapEx.GetAlpha() );
+    }
+
+    {
+        // render something
+        rendering::RenderState aDefaultState;
+        uno::Sequence< double > aRedTransparent( 4 );
+        aRedTransparent[0] = 1.0; // R
+        aRedTransparent[1] = 0.0; // G
+        aRedTransparent[2] = 0.0; // B
+        aRedTransparent[3] = 0.5; // A
+        aDefaultState.DeviceColor = aRedTransparent;
+#if 0
+        // words fail me to describe the sheer beauty of allocating an UNO
+        // object to represent a polygon, and manually handling the ViewState
+        // and there being no public helper for this - to render ... a rectangle.
+        XCachedPrimitive    fillPolyPolygon( [in] XPolyPolygon2D xPolyPolygon, [in] ViewState aViewState, [in] RenderState aRenderState )
+#endif
+    }
+
+#endif
+}
+
+CPPUNIT_TEST_SUITE_REGISTRATION(CanvasTest);
+
+CPPUNIT_PLUGIN_IMPLEMENT();
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */