1 /*
2 * Copyright (c) 2011, 2015, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation. Oracle designates this
8 * particular file as subject to the "Classpath" exception as provided
9 * by Oracle in the LICENSE file that accompanied this code.
10 *
11 * This code is distributed in the hope that it will be useful, but WITHOUT
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 * version 2 for more details (a copy is included in the LICENSE file that
15 * accompanied this code).
16 *
17 * You should have received a copy of the GNU General Public License version
18 * 2 along with this work; if not, write to the Free Software Foundation,
19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
20 *
21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
22 * or visit www.oracle.com if you need additional information or have any
23 * questions.
24 */
25
26 #import "apple_applescript_AppleScriptEngine.h"
27 #import "apple_applescript_AppleScriptEngineFactory.h"
28
29 // Must include this before JavaNativeFoundation.h to get jni.h from build
30 #include "jni.h"
31 #include "jni_util.h"
32
33 #import <JavaNativeFoundation/JavaNativeFoundation.h>
34
35 #import "NS_Java_ConversionUtils.h"
36 #import "AppleScriptExecutionContext.h"
37
38 //#define DEBUG 1
39
40 /*
41 * Declare library specific JNI_Onload entry if static build
42 */
43 DEF_STATIC_JNI_OnLoad
44
45 /*
46 * Class: apple_applescript_AppleScriptEngineFactory
47 * Method: initNative
48 * Signature: ()V
49 */
50 JNIEXPORT void JNICALL Java_apple_applescript_AppleScriptEngineFactory_initNative
51 (JNIEnv *env, jclass clazz)
52 {
53 return;
54 }
55
56
57 /*
58 * Class: apple_applescript_AppleScriptEngine
59 * Method: initNative
60 * Signature: ()V
61 */
62 JNIEXPORT void JNICALL Java_apple_applescript_AppleScriptEngine_initNative
63 (JNIEnv *env, jclass clazz)
64 {
65 return;
66 }
67
68
69 /*
70 * Class: apple_applescript_AppleScriptEngine
71 * Method: createContextFrom
72 * Signature: (Ljava/lang/Object;)J
73 */
74 JNIEXPORT jlong JNICALL Java_apple_applescript_AppleScriptEngine_createContextFrom
75 (JNIEnv *env, jclass clazz, jobject javaContext)
76 {
77 NSObject *obj = nil;
78
79 JNF_COCOA_ENTER(env);
80
81 obj = [[JavaAppleScriptEngineCoercion coercer] coerceJavaObject:javaContext withEnv:env];
82
83 #ifdef DEBUG
84 NSLog(@"converted context: %@", obj);
85 #endif
86
87 CFRetain(obj);
88
89 JNF_COCOA_EXIT(env);
90
91 return ptr_to_jlong(obj);
92 }
93
94
95 /*
96 * Class: apple_applescript_AppleScriptEngine
97 * Method: createObjectFrom
98 * Signature: (J)Ljava/lang/Object;
99 */
100 JNIEXPORT jobject JNICALL Java_apple_applescript_AppleScriptEngine_createObjectFrom
101 (JNIEnv *env, jclass clazz, jlong nativeContext)
102 {
103 jobject obj = NULL;
104
105 JNF_COCOA_ENTER(env);
106
107 obj = [[JavaAppleScriptEngineCoercion coercer] coerceNSObject:(id)jlong_to_ptr(nativeContext) withEnv:env];
108
109 JNF_COCOA_EXIT(env);
110
111 return obj;
112 }
113
114
115 /*
116 * Class: apple_applescript_AppleScriptEngine
117 * Method: disposeContext
118 * Signature: (J)V
119 */
120 JNIEXPORT void JNICALL Java_apple_applescript_AppleScriptEngine_disposeContext
121 (JNIEnv *env, jclass clazz, jlong nativeContext)
122 {
123
124 JNF_COCOA_ENTER(env);
125
126 id obj = (id)jlong_to_ptr(nativeContext);
127 if (obj != nil) CFRelease(obj);
128
129 JNF_COCOA_EXIT(env);
130
131 }
132
133
134 /*
135 * Class: apple_applescript_AppleScriptEngine
136 * Method: evalScript
137 * Signature: (Ljava/lang/String;J)J
138 */
139 JNIEXPORT jlong JNICALL Java_apple_applescript_AppleScriptEngine_evalScript
140 (JNIEnv *env, jclass clazz, jstring ascript, jlong contextptr)
141 {
142 id retval = nil;
143
144 JNF_COCOA_ENTER(env);
145
146 NSDictionary *ncontext = jlong_to_ptr(contextptr);
147 NSString *source = JNFJavaToNSString(env, ascript);
148
149 #ifdef DEBUG
150 NSLog(@"evalScript(source:\"%@\" context: %@)", source, ncontext);
151 #endif
152
153 AppleScriptExecutionContext *scriptInvocationCtx = [[[AppleScriptExecutionContext alloc] initWithSource:source context:ncontext] autorelease];
154 retval = [scriptInvocationCtx invokeWithEnv:env];
155
156 #ifdef DEBUG
157 NSLog(@"returning: %@", retval);
158 #endif
159
160 if (retval) CFRetain(retval);
161
162 JNF_COCOA_EXIT(env);
163
164 return ptr_to_jlong(retval);
165 }
166
167
168 /*
169 * Class: apple_applescript_AppleScriptEngine
170 * Method: evalScriptFromURL
171 * Signature: (Ljava/lang/String;J)J
172 */
173 JNIEXPORT jlong JNICALL Java_apple_applescript_AppleScriptEngine_evalScriptFromURL
174 (JNIEnv *env, jclass clazz, jstring afilename, jlong contextptr)
175 {
176 id retval = nil;
177
178 JNF_COCOA_ENTER(env);
179
180 NSDictionary *ncontext = jlong_to_ptr(contextptr);
181 NSString *filename = JNFJavaToNSString(env, afilename);
182
183 #ifdef DEBUG
184 NSLog(@"evalScript(filename:\"%@\" context: %@)", filename, ncontext);
185 #endif
186
187 AppleScriptExecutionContext *scriptInvocationCtx = [[[AppleScriptExecutionContext alloc] initWithFile:filename context:ncontext] autorelease];
188 retval = [scriptInvocationCtx invokeWithEnv:env];
189
190 #ifdef DEBUG
191 NSLog(@"returning: %@", retval);
192 #endif
193
194 if (retval) CFRetain(retval);
195
196 JNF_COCOA_EXIT(env);
197
198 return ptr_to_jlong(retval);
199 }