H2 DatabaseとJRedisでリストの最後の要素を取得して削除する関数を作成する

H2 DatabaseとJRedisでリストの最後の要素を取得して削除する関数を作成するには、以下のコードを実行します。

create alias if not exists jredis_rpop as $$ 
import java.io.*;
import java.util.*;
import java.sql.*;
import org.h2.tools.*;
import java.net.*;
import org.jredis.ri.alphazero.*;
import org.jredis.ri.alphazero.support.*;
@CODE
String jredis_rpop(String host, Integer intPort, 
  String key)
  throws Exception
{
  if( host == null ){
    throw new Exception("host is not specified.");
  }
  int port = 6379;
  if( intPort != null ){
    port = intPort.intValue();
  }
  if( key == null ){
    throw new Exception("key is not specified.");
  }

  JRedisClient jrc = new JRedisClient(host, port);
  byte result[] = jrc.rpop(key);
  return result==null?null:DefaultCodec.toStr(result);
}
$$

実行例

select jredis_del('192.168.1.25', 6379, 'list1');
select jredis_rpush('192.168.1.25', 6379, 'list1', 'value1');
select jredis_rpush('192.168.1.25', 6379, 'list1', 'value2');
select jredis_rpush('192.168.1.25', 6379, 'list1', 'value3');
select jredis_rpop('192.168.1.25', 6379, 'list1');
select * from jredis_lrange('192.168.1.25', 6379, 'list1', 0, -1);

※以下のjarをCLASSPATH環境変数に追加
jredis-core-all-a.0-SNAPSHOT-jar-with-dependencies.jar

○動作環境
JDK6 Update23, H2 Database 1.3.149 (2011-01-07), JRedis2.0.0
○関連情報
・H2 Databaseに関する他の記事はこちらを参照してください。