週記くらい

Monthly Archives: February 2012

情報収集の効率化

Posted on by

情報ソースが増えてくると情報収集の効率化も必要になってくる。 俺の場合は、GoogleReaderとlivedoor Readerを両方使ってるから RSSフィードに振り回されている方だと思う。

気になるフィードがあった時、元サイトを開いて読むのを無駄と考えるかどうかは 状況次第かもしれない。自分の場合は、ブログ主が面白い人であればある程、 面白い記事は元サイトで読みたいと思う。ブログは、文字や画像だけじゃなくて デザインとか、いろいろな配置がブログ主によって考えられているだろうし、ブログ全体である種の表現だと思ってる。 だから、元サイトで読んだ方がしっくり来る気がする。

ジョブズの亡霊

Posted on by

はてなの「簡単に元に戻せます詐欺」に引っかかった

mixiとかでも思ったんだけどさ、リニューアルするたびに画面内の実効情報量が減っていく、というのはどういうつもりで作っているんだろうかと思うんだな。

最初にはてなやmixiのリニューアルの内容とかは知りませんが、多機能を主張する流れから、シンプル・綺麗を主張するのが最近の流行りのようです。 それ自体はすごくいいことだと思うんですが、切り捨てられる人も少なからずいるんだと思います。

ちょっと脱線ですが、頭に浮かんだことを書いてみます。

最近の革命的なUIデザインをリードしているのはAppleだと思います。 いろんな人が、UIデザインの参考にするのは、Appleの製品になっているのは自然な流れです。 AppleのUIってのはブランド戦略と一緒になって、もっと言うとスティーブジョブズの顔が浮かぶ程です。

いろんなUIデザインをする人達は「もしジョブズだったら…」という思考で決定を行なっているのかもしれません。 AppleのUIデザインが優れているのはわかるし、参考にするのも理解できるんだけど、ジョブズになろうとするのは ちょっとのめり込み過ぎというか、宗教チックです。 間違った決定を堂々と行なってしまう危険すらあると思います。 参考にするなら、人は切り離してUIデザインを参考にすればいいのに。

これって、かなり滑稽な状況だと思うんですが、どうなんでしょう？

そもそもジョブズはアプリのデザインしてないよな。こんな人はいないか。

Starbug1 on nginx

Posted on by

nginxでStarbug1を動かすにあたり、いくつかStarbug1側で修正を行ないました。 動かし方を書いておきます。nginxやfastcgiについて無知なので、間違いがあれば連絡ください。 以下、 Ubuntuでの設定例です。

参考

Starbug1

  • Starbug1をダウンロードして、コンパイルして/var/vhosts/demo.starbug1.com/starbug1に配置する。
$ tar zxf starbug1-1.6.00.tar.gz
$ cd starbug1
$ make INITIAL_LOCALE=ja_JP static webapp
$ sudo mkdir /var/vhosts/demo.starbug1.com
$ sudo cp -r dist/starbug1 /var/vhosts/demo.starbug1.com/
$ sudo chown -R www-data:www-data /var/vhosts/demo.starbug1.com/starbug1

fastcgi

  • 必要なモジュールのインストール
$ sudo apt-get install nginx libfcgi-perl libfcgi-procmanager-perl spawn-fcgi

ラッパーの用意

  • /usr/local/bin/cgiwrap-fcgi.pl
#!/usr/bin/perl
use FCGI;
use Socket;
use FCGI::ProcManager;
sub shutdown { FCGI::CloseSocket($socket); exit; }
sub restart  { FCGI::CloseSocket($socket); &main; }
use sigtrap 'handler', \&shutdown, 'normal-signals';
use sigtrap 'handler', \&restart,  'HUP';
require 'syscall.ph';
use POSIX qw(setsid);
 
END()   { }
BEGIN() { }
{
  no warnings;
  *CORE::GLOBAL::exit = sub { die "fakeexit\nrc=" . shift() . "\n"; };
};
 
eval q{exit};
if ($@) {
  exit unless $@ =~ /^fakeexit/;
}
&main;
 
