1 /*

     2  * Copyright (c) 2011, 2012, 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 "NS_Java_ConversionUtils.h"

    27 

    28 #import <Cocoa/Cocoa.h>

    29 

    30 

    31 @interface JavaAppleScriptBaseConverter : NSObject <JNFTypeCoercion>

    32 @end

    33 

    34 @interface JavaAppleScriptImageConverter : NSObject <JNFTypeCoercion>

    35 @end

    36 

    37 @interface JavaAppleScriptVersionConverter : NSObject <JNFTypeCoercion>

    38 @end

    39 

    40 @interface JavaAppleScriptNullConverter : NSObject <JNFTypeCoercion>

    41 @end

    42 

    43 

    44 @implementation JavaAppleScriptEngineCoercion

    45 

    46 static JNFTypeCoercer *appleScriptCoercer = nil;

    47 

    48 + (JNFTypeCoercer *) coercer {

    49     if (appleScriptCoercer) return appleScriptCoercer;

    50 

    51     id asSpecificCoercions = [[JNFDefaultCoercions defaultCoercer] deriveCoercer];

    52     [asSpecificCoercions addCoercion:[[[JavaAppleScriptImageConverter alloc] init] autorelease] forNSClass:[NSImage class] javaClass:@"java/awt/Image"];

    53     [asSpecificCoercions addCoercion:[[[JavaAppleScriptVersionConverter alloc] init] autorelease] forNSClass:[NSAppleEventDescriptor class] javaClass:nil];

    54     [asSpecificCoercions addCoercion:[[[JavaAppleScriptNullConverter alloc] init] autorelease] forNSClass:[NSNull class] javaClass:nil];

    55 

    56     return appleScriptCoercer = [asSpecificCoercions retain];

    57 }

    58 

    59 @end

    60 

    61 

    62 // [NSObject description] <-> java.lang.Object.toString()

    63 @implementation JavaAppleScriptBaseConverter

    64 

    65 // by default, bizzare NSObjects will have -description called on them, and passed back to Java like that

    66 - (jobject) coerceNSObject:(id)obj withEnv:(JNIEnv *)env usingCoercer:(JNFTypeCoercion *)coercer {

    67     return JNFNSToJavaString(env, [obj description]);

    68 }

    69 

    70 // by default, bizzare Java objects will be toString()'d and passed to AppleScript like that

    71 - (id) coerceJavaObject:(jobject)obj withEnv:(JNIEnv *)env usingCoercer:(JNFTypeCoercion *)coercer {

    72     return JNFObjectToString(env, obj);

    73 }

    74 

    75 @end

    76 

    77 

    78 // NSImage <-> apple.awt.CImage

    79 @implementation JavaAppleScriptImageConverter

    80 

    81 static JNF_CLASS_CACHE(jc_CImage, "apple/awt/CImage");

    82 static JNF_STATIC_MEMBER_CACHE(jm_CImage_getCreator, jc_CImage, "getCreator", "()Lapple/awt/CImage$Creator;");

    83 static JNF_MEMBER_CACHE(jm_CImage_getNSImage, jc_CImage, "getNSImage", "()J");

    84 

    85 static JNF_CLASS_CACHE(jc_CImage_Generator, "apple/awt/CImage$Creator");

    86 static JNF_MEMBER_CACHE(jm_CImage_Generator_createImageFromPtr, jc_CImage_Generator, "createImage", "(J)Ljava/awt/image/BufferedImage;");

    87 static JNF_MEMBER_CACHE(jm_CImage_Generator_createImageFromImg, jc_CImage_Generator, "createImage", "(Ljava/awt/Image;)Lapple/awt/CImage;");

    88 

    89 - (jobject) coerceNSObject:(id)obj withEnv:(JNIEnv *)env usingCoercer:(JNFTypeCoercion *)coercer {

    90     NSImage *img = (NSImage *)obj;

    91     CFRetain(img);

    92     jobject creator = JNFCallStaticObjectMethod(env, jm_CImage_getCreator);

    93     jobject jobj = JNFCallObjectMethod(env, creator, jm_CImage_Generator_createImageFromPtr, ptr_to_jlong(img));

    94     return jobj;

    95 }

    96 

    97 - (id) coerceJavaObject:(jobject)obj withEnv:(JNIEnv *)env usingCoercer:(JNFTypeCoercion *)coercer {

    98     jobject cimage = obj;

    99     if (!JNFIsInstanceOf(env, obj, &jc_CImage)) {

   100         jobject creator = JNFCallStaticObjectMethod(env, jm_CImage_getCreator);

   101         cimage = JNFCallObjectMethod(env, creator, jm_CImage_Generator_createImageFromImg, obj);

   102     }

   103 

   104     jlong nsImagePtr = JNFCallLongMethod(env, cimage, jm_CImage_getNSImage);

   105 

   106     NSImage *img = (NSImage *)jlong_to_ptr(nsImagePtr);

   107     return [[img retain] autorelease];

   108 }

   109 

   110 @end

   111 

   112 

   113 // NSAppleEventDescriptor('vers') -> java.lang.String

   114 @implementation JavaAppleScriptVersionConverter

   115 

   116 - (jobject) coerceNSObject:(id)obj withEnv:(JNIEnv *)env usingCoercer:(JNFTypeCoercion *)coercer {

   117     NSAppleEventDescriptor *desc = (NSAppleEventDescriptor *)obj;

   118 

   119     const AEDesc *aeDesc = [desc aeDesc];

   120     if (aeDesc->descriptorType == typeNull) {

   121         return NULL;

   122     }

   123 

   124     return JNFNSToJavaString(env, [obj description]);

   125 }

   126 

   127 - (id) coerceJavaObject:(jobject)obj withEnv:(JNIEnv *)env usingCoercer:(JNFTypeCoercion *)coercer {

   128     return nil; // there is no Java object that represents a "version"

   129 }

   130 

   131 @end

   132 

   133 

   134 // NSNull <-> null

   135 @implementation JavaAppleScriptNullConverter

   136 

   137 - (jobject) coerceNSObject:(id)obj withEnv:(JNIEnv *)env usingCoercer:(JNFTypeCoercion *)coercer {

   138     return NULL;

   139 }

   140 

   141 - (id) coerceJavaObject:(jobject)obj withEnv:(JNIEnv *)env usingCoercer:(JNFTypeCoercion *)coercer {

   142     return nil;

   143 }

   144 

   145 @end