Mercurial > hg > truffle

comparison truffle/com.oracle.truffle.api.interop.java/src/com/oracle/truffle/api/interop/java/WriteFieldNode.java @ 22135:e70b20f4bb00

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Implementing API for Java/Truffle interop. Based around JavaInterop.asJavaObject and JavaInterop.asTruffleObject methods. Connected to TruffleVM via Symbol.as(Class) wrapper. Verified by extended TCK.
author Jaroslav Tulach <jaroslav.tulach@oracle.com>
date Mon, 07 Sep 2015 17:07:20 +0200
parents
children
comparison
equal deleted inserted replaced
22134:025869c88840 22135:e70b20f4bb00
1 /*
2 * Copyright (c) 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 package com.oracle.truffle.api.interop.java;
26
27 import com.oracle.truffle.api.frame.VirtualFrame;
28 import com.oracle.truffle.api.interop.ForeignAccess;
29 import com.oracle.truffle.api.interop.java.JavaInterop.JavaObject;
30 import com.oracle.truffle.api.nodes.RootNode;
31 import java.lang.reflect.Array;
32
33 class WriteFieldNode extends RootNode {
34
35 public WriteFieldNode() {
36 super(JavaInteropLanguage.class, null, null);
37 }
38
39 @Override
40 public Object execute(VirtualFrame frame) {
41 try {
42 JavaInterop.JavaObject receiver = (JavaInterop.JavaObject) ForeignAccess.getReceiver(frame);
43 Object obj = receiver.obj;
44 final Object indexOrName = ForeignAccess.getArguments(frame).get(0);
45 Object value = ForeignAccess.getArguments(frame).get(1);
46 if (indexOrName instanceof Integer) {
47 Array.set(obj, (Integer) indexOrName, value);
48 return JavaObject.NULL;
49 }
50 String name = (String) indexOrName;
51 try {
52 receiver.clazz.getField(name).set(obj, value);
53 return JavaObject.NULL;
54 } catch (NoSuchFieldException ex) {
55 throw new RuntimeException(ex);
56 }
57 } catch (IllegalAccessException ex) {
58 throw new RuntimeException(ex);
59 }
60 }
61
62 }