Implemeneted the Lua type for ElementFormControlSelect

Build/RocketLua.vcproj

@@ -199,6 +199,14 @@
 					RelativePath="..\Source\Controls\Lua\ElementFormControl.h"
 					>
 				</File>
+				<File
+					RelativePath="..\Source\Controls\Lua\ElementFormControlSelect.cpp"
+					>
+				</File>
+				<File
+					RelativePath="..\Source\Controls\Lua\ElementFormControlSelect.h"
+					>
+				</File>
 			</Filter>
 		</Filter>
 		<Filter

Source/Controls/Lua/ElementFormControlSelect.cpp

@@ -0,0 +1,141 @@
+#include "precompiled.h"
+#include "ElementFormControlSelect.h"
+#include <Rocket/Controls/ElementFormControlSelect.h>
+#include <Rocket/Controls/ElementFormControl.h>
+#include <Rocket/Core/Element.h>
+
+using Rocket::Controls::ElementFormControlSelect;
+using Rocket::Controls::ElementFormControl;
+namespace Rocket {
+namespace Core {
+namespace Lua {
+//inherits from ElementFormControl which inherits from Element
+template<> void LuaType<ElementFormControlSelect>::extra_init(lua_State* L, int metatable_index)
+{
+    //init whatever elementformcontrol did extra, like inheritance
+    LuaType<ElementFormControl>::extra_init(L,metatable_index);
+    //then inherit from elementformcontrol
+    LuaType<ElementFormControl>::_regfunctions(L,metatable_index,metatable_index-1);
+}
+
+//methods
+int ElementFormControlSelectAdd(lua_State* L, ElementFormControlSelect* obj)
+{
+    LUACHECKOBJ(obj);
+    const char* rml = luaL_checkstring(L,1);
+    const char* value = luaL_checkstring(L,2);
+    int before = -1; //default
+    if(lua_gettop(L) >= 3)
+        before = luaL_checkint(L,3);
+
+    int index = obj->Add(rml,value,before);
+    lua_pushinteger(L,index);
+    return 1;
+}
+
+int ElementFormControlSelectRemove(lua_State* L, ElementFormControlSelect* obj)
+{
+    LUACHECKOBJ(obj);
+    int index = luaL_checkint(L,1);
+    obj->Remove(index);
+    return 0;
+}
+
+int ElementFormControlSelectGetOption(lua_State* L, ElementFormControlSelect* obj)
+{
+    LUACHECKOBJ(obj);
+    int index = luaL_checkint(L,1);
+    Rocket::Controls::SelectOption* opt = obj->GetOption(index);
+    lua_newtable(L);
+    LuaType<Element>::push(L,opt->GetElement(),false);
+    lua_setfield(L,-2,"element");
+    lua_pushstring(L,opt->GetValue().CString());
+    lua_setfield(L,-2,"value");
+    return 1;
+}
+
+
+//getters
+int ElementFormControlSelectGetAttroptions(lua_State* L)
+{
+    ElementFormControlSelect* obj = LuaType<ElementFormControlSelect>::check(L,1);
+    LUACHECKOBJ(obj);
+    int numOptions = obj->GetNumOptions();
+
+    //local variables for the loop
+    Rocket::Controls::SelectOption* opt; 
+    Element* ele;
+    String value;
+    lua_newtable(L);
+    int retindex = lua_gettop(L);
+    for(int index = 0; index < numOptions; index++)
+    {
+        opt = obj->GetOption(index);
+        if(opt == NULL) continue;
+    
+        ele = opt->GetElement();
+        value = opt->GetValue();
+
+        lua_newtable(L);
+        LuaType<Element>::push(L,ele,false);
+        lua_setfield(L,-2,"element");
+        lua_pushstring(L,value.CString());
+        lua_setfield(L,-2,"value");
+        lua_rawseti(L,retindex,index); //sets the table that is being returned's 'index' to be the table with element and value
+        lua_pop(L,1); //pops the table with element,value from the stack
+    }
+    return 1;
+}
+
+int ElementFormControlSelectGetAttrselection(lua_State* L)
+{
+    ElementFormControlSelect* obj = LuaType<ElementFormControlSelect>::check(L,1);
+    LUACHECKOBJ(obj);
+
+    int selection = obj->GetSelection();
+    lua_pushinteger(L,selection);
+    return 1;
+}
+
+
+//setter
+int ElementFormControlSelectSetAttrselection(lua_State* L)
+{
+    ElementFormControlSelect* obj = LuaType<ElementFormControlSelect>::check(L,1);
+    LUACHECKOBJ(obj);
+    int selection = luaL_checkint(L,2);
+    obj->SetSelection(selection);
+    return 0;
+}
+
+
+RegType<ElementFormControlSelect> ElementFormControlSelectMethods[] =
+{
+    LUAMETHOD(ElementFormControlSelect,Add)
+    LUAMETHOD(ElementFormControlSelect,Remove)
+    LUAMETHOD(ElementFormControlSelect,GetOption)
+    { NULL, NULL },
+};
+
+luaL_reg ElementFormControlSelectGetters[] =
+{
+    LUAGETTER(ElementFormControlSelect,options)
+    LUAGETTER(ElementFormControlSelect,selection)
+    { NULL, NULL },
+};
+
+luaL_reg ElementFormControlSelectSetters[] =
+{
+    LUASETTER(ElementFormControlSelect,selection)
+    { NULL, NULL },
+};
+
+
+template<> const char* GetTClassName<ElementFormControlSelect>() { return "ElementFormControlSelect"; }
+template<> RegType<ElementFormControlSelect>* GetMethodTable<ElementFormControlSelect>() { return ElementFormControlSelectMethods; }
+template<> luaL_reg* GetAttrTable<ElementFormControlSelect>() { return ElementFormControlSelectGetters; }
+template<> luaL_reg* SetAttrTable<ElementFormControlSelect>() { return ElementFormControlSelectSetters; }
+
+}
+}
+}

