H2 DatabaseとJRedisでソースリストから最後の要素を取得・削除して値を別のリストの最初に追加する関数を作成する

H2 DatabaseとJRedisでソースリストから最後の要素を取得・削除して値を別のリストの最初に追加する関数を作成するには、以下のスクリプトを実行します。

create alias if not exists jredis_rpoplpush 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_rpoplpush(String host, Integer intPort, 
  String srcKey, String destKey)
  throws Exception
{
  if( host == null ){
    throw new Exception("host is not specified.");
  }
  int port = 6379;
  if( intPort != null ){
    port = intPort.intValue();
  }
  if( srcKey == null ){
    throw new Exception("srcKey is not specified.");
  }
  if( destKey == null ){
    throw new Exception("destKey is not specified.");
  }

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

実行例

select jredis_del('192.168.1.25', 6379, 'list1');
select jredis_del('192.168.1.25', 6379, 'list2');
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_rpoplpush('192.168.1.25', 6379, 'list1', 'list2');
select * from jredis_lrange('192.168.1.25', 6379, 'list1', 0, -1);
select * from jredis_lrange('192.168.1.25', 6379, 'list2', 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に関する他の記事はこちらを参照してください。