INTEGRATION: CWS mav09 (1.1.2); FILE ADDED

2004/01/27 15:57:58 mav 1.1.2.1: #115011# VCL window for container

1 files changed, 199 insertions, 0 deletions

diff --git a/embeddedobj/test/Container1/nativelib/nativeview.c b/embeddedobj/test/Container1/nativelib/nativeview.c
new file mode 100644
index 000000000000..5f979dd5b85c
--- /dev/null
+++ b/embeddedobj/test/Container1/nativelib/nativeview.c
@@ -0,0 +1,199 @@
+/*************************************************************************
+ *
+ *  $RCSfile: nativeview.c,v $
+ *
+ *  $Revision: 1.2 $
+ *
+ *  last change: $Author: kz $ $Date: 2004-10-04 19:58:10 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  the BSD license.
+ *
+ *  Copyright (c) 2003 by Sun Microsystems, Inc.
+ *  All rights reserved.
+ *
+ *  Redistribution and use in source and binary forms, with or without
+ *  modification, are permitted provided that the following conditions
+ *  are met:
+ *  1. Redistributions of source code must retain the above copyright
+ *     notice, this list of conditions and the following disclaimer.
+ *  2. Redistributions in binary form must reproduce the above copyright
+ *     notice, this list of conditions and the following disclaimer in the
+ *     documentation and/or other materials provided with the distribution.
+ *  3. Neither the name of Sun Microsystems, Inc. nor the names of its
+ *     contributors may be used to endorse or promote products derived
+ *     from this software without specific prior written permission.
+ *
+ *  THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+ *  "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
+ *  LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
+ *  FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
+ *  COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
+ *  INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
+ *  BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
+ *  OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
+ *  ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
+ *  TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
+ *  USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ *
+ *************************************************************************/
+
+#ifdef WNT
+
+#include <windows.h>
+// property name to register own window procedure on hwnd
+#define OLD_PROC_KEY "oldwindowproc"
+// signature of this window procedure
+static LRESULT APIENTRY NativeViewWndProc( HWND , UINT , WPARAM , LPARAM );
+
+#endif
+
+#include "jawt.h"
+#include "jawt_md.h"
+#include "NativeView.h"
+
+#define MY_ASSERT(X,S) if (!X) { fprintf(stderr,"%s\n",S); return 0L;}
+
+#define SYSTEM_WIN32   1
+#define SYSTEM_WIN16   2
+#define SYSTEM_JAVA    3
+#define SYSTEM_OS2     4
+#define SYSTEM_MAC     5
+#define SYSTEM_XWINDOW 6
+
+/*****************************************************************************
+ *
+ * Class      : NativeView
+ * Method     : getNativeWindowSystemType
+ * Signature  : ()I
+ * Description: returns an identifier for the current operating system
+ */
+JNIEXPORT jint JNICALL Java_embeddedobj_test_NativeView_getNativeWindowSystemType
+  (JNIEnv * env, jobject obj_this)
+{
+    return (SYSTEM_WIN32);
+}
+
+/*****************************************************************************
+ *
+ * Class      : NativeView
+ * Method     : getNativeWindow
+ * Signature  : ()J
+ * Description: returns the native systemw window handle of this object
+ */
+JNIEXPORT jlong JNICALL Java_embeddedobj_test_NativeView_getNativeWindow
+  (JNIEnv * env, jobject obj_this)
+{
+    jboolean                      result  ;
+    jint                          lock    ;
+    JAWT                          awt     ;
+    JAWT_DrawingSurface*          ds      ;
+    JAWT_DrawingSurfaceInfo*      dsi     ;
+    JAWT_Win32DrawingSurfaceInfo* dsi_win ;
+    jlong                         drawable;
+
+#if 0
+    LONG                          hFuncPtr;
+#endif
+
+    /* Get the AWT */
+    awt.version = JAWT_VERSION_1_3;
+    result      = JAWT_GetAWT(env, &awt);
+    MY_ASSERT(result!=JNI_FALSE,"wrong jawt version");
+
+    /* Get the drawing surface */
+    if ((ds = awt.GetDrawingSurface(env, obj_this)) == NULL)
+        return 0L;
+
+    /* Lock the drawing surface */
+    lock = ds->Lock(ds);
+    MY_ASSERT((lock & JAWT_LOCK_ERROR)==0,"can't lock the drawing surface");
+
+    /* Get the drawing surface info */
+    dsi = ds->GetDrawingSurfaceInfo(ds);
+
+    /* Get the platform-specific drawing info */
+#ifdef WNT
+    dsi_win  = (JAWT_Win32DrawingSurfaceInfo*)dsi->platformInfo;
+    drawable = (jlong)dsi_win->hwnd;
+#else
+    dsi_x11  = (JAWT_X11DrawingSurfaceInfo*)dsi->platformInfo;
+    drawable = (jlong)dsi_x11->drawable;
+#endif
+
+    /* Free the drawing surface info */
+    ds->FreeDrawingSurfaceInfo(dsi);
+    /* Unlock the drawing surface */
+    ds->Unlock(ds);
+    /* Free the drawing surface */
+    awt.FreeDrawingSurface(ds);
+
+#if 0
+    /* Register own window procedure
+       Do it one times only! Otherwhise
+       multiple instances will be registered
+       and calls on such construct produce
+       a stack overflow.
+     */
+
+    if (GetProp( (HWND)drawable, OLD_PROC_KEY )==0)
+    {
+        hFuncPtr = SetWindowLong( (HWND)drawable, GWL_WNDPROC, (DWORD)NativeViewWndProc );
+        SetProp( (HWND)drawable, OLD_PROC_KEY, (HANDLE)hFuncPtr );
+    }
+#endif
+
+    return drawable;
+}
+
+#if 0
+/*****************************************************************************
+ *
+ * Class      : -
+ * Method     : NativeViewWndProc
+ * Signature  : -
+ * Description: registered window handler to intercept window messages between
+ *              java and office process
+ */
+static LRESULT APIENTRY NativeViewWndProc(
+    HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
+{
+    HANDLE hFuncPtr;
+
+    /* resize new created child window to fill out the java window complete */
+    if (uMsg==WM_PARENTNOTIFY)
+    {
+        if (wParam == WM_CREATE)
+        {
+            RECT rect;
+            HWND hChild = (HWND) lParam;
+
+            GetClientRect(hWnd, &rect);
+
+            SetWindowPos(hChild,
+                        NULL,
+                        rect.left,
+                        rect.top,
+                        rect.right - rect.left,
+                        rect.bottom - rect.top,
+                        SWP_NOZORDER);
+        }
+    }
+    /* handle normal resize events */
+    else if(uMsg==WM_SIZE)
+    {
+        WORD newHeight = HIWORD(lParam);
+        WORD newWidth  = LOWORD(lParam);
+        HWND hChild    = GetWindow(hWnd, GW_CHILD);
+
+        if (hChild != NULL)
+            SetWindowPos(hChild, NULL, 0, 0, newWidth, newHeight, SWP_NOZORDER);
+    }
+
+    /* forward request to original handler which is intercepted by this window procedure */
+    hFuncPtr = GetProp(hWnd, OLD_PROC_KEY);
+    MY_ASSERT(hFuncPtr,"lost original window proc handler");
+    return CallWindowProc( hFuncPtr, hWnd, uMsg, wParam, lParam);
+}
+#endif
+