Source/Controls/Lua/ElementFormControlSelect.h

@@ -0,0 +1,56 @@
+#pragma once
+
+/*
+    This defines the ElementFormControlSelect type in the Lua global namespace, for this documentation will be
+    named EFCSelect
+
+    It has one extra method than the Python api, which is GetOption
+
+    //methods
+    int EFCSelect:Add(string rml, string value, [int before]) --where 'before' is optional, and is an index
+    noreturn EFCSelect:Remove(int index)
+    {"element"=Element,"value"=string} EFCSelect:GetOption(int index) --this is a more efficient way to get an option if you know the index beforehand
+
+    //getters
+    {[int index]={"element"=Element,"value"=string}} EFCSelect.options --used to access options as a Lua table. Comparatively expensive operation, use GetOption when 
+                                                                       --you only need one option and you know the index
+    int EFCSelect.selection
+
+    //setter
+    EFCSelect.selection = int
+*/
+#include <Rocket/Core/Lua/lua.hpp>
+#include <Rocket/Core/Lua/LuaType.h>
+#include <Rocket/Controls/ElementFormControlSelect.h>
+
+using Rocket::Controls::ElementFormControlSelect;
+namespace Rocket {
+namespace Core {
+namespace Lua {
+//inherits from ElementFormControl which inherits from Element
+template<> void LuaType<ElementFormControlSelect>::extra_init(lua_State* L, int metatable_index);
+
+//methods
+int ElementFormControlSelectAdd(lua_State* L, ElementFormControlSelect* obj);
+int ElementFormControlSelectRemove(lua_State* L, ElementFormControlSelect* obj);
+int ElementFormControlSelectGetOption(lua_State* L, ElementFormControlSelect* obj);
+
+//getters
+int ElementFormControlSelectGetAttroptions(lua_State* L);
+int ElementFormControlSelectGetAttrselection(lua_State* L);
+
+//setter
+int ElementFormControlSelectSetAttrselection(lua_State* L);
+
+RegType<ElementFormControlSelect> ElementFormControlSelectMethods[];
+luaL_reg ElementFormControlSelectGetters[];
+luaL_reg ElementFormControlSelectSetters[];
+
+template<> const char* GetTClassName<ElementFormControlSelect>();
+template<> RegType<ElementFormControlSelect>* GetMethodTable<ElementFormControlSelect>();
+template<> luaL_reg* GetAttrTable<ElementFormControlSelect>();
+template<> luaL_reg* SetAttrTable<ElementFormControlSelect>();
+
+}
+}
+}