Posts Tagged ‘Swift’

calling Haskell from Swift / Linux

土曜日, 12月 26th, 2015

今月Swiftがオープンソースとして公開されました。何か試したかったのでC言語とのリンクをと思ったのですが、少し踏み込んでHaskellにしてみました。

環境: swift-2.2-SNAPSHOT-2015-12-22-a-ubuntu15.10.tar.gz / Ubuntu 15.10

Swiftインストール:
https://swift.org/download/#latest-development-snapshots
からダウンロードした上記ファイルを解凍して、usr/binにパスを通します。
usr/lib/swift/linuxにある、libswiftCore.soをLinuxの/usr/local/libにコピーします。
とりあえず簡単なテストをするだけなので、これだけにしました。

export PATH:~/swift/usr/bin
sudo cp libswiftCore.so /usr/local/lib
sudo ldconfig

Haskellインストール:

sudo apt-get install ghc

fib.hs

module Fib where
import Foreign.C.Types

fibonacci :: Int -> Int
fibonacci n = fibs !! n
    where fibs = 0 : 1 : zipWith (+) fibs (tail fibs)

fibonacci_hs :: CInt -> CInt
fibonacci_hs = fromIntegral . fibonacci . fromIntegral

foreign export ccall fibonacci_hs :: CInt -> CInt

参考: https://wiki.haskell.org/Calling_Haskell_from_C
このコードをそのまま使い、Swiftから呼び出してみます。

fibsw.swift

import Foundation

hs_start()

var a: CInt = 12
let fb = fibonacci_hs(a)
print("fibonacci \(a) : \(fb)")

hs_end()

なんとダイレクトで呼び出せてしまいます。しかし、初期化処理とか必要になってくるので、Cのグルーコードを用意します。

fibc.h

#include "fib_stub.h"

int hs_start();
int hs_end();

fibc.c

#include <stdio.h>
#include "fibc.h"

int hs_start()
{
   int argc = 2;
   char *argv[] = {"+RTS", "-A32m", NULL};
   char **pargv = argv;

   hs_init(&argc, &pargv);
   return 0;
}
int hs_end()
{
        hs_exit();
        return 0;
}

fib_stub.hは、Haskellコンパイル時に自動生成されます。

#include "HsFFI.h"
#ifdef __cplusplus
extern "C" {
#endif
extern HsInt32 fibonacci_hs(HsInt32 a1);
#ifdef __cplusplus
}
#endif

ビルド:

ghc -c -O fib.hs
cc -c -o fibc.o fibc.c -I/usr/lib/ghc/include
swiftc -c -o fibsw.o fibsw.swift -import-objc-header fibc.h -I/usr/lib/ghc/include
ghc –make -no-hs-main fibsw.o fibc.o fib.o -o fibsw -lswiftCore

実行結果:
SwiftCallHaskell01
SwiftがLinuxで手軽に使えると、サーバ、クライアントともSwiftで開発ができるのでいろいろと便利かもしれません。
Perfect.orgなども要注目ですね。

Swift : Functional ?

日曜日, 5月 3rd, 2015

Swiftの関数型言語の特徴についてのメモです。私の好みの部分だけビックアップしています。
環境 : Xcode 6.3 / Mac OSX 10.10.3

f1
f2

ソースはGithub Gistにあります。
https://gist.github.com/systemsblue/526eb360ec2ffc57a8a9

・Generator
無限の数列を生成するクラスです。引数により有限も可能です。

・Curry
関数のカリー化です。Swift自身対応しているのですが(f2)、f1の方がいろいろと応用がききそうです。コメントのf1は、簡略化した表記です。Haskellみたいです。

・Pipe
F#のパイプ演算子のように記述できます。(便利なのでいろいろと使えます。一番上に定義) 

g(f(x)) -> x |> f |> g

カリー化の部分適合の考え方を参考にすると、引数を与えられます。

参考:
http://undefinedvalue.com/2014/07/13/fs-pipe-forward-operator-swift

Swift : without C ? (2)

金曜日, 4月 24th, 2015

前回、Swift, Objective-Cの相互呼び出しのテストをしましたが、CからSwiftの呼び出しについては、Objective-C経由で十分と考えていました。CとSwiftの「近さ」を実感するために、ここをもう少し踏み込んでテストしてみたいと思います。

環境 : Swift 1.2, Xcode 6.3 / Mac OSX 10.10.3

- (void) callSwift2 {
    MySwiftClass *my = [[MySwiftClass alloc] init];
    SEL method = @selector(disp:);
    [my performSelector: method withObject:@"NS String 2 / Objc"];
}
- (void) callSwift3 {
    MySwiftClass *my = [[MySwiftClass alloc] init];
    SEL method = @selector(disp:);
    IMP func = [my methodForSelector: method];
    
    // C Function
    ((void(*)(id, SEL, NSString*))func)(my, method, @"NS String 3 / Objc");
}

主に上記二つのメソッド追加しました。
前回からSwiftもバージョンアップしたので、OSもXcodeもアップグレードして、再びビルドしました。
また、プログでは初めて、コードをgithubにアップしました。関連プログでもこれから活用していくつもりです。

https://github.com/systemsblue/CBridge

callSwift3で、Cの関数のようにSwiftのメソッドを呼び出しているところがポイントです。
さらに、Pythonのctypesを使って、Swiftのメソッドをダイナミックライブラリにして無理やり呼び出してみました。

add.swift

public func add(a:Int, b:Int) -> Int {
	return a + b
}

コマンド

xcrun swiftc -emit-library -emit-object add.swift -o add.o
xcrun libtool -dynamic -lswiftCore -lsystem -o add.dylib add.o -L/Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/lib/swift/macosx
nm add.dylib

symbol table表示結果

