iOSでZeroMQを試す
October 18, 2012 at 06:00 PM | categories: objective-c, ios, zeromq, common lisp |前回Common LispでZeroMQを試してみたが、今度はiOSからも試してみた。ZeroMQのライセンスはLGPLだが、static linking exceptionがあるのでiPhoneアプリに組み込んでもソースは公開しなくて大丈夫なはず。(勘違いしてたらごめんなさい)
ZeroMQをiPhone用にビルド
ZeroMQはautotoolsで作成されておりconfigure && make でビルドできるようになっているが、iPhone用にクロスコンパイルをするためには適切なオプションを与えてやる必要がある。
一応、本家サイト上にもドキュメントはあるが最新のXcodeではうごかない。また、シミュレータ用でもうごかせるようにしておきたい。というわけで、以下のようなビルドスクリプトを書いた。
これをZeroMQのtarを展開してできたディレクトリにbuild.shとかで保存して実行すると、armv7とi386に対応したlibzmq.aができる。
$ tar xzf zeromq-2.2.0.tar.gz $ cd zeromq-2.2.0 $ ./build.sh $ file libzmq.a libzmq.a: Mach-O universal binary with 2 architectures libzmq.a (for architecture armv7): current ar archive random library libzmq.a (for architecture i386): current ar archive random library
このlibzmq.aと、includeディレクトリの中身をXcodeにインポートしてやればよい。 このときに、XcodeでOther Linker Flags に -lstdc++ を追加してやるのを忘れないように。
ZeroMQを用いた簡易チャットアプリ
サンプルとしてチャットアプリを実装してみる。 チャットでの発言はREQ/REPを用いてアプリ→サーバに渡し、PUB/SUBを用いてサーバ→アプリにブロードキャストする。
サーバ側
サーバ側はCommon Lispで実装した。単に、rep-sockから発言を受け取ってpub-sockにそのまま流すだけ。
(load "~/.sbclrc") (ql:quickload :zeromq) (defun pull-and-publish () (zmq:with-context (ctx 1) (zmq:with-socket (rep-sock ctx zmq:rep) (zmq:bind rep-sock "tcp://127.0.0.1:5555") (zmq:with-context (ctx2 1) (zmq:with-socket (pub-sock ctx2 zmq:pub) (zmq:bind pub-sock "tcp://127.0.0.1:5556") (loop (let ((msg (make-instance 'zmq:msg))) (zmq:recv rep-sock msg) (zmq:send rep-sock (make-instance 'zmq:msg :data "ok")) (zmq:send pub-sock msg)))))))) (pull-and-publish)
REQ/REPではなくPULL/PUSHでもできるはずだが、なぜかcl-zmqではpullがつかえなかったのでREQ/REPをつかった。
アプリ側
objective-c版ZeroMQもあるけど、今回はそのままCのAPIを利用した。 以下はソースの抜粋。
#import "ChatViewController.h" #import "include/zmq.h" @interface ChatViewController () { void *ctx1, *ctx2; void *subsock, *reqsock; NSMutableArray *messageList; } @end @implementation ChatViewController @synthesize nickname; @synthesize timer; - (void)viewDidLoad { [super viewDidLoad]; ctx1 = zmq_init(1); subsock = zmq_socket(ctx1, ZMQ_SUB); zmq_setsockopt(subsock, ZMQ_SUBSCRIBE, "", 0); int rc = zmq_connect(subsock, "tcp://127.0.0.1:5556"); assert(rc == 0); ctx2 = zmq_init(1); reqsock = zmq_socket(ctx1, ZMQ_REQ); rc = zmq_connect(reqsock, "tcp://127.0.0.1:5555"); assert(rc == 0); self.timer = [NSTimer scheduledTimerWithTimeInterval:1 target:self selector:@selector(observeSocket) userInfo:nil repeats:YES]; messageList = [[NSMutableArray alloc] init]; } - (void)viewWillDisappear:(BOOL)animated { [self.timer invalidate]; zmq_close(subsock); zmq_close(reqsock); zmq_term(ctx1); zmq_term(ctx2); } - (void)observeSocket { zmq_msg_t msg; int rc = zmq_msg_init(&msg); assert(rc == 0); do { rc = zmq_recv(subsock, &msg, ZMQ_NOBLOCK); if (rc == EAGAIN) { NSLog(@"no data available"); } else if (rc == ENOTSUP) { NSLog(@"ENOTSUP"); } else if (rc == EFSM) { NSLog(@"EFSM"); } else if (rc == ETERM) { NSLog(@"ETERM"); } else if (rc == ENOTSOCK) { NSLog(@"ENOTSOCK"); } else if (rc == EINTR) { NSLog(@"EINTR"); } else if (rc == EFAULT) { NSLog(@"EFAULT"); } else if (rc == 0) { size_t siz = zmq_msg_size(&msg); void *dat = zmq_msg_data(&msg); NSString *str = [[NSString alloc] initWithData:[NSData dataWithBytes:dat length:siz] encoding:NSUTF8StringEncoding]; [messageList insertObject:str atIndex:0]; } else { NSLog(@"unknown"); } } while (rc == 0); zmq_msg_close(&msg); [self.tableView reloadData]; } - (IBAction) saySomething:(id)sender { UIAlertView *alert = [[UIAlertView alloc] initWithTitle:@"text input" message:@"" delegate:self cancelButtonTitle:@"cancel" otherButtonTitles:@"ok", nil]; alert.alertViewStyle = UIAlertViewStylePlainTextInput; [alert show]; } - (void)alertView:(UIAlertView*)alertView clickedButtonAtIndex:(NSInteger)buttonIndex { zmq_msg_t msg; int rc; NSData *data; NSString *str; switch (buttonIndex) { case 0: break; case 1: str = [NSString stringWithFormat:@"%@: %@", nickname, [alertView textFieldAtIndex:0].text]; data = [str dataUsingEncoding:NSUTF8StringEncoding]; rc = zmq_msg_init_size(&msg, [data length]); assert(rc == 0); memcpy(zmq_msg_data(&msg), [data bytes], [data length]); zmq_send(reqsock, &msg, 0); zmq_recv(reqsock, &msg, 0); zmq_msg_close(&msg); break; default: break; } } @end
以下補足
- 簡単のためタイマーで1秒ごとにソケットにメッセージがあるかどうかobserveSocketでチェックしているが、別スレッドにしたほうがスマート
- zmq_recvのマニュアルによると、zmq_recvをZMQ_NOBLOCKで呼んだときにメッセージがなかった場合はEAGAINが返るとなっているが、-1がかえってきていた。
- 上記ソースはUITableViewControllerで発言を表示する想定になっているが、UIまわりのコードは省略
オマケ(Common Lisp版コマンドライン用チャットクライアント)
(load "~/.sbclrc") (ql:quickload :zeromq) (ql:quickload :bordeaux-threads) (defun sub () (zmq:with-context (ctx 1) (zmq:with-socket (socket ctx zmq:sub) (zmq:setsockopt socket zmq:subscribe "") (zmq:connect socket "tcp://127.0.0.1:5556") (loop (let ((query (make-instance 'zmq:msg))) (zmq:recv socket query) (format t "received message: ~a~%" (zmq:msg-data-as-string query))))))) (defun client () (zmq:with-context (ctx 1) (zmq:with-socket (socket ctx zmq:req) (zmq:connect socket "tcp://127.0.0.1:5555") (loop (zmq:send socket (make-instance 'zmq:msg :data (read-line))) (let ((result (make-instance 'zmq:msg))) (zmq:recv socket result)))))) (bordeaux-threads:make-thread #'sub) (client)
まとめ
- iPhoneでZeroMQを動かしてみた
- ZeroMQのREQ/REPとPUB/SUBを使用してチャットをつくってみた
- appleの審査を通過するかどうかは知らない(一応実績はあるらしい)
参考
blog comments powered by Disqus
About Me
mojavy |
Recent posts
95/5 Mbps とは
(August 30, 2015 at 04:22 PM)組み込み用プログラミング言語のパフォーマンス比較
(April 21, 2015 at 01:10 AM)最近読んだ本
(April 05, 2015 at 01:23 PM)Phabricatorを使ったワークフローについて
(March 02, 2015 at 08:55 PM)dnsimpleでダイナミックDNSをつかう
(December 23, 2014 at 08:02 PM)www2014のアドテク関連のResearch Trackメモ
(October 06, 2014 at 09:05 PM)flappymacs がMELPAに登録されました
(July 16, 2014 at 01:07 AM)EmacsでFlappy Birdっぽいもの書きました
(July 10, 2014 at 08:01 PM)
Recent Popular posts
Popular posts
Categories
- C (rss) (3)
- R (rss) (1)
- adtech (rss) (1)
- advent calendar (rss) (2)
- algorithms (rss) (2)
- android (rss) (2)
- aws (rss) (1)
- blog (rss) (2)
- blogofile (rss) (3)
- books (rss) (1)
- c++ (rss) (1)
- chef (rss) (4)
- common lisp (rss) (10)
- debian (rss) (2)
- dns (rss) (1)
- elasticsearch (rss) (1)
- elf (rss) (1)
- elisp (rss) (1)
- emacs (rss) (5)
- english (rss) (1)
- game (rss) (2)
- gearman (rss) (1)
- git (rss) (1)
- github (rss) (1)
- gitlab (rss) (1)
- golang (rss) (2)
- history (rss) (1)
- impress.js (rss) (1)
- internet (rss) (1)
- ios (rss) (3)
- jekyll (rss) (1)
- jenkins (rss) (1)
- linux (rss) (4)
- lisp (rss) (2)
- ltsv (rss) (1)
- lua (rss) (1)
- mac (rss) (3)
- mach-o (rss) (1)
- memo (rss) (2)
- mustache (rss) (1)
- note (rss) (1)
- objective-c (rss) (4)
- os (rss) (1)
- osx (rss) (2)
- others (rss) (1)
- paco (rss) (1)
- pdf (rss) (1)
- php (rss) (2)
- postfix (rss) (1)
- programming (rss) (12)
- project management (rss) (1)
- python (rss) (5)
- quicklinks (rss) (6)
- raspberry pi (rss) (2)
- redmine (rss) (1)
- reveal.js (rss) (1)
- ruby (rss) (10)
- sbcl (rss) (2)
- security (rss) (1)
- shell (rss) (2)
- smtp (rss) (1)
- solr (rss) (1)
- statistics (rss) (2)
- tips (rss) (10)
- tmux (rss) (3)
- toml (rss) (1)
- tools (rss) (1)
- twitter (rss) (1)
- ubuntu (rss) (1)
- unix (rss) (5)
- v8 (rss) (1)
- web (rss) (7)
- xcode (rss) (1)
- zeromq (rss) (2)
Archives
- August 2015 (1)
- April 2015 (2)
- March 2015 (1)
- December 2014 (1)
- October 2014 (1)
- July 2014 (3)
- March 2014 (6)
- February 2014 (4)
- November 2013 (3)
- October 2013 (4)
- September 2013 (2)
- July 2013 (2)
- June 2013 (2)
- May 2013 (1)
- April 2013 (6)
- March 2013 (3)
- February 2013 (8)
- January 2013 (5)
- December 2012 (1)
- November 2012 (6)
- October 2012 (7)
- August 2012 (1)
- July 2012 (9)
- June 2012 (1)
- April 2012 (1)
- December 2011 (2)
- November 2011 (2)