H2 DatabaseとJRedisでリストの指定した範囲の要素のみを残す関数を作成する

H2 DatabaseとJRedisでリストの指定した範囲の要素のみを残す関数を作成するには、以下のスクリプトを実行します。

create alias if not exists jredis_ltrim 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
Integer jredis_ltrim(String host, Integer intPort, 
  String key, Long keepFrom, Long keepTo)
  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.");
  }
  if( keepFrom == null ){
    throw new Exception("keepFrom is not specified.");
  }
  if( keepTo == null ){
    throw new Exception("keepTo is not specified.");
  }

  JRedisClient jrc = new JRedisClient(host, port);
  jrc.ltrim(key, keepFrom, keepTo);
  return new Integer(0);
}
$$

実行例

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_rpush('192.168.1.25', 6379, 'list1', 'value4');
select jredis_rpush('192.168.1.25', 6379, 'list1', 'value5');
select jredis_ltrim('192.168.1.25', 6379, 'list1', 1, 3);
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に関する他の記事はこちらを参照してください。