Version 6.1.0.2, tag libreoffice-6.1.0.2
[LibreOffice.git] / odk / examples / DevelopersGuide / OfficeDev / DesktopEnvironment / nativelib / unix / nativeview.c
blob7f4bc1472d5818c072147b1d3eb55421cc317636
1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2 /*************************************************************************
4 * The Contents of this file are made available subject to the terms of
5 * the BSD license.
7 * Copyright 2000, 2010 Oracle and/or its affiliates.
8 * All rights reserved.
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. Neither the name of Sun Microsystems, Inc. nor the names of its
19 * contributors may be used to endorse or promote products derived
20 * from this software without specific prior written permission.
22 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
23 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
24 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
25 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
26 * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
27 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
28 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
29 * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
30 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
31 * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
32 * USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 *************************************************************************/
36 #include <X11/Xlib.h>
37 #include <X11/Xutil.h>
38 #include <X11/Intrinsic.h>
40 #include "jawt.h"
41 #include "jawt_md.h"
42 #include "nativeview.h"
44 #define MY_ASSERT(X,S) if (!X) { fprintf(stderr,S); return 0L;}
46 #define SYSTEM_WIN32 1
47 #define SYSTEM_WIN16 2
48 #define SYSTEM_JAVA 3
49 #define SYSTEM_OS2 4
50 #define SYSTEM_MAC 5
51 #define SYSTEM_XWINDOW 6
53 /*****************************************************************************/
55 * Class: NativeView
56 * Method: getNativeWindowSystemType
57 * Signature: ()I
59 JNIEXPORT jint JNICALL Java_NativeView_getNativeWindowSystemType
60 (JNIEnv * env, jobject obj_this)
62 return SYSTEM_XWINDOW;
65 /*****************************************************************************/
67 * Class: NativeView
68 * Method: getNativeWindow
69 * Signature: ()J
71 JNIEXPORT jlong JNICALL Java_NativeView_getNativeWindow
72 (JNIEnv * env, jobject obj_this)
74 jboolean result ;
75 jint lock ;
76 JAWT awt ;
77 JAWT_DrawingSurface* ds ;
78 JAWT_DrawingSurfaceInfo* dsi ;
79 JAWT_X11DrawingSurfaceInfo* dsi_x11 ;
80 Drawable drawable;
82 /* Get the AWT */
83 awt.version = JAWT_VERSION_1_3;
84 result = JAWT_GetAWT(env, &awt);
85 MY_ASSERT(result != JNI_FALSE,"wrong jawt version");
87 /* Get the drawing surface */
88 if ((ds = awt.GetDrawingSurface(env, obj_this)) == NULL)
89 return 0L;
91 /* Lock the drawing surface */
92 lock = ds->Lock(ds);
93 MY_ASSERT((lock & JAWT_LOCK_ERROR)==0,"can't lock the drawing surface");
95 /* Get the drawing surface info */
96 dsi = ds->GetDrawingSurfaceInfo(ds);
98 /* Get the platform-specific drawing info */
99 dsi_x11 = (JAWT_X11DrawingSurfaceInfo*)dsi->platformInfo;
100 drawable = dsi_x11->drawable;
102 /* Free the drawing surface info */
103 ds->FreeDrawingSurfaceInfo(dsi);
104 /* Unlock the drawing surface */
105 ds->Unlock(ds);
106 /* Free the drawing surface */
107 awt.FreeDrawingSurface(ds);
109 return (jlong)drawable;
112 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */