luaj/src/main/java/lua/value/LString.java

package lua.value;

import lua.Lua;
import lua.StackState;

public class LString extends LValue {

	public static final LString TYPE_NAME = new LString("string");
	
	final String m_string;
	final int m_hash;
	
	public LString(String string) {
		this.m_string = string;
		this.m_hash = string.hashCode();
	}

	public boolean equals(Object o) {
		if ( o != null && o instanceof LString ) {
			LString s = (LString) o;
			return m_hash == s.m_hash && m_string.equals(s.m_string);
		}
		return false;
	}

	public int hashCode() {
		return m_hash;
	}

	// TODO: what to do with LuaState? 
	public LString(StackState l, String string) {
		this(string);
	}

	public boolean luaBinCmpUnknown(int opcode, LValue lhs) {
		return lhs.luaBinCmpString(opcode, m_string);
	}

	public boolean luaBinCmpString(int opcode, String rhs) {
		switch ( opcode ) {
		case Lua.OP_EQ: return m_string.equals(rhs);
		case Lua.OP_LT: return m_string.compareTo(rhs) < 0;
		case Lua.OP_LE: return m_string.compareTo(rhs) <= 0;
		}
		luaUnsupportedOperation();
		return false;
	}
	
	public String luaAsString() {
		return m_string;
	}

	/** Built-in opcode LEN, for Strings and Tables */
	public LValue luaLength() {
		return new LInteger( m_string.length() );
	}

	public LString luaGetType() {
		return TYPE_NAME;
	}

}