sub daemonize() {
  chdir '/' or die "Can't chdir to /: $!";
  defined( my $pid = fork ) or die "Can't fork: $!";
  exit if $pid;
  setsid() or die "Can't start a new session: $!";
  umask 0;
}
 
sub main {
  $proc_manager = FCGI::ProcManager->new( {n_processes => 5} );
  $socket = FCGI::OpenSocket( "/var/run/nginx/cgiwrap-dispatch.sock", 10 )
  ; #use UNIX sockets - user running this script must have w access to the 'nginx' folder!!
  $request =
  FCGI::Request( \*STDIN, \*STDOUT, \*STDERR, \%req_params, $socket,
  &FCGI::FAIL_ACCEPT_ON_INTR );
  $proc_manager->pm_manage();
  if ($request) { request_loop() }
  FCGI::CloseSocket($socket);
}
 
sub request_loop {
  while ( $request->Accept() >= 0 ) {
    $proc_manager->pm_pre_dispatch();
 
    #processing any STDIN input from WebServer (for CGI-POST actions)
    $stdin_passthrough = '';
    { no warnings; $req_len = 0 + $req_params{'CONTENT_LENGTH'}; };
    if ( ( $req_params{'REQUEST_METHOD'} eq 'POST' ) && ( $req_len != 0 ) ) {
      my $bytes_read = 0;
      while ( $bytes_read < $req_len ) {
        my $data = '';
        my $bytes = read( STDIN, $data, ( $req_len - $bytes_read ) );
        last if ( $bytes == 0 || !defined($bytes) );
        $stdin_passthrough .= $data;
        $bytes_read += $bytes;
      }
    }
 
    #running the cgi app
    if (
      ( -x $req_params{SCRIPT_FILENAME} ) &&    #can I execute this?
      ( -s $req_params{SCRIPT_FILENAME} ) &&    #Is this file empty?
      ( -r $req_params{SCRIPT_FILENAME} )       #can I read this file?
    ) {
      pipe( CHILD_RD,   PARENT_WR );
      pipe( PARENT_ERR, CHILD_ERR );
      my $pid = open( CHILD_O, "-|" );
      unless ( defined($pid) ) {
        print("Content-type: text/plain\r\n\r\n");
        print "Error: CGI app returned no output - Executing $req_params{SCRIPT_FILENAME} failed !\n";
        next;
      }
      $oldfh = select(PARENT_ERR);
      $|     = 1;
      select(CHILD_O);
      $| = 1;
      select($oldfh);
      if ( $pid > 0 ) {
        close(CHILD_RD);
        close(CHILD_ERR);
        print PARENT_WR $stdin_passthrough;
        close(PARENT_WR);
        $rin = $rout = $ein = $eout = '';
        vec( $rin, fileno(CHILD_O),    1 ) = 1;
        vec( $rin, fileno(PARENT_ERR), 1 ) = 1;
        $ein    = $rin;
        $nfound = 0;
 
        while ( $nfound = select( $rout = $rin, undef, $ein = $eout, 10 ) ) {
          die "$!" unless $nfound != -1;
          $r1 = vec( $rout, fileno(PARENT_ERR), 1 ) == 1;
          $r2 = vec( $rout, fileno(CHILD_O),    1 ) == 1;
          $e1 = vec( $eout, fileno(PARENT_ERR), 1 ) == 1;
          $e2 = vec( $eout, fileno(CHILD_O),    1 ) == 1;
 
          if ($r1) {
            while ( $bytes = read( PARENT_ERR, $errbytes, 4096 ) ) {
              print STDERR $errbytes;
            }
            if ($!) {
              $err = $!;
              die $!;
              vec( $rin, fileno(PARENT_ERR), 1 ) = 0
              unless ( $err == EINTR or $err == EAGAIN );
            }
          }
          if ($r2) {
            while ( $bytes = read( CHILD_O, $s, 4096 ) ) {
              print $s;
            }
            if ( !defined($bytes) ) {
              $err = $!;
              die $!;
              vec( $rin, fileno(CHILD_O), 1 ) = 0
              unless ( $err == EINTR or $err == EAGAIN );
            }
          }
          last if ( $e1 || $e2 );
        }
        close CHILD_RD;
        close PARENT_ERR;
        waitpid( $pid, 0 );
      } else {
        foreach $key ( keys %req_params ) {
          $ENV{$key} = $req_params{$key};
        }
 
        # cd to the script's local directory
        if ( $req_params{SCRIPT_FILENAME} =~ /^(.*)\/[^\/] +$/ ) {
          chdir $1; 
        }
        close(PARENT_WR);
        #close(PARENT_ERR);
        close(STDIN);
        close(STDERR);
 
        #fcntl(CHILD_RD, F_DUPFD, 0);
        syscall( &SYS_dup2, fileno(CHILD_RD),  0 );
        syscall( &SYS_dup2, fileno(CHILD_ERR), 2 );
 
        #open(STDIN, "<&CHILD_RD");
        exec( $req_params{SCRIPT_FILENAME} );
        die("exec failed");
      }
    } else {
      print("Content-type: text/plain\r\n\r\n");
      print "Error: No such CGI app - $req_params{SCRIPT_FILENAME} may not exist or is not executable by this process.\n";
    }
  }
}

