/*
 * $Id: Cache.java,v 1.1 2006/05/10 14:07:44 sugimotokenichi Exp $
 * Copyright (C) 2004-2006 SUGIMOTO Ken-ichi
 * 作成日: 2006/04/30
 */
package feat2.impl;

import java.lang.ref.SoftReference;
import java.util.HashMap;
import java.util.Iterator;

/**
 * 指定の時間だけオブジェクトを保持するキャッシュ。put, get, cleanメソッドは
 * Cacheインスタンス自身で同期される。
 * @author SUGIMOTO Ken-ichi
 */
public class Cache {

    private HashMap buf;
    private long cleanTime;

    public Cache() {
        buf = new HashMap();
        cleanTime = 0;
    }


    /**
     * オブジェクトを保存する。
     * @param name キー
     * @param obj 保存するオブジェクト
     * @param ttl オブジェクトを保管する最大時間。
     * ヒープが不足したときはこの時間より早くオブジェクトが破棄されることがある
     */
    synchronized public void put(String name, Object obj, long ttl) {

        CacheEntry entry = new CacheEntry(obj, ttl);
        buf.put(name, entry);

    }


    /**
     * 保管されたオブジェクトを返す。
     * @param name キー
     * @return オブジェクトが保管されていればその参照。オブジェクトが見つからないか、破棄されていたらnull
     */
    synchronized public Object get(String name) {

        CacheEntry entry = (CacheEntry)buf.get(name);
        if ( entry != null ) {

            Object ret = entry.get();
            if ( ret == null )
                buf.remove(name);
            return ret;

        }

        return null;

    }


    /**
     * キャッシュの不要なオブジェクトを開放する。ただし、ガーベッジコレクションは行わない。
     * @param interval 実行間隔。前回の呼び出しからこの時間が経過していなければ処理を行わない
     * @param limit 実行時間制限。この時間を超過するとまだ処理が終わっていなくてもリターンする
     */
    synchronized void clean(long interval, long limit) {

        if ( cleanTime+interval < System.currentTimeMillis() ) {

            long start = cleanTime = System.currentTimeMillis();
            for(Iterator it = buf.keySet().iterator(); it.hasNext(); ) {

                String name = (String)it.next();
                CacheEntry entry = (CacheEntry)buf.get(name);

                if ( entry != null ) {

                    Object obj = entry.get();
                    if ( obj == null )
                        buf.remove(name);

                    if ( start+limit < System.currentTimeMillis() )
                        break;
                }
                else
                    buf.remove(name);

            }

        }

    }

    private class CacheEntry {

        private long time;
        private long ttl;
        private SoftReference ref;

        private CacheEntry(Object obj, long ttl) {
            ref = new SoftReference(obj);
            this.ttl = ttl;
            this.time = System.currentTimeMillis();
        }

        private Object get() {
            Object ret = ref.get();
            if ( ret != null && time+ttl < System.currentTimeMillis() ) {
                ret = null;
            }

            return ret;
        }

    }
}