0000000000000f70 T __TF4addf3addFTSiSi_Si
0000000000000f64 t __dyld_func_lookup
U dyld_stub_binder
0000000000000f50 t dyld_stub_binding_helper

メソッド_TF4addf3addFTSiSi_Siをpython(REPL)から呼び出す。

Python 2.7.6 (default, Sep  9 2014, 15:04:36) 
[GCC 4.2.1 Compatible Apple LLVM 6.0 (clang-600.0.39)] on darwin
Type "help", "copyright", "credits" or "license" for more information.
>>> from ctypes import *
>>> cdll.LoadLibrary('/Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/lib/swift/macosx/libswiftCore.dylib')
<CDLL '/Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/lib/swift/macosx/libswiftCore.dylib', handle 7f83b9e010f0 at 10b5874d0>
>>> my = cdll.LoadLibrary('./add.dylib')
>>> my._TF4addf3addFTSiSi_Si(1,2)
3
>>> 

やはりCなのですね。
Pythonのctypesは、Cの構造体にもアクセスでき、dylib(Mac), dll(Window), so(Linux)にアクセスするときによく使われます。(前回やったようにSwiftも構造体にアクセス可という点で似ています)
オブジェクト指向を取り入れたのが、Objective-Cなら、関数型言語の特徴を取り入れたSwiftは、Functional-Cと呼んでもいいくらい、Cに「近い」と感じました。(見た目はかなり違いますが)

Swift : without C ?

土曜日, 4月 4th, 2015

しばらくご無沙汰していましたiOS開発を再び始めることになりました。
新しい言語のSwiftを使っていろいろと作っていますが、C言語との「距離」が意外と近い、という印象を強くうけます。
「わさび抜きわさビーフ」ではないですが、C抜きの(Cにみえない)C言語みたいな感じでしょうか。
関数型言語のアイディアをふんだんに取り入れた、高機能な言語に仕上がっているのは、もちろんですが、Objective-C, C との相互やりとりは簡単にできるようになっています。
そこで、相互呼び出しのテストをしてみました。

環境 : Xcode 6.2 / Mac OSX 10.9.5

main.swift

import Foundation

class MySwiftClass : NSObject{
    func disp(str:NSString){
        println("Swift : \(str)")
    }
}

var my = MyObjcClass()

var str:NSString = "NS String / Swift";
my.disp(str)
my.callSwift()

var i:CInt = 0
var cstr = UnsafeMutablePointer<CChar>.alloc(10)

getStr(cstr)
println(String.fromCString(cstr)!)

getInt(&i)
println("number : \(i)")

var ii:CInt = 0
var cstr2 = [CChar](count:20, repeatedValue:0)

var cst1 = cStruct(name:&cstr2, number:ii)
getStruct1(&cst1)
println("\(String.fromCString(cst1.name)!) : \(cst1.number)")

var cst2:cStruct = getStruct2()
println("\(String.fromCString(cst2.name)!) : \(cst2.number)")

var cst3:UnsafeMutablePointer<cStruct> = getStruct3()
println("\(String.fromCString(cst3.memory.name)!) : \(cst3.memory.number)")

sub01.h

#import <Foundation/Foundation.h>

@interface MyObjcClass : NSObject
- (void) disp:(NSString*)str;
- (void) callSwift;
@end

sub01.m

#import "CBridge-Swift.h"
#import "sub01.h"

@implementation MyObjcClass
- (void) disp:(NSString*) str {
    NSLog(@"Objc : %@", str);
}
- (void) callSwift {
    MySwiftClass *my = [[MySwiftClass alloc] init];
    [my disp:@"NS String / Objc"];
}
@end

CBridge-Bridging-Header.h

#import "sub01.h"
#import "sub02.h"

sub02.h

#include <stdio.h>
#include <string.h>

void getInt(int *i);
void getStr(char *str);

typedef struct{
    char *name;
    int number;
} cStruct;

void getStruct1(cStruct *st);
cStruct getStruct2();
cStruct* getStruct3();

sub02.c

#include "sub02.h"
#include <stdlib.h>
#include <string.h>

void getInt(int *i){
    *i = 1234;
}
void getStr(char *str){
    strcpy(str, "C String / Clang");
}
void getStruct1(cStruct *st){
    st->name = "name of cStruct1";
    st->number = 1111;
}
cStruct getStruct2(){
    cStruct *st = malloc(sizeof(cStruct));
    st->name = "name of cStruct2";
    st->number = 2222;
    return *st;
}
cStruct* getStruct3(){
    cStruct *st = malloc(sizeof(cStruct));
    st->name = "name of cStruct3";
    st->number = 3333;
    return st;
}

SwiftからCの呼び出しは、UnsafeMutablePointerを使うところとC構造体がそのままSwift側で使えてしまうところが、ポイントです。
構造体は3とおりの呼び出しを試しました。
SwiftとObjective-Cとの相互呼び出しは、簡単にできてしまいます。
CBridge-Bridgeing-Header.hは、コードを追加するときに作成するか聞いてきます。ここにはC,Objective-Cのヘッダを読み込みます。
CBridge-Swift.hは、見えないのですが、暗黙のルールとして記述するようです。
以下、結果です。
CBridge

実は、このCとの相互呼び出しは、Swiftに少し慣れてからテストしました。Optional型、関数型の特徴に興味があり、そちらを先に学習したので、(モダンなのに)Cとここまで近いとは気づいていませんでした。Swiftが最初に発表されたき、Objective-CでCのオープンソースをよくリンクして使っていたので、これがやりづらくなるのでは、という心配もありましたが、ダイレクトに呼び出せる(Objective-Cを経由せずの意味)のことでその懸念はなくなりました。
この言語、かなりパワフルです。