// // $Id$ package com.threerings.ezgame.data { import flash.utils.ByteArray; import flash.utils.IExternalizable; import com.threerings.io.ObjectInputStream; import com.threerings.io.ObjectOutputStream; import com.threerings.io.Streamer; import com.threerings.util.StringBuilder; import com.threerings.presents.dobj.DObject; import com.threerings.presents.dobj.NamedEvent; import com.threerings.ezgame.util.EZObjectMarshaller; /** * Represents a property change on the actionscript object we * use in FlashGameObject. */ public class PropertySetEvent extends NamedEvent { /** * Create a PropertySetEvent. */ public function PropertySetEvent () // unserialize-only { super(0, null); } // from abstract DEvent override public function applyToObject (target :DObject) :Boolean { _oldValue = EZGameObject(target).applyPropertySet(_name, _data, _index, _testAndSet); return true; } /** * Get the value that was set for the property. */ public function getValue () :Object { return _data; } /** * Get the index, or -1 if not applicable. */ public function getIndex () :int { return _index; } /** * Get the old value. */ public function getOldValue () :Object { return _oldValue; } // from interface Streamable override public function readObject (ins :ObjectInputStream) :void { super.readObject(ins); _index = ins.readInt(); _data = EZObjectMarshaller.decode(ins.readObject()); _testAndSet = ins.readBoolean(); } // from interface Streamable override public function writeObject (out :ObjectOutputStream) :void { super.writeObject(out); out.writeInt(_index); out.writeObject(_data); out.writeBoolean(_testAndSet); } override protected function notifyListener (listener :Object) :void { if (listener is PropertySetListener) { (listener as PropertySetListener).propertyWasSet(this); } } override protected function toStringBuf (buf :StringBuilder) :void { buf.append("PropertySetEvent "); super.toStringBuf(buf); buf.append(", index=").append(_index); } /** The index of the property, if applicable. */ protected var _index :int; /** The client-side data that is assigned to this property. */ protected var _data :Object; /** When true, the property will only be set if its previous value was null. */ protected var _testAndSet :Boolean; /** The old value. */ protected var _oldValue :Object; } }