H2 DatabaseとJCIFSでCLOBをファイルとしてWindows共有上にアップロードする関数を作成する

H2 DatabaseとJCIFSでCLOBをファイルとしてWindows共有上にアップロードする関数を作成するには、以下のスクリプトを実行します。

create alias if not exists jcifs_put_ascii as $$ 
import java.io.*;
import java.sql.*;
import org.h2.tools.*;
import jcifs.smb.*;
@CODE
int jcifs_put_ascii(String domain, 
    String user, String password, String server,
    String path, String filename, Clob clob)
  throws Exception
{
  if( domain == null ){
    throw new Exception("domain is not specified.");
  }
  user = (user == null)?"":user;
  password = (password == null)?"":password;
  if( server == null ){
    throw new Exception("server is not specified.");
  }
  if( path == null ){
    throw new Exception("path is not specified.");
  }
  if( filename == null ){
    throw new Exception("filename is not specified.");
  }


  OutputStream os = null;
  InputStream ais = null;
  try
  {
    os = new SmbFileOutputStream(
      "smb://" + domain + ";" + user + ":" + password + 
      "@" + server + "/" + path + "/" + filename);
    ais = clob.getAsciiStream();

    byte buf[] = new byte[8192];
    int rs = -1;
    while( (rs = ais.read(buf)) != -1 ){
      os.write(buf, 0, rs);
    }
  }
  finally
  {
    if( os != null )os.close();
    if( ais != null )ais.close();
  }

  return 0;
} 
$$

実行例

drop table if exists clobtest;
create table clobtest (c1 numeric(4), c2 clob);
insert into clobtest values (1, 
  jcifs_get_ascii('LIFERAY1', 
    'test1', 'test1', 'liferay1',
    'share/h2', 'titles.txt')
);
select jcifs_put_ascii('LIFERAY1', 
    'test1', 'test1', 'liferay1',
    'share/h2', 'renamed_titles.txt', c2)
from clobtest 
where c1 = 1;

※システム環境変数CLASSPATHにtools.jarとJCIFSのjar
(jcifs-1.3.15.jar)を追加しておくこと。

動作環境
JDK6 Update 21, H2 Database 1.2.143 (2010-09-18), JCIFS 1.3.15
○関連情報
・H2 Databaseに関する他の記事はこちらを参照してください。