Archive for the ‘Java’ Category
-
Hello, GCJ World!
Posted on 3月 25th, 2013 by cx20
GCJ
GCJ は GNU Compiler for the Java の略で、GCC に含まれるコンパイラの1つである。
Java のライブラリが使用できるほか、CNI(Compiled Native Interface)を用いることで、C++ で作成したライブラリを呼び出すことが可能となっている。ソースコード(Java)
public class Hello { public static native void printf( String format ); public static void main( String[] args ) { printf( "Hello, GCJ World!n" ); } }
クラスファイル作成
C:¥> gcj -C Hello.java
C++ ヘッダファイル作成
C:¥> gcjh Hello.class
ソースコード(C++ ヘッダファイル)
// DO NOT EDIT THIS FILE - it is machine generated -*- c++ -*- #ifndef __Hello__ #define __Hello__ #pragma interface #include <java/lang/Object.h> #include <gcj/array.h> extern "Java" { class Hello; } class Hello : public ::java::lang::Object { public: Hello(); static void printf(::java::lang::String *); static void main(JArray< ::java::lang::String * > *); static ::java::lang::Class class$; }; #endif // __Hello__
ソースコード(C++ 実装ファイル)
#include <stdio.h> #include <java/lang/String.h> #include "Hello.h" void ::Hello::printf(::java::lang::String* format ) { int len = format->length(); for ( int i = 0; i < len; i++ ) { ::printf( "%c", format->charAt(i) ); } }
コンパイル方法
C:¥> gcj -c Hello.cpp C:¥> gcj --main=Hello -o Hello Hello.o Hello.class
実行結果
Hello, GCJ World!
-
Hello, COM(Jasmin) World!
Posted on 1月 26th, 2013 by cx20
COM(Jasmin)
COM(Component Object Model)はマイクロソフトの提唱するプログラム部品の仕様である。
COM を用いて開発された部品であれば言語を問わず利用することができる。
Jasmin 自身には、COM を呼び出す機能を持っていないが、別途ライブラリを経由することで呼び出すことが可能である。
以下は Jasmin より JACOB(JAVA-COM Bridge) ライブラリを使用した COM クライアントの例となっている。ソースコード
; Produced by NeoJasminVisitor (tinapoc) ; http://tinapoc.sourceforge.net ; The original JasminVisitor is part of the BCEL ; http://jakarta.apache.org/bcel/ ; Sun Dec 09 17:59:35 JST 2012 .bytecode 51.0 .source Hello.java .class public Hello .super java/lang/Object .method public ()V .limit stack 1 .limit locals 1 .var 0 is this LHello; from Label0 to Label1 Label0: .line 4 0: aload_0 1: invokespecial java/lang/Object/()V Label1: 4: return .end method .method public static main([Ljava/lang/String;)V .limit stack 4 .limit locals 8 .var 0 is arg0 [Ljava/lang/String; from Label0 to Label1 Label0: .line 6 0: new com/jacob/activeX/ActiveXComponent 3: dup 4: ldc "Shell.Application" 6: invokespecial com/jacob/activeX/ActiveXComponent/(Ljava/lang/String;)V 9: astore_1 .line 7 10: new com/jacob/com/Variant 13: dup 14: iconst_0 15: invokespecial com/jacob/com/Variant/(I)V 18: astore_2 .line 8 19: new com/jacob/com/Variant 22: dup 23: ldc "Hello, COM(JACOB) World!" 25: invokespecial com/jacob/com/Variant/(Ljava/lang/String;)V 28: astore_3 .line 9 29: new com/jacob/com/Variant 32: dup 33: iconst_0 34: invokespecial com/jacob/com/Variant/(I)V 37: astore 4 .line 10 39: new com/jacob/com/Variant 42: dup 43: bipush 36 45: invokespecial com/jacob/com/Variant/(I)V 48: astore 5 .line 11 50: iconst_4 51: anewarray com/jacob/com/Variant 54: dup 55: iconst_0 56: aload_2 57: aastore 58: dup 59: iconst_1 60: aload_3 61: aastore 62: dup 63: iconst_2 64: aload 4 66: aastore 67: dup 68: iconst_3 69: aload 5 71: aastore 72: astore 6 .line 12 74: aload_1 75: ldc "BrowseForFolder" 77: aload 6 79: invokevirtual com/jacob/activeX/ActiveXComponent/invoke(Ljava/lang/String;[Lcom/jacob/com/Variant;)Lcom/jacob/com/Variant; 82: astore 7 Label1: .line 13 84: return .end method
コンパイル&実行方法
C:¥> jasmin Hello.j C:¥> java -cp jacob.jar;. Hello
実行結果
+----------------------------------------+ |Browse For Folder [X]| +----------------------------------------+ | Hello, COM(JACOB) Wolrd! | | | | +------------------------------------+ | | |[Windows] | | | | +[addins] | | | | +[AppCompat] | | | | +[AppPatch] | | | | +[assembly] | | | | : | | | | : | | | | : | | | +------------------------------------+ | | [Make New Folder] [ OK ] [Cancel] | +----------------------------------------+
-
Hello, COM(Rhino) World!
Posted on 1月 24th, 2013 by cx20
COM(Rhino)
COM(Component Object Model)はマイクロソフトの提唱するプログラム部品の仕様である。
COM を用いて開発された部品であれば言語を問わず利用することができる。
Rhino 自身には、COM を呼び出す機能を持っていないが、別途ライブラリを経由することで呼び出すことが可能である。
以下は Rhino より JACOB(JAVA-COM Bridge) ライブラリを使用した COM クライアントの例となっている。ソースコード
importPackage(com.jacob.com); importPackage(com.jacob.activeX); var shell = new ActiveXComponent("Shell.Application"); var hwnd = new Variant(0); var title = new Variant("Hello, COM(JACOB) World!"); var option = new Variant(0); var rootFolder = new Variant(36); var params = java.lang.reflect.Array.newInstance(Variant, 4); params[0] = hwnd; params[1] = title; params[2] = option; params[3] = rootFolder; var folder = shell.invoke( "BrowseForFolder", params );
実行方法
C:¥> jrunscript -cp jacob.jar;. Hello.js
実行結果
+----------------------------------------+ |Browse For Folder [X]| +----------------------------------------+ | Hello, COM(JACOB) Wolrd! | | | | +------------------------------------+ | | |[Windows] | | | | +[addins] | | | | +[AppCompat] | | | | +[AppPatch] | | | | +[assembly] | | | | : | | | | : | | | | : | | | +------------------------------------+ | | [Make New Folder] [ OK ] [Cancel] | +----------------------------------------+
-
Hello, COM(BeanShell) World!
Posted on 1月 22nd, 2013 by cx20
COM(BeanShell)
COM(Component Object Model)はマイクロソフトの提唱するプログラム部品の仕様である。
COM を用いて開発された部品であれば言語を問わず利用することができる。
BeanShell 自身には、COM を呼び出す機能を持っていないが、別途ライブラリを経由することで呼び出すことが可能である。
以下は BeanShell より JACOB(JAVA-COM Bridge) ライブラリを使用した COM クライアントの例となっている。ソースコード
import com.jacob.com.Variant; import com.jacob.activeX.ActiveXComponent; ActiveXComponent shell = new ActiveXComponent("Shell.Application"); Variant hwnd = new Variant(0); Variant title = new Variant("Hello, COM(Jacob) World!"); Variant option = new Variant(0); Variant rootFolder = new Variant(36); Variant[] params = new Variant[] { hwnd, title, option, rootFolder }; Object folder = shell.invoke( "BrowseForFolder", params );
実行方法
C:¥> SET CLASSPATH=bsh-2.0b4.jar;jacob.jar;%CLASSPATH% C:¥> java bsh.Interpreter Hello.bsh
実行結果
+----------------------------------------+ |Browse For Folder [X]| +----------------------------------------+ | Hello, COM(JACOB) Wolrd! | | | | +------------------------------------+ | | |[Windows] | | | | +[addins] | | | | +[AppCompat] | | | | +[AppPatch] | | | | +[assembly] | | | | : | | | | : | | | | : | | | +------------------------------------+ | | [Make New Folder] [ OK ] [Cancel] | +----------------------------------------+
-
Hello, COM(Clojure) World!
Posted on 1月 21st, 2013 by cx20
COM(Clojure)
COM(Component Object Model)はマイクロソフトの提唱するプログラム部品の仕様である。
COM を用いて開発された部品であれば言語を問わず利用することができる。
Clojure 自身には、COM を呼び出す機能を持っていないが、別途ライブラリを経由することで呼び出すことが可能である。
以下は Clojure より JACOB(JAVA-COM Bridge) ライブラリを使用した COM クライアントの例となっている。ソースコード
(import (com.jacob.com Variant) (com.jacob.activeX ActiveXComponent)) (def shell (ActiveXComponent. "Shell.Application")) (def hwnd (Variant. 0)) (def title (Variant. "Hello, COM(JACOB) World!")) (def option (Variant. 0)) (def rootFolder (Variant. 36)) (def params (into-array [hwnd title option rootFolder])) (def folder (.invoke shell "BrowseForFolder" params ))
実行方法
C:¥> SET CLASSPATH=jacob.jar;.;%CLASSPATH% C:¥> clojure Hello.clj
実行結果
+----------------------------------------+ |Browse For Folder [X]| +----------------------------------------+ | Hello, COM(JACOB) Wolrd! | | | | +------------------------------------+ | | |[Windows] | | | | +[addins] | | | | +[AppCompat] | | | | +[AppPatch] | | | | +[assembly] | | | | : | | | | : | | | | : | | | +------------------------------------+ | | [Make New Folder] [ OK ] [Cancel] | +----------------------------------------+
-
Hello, COM(Jython) World!
Posted on 1月 20th, 2013 by cx20
COM(Jython)
COM(Component Object Model)はマイクロソフトの提唱するプログラム部品の仕様である。
COM を用いて開発された部品であれば言語を問わず利用することができる。
Jython 自身には、COM を呼び出す機能を持っていないが、別途ライブラリを経由することで呼び出すことが可能である。
以下は Jython より JACOB(JAVA-COM Bridge) ライブラリを使用した COM クライアントの例となっている。ソースコード
from com.jacob.com import Variant from com.jacob.activeX import ActiveXComponent shell = ActiveXComponent("Shell.Application") hwnd = Variant(0) title = Variant("Hello, COM(JACOB) World!") option = Variant(0) rootFolder = Variant(36) params = [ hwnd, title, option, rootFolder ] folder = shell.invoke( "BrowseForFolder", params )
実行方法
C:¥> SET CLASSPATH=jacob.jar;.;%CLASSPATH% C:¥> jython Hello.py
実行結果
+----------------------------------------+ |Browse For Folder [X]| +----------------------------------------+ | Hello, COM(JACOB) Wolrd! | | | | +------------------------------------+ | | |[Windows] | | | | +[addins] | | | | +[AppCompat] | | | | +[AppPatch] | | | | +[assembly] | | | | : | | | | : | | | | : | | | +------------------------------------+ | | [Make New Folder] [ OK ] [Cancel] | +----------------------------------------+
-
Hello, COM(JRuby) World!
Posted on 1月 19th, 2013 by cx20
COM(JRuby)
COM(Component Object Model)はマイクロソフトの提唱するプログラム部品の仕様である。
COM を用いて開発された部品であれば言語を問わず利用することができる。
JRuby 自身には、COM を呼び出す機能を持っていないが、別途ライブラリを経由することで呼び出すことが可能である。
以下は JRuby より JACOB(JAVA-COM Bridge) ライブラリを使用した COM クライアントの例となっている。ソースコード
require 'java' require 'jacob.jar' import 'com.jacob.com.Variant' import 'com.jacob.activeX.ActiveXComponent' @shell = ActiveXComponent.new("Shell.Application") @hwnd = Variant.new(0) @title = Variant.new("Hello, COM(JACOB) World!") @option = Variant.new(0) @rootFolder = Variant.new(36) @params = [ @hwnd, @title, @option, @rootFolder ] @folder = @shell.invoke( "BrowseForFolder", @params )
実行方法
C:¥> jruby Hello.rb
実行結果
+----------------------------------------+ |Browse For Folder [X]| +----------------------------------------+ | Hello, COM(JACOB) Wolrd! | | | | +------------------------------------+ | | |[Windows] | | | | +[addins] | | | | +[AppCompat] | | | | +[AppPatch] | | | | +[assembly] | | | | : | | | | : | | | | : | | | +------------------------------------+ | | [Make New Folder] [ OK ] [Cancel] | +----------------------------------------+
-
Hello, COM(Scala) World!
Posted on 1月 18th, 2013 by cx20
COM(Scala)
COM(Component Object Model)はマイクロソフトの提唱するプログラム部品の仕様である。
COM を用いて開発された部品であれば言語を問わず利用することができる。
Scala 自身には、COM を呼び出す機能を持っていないが、別途ライブラリを経由することで呼び出すことが可能である。
以下は Scala より JACOB(JAVA-COM Bridge) ライブラリを使用した COM クライアントの例となっている。ソースコード
import com.jacob.com.Variant import com.jacob.activeX.ActiveXComponent object Hello { def main (args: Array[String]) { var shell = new ActiveXComponent("Shell.Application") var hwnd = new Variant(0) var title = new Variant("Hello, COM(JACOB) World!") var option = new Variant(0) var rootFolder = new Variant(36) var params = Array( hwnd, title, option, rootFolder ) var folder = shell.invoke( "BrowseForFolder", params ) } }
実行方法
C:¥> scala -cp jacob.jar;. Hello.scala
実行結果
+----------------------------------------+ |Browse For Folder [X]| +----------------------------------------+ | Hello, COM(JACOB) Wolrd! | | | | +------------------------------------+ | | |[Windows] | | | | +[addins] | | | | +[AppCompat] | | | | +[AppPatch] | | | | +[assembly] | | | | : | | | | : | | | | : | | | +------------------------------------+ | | [Make New Folder] [ OK ] [Cancel] | +----------------------------------------+
-
Hello, COM(Groovy) World!
Posted on 1月 17th, 2013 by cx20
COM(Groovy)
COM(Component Object Model)はマイクロソフトの提唱するプログラム部品の仕様である。
COM を用いて開発された部品であれば言語を問わず利用することができる。
Groovy 自身には、COM を呼び出す機能を持っていないが、別途ライブラリを経由することで呼び出すことが可能である。
以下は Groovy より JACOB(JAVA-COM Bridge) ライブラリを使用した COM クライアントの例となっている。ソースコード
import com.jacob.com.Variant import com.jacob.activeX.ActiveXComponent class Hello { static void main (args) { def shell = new ActiveXComponent("Shell.Application") def hwnd = new Variant(0) def title = new Variant("Hello, COM(JACOB) World!") def option = new Variant(0) def rootFolder = new Variant(36) def params = [ hwnd, title, option, rootFolder ] as Variant[] def folder = shell.invoke( "BrowseForFolder", params ) } }
実行方法
C:¥> groovy Hello.groovy
実行結果
+----------------------------------------+ |Browse For Folder [X]| +----------------------------------------+ | Hello, COM(JACOB) Wolrd! | | | | +------------------------------------+ | | |[Windows] | | | | +[addins] | | | | +[AppCompat] | | | | +[AppPatch] | | | | +[assembly] | | | | : | | | | : | | | | : | | | +------------------------------------+ | | [Make New Folder] [ OK ] [Cancel] | +----------------------------------------+
-
Hello, Win32 API(Jasmin) World!
Posted on 1月 16th, 2013 by cx20
Win32 API(Jasmin)
Win32 API は、Windows の機能にアクセスする為の API(Application Programming Interface)である。
以下は Jasmin にて SWT の非公開 API を使用した Win32 API 呼出しの例となっている。ソースコード
; Produced by NeoJasminVisitor (tinapoc) ; http://tinapoc.sourceforge.net ; The original JasminVisitor is part of the BCEL ; http://jakarta.apache.org/bcel/ ; Sat Dec 08 23:04:58 JST 2012 .bytecode 51.0 .source Hello.java .class public Hello .super java/lang/Object .method public ()V .limit stack 1 .limit locals 1 .var 0 is this LHello; from Label0 to Label1 Label0: .line 4 0: aload_0 1: invokespecial java/lang/Object/()V Label1: 4: return .end method .method public static main([Ljava/lang/String;)V .limit stack 5 .limit locals 3 .var 0 is arg0 [Ljava/lang/String; from Label0 to Label1 Label0: .line 6 0: new org/eclipse/swt/internal/win32/TCHAR 3: dup 4: iconst_0 5: ldc "Hello, Win32 API World!" 7: iconst_1 8: invokespecial org/eclipse/swt/internal/win32/TCHAR/(ILjava/lang/String;Z)V 11: astore_1 .line 7 12: new org/eclipse/swt/internal/win32/TCHAR 15: dup 16: iconst_0 17: ldc "Hello, World" 19: iconst_1 20: invokespecial org/eclipse/swt/internal/win32/TCHAR/(ILjava/lang/String;Z)V 23: astore_2 .line 8 24: iconst_0 25: aload_1 26: aload_2 27: iconst_0 28: invokestatic org/eclipse/swt/internal/win32/OS/MessageBox(ILorg/eclipse/swt/internal/win32/TCHAR;Lorg/eclipse/swt/internal/win32/TCHAR;I)I 31: pop Label1: .line 9 32: return .end method
コンパイル&実行方法
C:¥> jasmin Hello.j C:¥> java -cp org.eclipse.swt.win32.win32.x86_3.6.1.v3655c.jar;. Hello
実行結果
--------------------------- Hello, World! --------------------------- Hello, Win32 API World! --------------------------- OK ---------------------------