ラッパーの起動

$ chmod 755 /usr/local/bin/cgiwrap-fcgi.pl
$ mkdir /var/run/nginx/
$ chown www-data:www-data /var/run/nginx/
$ /usr/local/bin/cgiwrap-fcgi.pl &> /dev/null &

nginx のサイト定義追加

  • /etc/nginx/sites-available/demo.starbug1.com
server {
	server_name	demo.starbug1.com;
	listen 80;
 
	root	 /var/vhosts/demo.starbug1.com;
	index	index.cgi index.html;
 
	location / {
		if (-e $request_filename) {
		    rewrite index.cgi /index.cgi last;
		    rewrite admin.cgi /admin.cgi last;
		}
	}
	location ~ \.cgi($|/) {
		gzip off;
		fastcgi_pass   unix:/var/run/nginx/cgiwrap-dispatch.sock;
		fastcgi_param  GATEWAY_INTERFACE  CGI/1.1;
		fastcgi_param  SERVER_SOFTWARE    nginx;
		fastcgi_param  QUERY_STRING       $query_string;
		fastcgi_param  REQUEST_METHOD     $request_method;
		fastcgi_param  CONTENT_TYPE       $content_type;
		fastcgi_param  CONTENT_LENGTH     $content_length;
		fastcgi_param  REQUEST_URI        $request_uri;
		fastcgi_param  DOCUMENT_URI       $document_uri;
		fastcgi_param  DOCUMENT_ROOT      $document_root;
		fastcgi_param  SERVER_PROTOCOL    $server_protocol;
		fastcgi_param  REMOTE_ADDR        $remote_addr;
		fastcgi_param  REMOTE_PORT        $remote_port;
		fastcgi_param  SERVER_ADDR        $server_addr;
		fastcgi_param  SERVER_PORT        $server_port;
		fastcgi_param  SERVER_NAME        $server_name;
		fastcgi_split_path_info ^((?U).+\.cgi)(/?.+)$;
		fastcgi_param  SCRIPT_FILENAME    $document_root$fastcgi_script_name;
		fastcgi_param  SCRIPT_NAME        $fastcgi_script_name;
		fastcgi_param  PATH_INFO          $fastcgi_path_info;
 
	}
 
	access_log  /var/log/nginx/demo.starbug1.com.access.log combined;
	error_log  /var/log/nginx/demo.starbug1.com.error.log;
}

サイトの有効化

$ cd /etc/nginx/sites-enabled
$ sudo ln -s /etc/nginx/sites-available/demo.starbug1.com

nginx再起動

$ sudo /etc/init.d/nginx restart

これで、Starbug1を http://demo.starbug1.com/starbug1/ にアクセスして、nginxで動かすことができました。

Starbug1 1.6.00 リリースのお知らせ

Posted on by

Starbug1は、軽量、高速なバグトラッキングシステム(BTS: Bug Tarcking System)です。 C で書かれているため少ないリソースのサーバ(例えば10年前のパソコンなど)に設置した場合でも快適に動作します。

Starbug1 1.6.00 をリリースしました。主な変更内容は以下です。

  • nginxに対応した。

With Google+ plugin by Geoff Janes