Ticket #1504: 0ad-multiplayer-lobby-v15-07-2012.diff

build/premake/extern_libs4.lua

@@ -252 +252 @@
             })
         end,
     },
+    gloox = {
+        compile_settings = function()
+            add_default_include_paths("gloox")
+        end,
+        link_settings = function()
+            if os.is("windows") then
+                add_default_lib_paths("gloox")
+            end
+            add_default_links({
+                win_names  = { "gloox-1.0" },
+                unix_names = { "gloox" },
+            })
+        end,
+    },
     cxxtest = {
         compile_settings = function()
             add_default_include_paths("cxxtest")

build/premake/premake4.lua

@@ -491 +491 @@
 
 
     source_dirs = {
+    "lobby",
+    }
+    extern_libs = {
+    "spidermonkey",
+    "gloox",
+    "boost",
+    }
+    setup_static_lib_project("lobby", source_dirs, extern_libs, {})
+
+
+    source_dirs = {
         "simulation2",
         "simulation2/components",
         "simulation2/helpers",
@@ -538 +549 @@
         "boost",
         "enet",
         "libcurl",
+        "gloox",
     }
     setup_static_lib_project("engine", source_dirs, extern_libs, {})
 
@@ -580 +592 @@
         "spidermonkey",
         "sdl",  -- key definitions
         "opengl",
-        "boost"
+        "boost",
+        "gloox",
     }
     setup_static_lib_project("gui", source_dirs, extern_libs, {})
 
@@ -710 +723 @@
     "libcurl",
 
     "valgrind",
+
+    "gloox",
 }
 
 if not os.is("windows") and not _OPTIONS["android"] and not os.is("macosx") then

source/ps/GameSetup/GameSetup.cpp

@@ -91 +91 @@
 #include "network/NetServer.h"
 #include "network/NetClient.h"
 
+#include "lobby/XmppClient.h"
+
 #include "ps/Pyrogenesis.h" // psSetLogDir
 #include "ps/GameSetup/Atlas.h"
 #include "ps/GameSetup/GameSetup.h"
@@ -653 +655 @@
 {
     EndGame();
 
+    SAFE_DELETE(g_XmppClient);
+
     ShutdownPs(); // Must delete g_GUI before g_ScriptingHost
 
     in_reset_handlers();

source/gui/COList.h

@@ +1 @@
+#ifndef INCLUDED_COLIST
+#define INCLUDED_COLIST
+
+//--------------------------------------------------------
+//  Includes / Compiler directives
+//--------------------------------------------------------
+#include "GUI.h"
+#include "CList.h"
+
+//--------------------------------------------------------
+//  Macros
+//--------------------------------------------------------
+
+//--------------------------------------------------------
+//  Types
+//--------------------------------------------------------
+
+//--------------------------------------------------------
+//  Declarations
+//--------------------------------------------------------
+
+struct ObjectDef
+{
+  CColor m_TextColor;
+  CStr m_Id;
+  int m_Width;
+  CStrW m_Heading;
+
+};
+
+/**
+ *  Todo : add description
+ *
+ */
+class COList : public CList
+{
+    GUI_OBJECT(COList)
+
+public:
+    COList();
+
+protected:
+    void SetupText();
+    void HandleMessage(SGUIMessage &Message);
+
+    /**
+     * Handle the \<item\> tag.
+     */
+    virtual bool HandleAdditionalChildren(const XMBElement& child, CXeromyces* pFile);
+
+    void DrawList(const int &selected, const CStr& _sprite,
+                    const CStr& _sprite_selected, const CStr& _textcolor);
+
+    virtual CRect GetListRect() const;
+
+    std::vector<ObjectDef> m_ObjectsDefs;
+
+private:
+    float m_HeadingHeight;
+
+};
+
+#endif // INCLUDED_COLIST

source/gui/scripting/ScriptFunctions.cpp

@@ -43 +43 @@
 #include "ps/UserReport.h"
 #include "ps/GameSetup/Atlas.h"
 #include "ps/GameSetup/Config.h"
+#include "ps/ConfigDB.h"
 #include "tools/atlas/GameInterface/GameLoop.h"
+#include "lobby/XmppClient.h"
 
 #include "simulation2/Simulation2.h"
 #include "simulation2/components/ICmpAIManager.h"
@@ -556 +558 @@
     g_Game->GetTurnManager()->RewindTimeWarp();
 }
 
+/* Begin lobby related functions */
+
+void StartXmppClient(void* cbdata, std::string sUsername, std::string sPassword, std::string sRoom, std::string sNick)
+{
+    CGUIManager* guiManager = static_cast<CGUIManager*> (cbdata);
+
+    ENSURE(!g_XmppClient);
+
+    g_XmppClient = new XmppClient(guiManager->GetScriptInterface(), sUsername, sPassword, sRoom, sNick);
+}
+
+void StartRegisterXmppClient(void* cbdata, std::string sUsername, std::string sPassword)
+{
+    CGUIManager* guiManager = static_cast<CGUIManager*> (cbdata);
+
+    ENSURE(!g_XmppClient);
+
+    g_XmppClient = new XmppClient(guiManager->GetScriptInterface(), sUsername, sPassword, "", "", true);
+}
+
+void StopXmppClient(void* UNUSED(cbdata))
+{
+    ENSURE(g_XmppClient);
+    SAFE_DELETE(g_XmppClient);
+}
+
+void ConnectXmppClient(void* UNUSED(cbdata))
+{
+    ENSURE(g_XmppClient);
+    g_XmppClient->connect();
+}
+
+void DisconnectXmppClient(void* UNUSED(cbdata))
+{  
+    ENSURE(g_XmppClient);
+    g_XmppClient->disconnect();
+}
+
+void RecvXmppClient(void* UNUSED(cbdata))
+{
+    if(!g_XmppClient)
+        return;
+    g_XmppClient->recv();
+}
+
+void SendGetGameList(void* UNUSED(cbdata))
+{
+    if(!g_XmppClient)
+        return;
+    g_XmppClient->SendIqGetGameList();
+}
+
+void SendRegisterGame(void* UNUSED(cbdata), CScriptVal data)
+{
+    if(!g_XmppClient)
+        return;
+    g_XmppClient->SendIqRegisterGame(data);
+}
+
+void SendUnregisterGame(void* UNUSED(cbdata), std::string name)
+{
+    if(!g_XmppClient)
+        return;
+    g_XmppClient->SendIqUnregisterGame(name);
+}
+
+CScriptVal GetPlayerList(void* UNUSED(cbdata))
+{
+    if(!g_XmppClient)
+        return CScriptVal();
+
+    CScriptValRooted playerList = g_XmppClient->GUIGetPlayerList();
+
+    return playerList.get();
+}
+
+CScriptVal GetGameList(void* UNUSED(cbdata))
+{
+    if(!g_XmppClient)
+        return CScriptVal();
+
+    CScriptValRooted gameList = g_XmppClient->GUIGetGameList();
+
+    return gameList.get();
+}
+
+CScriptVal LobbyGuiPollMessage(void* UNUSED(cbdata))
+{
+    if(!g_XmppClient)
+        return CScriptVal();
+
+    CScriptValRooted poll = g_XmppClient->GuiPollMessage();
+
+    return poll.get();
+}
+
+void LobbySendMessage(void* UNUSED(cbdata), std::string message)
+{
+    if(!g_XmppClient)
+        return;
+
+    g_XmppClient->SendMUCMessage(message);
+}
+
+std::string GetDefaultLobbyPlayerUsername(void* UNUSED(cbdata))
+{
+    std::string username;
+    CFG_GET_USER_VAL("lobby.login", String, username);
+    return username;
+}
+
+std::string GetDefaultLobbyPlayerPassword(void* UNUSED(cbdata))
+{
+    std::string password;
+    CFG_GET_USER_VAL("lobby.password", String, password);
+    return password;
+}
+
+void SetDefaultLobbyPlayerPair(void * UNUSED(cbdata), std::string username, std::string password)
+{
+    g_ConfigDB.CreateValue(CFG_USER, "lobby.login")->m_String = username;
+    g_ConfigDB.CreateValue(CFG_USER, "lobby.password")->m_String = password;
+    g_ConfigDB.WriteFile(CFG_USER);
+}
+
+/* End lobby related functions */
+
 void QuickSave(void* UNUSED(cbdata))
 {
     g_Game->GetTurnManager()->QuickSave();
@@ -648 +777 @@
     scriptInterface.RegisterFunction<void, unsigned int, &EnableTimeWarpRecording>("EnableTimeWarpRecording");
     scriptInterface.RegisterFunction<void, &RewindTimeWarp>("RewindTimeWarp");
     scriptInterface.RegisterFunction<void, bool, &SetBoundingBoxDebugOverlay>("SetBoundingBoxDebugOverlay");
+
+    // Lobby functions
+    scriptInterface.RegisterFunction<void, std::string, std::string, std::string, std::string, &StartXmppClient>("StartXmppClient");
+    scriptInterface.RegisterFunction<void, std::string, std::string, &StartRegisterXmppClient>("StartRegisterXmppClient");
+    scriptInterface.RegisterFunction<void, &StopXmppClient>("StopXmppClient");
+    scriptInterface.RegisterFunction<void, &ConnectXmppClient>("ConnectXmppClient");
+    scriptInterface.RegisterFunction<void, &DisconnectXmppClient>("DisconnectXmppClient");
+    scriptInterface.RegisterFunction<void, &RecvXmppClient>("RecvXmppClient");
+    scriptInterface.RegisterFunction<void, &SendGetGameList>("SendGetGameList");
+    scriptInterface.RegisterFunction<void, CScriptVal, &SendRegisterGame>("SendRegisterGame");
+    scriptInterface.RegisterFunction<void, std::string, &SendUnregisterGame>("SendUnregisterGame");
+    scriptInterface.RegisterFunction<CScriptVal, &GetPlayerList>("GetPlayerList");
+    scriptInterface.RegisterFunction<CScriptVal, &GetGameList>("GetGameList");
+    scriptInterface.RegisterFunction<CScriptVal, &LobbyGuiPollMessage>("LobbyGuiPollMessage");
+    scriptInterface.RegisterFunction<void, std::string, &LobbySendMessage>("LobbySendMessage");
+    scriptInterface.RegisterFunction<std::string, &GetDefaultLobbyPlayerUsername>("GetDefaultLobbyPlayerUsername");
+    scriptInterface.RegisterFunction<std::string, &GetDefaultLobbyPlayerPassword>("GetDefaultLobbyPlayerPassword");
+    scriptInterface.RegisterFunction<void, std::string, std::string, &SetDefaultLobbyPlayerPair>("SetDefaultLobbyPlayerPair");
 }

source/gui/CList.h

@@ -86 +86 @@
      * Sets up text, should be called every time changes has been
      * made that can change the visual.
      */
-    void SetupText();
+    virtual void SetupText();
 
     /**
      * @see IGUIObject#HandleMessage()
@@ -121 +121 @@
 
     // Extended drawing interface, this is so that classes built on the this one
     //  can use other sprite names.
-    void DrawList(const int &selected, const CStr& _sprite, 
+    virtual void DrawList(const int &selected, const CStr& _sprite,
                   const CStr& _sprite_selected, const CStr& _textcolor);
 
     // Get the area of the list. This is so that i can easily be changed, like in CDropDown

source/gui/CGUI.cpp

@@ -35 +35 @@
 #include "CRadioButton.h"
 #include "CInput.h"
 #include "CList.h"
+#include "COList.h"
 #include "CDropDown.h"
 #include "CProgressBar.h"
 #include "CTooltip.h"
@@ -442 +443 @@
     AddObjectType("minimap",        &CMiniMap::ConstructObject);
     AddObjectType("input",          &CInput::ConstructObject);
     AddObjectType("list",           &CList::ConstructObject);
+    AddObjectType("olist",          &COList::ConstructObject);
     AddObjectType("dropdown",       &CDropDown::ConstructObject);
     AddObjectType("tooltip",        &CTooltip::ConstructObject);
 }

source/gui/IGUIObject.h

@@ -424 +424 @@
      * have any additional children (and this function should never be called).
      */
     virtual bool HandleAdditionalChildren(const XMBElement& UNUSED(child), 
-                                          CXeromyces* UNUSED(pFile)) { return false; }
+                                            CXeromyces* UNUSED(pFile)) { return false; }
 
     /**
      * Cached size, real size m_Size is actually dependent on resolution

source/gui/COList.cpp

@@ +1 @@
+#include "precompiled.h"
+#include "COList.h"
+
+#include "ps/CLogger.h"
+
+COList::COList() : CList(),m_HeadingHeight(30.f)
+{
+    AddSetting(GUIST_CGUISpriteInstance,    "sprite_heading");
+}
+
+void COList::SetupText()
+{
+    if (!GetGUI())
+        return;
+
+    CGUIList *pList;
+    GUI<CGUIList>::GetSettingPointer(this, "list_ip", pList);
+
+    //ENSURE(m_GeneratedTexts.size()>=1);
+
+    m_ItemsYPositions.resize( pList->m_Items.size()+1 );
+
+    // Delete all generated texts. Some could probably be saved,
+    //  but this is easier, and this function will never be called
+    //  continuously, or even often, so it'll probably be okay.
+    std::vector<SGUIText*>::iterator it;
+    for (it=m_GeneratedTexts.begin(); it!=m_GeneratedTexts.end(); ++it)
+    {
+        if (*it)
+            delete *it;
+    }
+    m_GeneratedTexts.clear();
+
+    CStrW font;
+    if (GUI<CStrW>::GetSetting(this, "font", font) != PSRETURN_OK || font.empty())
+        // Use the default if none is specified
+        // TODO Gee: (2004-08-14) Don't define standard like this. Do it with the default style.
+        font = L"default";
+
+    //CGUIString caption;
+    bool scrollbar;
+    //GUI<CGUIString>::GetSetting(this, "caption", caption);
+    GUI<bool>::GetSetting(this, "scrollbar", scrollbar);
+
+    float width = GetListRect().GetWidth();
+    // remove scrollbar if applicable
+    if (scrollbar && GetScrollBar(0).GetStyle())
+        width -= GetScrollBar(0).GetStyle()->m_Width;
+
+    float buffer_zone=0.f;
+    GUI<float>::GetSetting(this, "buffer_zone", buffer_zone);
+
+
+    for (unsigned int c=0; c<m_ObjectsDefs.size(); ++c)
+    {
+        SGUIText *text = new SGUIText();
+        CGUIString gui_string;
+        gui_string.SetValue(m_ObjectsDefs[c].m_Heading);
+        *text = GetGUI()->GenerateText(gui_string, font, width, buffer_zone, this);
+        AddText(text);
+    }
+
+
+    // Generate texts
+    float buffered_y = 0.f;
+
+    for (int i=0; i<(int)pList->m_Items.size(); ++i)
+    {
+        m_ItemsYPositions[i] = buffered_y;
+        for (unsigned int c=0; c<m_ObjectsDefs.size(); ++c)
+        {
+            CGUIList * pList_c;
+            GUI<CGUIList>::GetSettingPointer(this, m_ObjectsDefs[c].m_Id, pList_c);
+            SGUIText *text = new SGUIText();
+            *text = GetGUI()->GenerateText(pList_c->m_Items[i], font, width, buffer_zone, this);
+            if (c==0)
+                buffered_y += text->m_Size.cy;
+            AddText(text);
+        }
+    }
+
+    m_ItemsYPositions[pList->m_Items.size()] = buffered_y;
+
+    //if (! scrollbar)
+    //  CalculateTextPosition(m_CachedActualSize, m_TextPos, *m_GeneratedTexts[0]);
+
+    // Setup scrollbar
+    if (scrollbar)
+    {
+        GetScrollBar(0).SetScrollRange( m_ItemsYPositions.back() );
+        GetScrollBar(0).SetScrollSpace( GetListRect().GetHeight() );
+
+        CRect rect = GetListRect();
+        GetScrollBar(0).SetX( rect.right );
+        GetScrollBar(0).SetY( rect.top );
+        GetScrollBar(0).SetZ( GetBufferedZ() );
+        GetScrollBar(0).SetLength( rect.bottom - rect.top );
+    }
+}
+
+CRect COList::GetListRect() const
+{
+    return m_CachedActualSize + CRect(0, m_HeadingHeight, 0, 0);
+}
+
+void COList::HandleMessage(SGUIMessage &Message)
+{
+    CList::HandleMessage(Message);
+//  switch (Message.type)
+//  {
+//  case GUIM_SETTINGS_UPDATED:
+//      if (Message.value.Find("list_") != -1)
+//      {
+//          SetupText();
+//      }
+//  }
+}
+
+bool COList::HandleAdditionalChildren(const XMBElement& child, CXeromyces* pFile)
+{
+    int elmt_item = pFile->GetElementID("item");
+    int elmt_heading = pFile->GetElementID("heading");
+    int elmt_def = pFile->GetElementID("def");
+
+    if (child.GetNodeName() == elmt_item)
+    {
+        AddItem(child.GetText().FromUTF8(), child.GetText().FromUTF8());
+        return true;
+    }
+    else if (child.GetNodeName() == elmt_heading)
+    {
+        CStrW text (child.GetText().FromUTF8());
+
+        return true;
+    }
+    else if (child.GetNodeName() == elmt_def)
+    {
+        ObjectDef oDef;
+
+        XMBAttributeList attributes = child.GetAttributes();
+        for (int i=0; i<attributes.Count; ++i)
+        {
+            XMBAttribute attr = attributes.Item(i);
+            CStr attr_name (pFile->GetAttributeString(attr.Name));
+            CStr attr_value (attr.Value);
+
+            if (attr_name == "color")
+            {
+                CColor color;
+                if (!GUI<CColor>::ParseString(attr_value.FromUTF8(), color))
+                    LOGERROR(L"GUI: Error parsing '%hs' (\"%ls\")", attr_name.c_str(), attr_value.c_str());
+                else oDef.m_TextColor = color;
+            }
+            else if (attr_name == "id")
+            {
+                oDef.m_Id = "list_"+attr_value;
+            }
+            else if (attr_name == "width")
+            {
+                int width;
+                if (!GUI<int>::ParseString(attr_value.FromUTF8(), width))
+                    LOGERROR(L"GUI: Error parsing '%hs' (\"%ls\")", attr_name.c_str(), attr_value.c_str());
+                else
+                    oDef.m_Width = width;
+            }
+            else if (attr_name == "heading")
+            {
+                oDef.m_Heading = attr_value.FromUTF8();
+            }
+
+        }
+
+        m_ObjectsDefs.push_back(oDef);
+
+        AddSetting(GUIST_CGUIList, oDef.m_Id);
+        SetupText();
+
+        return true;
+    }
+    else
+    {
+        return false;
+    }
+}
+
+void COList::DrawList(const int &selected,
+                     const CStr& _sprite,
+                     const CStr& _sprite_selected,
+                     const CStr& _textcolor)
+{
+    float bz = GetBufferedZ();
+
+    // First call draw on ScrollBarOwner
+    bool scrollbar;
+    GUI<bool>::GetSetting(this, "scrollbar", scrollbar);
+
+    if (scrollbar)
+    {
+        // Draw scrollbar
+        IGUIScrollBarOwner::Draw();
+    }
+
+    if (GetGUI())
+    {
+        CRect rect = GetListRect();
+
+        CGUISpriteInstance *sprite=NULL, *sprite_selectarea=NULL;
+        int cell_id;
+        GUI<CGUISpriteInstance>::GetSettingPointer(this, _sprite, sprite);
+        GUI<CGUISpriteInstance>::GetSettingPointer(this, _sprite_selected, sprite_selectarea);
+        GUI<int>::GetSetting(this, "cell_id", cell_id);
+
+        CGUIList *pList;
+        GUI<CGUIList>::GetSettingPointer(this, "list_name", pList);
+
+        GetGUI()->DrawSprite(*sprite, cell_id, bz, rect);
+
+        float scroll=0.f;
+        if (scrollbar)
+        {
+            scroll = GetScrollBar(0).GetPos();
+        }
+
+        if (selected != -1)
+        {
+            ENSURE(selected >= 0 && selected+1 < (int)m_ItemsYPositions.size());
+
+            // Get rectangle of selection:
+            CRect rect_sel(rect.left, rect.top + m_ItemsYPositions[selected] - scroll,
+                                 rect.right, rect.top + m_ItemsYPositions[selected+1] - scroll);
+
+            if (rect_sel.top <= rect.bottom &&
+                rect_sel.bottom >= rect.top)
+            {
+                if (rect_sel.bottom > rect.bottom)
+                    rect_sel.bottom = rect.bottom;
+                if (rect_sel.top < rect.top)
+                    rect_sel.top = rect.top;
+
+                if (scrollbar)
+                {
+                    // Remove any overlapping area of the scrollbar.
+                    if (rect_sel.right > GetScrollBar(0).GetOuterRect().left &&
+                        rect_sel.right <= GetScrollBar(0).GetOuterRect().right)
+                        rect_sel.right = GetScrollBar(0).GetOuterRect().left;
+
+                    if (rect_sel.left >= GetScrollBar(0).GetOuterRect().left &&
+                        rect_sel.left < GetScrollBar(0).GetOuterRect().right)
+                        rect_sel.left = GetScrollBar(0).GetOuterRect().right;
+                }
+
+                GetGUI()->DrawSprite(*sprite_selectarea, cell_id, bz+0.05f, rect_sel);
+            }
+        }
+
+        CColor color;
+        GUI<CColor>::GetSetting(this, _textcolor, color);
+
+        CGUISpriteInstance *sprite_heading=NULL;
+        GUI<CGUISpriteInstance>::GetSettingPointer(this, "sprite_heading", sprite_heading);
+        CRect rect_head(m_CachedActualSize.left, m_CachedActualSize.top, m_CachedActualSize.right,
+                                        m_CachedActualSize.top + m_HeadingHeight);
+        GetGUI()->DrawSprite(*sprite_heading, cell_id, bz, rect_head);
+
+        float xpos = 0;
+        for (unsigned int def=0; def< m_ObjectsDefs.size(); ++def)
+        {
+            DrawText(def, color, m_CachedActualSize.TopLeft() + CPos(xpos, 4), bz+0.1f, rect_head);
+            xpos += m_ObjectsDefs[def].m_Width;
+        }
+
+        for (int i=0; i<(int)pList->m_Items.size(); ++i)
+        {
+            if (m_ItemsYPositions[i+1] - scroll < 0 ||
+                m_ItemsYPositions[i] - scroll > rect.GetHeight())
+                continue;
+
+            // Clipping area (we'll have to substract the scrollbar)
+            CRect cliparea = GetListRect();
+
+            if (scrollbar)
+            {
+                if (cliparea.right > GetScrollBar(0).GetOuterRect().left &&
+                    cliparea.right <= GetScrollBar(0).GetOuterRect().right)
+                    cliparea.right = GetScrollBar(0).GetOuterRect().left;
+
+                if (cliparea.left >= GetScrollBar(0).GetOuterRect().left &&
+                    cliparea.left < GetScrollBar(0).GetOuterRect().right)
+                    cliparea.left = GetScrollBar(0).GetOuterRect().right;
+            }
+
+            xpos = 0;
+            for (unsigned int def=0; def< m_ObjectsDefs.size(); ++def)
+            {
+                DrawText(m_ObjectsDefs.size() * (i+/*Heading*/1) + def, m_ObjectsDefs[def].m_TextColor, rect.TopLeft() + CPos(xpos, -scroll + m_ItemsYPositions[i]), bz+0.1f, cliparea);
+                xpos += m_ObjectsDefs[def].m_Width;
+            }
+        }
+    }
+}

source/tools/XpartaMuPP/XpartaMuPP.py

@@ +1 @@
+#!/usr/bin/env python3
+# -*- coding: utf-8 -*-
+
+"""
+    XpartaMuPP by :
+    Badmadblacksad
+    ..
+    For : 0ad
+    License : GPL
+"""
+
+import sys
+import logging
+import time
+from optparse import OptionParser
+
+import sleekxmpp
+from sleekxmpp.stanza import Iq
+from sleekxmpp.stanza import *
+from sleekxmpp.xmlstream import ElementBase, register_stanza_plugin, ET
+from sleekxmpp.xmlstream.handler import Callback
+from sleekxmpp.xmlstream.matcher import StanzaPath
+
+from xml.dom.minidom import Document
+
+## Configuration ##
+configDEMOModOn = False 
+## !Configuration ##
+
+class BasicGameList(ElementBase):
+  name = 'query'
+  namespace = 'jabber:iq:gamelist'
+  interfaces = set(('game', 'command'))
+  sub_interfaces = interfaces
+  plugin_attrib = 'gamelist'
+
+  def addGame(self, name, ip, mapName, mapSize, victoryCondition, nbp, tnbp):
+    itemXml = ET.Element("game", {"name":name, "ip":ip, "nbp":nbp, "tnbp":tnbp, "mapName":mapName, "mapSize":mapSize, "victoryCondition":victoryCondition})
+    self.xml.append(itemXml)
+
+  def getGame(self):
+    game = self.xml.find('{%s}game' % self.namespace)
+    return game.get("name"), game.get("ip"), game.get("mapName"), game.get("mapSize"), game.get("victoryCondition"), game.get("nbp"), game.get("tnbp")   
+
+  def getCommand(self):
+    command = self.xml.find('{%s}command' % self.namespace)
+    return command
+
+class XpartaMuPP(sleekxmpp.ClientXMPP):
+  """
+  A simple game list provider
+  """
+
+  def __init__(self, sjid, password, room, nick):
+    sleekxmpp.ClientXMPP.__init__(self, sjid, password)
+    self.sjid = sjid
+    self.room = room
+    self.nick = nick
+
+    # Game management
+    self.m_gameList = {}
+    
+    #DEMO
+    if configDEMOModOn:
+      self.addGame("666.666.666.666", "Unplayable map", "666.666.666.666", "Serengeti", "128", "gold rush", "4", "4")
+      self.addGame("666.666.666.667", "Unreachale liberty", "666.666.666.667", "oasis", "256", "conquest", "2", "4")
+      #for i in range(50):
+      #  self.addGame("666.666.666."+str(i), "X"+str(i), "666.666.666."+str(i), "Oasis", "large", "conquest", "1", "4")   
+
+    register_stanza_plugin(Iq, BasicGameList)
+    self.register_handler(Callback('Iq Gamelist',
+                                       StanzaPath('iq/gamelist'),
+                                       self.iqhandler,
+                                       instream=True))
+
+    self.add_event_handler("session_start", self.start)
+    self.add_event_handler("message", self.message)
+    self.add_event_handler("muc::%s::got_online" % self.room, self.muc_online)
+    self.add_event_handler("muc::%s::got_offline" % self.room, self.muc_offline)
+
+  def start(self, event):
+    """
+    Process the session_start event
+    """
+    self.plugin['xep_0045'].joinMUC(self.room, self.nick)
+
+    self.send_presence()
+    self.get_roster()
+    logging.info("xpartamupp started")
+
+    #DEMO
+    self.DEMOrequestGameList()
+    #self.DEMOregisterGame()
+
+  def message(self, msg):
+    """
+    Process incoming message stanzas
+    """
+    if msg['type'] == 'chat':
+      msg.reply("Thanks for sending\n%(body)s" % msg).send()
+      logging.comm("receive message"+msg['body'])
+
+  def muc_online(self, presence):
+    """
+    Process presence stanza from a chat room. 
+    """
+    if presence['muc']['nick'] != self.nick:
+      self.send_message(mto=presence['from'], mbody="Hello %s, welcome in the 0ad alpha chatroom. Polishes your weapons and get ready to fight!" %(presence['muc']['nick']), mtype='')
+
+  def muc_offline(self, presence):
+    """
+    Process presence stanza from a chat room. 
+    """
+    if presence['muc']['nick'] != self.nick:
+      self.removeGame(presence['muc']['jid'].bare)
+
+  def iqhandler(self, iq):
+    """
+    Handle the custom <gamelist> stanza
+    TODO: This method should be very robust because
+    we could receive anything
+    """
+    if iq['type'] == 'error':
+      logging.error('iqhandler error' + iq['error']['condition'])
+      #self.disconnect()
+    elif iq['type'] == 'get':
+      """
+      Request a gamelist
+      """
+      self.sendGameList(iq['from'])
+    elif iq['type'] == 'result':
+      """
+      Iq successfully received
+      """
+      pass
+    elif iq['type'] == 'set':
+      """
+      Register-update / unregister a game
+      """
+      command = iq['gamelist']['command'].text
+      if command == 'register':
+        try:
+          name, ip, mapName, mapSize, victoryCondition, nbp, tnbp = iq['gamelist']['game']
+          logging.debug("ip " + ip)
+          self.addGame(iq['from'].bare,name,ip,mapName,mapSize,victoryCondition,nbp,tnbp)
+        except:
+          logging.error("Failed to process game data")
+      elif command == 'unregister':
+        self.removeGame(iq['from'].bare)
+
+  def sendGameList(self, to):
+    """
+    Send a massive stanza with the whole game list
+    """
+    stz = BasicGameList()
+    for k in self.m_gameList:
+      g = self.m_gameList[k]
+      stz.addGame(g['name'], g['ip'], g['mapName'], g['mapSize'], g['victoryCondition'], g['nbp'], g['tnbp'])
+    iq = self.Iq()
+    iq['type'] = 'result'
+    iq['to'] = to
+    iq.setPayload(stz)
+    try:
+      iq.send()
+    except:
+      logging.error("Failed to send game list")
+
+  def DEMOrequestGameList(self):
+    """
+    Test function
+    """
+    iq = self.Iq()
+    iq['type'] = 'get'
+    iq['gamelist']['field'] = 'x'
+    iq['to'] = self.boundjid.full
+    iq.send(now=True, block=False)
+    return True
+
+  def DEMOregisterGame(self):
+    """
+    Test function
+    """
+    stz = BasicGameList()
+    stz.addGame("DEMOregister","DEMOip","DEMOmap","","","","")
+    stz['command'] = 'register'
+    iq = self.Iq()
+    iq['type'] = 'set'
+    iq['to'] = self.boundjid.full
+    iq.setPayload(stz)
+    iq.send(now=True, block=False)
+    return True
+
+  # Game management
+
+  def addGame(self, sid, name, ip, mapName, mapSize, victoryCondition, nbp, tnbp):
+    game = { 'name':name, 'ip':ip, 'nbp':nbp, 'tnbp':tnbp, 'mapName':mapName, 'mapSize':mapSize, 'victoryCondition':victoryCondition } 
+    self.m_gameList[sid] = game
+
+  def removeGame(self, sid):
+    if sid in self.m_gameList:
+      del self.m_gameList[sid]
+
+if __name__ == '__main__':
+  # Setup the command line arguments.
+  optp = OptionParser()
+
+  # Output verbosity options.
+  optp.add_option('-q', '--quiet', help='set logging to ERROR',
+                  action='store_const', dest='loglevel',
+                  const=logging.ERROR, default=logging.INFO)
+  optp.add_option('-d', '--debug', help='set logging to DEBUG',
+                  action='store_const', dest='loglevel',
+                  const=logging.DEBUG, default=logging.INFO)
+  optp.add_option('-v', '--verbose', help='set logging to COMM',
+                  action='store_const', dest='loglevel',
+                  const=5, default=logging.INFO)
+
+  # XpartaMuPP configuration options
+  optp.add_option('-m', '--domain', help='set xpartamupp domain',
+                  action='store', dest='xdomain',
+                  default="localhost")
+  optp.add_option('-l', '--login', help='set xpartamupp login',
+                  action='store', dest='xlogin',
+                  default="xpartamupp")
+  optp.add_option('-p', '--password', help='set xpartamupp password',
+                  action='store', dest='xpassword',
+                  default="XXXXXX")
+  optp.add_option('-n', '--nickname', help='set xpartamupp nickname',
+                  action='store', dest='xnickname',
+                  default="XpartaMuCC")
+  optp.add_option('-D', '--demo', help='set xpartamupp in DEMO mode (add a few fake games)',
+                  action='store_true', dest='xdemomode',
+                  default=False)
+
+  opts, args = optp.parse_args()
+
+  # Set DEMO mode
+  configDEMOModOn = opts.xdemomode
+
+  # Setup logging.
+  logging.basicConfig(level=opts.loglevel,
+                      format='%(levelname)-8s %(message)s')
+
+  # XpartaMuPP
+  xmpp = XpartaMuPP(opts.xlogin+'@'+opts.xdomain+'/CC', opts.xpassword, 'arena@conference.'+opts.xdomain, opts.xnickname)
+  xmpp.register_plugin('xep_0030') # Service Discovery
+  xmpp.register_plugin('xep_0004') # Data Forms
+  xmpp.register_plugin('xep_0045') # Multi-User Chat    # used
+  xmpp.register_plugin('xep_0060') # PubSub
+  xmpp.register_plugin('xep_0199') # XMPP Ping
+
+  if xmpp.connect():
+    xmpp.process(threaded=False)
+  else:
+    logging.error("Unable to connect")
+

source/tools/XpartaMuPP/mod_ipstamp.erl

@@ +1 @@
+
+-module(mod_ipstamp).
+
+-behaviour(gen_mod).
+
+-include("ejabberd.hrl").
+
+-export([start/2, stop/1, on_filter_packet/1]).
+
+start(_Host, _Opts) ->
+    ?INFO_MSG("mod_ipip starting", []),
+    ejabberd_hooks:add(filter_packet, global, ?MODULE, on_filter_packet, 50),
+    ok.
+
+stop(_Host) ->
+    ejabberd_hooks:delete(filter_packet, global, ?MODULE, on_filter_packet, 50),
+    ok.
+
+on_filter_packet({From, To, Packet} = Input) ->
+    {_,STo,_,_,_,_,_} = To,
+    if STo == "xpartamupp" ->
+      {_,SElement,LPacketInfo,LPacketQuery} = Packet,
+      if SElement == "iq" -> 
+        {_, SType} = lists:keyfind("type",1,LPacketInfo),
+        if SType == "set" ->
+      {_,_,LXmlns,LGame} = lists:keyfind("query",2,LPacketQuery),
+          {_,SXmlns} = lists:keyfind("xmlns",1,LXmlns),
+          if SXmlns == "jabber:iq:gamelist" ->
+            {_,_,_,LCommand} = lists:keyfind("command",2,LGame),
+            {_,SCommand} = lists:keyfind(xmlcdata,1,LCommand),
+            if SCommand == <<"register">> ->
+              {_,_,KGame,_} = lists:keyfind("game",2,LGame),
+              Info = ejabberd_sm:get_user_info("xpartamupp","localhost","CC"),
+              {ip, {Ploc, _Port}} = lists:keyfind(ip, 1, Info),
+              SIp = inet_parse:ntoa(Ploc),
+              ?INFO_MSG(string:concat("stamp ip: ",SIp), []),
+              {From,To,{xmlelement,"iq",LPacketInfo,[
+                {xmlelement,"query",[{"xmlns","jabber:iq:gamelist"}],[
+                  {xmlelement,"game",lists:keyreplace("ip",1,KGame,{"ip",SIp}),[]},
+                  {xmlelement,"command",[],[{xmlcdata,<<"register">>}]}
+                  ]
+                }
+              ]}}
+            ; true -> Input
+            end 
+          ; true -> Input
+          end
+        ; true -> Input
+        end
+      ; true -> Input
+      end
+    ; true -> Input 
+    end.
+

source/tools/XpartaMuPP/Makefile

@@ +1 @@
+include_dir = /usr/lib/ejabberd/include/
+ebin_dir = /usr/lib/ejabberd/ebin/
+
+module = mod_ipstamp.beam
+all : ${module}
+
+%.beam : %.erl
+    erlc -I ${include_dir} -pz ${ebin_dir} $<
+
+install : 
+    mv ${module} ${ebin_dir}
+
+clean :
+    rm ${module}
+
+restart :
+    rm -f /var/log/ejabberd/ejabberd.log
+    /etc/init.d/ejabberd restart

source/tools/XpartaMuPP/README

@@ +1 @@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
+@@ Install ejabberd and the erlang compiler @@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
+# apt-get install ejabberd erlang-dev?
+
+Configure it
+# dpkg-reconfigure ejabberd 
+set the domain name (e.g. localhost if you installed it on your development computer)
+and a login / password
+
+You should now be able to connect to this XMPP server using a normal XMPP client (e.g. Empathy).
+
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
+@@ Installation of the custom XMPP module @@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
+Go to it's source directory
+$ cd source/tools/XpartaMuPP
+
+Build and install it
+$ make
+# make install
+
+Tell ejabberd that you want it to load the module
+In /etc/ejabberd/ejabberd.cfg, add {mod_ipstamp, []}
+in the Modules list "Modules enabled in all ejabberd virtual hosts"
+
+Restart ejabberd
+# service ejabberd restart
+
+If something goes wrong read /var/log/ejabberd/ejabberd.log
+
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
+@@ Ejabberd administration @@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
+Go http://localhost:5280/admin and connect 
+(the login looks like login@domain (e.g. adminjabber@localhost))
+
+In "Acces rules" check that "register" is set to "[{allow,all}]"
+
+You can see the list of registered / connected users in
+"Virtual Hosts" >> domain name >> "users"
+
+You must manually add a new user for XpartaMuPP.
+Enter a login (use "xpartamupp" since that's what clients expect) 
+and password, then press "Add user"
+
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
+@@ Run XpartaMuPP - XMPP Multiplayer Game Manager @@
+@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
+You need to have python 3 installed
+$ sudo apt-get install python3
+
+You also need the SleekXmpp Python library
+Go to to github and follow their instructions
+https://github.com/fritzy/SleekXMPP
+
+Then execute the following command to run the script with default options
+$ ./source/tools/XpartaMuPP.py
+
+or rather a similar command to run a properly configured program
+$ ./source/tools/XpartaMuPP.py --domain localhost --login xpartamupp --password XXXXXX --nickname XpartaMuCC
+
+Run ./source/tools/XpartaMuPP.py -h for the full list of options
+
+If everything is fine you should see something along these lines in your console
+<<<< 
+INFO     Negotiating TLS
+INFO     Using SSL version: 3
+INFO     Node set to: xpartamupp@localhost/CC
+xpartamupp started
+<<<<
+
+Congratulations, you are running XpartaMuPP - the 0ad Multiplayer Game Manager.
+

source/lobby/XmppClient.cpp

@@ +1 @@
+#include "precompiled.h"
+#include "XmppClient.h"
+#include "GameItemData.h"
+
+//debug
+#include <iostream>
+
+//Gloox
+#include <gloox/rostermanager.h>
+#include <gloox/rosteritem.h>
+#include <gloox/error.h>
+
+//Game - script
+#include "scriptinterface/ScriptInterface.h"
+
+//Configuration
+#include "ps/ConfigDB.h"
+
+using namespace gloox;
+
+//global
+XmppClient *g_XmppClient = NULL;
+
+//debug
+#if 1
+#define DbgXMPP(x)
+#else
+#define DbgXMPP(x) std::cout << x << std::endl;
+#endif
+
+//Hack
+#if 1
+#if OS_WIN 
+const std::string gloox::EmptyString = "";
+#endif
+#endif
+
+//utils
+std::string StanzaErrorToString(StanzaError& err)
+{
+  std::string msg;
+#define CASE(X, Y) case X: return Y;
+  switch (err)
+  {
+    CASE(StanzaErrorBadRequest, "Bad request")
+    CASE(StanzaErrorConflict, "Player name already used")
+    CASE(StanzaErrorFeatureNotImplemented, "Feature not implemented")
+    CASE(StanzaErrorForbidden, "Forbidden")
+    CASE(StanzaErrorGone, "Recipient or server gone")
+    CASE(StanzaErrorInternalServerError, "Internal server error")
+    CASE(StanzaErrorItemNotFound, "Item not found")
+    CASE(StanzaErrorJidMalformed, "Jid malformed")
+    CASE(StanzaErrorNotAcceptable, "Not acceptable")
+    CASE(StanzaErrorNotAllowed, "Not allowed")
+    CASE(StanzaErrorNotAuthorized, "Not authorized")
+    CASE(StanzaErrorNotModified, "Not modified")
+    CASE(StanzaErrorPaymentRequired, "Payment required")
+    CASE(StanzaErrorRecipientUnavailable, "Recipient unavailable")
+    CASE(StanzaErrorRedirect, "Redirect")
+    CASE(StanzaErrorRegistrationRequired, "Registration required")
+    CASE(StanzaErrorRemoteServerNotFound, "Remote server not found")
+    CASE(StanzaErrorRemoteServerTimeout, "Remote server timeout")
+    CASE(StanzaErrorResourceConstraint, "Resource constraint")
+    CASE(StanzaErrorServiceUnavailable, "Service unavailable")
+    CASE(StanzaErrorSubscribtionRequired, "Subscribtion Required")
+    CASE(StanzaErrorUndefinedCondition, "Undefined condition")
+    CASE(StanzaErrorUnexpectedRequest, "Unexpected request")
+    CASE(StanzaErrorUnknownSender, "Unknown sender") 
+    default:
+      return "Error undefined";
+  }
+#undef CASE
+}
+
+XmppClient::XmppClient(ScriptInterface& scriptInterface, std::string sUsername, std::string sPassword, std::string sRoom, std::string sNick, bool regOpt)
+  : m_ScriptInterface(scriptInterface), _client(NULL), _mucRoom(NULL), _registration(NULL), _username(sUsername), _password(sPassword), _nick(sNick)
+{
+  // Read lobby configuration from default.cfg
+  std::string sServer;
+  std::string sXpartamupp;
+  CFG_GET_USER_VAL("lobby.server", String, sServer);
+  CFG_GET_USER_VAL("lobby.xpartamupp", String, sXpartamupp);
+
+  _xpartamuppId = sXpartamupp+std::string("@")+sServer+std::string("/CC");
+  JID clientJid(sUsername+std::string("@")+sServer+std::string("/0ad"));
+  JID roomJid(sRoom+std::string("@conference.")+sServer+std::string("/")+sNick);
+
+  // If we are connecting, use the full jid and a password
+  // If we are registering, only use the server name
+  if(!regOpt)
+    _client = new Client(clientJid, sPassword);
+  else
+    _client = new Client(sServer);
+
+  _client->registerConnectionListener( this );
+  _client->setPresence(Presence::Available, -1);
+  _client->disco()->setVersion( "TestProg", "1.0" );
+  _client->disco()->setIdentity( "client", "bot" );
+  _client->setCompression(false);
+
+  _client->registerStanzaExtension( new GameListQuery() );
+  _client->registerIqHandler( this, ExtGameListQuery);
+
+  _client->registerMessageHandler( this );
+
+  StringList ca;
+  ca.push_back( "/path/to/cacert.crt" );
+  _client->setCACerts( ca );
+
+  // Uncomment to see the raw stanzas
+  //_client->logInstance().registerLogHandler( LogLevelDebug, LogAreaAll, this );
+
+  if (!regOpt)
+  {
+    // Create a Multi User Chat Room
+    _mucRoom = new MUCRoom(_client, roomJid, this, 0);
+    // Disable the history because its anoying
+    _mucRoom->setRequestHistory(0, MUCRoom::HistoryMaxStanzas);
+  }
+  else
+  {
+    // Registration
+    _registration = new Registration( _client );
+    _registration->registerRegistrationHandler( this );
+  }
+}
+
+XmppClient::~XmppClient()
+{
+  DbgXMPP("XmppClient destroyed");
+  delete _registration;
+  delete _mucRoom;
+  delete _client;
+}
+
+// Game - script
+ScriptInterface& XmppClient::GetScriptInterface()
+{
+  return m_ScriptInterface;
+}
+
+//Network
+void XmppClient::connect()
+{
+  _client->connect(false);
+}
+
+void XmppClient::disconnect()
+{
+  _client->disconnect();
+}
+
+void XmppClient::recv()
+{
+  _client->recv(1);
+}
+
+/*
+ *  MUC Handlers
+ */
+void XmppClient::handleMUCParticipantPresence(gloox::MUCRoom*, gloox::MUCRoomParticipant participant, const gloox::Presence& presence)
+{  
+  //std::string jid = participant.jid->full();
+  std::string nick = participant.nick->resource();
+  gloox::Presence::PresenceType presenceType = presence.presence();
+  if (presenceType == Presence::Unavailable)
+  {
+    DbgXMPP(nick << " left the room");
+    m_PlayerMap.erase(nick);
+  }
+  else
+  {
+    DbgXMPP(nick << " is in the room");
+    m_PlayerMap[nick] = std::pair<std::string, int>(nick, (int)presenceType);
+  }
+  CreateSimpleMessage("system", "playerlist updated", "internal");
+}
+
+void XmppClient::handleMUCMessage( MUCRoom*, const Message& msg, bool )
+{
+  DbgXMPP(msg.from().resource() << " said " << msg.body());
+  std::string nick = msg.from().resource();
+  std::string body = msg.body();
+
+  CScriptValRooted message;
+  GetScriptInterface().Eval("({ 'type':'mucmessage'})", message);
+  GetScriptInterface().SetProperty(message.get(), "from", nick);
+  GetScriptInterface().SetProperty(message.get(), "text", body);
+  PushGuiMessage(message);
+}
+
+void XmppClient::handleMUCError(gloox::MUCRoom*, gloox::StanzaError err)
+{
+  std::string msg = StanzaErrorToString(err);
+  CreateSimpleMessage("system", msg, "error");
+}
+
+void XmppClient::handleMUCItems( MUCRoom * /*room*/, const Disco::ItemList& items )
+{
+  m_PlayerMap.clear();
+
+  // Add the received items
+  Disco::ItemList::const_iterator it = items.begin();
+  for( ; it != items.end(); ++it )
+  {
+    std::string jid = (*it)->jid().full().c_str();
+    std::string nick = (*it)->name().c_str();
+    m_PlayerMap[nick] = std::pair<std::string, int>(nick, Presence::Available);
+    //printf( "%s -- %s is an item here\n", (*it)->jid().full().c_str(), (*it)->name().c_str() );
+  }
+  CreateSimpleMessage("system", "playerlist updated", "internal");
+}
+
+/*
+ *  Log (debug) Handler
+ */
+void XmppClient::handleLog( LogLevel level, LogArea area, const std::string& message )
+{
+  std::cout << "log: level: " <<  level << ", area: " << area << ", message: " << message << std::endl;
+}
+
+/*
+ *  IQ Handler
+ */
+bool XmppClient::handleIq( const IQ& iq )
+{
+  DbgXMPP("handleIq [" << iq.tag()->xml() << "]");
+
+  if(iq.subtype() == gloox::IQ::Result)
+  {
+    const GameListQuery* q = iq.findExtension<GameListQuery>( ExtGameListQuery );
+    if(q)
+    {
+      m_GameList.clear();
+      std::list<GameItemData*>::const_iterator it = q->gameList().begin();
+      for(; it != q->gameList().end(); ++it)
+      {
+        m_GameList.push_back(**it);
+      }
+      CreateSimpleMessage("system", "gamelist updated", "internal");
+    }
+  }
+  else if(iq.subtype() == gloox::IQ::Error)
+  {
+    StanzaError err = iq.error()->error();
+    std::string msg = StanzaErrorToString(err);
+    CreateSimpleMessage("system", msg, "error");
+  }
+  else
+  {
+    CreateSimpleMessage("system", std::string("unknown subtype : ") + iq.tag()->name(), "error");
+  }
+
+  return true;
+}
+
+/*
+ *  Connection Handlers
+ */
+void XmppClient::onConnect()
+{
+  if (_mucRoom)
+  {
+    CreateSimpleMessage("system", "connected");
+    _mucRoom->join();
+    //_mucRoom->getRoomInfo();
+    _mucRoom->getRoomItems();
+    SendIqGetGameList();
+  }
+
+  if (_registration)
+  {
+    _registration->fetchRegistrationFields();
+  }
+}
+
+void XmppClient::onDisconnect( ConnectionError e )
+{
+  // Make sure we properly leave the room so than
+  // everything work if we decide to come back later
+  if (_mucRoom)
+    _mucRoom->leave();
+
+  if( e == ConnAuthenticationFailed )
+    CreateSimpleMessage("system", "authentication failed", "error");
+  else
+    CreateSimpleMessage("system", "disconnected");
+
+  m_PlayerMap.clear();
+  m_GameList.clear();
+}
+
+bool XmppClient::onTLSConnect( const CertInfo& )
+{
+  return true;
+}
+
+/*
+ *  Requests
+ */
+
+/* Request GameList from cloud */
+void XmppClient::SendIqGetGameList()
+{
+  JID xpartamuppJid(_xpartamuppId);
+
+  // Send IQ
+  IQ iq(gloox::IQ::Get, xpartamuppJid);
+  iq.addExtension( new GameListQuery() );
+  DbgXMPP("SendIqGetGameList [" << iq.tag()->xml() << "]");
+  _client->send(iq);
+}
+
+/* Register a game */
+void XmppClient::SendIqRegisterGame(CScriptVal data)
+{
+  JID xpartamuppJid(_xpartamuppId);
+
+  std::string name, mapName, mapSize, victoryCondition, nbp, tnbp;
+  GetScriptInterface().GetProperty(data.get(), "name", name);
+  GetScriptInterface().GetProperty(data.get(), "mapName", mapName);
+  GetScriptInterface().GetProperty(data.get(), "mapSize", mapSize);
+  GetScriptInterface().GetProperty(data.get(), "victoryCondition", victoryCondition);
+  GetScriptInterface().GetProperty(data.get(), "nbp", nbp);
+  GetScriptInterface().GetProperty(data.get(), "tnbp", tnbp);
+
+  // Send IQ
+  GameListQuery* g = new GameListQuery();
+  g->m_command = "register";
+  /* This "x" fake ip will be overwritten by the ip stamp XMPP module */
+  GameItemData *pItemData = new GameItemData(name, "x");
+  pItemData->m_mapName = mapName;
+  pItemData->m_mapSize = mapSize;
+  pItemData->m_victoryCondition = victoryCondition;
+  pItemData->m_nbp = nbp;
+  pItemData->m_tnbp = tnbp;
+  g->m_gameList.push_back( pItemData );
+
+  IQ iq(gloox::IQ::Set, xpartamuppJid);
+  iq.addExtension( g );
+  DbgXMPP("SendIqRegisterGame [" << iq.tag()->xml() << "]");
+  _client->send(iq);
+}
+
+/* Unregister a game */
+void XmppClient::SendIqUnregisterGame(std::string name)
+{
+  JID xpartamuppJid(_xpartamuppId);
+
+  // Send IQ
+  GameListQuery* g = new GameListQuery();
+  g->m_command = "unregister";
+  g->m_gameList.push_back( new GameItemData(name) );
+
+  IQ iq(gloox::IQ::Set, xpartamuppJid);
+  iq.addExtension( g );
+  DbgXMPP("SendIqUnregisterGame [" << iq.tag()->xml() << "]");
+  _client->send(iq);
+}
+
+/*
+ *  Registration
+ */
+void XmppClient::handleRegistrationFields( const JID& /*from*/, int fields, std::string )
+{
+  RegistrationFields vals;
+  vals.username = _username;
+  vals.password = _password;
+  _registration->createAccount( fields, vals );
+}
+
+void XmppClient::handleRegistrationResult( const JID& /*from*/, RegistrationResult result )
+{
+  if (result == gloox::RegistrationSuccess)
+  {
+    CreateSimpleMessage("system", "registered");
+  }
+  else
+  {
+    std::string msg;
+#define CASE(X, Y) case X: msg = Y; break;
+    switch(result)
+    {
+      CASE(RegistrationNotAcceptable, "Registration not acceptable")
+      CASE(RegistrationConflict, "Registration conflict")
+      CASE(RegistrationNotAuthorized, "Registration not authorized")
+      CASE(RegistrationBadRequest, "Registration bad request")
+      CASE(RegistrationForbidden, "Registration forbidden")
+      CASE(RegistrationRequired, "Registration required")
+      CASE(RegistrationUnexpectedRequest, "Registration unexpected request")
+      CASE(RegistrationNotAllowed, "Registration not allowed")
+      default: msg = "Registration unknown error";
+    }
+#undef CASE
+    CreateSimpleMessage("system", msg, "error");
+  }
+  disconnect();
+}
+
+void XmppClient::handleAlreadyRegistered( const JID& /*from*/ )
+{
+  DbgXMPP("the account already exists");
+}
+
+void XmppClient::handleDataForm( const JID& /*from*/, const DataForm& /*form*/ )
+{
+  DbgXMPP("dataForm received");
+}
+
+void XmppClient::handleOOB( const JID& /*from*/, const OOB& /* oob */ )
+{
+  DbgXMPP("OOB registration requested");
+}
+
+/**
+  * Message
+  */
+void XmppClient::handleMessage( const Message& msg, MessageSession * /*session*/ )
+{
+  DbgXMPP("type " << msg.subtype() << ", subject " << msg.subject().c_str() 
+    << ", message " << msg.body().c_str() << ", thread id " << msg.thread().c_str());
+
+  std::string nick = msg.from().resource();
+  std::string body = msg.body();
+
+  CScriptValRooted message;
+  GetScriptInterface().Eval("({ 'type':'message'})", message);
+  GetScriptInterface().SetProperty(message.get(), "from", nick);
+  GetScriptInterface().SetProperty(message.get(), "text", body);
+  PushGuiMessage(message);
+}
+
+
+
+/* Requests from GUI */
+CScriptValRooted XmppClient::GUIGetPlayerList()
+{
+  CScriptValRooted playerList;
+  GetScriptInterface().Eval("({})", playerList);
+  for(std::map<std::string, std::pair<std::string, int> >::iterator it = m_PlayerMap.begin(); it != m_PlayerMap.end(); ++it)
+  {
+    CScriptValRooted player;
+    GetScriptInterface().Eval("({})", player);
+    GetScriptInterface().SetProperty(player.get(), "name", it->second.first.c_str());
+    GetScriptInterface().SetProperty(player.get(), "presenceType", it->second.first);
+
+    GetScriptInterface().SetProperty(playerList.get(), it->second.first.c_str(), player);
+  }
+
+  return playerList;
+}
+
+CScriptValRooted XmppClient::GUIGetGameList()
+{
+  CScriptValRooted gameList;
+  GetScriptInterface().Eval("([])", gameList);
+  for(std::list<GameItemData>::iterator it = m_GameList.begin(); it !=m_GameList.end(); ++it)
+  {
+    CScriptValRooted game;
+    GetScriptInterface().Eval("({})", game);
+
+#define ITEM(param)\
+    GetScriptInterface().SetProperty(game.get(), #param, it->m_##param .c_str());
+    ITEMS
+#undef ITEM
+
+    GetScriptInterface().CallFunctionVoid(gameList.get(), "push", game);
+  }
+
+  return gameList;
+}
+
+/* Messages */
+CScriptValRooted XmppClient::GuiPollMessage()
+{
+  if (m_GuiMessageQueue.empty())
+    return CScriptValRooted();
+
+  CScriptValRooted r = m_GuiMessageQueue.front();
+  m_GuiMessageQueue.pop_front();
+  return r;
+}
+
+void XmppClient::SendMUCMessage(std::string message)
+{
+  _mucRoom->send(message);
+}
+
+void XmppClient::PushGuiMessage(const CScriptValRooted& message)
+{
+  ENSURE(!message.undefined());
+
+  m_GuiMessageQueue.push_back(message);
+}
+
+void XmppClient::CreateSimpleMessage(std::string type, std::string text, std::string level)
+{
+  CScriptValRooted message;
+  GetScriptInterface().Eval("({})", message);
+  GetScriptInterface().SetProperty(message.get(), "type", type);
+  GetScriptInterface().SetProperty(message.get(), "level", level);
+  GetScriptInterface().SetProperty(message.get(), "text", text);
+  PushGuiMessage(message);
+}
+
+/*
+ *  GameListQuery, custom IQ Stanza
+ */
+
+GameListQuery::GameListQuery( const Tag* tag )
+: StanzaExtension( ExtGameListQuery )
+{
+  if( !tag || tag->name() != "query" || tag->xmlns() != XMLNS_GAMELIST )
+    return;
+
+  const Tag* c = tag->findTag( "query/game" );
+  if (c)
+    m_command = c->cdata();
+
+  const ConstTagList& l = tag->findTagList( "query/game" );
+  ConstTagList::const_iterator it = l.begin();
+  for( ; it != l.end(); ++it )
+  {
+    GameItemData *pItem = new GameItemData();
+#define ITEM(param)\
+    const std::string param = (*it)->findAttribute( #param ); \
+    pItem->m_##param = param;
+    ITEMS
+#undef ITEM
+    m_gameList.push_back( pItem );
+  }
+}
+
+GameListQuery::~GameListQuery()
+{
+  util::clearList( m_gameList );
+}
+
+const std::string& GameListQuery::filterString() const
+{
+  static const std::string filter = "/iq/query[@xmlns='" + XMLNS_GAMELIST + "']";
+  return filter;
+}
+
+Tag* GameListQuery::tag() const
+{
+  Tag* t = new Tag( "query" );
+  t->setXmlns( XMLNS_GAMELIST );
+/*
+  RosterData::const_iterator it = m_roster.begin();
+  for( ; it != m_roster.end(); ++it )
+  t->addChild( (*it)->tag() );
+*/
+
+  // register / unregister command
+  if(!m_command.empty())
+    t->addChild(new Tag("command", m_command));
+
+  std::list<GameItemData*>::const_iterator it = m_gameList.begin();
+  for( ; it != m_gameList.end(); ++it )
+    t->addChild( (*it)->tag() );
+
+  return t;
+}
+
+StanzaExtension* GameListQuery::clone() const
+{
+  GameListQuery* q = new GameListQuery();
+
+  return q;
+}
+
+const std::list<GameItemData*>& GameListQuery::gameList() const
+{
+  return m_gameList;
+}

source/lobby/GameItemData.h

@@ +1 @@
+#ifndef GAMEITEMDATA_H
+#define GAMEITEMDATA_H
+
+#include <string>
+
+#define ITEMS \
+  ITEM(name)      \
+  ITEM(ip)        \
+  ITEM(nbp)       \
+  ITEM(tnbp)      \
+  ITEM(mapName)   \
+  ITEM(mapSize)   \
+  ITEM(victoryCondition)
+
+class GameItemData
+{
+  friend class XmppClient;
+  friend class GameListQuery;
+public:
+  GameItemData(std::string name= "", std::string ip = "")
+  : m_name(name), m_ip(ip)
+  {
+  }
+
+  virtual ~GameItemData() {}
+
+  gloox::Tag* tag() const
+  {
+    gloox::Tag* i = new gloox::Tag( "game" );
+
+#define ITEM(param)\
+    i->addAttribute( #param, m_##param );
+    ITEMS
+#undef ITEM
+
+    return i;
+  }
+
+protected:
+#define ITEM(param)\
+  std::string m_##param ;
+  ITEMS
+#undef ITEM
+};
+
+#endif

source/lobby/XmppClient.h

@@ +1 @@
+#ifndef XXXMPPCLIENT_H
+#define XXXMPPCLIENT_H
+
+#if OS_WIN
+// Prevent gloox from pulling in windows.h (which causes conflicts)
+// and defines what is necessary in order to compile the lobby
+#define _WINDOWS_
+
+    //Taken from WinDef.h
+#define CONST               const
+typedef unsigned char UCHAR;
+typedef UCHAR *PUCHAR;
+typedef unsigned long ULONG;
+typedef ULONG *PULONG;
+#define OPTIONAL
+
+    // Taken from WinNT.h
+#define VOID void
+typedef char CHAR;
+typedef long LONG;
+typedef wchar_t WCHAR;
+typedef __nullterminated WCHAR *NWPSTR, *LPWSTR, *PWSTR;
+typedef __nullterminated CHAR *NPSTR, *LPSTR, *PSTR;
+typedef __nullterminated CONST WCHAR *LPCWSTR, *PCWSTR;
+typedef __nullterminated CONST CHAR *LPCSTR, *PCSTR;
+typedef unsigned char       BYTE;
+typedef BYTE  BOOLEAN;   
+typedef BOOLEAN *PBOOLEAN;    
+typedef void *PVOID;
+
+    //Taken from BaseTsd.h
+#if defined(_WIN64)
+    typedef unsigned __int64 ULONG_PTR, *PULONG_PTR;
+#else
+    typedef _W64 unsigned long ULONG_PTR, *PULONG_PTR;
+#endif
+#include "specstrings.h"
+
+#endif
+
+//network
+#include <gloox/jid.h>
+#include <gloox/client.h>
+#include <gloox/mucroom.h>
+#include <gloox/message.h>
+
+#include <gloox/messagehandler.h>
+#include <gloox/presencehandler.h>
+#include <gloox/mucroomhandler.h>
+#include <gloox/loghandler.h>
+#include <gloox/connectionlistener.h>
+#include <gloox/registration.h>
+
+#include <gloox/iq.h>
+#include <gloox/iqhandler.h>
+
+//game - script
+#include <deque>
+#include "scriptinterface/ScriptVal.h"
+
+//Global Gamelist Extension
+#define ExtGameListQuery 1403
+const std::string XMLNS_GAMELIST = "jabber:iq:gamelist";
+
+//Game - script
+class ScriptInterface;
+class GameItemData;
+
+class XmppClient : public gloox::ConnectionListener, public gloox::MUCRoomHandler, public gloox::IqHandler, public gloox::LogHandler, public gloox::RegistrationHandler, public gloox::MessageHandler
+{
+private:
+  //Game - script
+  ScriptInterface& m_ScriptInterface;
+  //Components
+  gloox::Client* _client;
+  gloox::MUCRoom* _mucRoom;
+  gloox::Registration* _registration;
+  //Account infos
+  std::string _username;
+  std::string _password;
+  std::string _nick;
+  std::string _xpartamuppId;
+
+public:
+  //Basic
+  XmppClient(ScriptInterface& scriptInterface, std::string sUsername, std::string sPassword, std::string sRoom, std::string sNick, bool regOpt = false);
+  virtual ~XmppClient();
+
+  //Network
+  void connect();
+  void disconnect();
+  void recv();
+  void SendIqGetGameList();
+  void SendIqRegisterGame(CScriptVal data);
+  void SendIqUnregisterGame(std::string name);
+
+  CScriptValRooted GUIGetPlayerList();
+  CScriptValRooted GUIGetGameList();
+
+  //Script
+  ScriptInterface& GetScriptInterface();
+
+protected:
+  /* Xmpp handlers */
+  /* MUC handlers */
+  virtual void handleMUCParticipantPresence(gloox::MUCRoom*, gloox::MUCRoomParticipant, const gloox::Presence&);
+  virtual bool handleMUCRoomCreation(gloox::MUCRoom*) {return false;}
+  virtual void handleMUCSubject(gloox::MUCRoom*, const std::string&, const std::string&) {}
+  virtual void handleMUCInviteDecline(gloox::MUCRoom*, const gloox::JID&, const std::string&) {}
+  virtual void handleMUCError(gloox::MUCRoom*, gloox::StanzaError);
+  virtual void handleMUCInfo(gloox::MUCRoom*, int, const std::string&, const gloox::DataForm*) {}
+  virtual void handleMUCItems(gloox::MUCRoom*, const std::list<gloox::Disco::Item*, std::allocator<gloox::Disco::Item*> >&);
+  virtual void handleMUCMessage(gloox::MUCRoom* room, const gloox::Message& msg, bool priv);
+
+  /* Log handler */
+  virtual void handleLog(gloox::LogLevel level, gloox::LogArea area, const std::string& message);
+
+  /* ConnectionListener handlers*/
+  virtual void onConnect();
+  virtual void onDisconnect(gloox::ConnectionError e);
+  virtual bool onTLSConnect(const gloox::CertInfo& info);
+
+  /* Iq Handlers */
+  virtual bool handleIq(const gloox::IQ& iq);
+  virtual void handleIqID(const gloox::IQ&, int) {}
+
+  /* Registration Handlers */
+  virtual void handleRegistrationFields(const gloox::JID& /*from*/, int fields, std::string instructions );
+  virtual void handleRegistrationResult(const gloox::JID& /*from*/, gloox::RegistrationResult result);
+  virtual void handleAlreadyRegistered(const gloox::JID& /*from*/);
+  virtual void handleDataForm(const gloox::JID& /*from*/, const gloox::DataForm& /*form*/);
+  virtual void handleOOB(const gloox::JID& /*from*/, const gloox::OOB& oob);
+
+  /* Message Handler */
+  virtual void handleMessage(const gloox::Message& msg, gloox::MessageSession * session);
+
+  /* Messages */
+public:
+  CScriptValRooted GuiPollMessage();
+  void SendMUCMessage(std::string message);
+protected:
+  void PushGuiMessage(const CScriptValRooted& message);
+  void CreateSimpleMessage(std::string type, std::string text, std::string level = "standard");
+
+private:
+  /// Map of players
+  std::map<std::string, std::pair<std::string, int> > m_PlayerMap;
+  /// List of games
+  std::list< GameItemData > m_GameList;
+  /// Queue of messages
+  std::deque<CScriptValRooted> m_GuiMessageQueue;
+};
+
+class GameListQuery : public gloox::StanzaExtension
+{
+  friend class XmppClient;
+public:
+  GameListQuery(const gloox::Tag* tag = 0);
+
+  ~GameListQuery();
+
+  // reimplemented from StanzaExtension
+  virtual const std::string& filterString() const;
+
+  // reimplemented from StanzaExtension
+  virtual StanzaExtension* newInstance(const gloox::Tag* tag) const
+  {
+    return new GameListQuery( tag );
+  }
+
+  // reimplemented from StanzaExtension
+  virtual gloox::Tag* tag() const;
+
+  // reimplemented from StanzaExtension
+  virtual gloox::StanzaExtension* clone() const;
+
+  const std::list<GameItemData*>& gameList() const;
+
+private:
+  std::string m_command;
+  std::list<GameItemData*> m_gameList;
+};
+
+extern XmppClient *g_XmppClient;
+
+#endif // XMPPCLIENT_H

source/pch/lobby/precompiled.cpp

@@ +1 @@
+/* Copyright (C) 2009 Wildfire Games.
+ * This file is part of 0 A.D.
+ *
+ * 0 A.D. is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * 0 A.D. is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with 0 A.D.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+#include "precompiled.h"

source/pch/lobby/precompiled.h

@@ +1 @@
+/* Copyright (C) 2009 Wildfire Games.
+ * This file is part of 0 A.D.
+ *
+ * 0 A.D. is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * 0 A.D. is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with 0 A.D.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+#include "lib/precompiled.h"    // common precompiled header

binaries/data/mods/public/gui/pregame/mainmenu.xml

@@ -196 +196 @@
                     Matches
                     <action on="Press">
                         closeMenu();
-                        Engine.PushGuiPage("page_gamesetup.xml", { type: "offline" });
+                        Engine.PushGuiPage("page_gamesetup.xml", { type: "offline", source: "mainmenu" });
                     </action>
                 </object>
 
@@ -253 +253 @@
                     <action on="Press">
                         closeMenu();
                         // Open Multiplayer connection window with join option.
-                        Engine.PushGuiPage("page_gamesetup_mp.xml", "join");
+                        Engine.PushGuiPage("page_gamesetup_mp.xml", { multiplayerGameType: "join", source: "mainmenu" });
                     </action>
                 </object>
 
@@ -268 +268 @@
                     <action on="Press">
                         closeMenu();
                         // Open Multiplayer connection window with host option.
-                        Engine.PushGuiPage("page_gamesetup_mp.xml", "host");
+                        Engine.PushGuiPage("page_gamesetup_mp.xml", { multiplayerGameType: "host", source: "mainmenu" });
                     </action>
                 </object>
-            </object>
 
+                <object name="subMenuMultiplayerLobbyButton"
+                    type="button"
+                    style="StoneButtonFancy"
+                    size="0 64 100% 92"
+                    tooltip_style="pgToolTip"
+                    tooltip="Launch the multiplayer lobby."
+                >
+                    Game Lobby
+                    <action on="Press">
+                        closeMenu();
+                        // Open Multiplayer game lobby.
+                        Engine.PushGuiPage("page_prelobby.xml", []);
+                    </action>
+                </object>
+                </object>
+
             <!-- submenuToolsAndOptions -->
             <object name="submenuToolsAndOptions"
                 type="image"
@@ -402 +417 @@
                     Multiplayer
                     <action on="Press">
                         closeMenu();
-                        openMenu("submenuMultiplayer", (this.parent.size.top+this.size.top), (this.size.bottom-this.size.top), 2);
+                        openMenu("submenuMultiplayer", (this.parent.size.top+this.size.top), (this.size.bottom-this.size.top), 3);
                     </action>
                 </object>
 

binaries/data/mods/public/gui/gamesetup/gamesetup_mp.js

@@ -1 +1 @@
 var g_IsConnecting = false;
 var g_GameType; // "server" or "client"
+var g_Source; // "mainmenu" or "lobby"
+var g_ServerName = "";
+var g_Name;
+var g_Ip;
 
 var g_IsRejoining = false;
 var g_GameAttributes; // used when rejoining
 var g_PlayerAssignments; // used when rejoining
 
-function init(multiplayerGameType)
+function init(attribs)
 {
-    switch (multiplayerGameType)
+        switch (attribs.multiplayerGameType)
+        {
+                case "join":
+                        getGUIObjectByName("pageJoin").hidden = false;
+                        getGUIObjectByName("pageHost").hidden = true;
+                        break;
+                case "host":
+                        getGUIObjectByName("pageJoin").hidden = true;
+                        getGUIObjectByName("pageHost").hidden = false;
+                        break;
+                default:
+                        error("Unrecognised multiplayer game type : " + attribs.multiplayerGameType);
+                        break;
+        }
+    
+    switch (attribs.source)
     {
-    case "join":
-        getGUIObjectByName("pageJoin").hidden = false;
-        getGUIObjectByName("pageHost").hidden = true;
-        break;
-    case "host":
-        getGUIObjectByName("pageJoin").hidden = true;
-        getGUIObjectByName("pageHost").hidden = false;
-        break;
-    default:
-        error("Unrecognised multiplayer game type : " + multiplayerGameType);
-        break;
+        case "mainmenu":
+            g_Source = "mainmenu";
+            break;
+        case "lobby":
+            g_Source = "lobby";
+            getGUIObjectByName("hostServerNameWrapper").hidden = false;
+            break;
+        default:
+            error("Unrecognised source : " + attribs.source);
     }
+
+    if (attribs.name)
+    {
+        getGUIObjectByName("hostPlayerName").caption = attribs.name;
+        getGUIObjectByName("joinPlayerName").caption = attribs.name;
+    }
+    if (attribs.ip) getGUIObjectByName("joinIP").caption = attribs.ip;
 }
 
 function cancelSetup()
 {
     if (g_IsConnecting)
         Engine.DisconnectNetworkGame();
-    Engine.PopGuiPage();    
+    Engine.PopGuiPage();
 }
 
 function startConnectionStatus(type)
@@ -43 +67 @@
     if (!g_IsConnecting)
         return;
 
+    pollAndHandleNetworkClient();
+}
+
+function pollAndHandleNetworkClient()
+{
     while (true)
     {
         var message = Engine.PollNetworkClient();
@@ -119 +148 @@
                     else
                     {
                         Engine.PopGuiPage();
-                        Engine.PushGuiPage("page_gamesetup.xml", { "type": g_GameType });
+                        Engine.PushGuiPage("page_gamesetup.xml", { "type": g_GameType, "source": g_Source, "serverName": g_ServerName });
                         return; // don't process any more messages - leave them for the game GUI loop
                     }
 
@@ -163 +192 @@
     }
 
     startConnectionStatus("server");
-    // TODO: ought to do something(?) with servername
+    g_ServerName = servername;
 
     return true;
 }

binaries/data/mods/public/gui/gamesetup/gamesetup.js

@@ -19 +19 @@
 // Is this user in control of game settings (i.e. is a network server, or offline player)
 var g_IsController;
 
+// Where this user come from ("mainmenu" or "lobby")
+var g_Source;
+
+//Server name, if user is a server, connected to the multiplayer lobby
+var g_ServerName;
+
 // Are we currently updating the GUI in response to network messages instead of user input
 // (and therefore shouldn't send further messages to the network)
 var g_IsInGuiUpdate;
@@ -79 +85 @@
     default:
         error("Unexpected 'type' in gamesetup init: "+attribs.type);
     }
+
+    switch (attribs.source)
+    {
+    case "mainmenu":
+        g_Source = "mainmenu";
+        break;
+    case "lobby":
+        g_Source = "lobby";
+        break;
+    default:
+        error("Unrecognised source : " + attribs.source);
+    }
+    
+        if (attribs.serverName)
+        g_ServerName = attribs.serverName;
+
+    // Init the Cancel Button caption and tooltip
+    var cancelButton = getGUIObjectByName("cancelGame");
+    if(g_Source != "lobby")
+    {
+        cancelButton.caption = "Main menu";
+        cancelButton.tooltip = "Return to the main menu."
+    }
+    else
+    {
+        cancelButton.caption = "Quit";
+        cancelButton.tooltip = "Return to the lobby."
+    }
+ 
 }
 
 // Called after the map data is loaded and cached
@@ -168 +203 @@
                 updateGameAttributes();
             }
         };
+        mapSize.selected = 0;
 
         getGUIObjectByName("revealMap").onPress = function()
         {   // Update attributes so other players can see change
@@ -295 +331 @@
         {
         case "disconnected":
             Engine.DisconnectNetworkGame();
+            if (isServerOnLobby()) Engine.SendUnregisterGame(g_ServerName);
             Engine.PopGuiPage();
             reportDisconnect(message.reason);
             break;
@@ -333 +370 @@
         // Update the player list
         g_PlayerAssignments = message.hosts;
         updatePlayerList();
+
+        if (isServerOnLobby())
+        {
+            sendRegisterGameStanza();
+        }
         break;
 
     case "start":
+        if (g_Source == "lobby") Engine.StopXmppClient();
         Engine.SwitchGuiPage("page_loading.xml", {
             "attribs": g_GameAttributes,
             "isNetworked" : g_IsNetworked,
@@ -984 +1027 @@
     if (g_IsNetworked)
     {
         Engine.SetNetworkGameAttributes(g_GameAttributes);
+        if (isServerOnLobby() && g_LoadingState >= 2)
+        {
+            sendRegisterGameStanza();
+        }
     }
     else
     {
@@ -1302 +1349 @@
     return false;
 }
 
+function isServerOnLobby()
+{
+    return (g_IsController && g_Source == "lobby") ? true : false;
+}
 
+function sendRegisterGameStanza()
+{
+    var selectedMapSize = getGUIObjectByName("mapSize").selected;
+    var selectedVictoryCondition = getGUIObjectByName("victoryCondition").selected;
 
+    var mapSize = getGUIObjectByName("mapSize").list_data[selectedMapSize];
+    var victoryCondition = getGUIObjectByName("victoryCondition").list[selectedVictoryCondition];
 
+    var numberOfPlayers = 0;
+    for (var guid in g_PlayerAssignments)
+    {   
+        numberOfPlayers++;
+    }
+
+    var nbp = numberOfPlayers ? numberOfPlayers : 1;
+    var tnbp = g_GameAttributes.settings.PlayerData.length;
+
+    gameData = {
+        "name":g_ServerName,
+        "mapName":g_GameAttributes.map,
+        "mapSize":mapSize,
+        "victoryCondition":victoryCondition, 
+        "nbp":nbp,
+        "tnbp":tnbp
+    };
+    Engine.SendRegisterGame(gameData);
+}

binaries/data/mods/public/gui/gamesetup/gamesetup_mp.xml

@@ -72 +72 @@
                 ]]></action>
             </object>
 
-            <object hidden="true"> <!-- TODO: restore this when the server name is actually used -->
+            <object name="hostServerNameWrapper" hidden="true">
             <object type="text" size="0 80 200 110" style="RightLabelText">
                 Server name:
             </object>

binaries/data/mods/public/gui/gamesetup/gamesetup.xml

@@ -248 +248 @@
             style="StoneButton"
             size="100%-164 100%-52 100%-24 100%-24"
             tooltip_style="onscreenToolTip"
-            tooltip="Return to the main menu."
         >
-            Main menu
             <action on="Press">
                 <![CDATA[
                     cancelSetup();
+                    if(isServerOnLobby()) Engine.SendUnregisterGame(g_ServerName);
                     Engine.PopGuiPage();
                 ]]>
             </action>

binaries/data/mods/public/gui/page_lobby.xml

@@ +1 @@
+<?xml version="1.0" encoding="utf-8"?>
+<page>
+  <include>common/setup.xml</include>
+  <include>common/styles.xml</include>
+  <include>common/sprite1.xml</include>
+
+<include>common/common_sprites.xml</include>
+<include>common/common_styles.xml</include>
+
+  <include>lobby/styles.xml</include>
+  <include>lobby/lobby.xml</include>
+</page>

binaries/data/mods/public/gui/lobby/styles.xml

@@ +1 @@
+<?xml version="1.0" encoding="utf-8"?>
+
+<styles>
+    <style name="ChatPanel"
+        buffer_zone="5"
+        font="serif-13"
+        scrollbar="true"
+        scrollbar_style="wheatScrollBar"
+        scroll_bottom="true"
+        textcolor="white"
+        textcolor_selected="gold"
+        text_align="left"
+        text_valign="center"
+    />
+
+    <style name="MapDescription"
+        buffer_zone="8"
+        font="serif-12"
+        scrollbar="true"
+        scrollbar_style="wheatScrollBar"
+        scroll_bottom="true"
+        textcolor="white"
+        text_align="left"
+        text_valign="top"
+    />
+
+    <style  name="SmallStoneDropDown"
+        dropdown_buffer="1"
+        font="serif-14"
+        textcolor="white"
+        text_align="center"
+        text_valign="center"
+
+        sprite="StoneButton"
+        sprite_over="StoneButtonOver"
+        sprite_pressed="StoneButtonGlow"
+
+        button_width="15"
+        sprite2="StoneArrowDn"
+        sprite2_pressed="StoneArrowDnOver"
+
+        buffer_zone="5"
+        dropdown_size="200"
+        sprite_list="BackgroundListBox"
+        sprite_selectarea="BackgroundSelectArea"
+        textcolor_selected="white"
+
+        scrollbar="true"
+        scrollbar_style="wheatScrollBar"
+    />
+
+</styles>

binaries/data/mods/public/gui/lobby/lobby.js

@@ +1 @@
+var g_ChatMessages = [];
+var g_Name = "unknown Bob";
+var g_GameList = {};
+
+////////////////////////////////////////////////////////////////////////////////////////////////
+var g_mapSizes = {};
+
+function init(attribs)
+{
+    if (attribs.name) g_Name = attribs.name;
+    else error("No name");
+
+    g_mapSizes = initMapSizes();
+    g_mapSizes.names.push("Any");
+    g_mapSizes.tiles.push("");
+
+    var mapSizeFilter = getGUIObjectByName("mapSizeFilter");
+    mapSizeFilter.list = g_mapSizes.names;
+    mapSizeFilter.list_data = g_mapSizes.tiles;
+
+    var playersNumberFilter = getGUIObjectByName("playersNumberFilter");
+    playersNumberFilter.list = [2,3,4,5,6,7,8,"Any"];
+    playersNumberFilter.list_data = [2,3,4,5,6,7,8,""];
+
+    var victoryConditionFilter = getGUIObjectByName("victoryConditionFilter");
+    victoryConditionFilter.list = ["Conquest","Any"];
+    victoryConditionFilter.list_data = ["conquest",""];
+}
+
+////////////////////////////////////////////////////////////////////////////////////////////////
+// Xmpp client connection management
+////////////////////////////////////////////////////////////////////////////////////////////////
+
+
+function lobbyStop()
+{
+    Engine.StopXmppClient();
+}
+
+function lobbyConnect()
+{
+    Engine.ConnectXmppClient();
+}
+
+function lobbyDisconnect()
+{
+    Engine.DisconnectXmppClient();
+}
+
+////////////////////////////////////////////////////////////////////////////////////////////////
+// Server requests functions
+////////////////////////////////////////////////////////////////////////////////////////////////
+
+function lobbyRefreshGameList()
+{
+    Engine.SendGetGameList();
+}
+
+////////////////////////////////////////////////////////////////////////////////////////////////
+// Update functions
+////////////////////////////////////////////////////////////////////////////////////////////////
+
+var g_mapSizeFilter = "";
+var g_playersNumberFilter = "";
+var g_victoryConditionFilter = "";
+var g_hideFullFilter = false;
+
+function resetFilters()
+{
+    g_mapSizeFilter = "";
+    g_playersNumberFilter = "";
+    g_victoryConditionFilter = "";
+    g_hideFullFilter = false;
+    getGUIObjectByName("mapSizeFilter").selected = -1;
+    getGUIObjectByName("playersNumberFilter").selected = -1;
+    getGUIObjectByName("victoryConditionFilter").selected = -1;
+    getGUIObjectByName("hideFullFilter").checked = false;
+}
+
+function setFilters()
+{
+    var mapSizeFilter = getGUIObjectByName("mapSizeFilter");
+    var playersNumberFilter = getGUIObjectByName("playersNumberFilter");
+    var victoryConditionFilter = getGUIObjectByName("victoryConditionFilter");
+    var hideFullFilter = getGUIObjectByName("hideFullFilter");
+
+    g_mapSizeFilter = mapSizeFilter.selected >= 0 ? mapSizeFilter.list_data[mapSizeFilter.selected] : "";
+    g_playersNumberFilter = playersNumberFilter.selected >=0 ? playersNumberFilter.list_data[playersNumberFilter.selected] : "";
+    g_victoryConditionFilter = victoryConditionFilter.selected >= 0 ? victoryConditionFilter.list_data[victoryConditionFilter.selected] : "";
+    g_hideFullFilter = hideFullFilter.checked ? true : false;
+}
+
+function displayGame(g)
+{
+    if(g_mapSizeFilter != "" && g.mapSize != g_mapSizeFilter) return false;
+    if(g_victoryConditionFilter != "" && g.victoryCondition != g_victoryConditionFilter) return false;
+    if(g_playersNumberFilter != "" && g.tnbp != g_playersNumberFilter) return false;
+    if(g_hideFullFilter && g.tnbp == g.nbp) return false;
+
+    return true;
+}
+
+function updateGameList()
+{
+    var gamesBox = getGUIObjectByName("gamesBox");
+    var gameList = Engine.GetGameList();
+    //Store the game whole game list data so that we can access it later
+    //to update the game info panel.
+    g_GameList = gameList;
+
+    var list_name = [];
+    var list_ip = [];
+    var list_mapName = [];
+    var list_mapSize = [];
+    var list_victoryCondition = [];
+    var list_nPlayers = [];
+    var list = [];
+    var list_data = [];
+
+    var c = 0;
+    for each (g in gameList)
+    {
+        if(displayGame(g))
+        {
+            list_name.push(toTitleCase(g.name));
+            list_ip.push(g.ip);
+            list_mapName.push(toTitleCase(g.mapName));
+            list_mapSize.push(tilesToMapSize(g.mapSize));
+            list_victoryCondition.push(toTitleCase(g.victoryCondition));
+            list_nPlayers.push(g.nbp + "/" +g.tnbp);
+            list.push(g.name);
+            list_data.push(c);
+        }
+        c++;
+    }
+
+    gamesBox.list_name = list_name;
+    gamesBox.list_ip = list_ip;
+    gamesBox.list_mapName = list_mapName;
+    gamesBox.list_mapSize = list_mapSize;
+    gamesBox.list_victoryCondition = list_victoryCondition;
+    gamesBox.list_nPlayers = list_nPlayers;
+    gamesBox.list = list;
+    gamesBox.list_data = list_data;
+
+    if (gamesBox.selected >= gamesBox.list_name.length)
+        gamesBox.selected = -1;
+}
+
+function updatePlayerList()
+{
+    var playersBox = getGUIObjectByName("playersBox")
+
+        var playerList = Engine.GetPlayerList();
+    var playerListNames = [ player.name for each (player in playerList) ];
+
+    playersBox.list = playerListNames;
+    if (playersBox.selected >= playersBox.list.length)
+        playersBox.selected = -1;
+}
+
+function selectGame(selected)
+{
+    if(selected == -1)
+    {
+        // Hide the game info panel if not game is selected
+        getGUIObjectByName("gameInfo").hidden = true;
+        getGUIObjectByName("gameInfoEmpty").hidden = false;
+        return;
+    }
+
+    // Show the game info panel if a game is selected
+    getGUIObjectByName("gameInfo").hidden = false;
+    getGUIObjectByName("gameInfoEmpty").hidden = true;
+
+    //Get the selected map's name
+    var gamesBox = getGUIObjectByName("gamesBox");
+    var g = gamesBox.list_data[selected];
+    var name = g_GameList[g].mapName;
+    getGUIObjectByName("sgMapName").caption = toTitleCase(name);
+
+    var mapData = null;
+
+    //Search the selectep map in the scenarios
+    var mapFiles = getXMLFileList("maps/scenarios/");
+    for (var i = 0; i < mapFiles.length; ++i)
+    {
+        var file = mapFiles[i];
+        if(name == file)
+        {
+            mapData = Engine.LoadMapSettings("maps/scenarios/"+file);
+            break;
+        }
+    }
+
+    //Search the selectep map in the scenarios
+    if(!mapData)
+    {
+        var mapFiles = getJSONFileList("maps/random/");
+        for (var i = 0; i < mapFiles.length; ++i)
+        {
+            var file = mapFiles[i];
+            if(name == file)
+            {
+                mapData = parseJSONData("maps/random/"+file+".json");
+            }
+        }
+    }
+
+    if(!mapData)
+    {
+        log("Map '"+ name +"'  not found");
+    }
+
+    // Load the description from the map file, if there is one, and display it
+    var mapSettings = (mapData && mapData.settings ? deepcopy(mapData.settings) : {});
+    var description = mapSettings.Description || "Sorry, no description available.";
+    getGUIObjectByName("sgMapDescription").caption = description;
+
+    // Set the number of players, the map size and the victory condition text boxes
+    getGUIObjectByName("sgNbPlayers").caption = g_GameList[g].nbp + "/" + g_GameList[g].tnbp;
+    getGUIObjectByName("sgMapSize").caption = tilesToMapSize(g_GameList[g].mapSize);
+    getGUIObjectByName("sgVictoryCondition").caption = toTitleCase(g_GameList[g].victoryCondition);
+
+}
+
+function joinSelectedGame()
+{
+    var gamesBox = getGUIObjectByName("gamesBox");
+    if (gamesBox.selected >= 0)
+    {
+        var g = gamesBox.list_data[gamesBox.selected];
+        var sname = g_Name;
+        var sip = g_GameList[g].ip;
+        // Open Multiplayer connection window with join option.
+        Engine.PushGuiPage("page_gamesetup_mp.xml", { multiplayerGameType: "join", source: "lobby", name: sname, ip: sip });    
+    }
+}
+
+////////////////////////////////////////////////////////////////////////////////////////////////
+// Utils
+////////////////////////////////////////////////////////////////////////////////////////////////
+function tilesToMapSize(tiles)
+{
+    var s = g_mapSizes.tiles.indexOf(Number(tiles));
+    return s != -1 ? g_mapSizes.names[s].split(" ")[0] : "?";
+}
+
+function twoDigits(n)
+{
+    return n < 10 ? "0" + n : n;
+}
+
+////////////////////////////////////////////////////////////////////////////////////////////////
+// GUI event handlers
+////////////////////////////////////////////////////////////////////////////////////////////////
+
+function onTick()
+{
+    //Wake up XmppClient
+    Engine.RecvXmppClient();
+
+    //Receive messages
+    while (true)
+    {
+        var message = Engine.LobbyGuiPollMessage();
+        if (!message)
+            break;
+        switch (message.type)
+        {
+            case "mucmessage":
+                addChatMessage({ "from": message.from, "text": message.text , "color": "50 50 50"});
+                break;
+            case "system":
+                switch (message.level)
+                {
+                    case "standard":
+                        addChatMessage({ "from": "system", "text": message.text, "color": "0 150 0" });
+                        break;
+                    case "error":
+                        addChatMessage({ "from": "system", "text": message.text, "color": "150 0 0" });
+                        if (message.text == "disconnected")
+                        {
+                                updateGameList();
+                                updatePlayerList();
+                        }
+                        break;
+                    case "internal":
+                        switch (message.text)
+                        {
+                            case "gamelist updated":
+                                updateGameList();
+                                var t = new Date(Date.now());
+                                var time = twoDigits(t.getUTCHours())+":"+twoDigits(t.getUTCMinutes())+":"+twoDigits(t.getUTCSeconds());
+                                getGUIObjectByName("updateStatusText").caption = "Updated at " + time;
+                                break;
+                            case "playerlist updated":
+                                updatePlayerList();
+                                break;
+                        }
+                        break
+                }
+                break;
+            default:
+                error("Unrecognised message type "+message.type);
+        }
+    }
+}
+
+/* Messages */
+function submitChatInput()
+{
+    var input = getGUIObjectByName("chatInput");
+    var text = input.caption;
+    if (text.length)
+    {
+        Engine.LobbySendMessage(text);
+        input.caption = "";
+    }
+}
+
+function handleMessage(message)
+{
+
+}
+
+function pp(txt)
+{
+    addChatMessage({"from":"debug", "color":"200 0 0", "text":txt});
+}
+
+function addChatMessage(msg)
+{
+    var from = escapeText(msg.from);
+    var text = escapeText(msg.text);
+    var color = msg.color;
+
+    var formatted = '[font="serif-bold-13"]<[color="'+ color +'"]' + from + '[/color]>[/font] ' + text;
+    g_ChatMessages.push(formatted);
+    getGUIObjectByName("chatText").caption = g_ChatMessages.join("\n");
+}

binaries/data/mods/public/gui/lobby/lobby.xml

@@ +1 @@
+<?xml version="1.0" encoding="utf-8"?>
+
+<objects>
+  <script file="gui/lobby/lobby.js"/>
+
+  <script file="gui/common/functions_global_object.js"/>
+  <script file="gui/common/functions_utility.js"/>
+
+  <object type="image" style="StoneWindow" size="0 0 100% 100%" name="lobbyWindow">
+
+    <object style="TitleText" type="text" size="50%-128 0%+4 50%+128 36">
+      Multiplayer Lobby
+    </object>
+
+    <action on="Tick">
+      onTick();
+    </action>
+
+    <object size="25 50 100%-25 0%+400">
+      <object name="gameInfoEmpty" size="0 0 340 100%-10" type="image" sprite="BackgroundIndentFillDark" hidden="false">
+        <object size="50%-110 50%-50 50%+110 50%+50" type="image" sprite="productLogo"/>
+      </object>
+      <object name="gameInfo" size="0 0 340 100%-10" type="image" sprite="BackgroundIndentFillDark" hidden="true">
+        <object name="sgMapName" size="170 10 100%-10 30" type="text" style="TitleText"/>
+        <object name="sgMapPicture" size="10 10 160 160" type="image" sprite="BackgroundIndentFillDark"/>
+
+    <!-- First Column -->
+    <object size="170 40 250 160">
+      <!-- Number of Players-->
+      <object size="0 0 100% 32">
+        <object size="0 0 100% 100%" type="text" style="LeftLabelText">Players:</object>
+      </object>
+
+      <object size="0 32 100% 64">
+        <object size="0 0 100% 100%" type="text" style="LeftLabelText">Map size:</object>
+      </object>
+
+      <object size="0 64 100% 96">
+        <object size="0 0 100% 100%" type="text" style="LeftLabelText">Victory:</object>
+      </object>
+    </object>
+
+    <!-- Second Column -->
+    <object size="250 40 100%-10 160">
+      <!-- Number of Players-->
+      <object size="0 0 100% 32">
+        <object name="sgNbPlayers" size="0 0 100% 100%" type="text" style="LeftLabelText"/>
+      </object>
+
+      <object size="0 32 100% 64">
+        <object name="sgMapSize" size="0 0 100% 100%" type="text" style="LeftLabelText"/>
+      </object>
+
+      <object size="0 64 100% 96">
+        <object name="sgVictoryCondition" size="0 0 100% 100%" type="text" style="LeftLabelText"/>
+      </object>
+    </object>
+
+    <object type="image" sprite="BackgroundIndentFillDark" size="10 170 100%-10 100%-40">
+      <object name="sgMapDescription" type="text" style="MapDescription" size="0 0 100% 100%"/>
+    </object>
+
+        <object type="button" style="StoneButton" size="100%-100 100%-30 100%-10 100%-10">
+          Join
+          <action on="Press">
+       <![CDATA[
+             joinSelectedGame();
+            ]]>
+          </action>
+        </object>
+
+      </object>
+
+      <object name="gamesBox"
+        style="StoneList"
+        type="olist"
+        size="350 0 100% 100%-50"
+        tooltip_style="pgFloatingToolTip"
+        sprite_heading="colour:0 0 0 255"
+        textcolor="210 100 0 255">
+        <action on="SelectionChange"> selectGame(this.selected);</action>
+        <def id="name" heading="Name" color="0 60 0" width="200"/>
+        <def id="ip" heading="IP" color="0 128 128" width="170"/>
+        <def id="mapName" heading="Map name" color="128 128 128" width="150"/>
+        <def id="mapSize" heading="Map size" color="128 128 128" width="120"/>
+        <def id="victoryCondition" heading="Victory condition" color="0 128 128" width="140"/>
+        <def id="nPlayers" heading="Players" color="0 128 128" width="30"/>
+      </object>
+
+      <object name="filterPanel" size="380 100%-140 870 100%-10" type="image" sprite="BackgroundIndentFillDark" hidden="true">
+        <object type="text" size="10 10 110 30" text_align="left" textcolor="white">Map size :</object>
+        <object name="mapSizeFilter"
+          type="dropdown"
+          style="SmallStoneDropDown"
+          size="120 10 310 30">
+        <action on="SelectionChange"><!--selectMapSize(this.list_data[this.selected]);--></action>
+        </object>
+
+        <object type="text" size="10 40 150 60" text_align="left" textcolor="white">Number of players :</object>
+        <object name="playersNumberFilter"
+          type="dropdown"
+          style="SmallStoneDropDown"
+          size="160 40 310 60">
+        <action on="SelectionChange"></action>
+        </object>
+
+        <object type="text" size="10 70 150 90" text_align="left" textcolor="white">Victory condition :</object>
+        <object name="victoryConditionFilter"
+          type="dropdown"
+          style="SmallStoneDropDown"
+          size="160 70 310 90">
+        <action on="SelectionChange"></action>
+        </object>
+
+        <object type="text" size="10 100 150 120" text_align="left" textcolor="white">Hide full games :</object>
+        <object name="hideFullFilter"
+          type="checkbox"
+          style="StoneCrossBox"
+          size="160 105 310 120">
+        <action on="SelectionChange"></action>
+        </object>
+
+        <object type="button" style="StoneButton" size="100%-230 100%-30 100%-130 100%-10">
+          Reset
+          <action on="Press"> <![CDATA[resetFilters();updateGameList();]]></action>
+        </object>
+
+        <object type="button" style="StoneButton" size="100%-110 100%-30 100%-10 100%-10">
+          Filter
+          <action on="Press"> <![CDATA[setFilters();updateGameList();]]></action>
+        </object>
+
+      </object>
+
+      <object name="gamesBar" size="350 100%-40 100% 100%">
+        <object type="button" style="StoneButton" size="0 0 20 20">
+          >>
+          <action on="Press"><![CDATA[
+          if(this.caption == ">>")
+          {
+            this.caption = "<<";
+            getGUIObjectByName("filterPanel").hidden = false;
+            getGUIObjectByName("gamesBox").size="350 0 100% 100%-150";
+          }
+          else 
+          {
+            this.caption = ">>";
+            getGUIObjectByName("filterPanel").hidden = true;
+            getGUIObjectByName("gamesBox").size="350 0 100% 100%-50";
+          }
+          ]]>
+          </action>
+        </object>
+
+    <object name="updateStatusText" size="100%-440 0 100%-240 20" type="text" style="RightLabelText"/>
+
+        <object type="button" style="StoneButton" size="100%-220 0 100%-120 20">
+          Update
+          <action on="Press"> lobbyRefreshGameList();</action>
+        </object>
+
+        <object type="button" style="StoneButton" size="100%-100 0 100% 20">
+          Host Game
+          <action on="Press">
+        <![CDATA[
+            var sname = g_Name;
+            // Open Multiplayer connection window with host option.
+            Engine.PushGuiPage("page_gamesetup_mp.xml", { multiplayerGameType: "host", source: "lobby", name: sname });
+        ]]>
+      </action>
+        </object>
+
+      </object>
+    </object>
+
+    <object size="25 0%+400 100%-25 100%-25">
+      <object name="playersBox"
+        style="StoneList"
+        type="list"
+        size="100%-200 0 100% 100%-40"
+        tooltip_style="pgFloatingToolTip"
+        tooltip="Players.">
+      </object>
+
+      <object name="chatPanel" size="0 0 100%-220 100%-10" type="image" sprite="BackgroundIndentFillDark">
+        <object name="chatText" size="3 1 100%-1 100%-25" type="text" style="ChatPanel"/>
+        <object name="chatInput" size="2 100%-23 100%-66 100%-3" type="input" style="StoneInput">
+          <action on="Press">submitChatInput();</action>
+        </object>
+
+        <object size="100%-65 100%-25 100%-1 100%" type="button" style="StoneButton">
+          Send
+          <action on="Press">submitChatInput();</action>
+        </object>
+      </object>
+    </object>
+
+      <object name="navBar" size="20 25 100%-20 45">
+        <object type="button" style="StoneButton" size="100%-340 0 100%-240 20">
+          Connect
+          <action on="Press">lobbyConnect();</action>
+        </object>
+
+        <object type="button" style="StoneButton" size="100%-220 0 100%-120 20">
+          Disconnect
+          <action on="Press">lobbyDisconnect();</action>
+        </object>
+
+        <object type="button" style="StoneButton" size="100%-100 0 100% 20">
+          Main Menu
+          <action on="Press">
+          <![CDATA[
+          lobbyStop();
+          Engine.PopGuiPage();
+          ]]>
+          </action>
+        </object>
+      </object>
+
+  </object>
+</objects>

binaries/data/mods/public/gui/lobby/prelobby.js

@@ +1 @@
+var g_LobbyIsConnecting = false;
+var g_InitialUsername = "";
+var g_InitialPassword = "";
+
+function init()
+{
+    g_InitialUsername = Engine.GetDefaultLobbyPlayerUsername();
+    g_InitialPassword = Engine.GetDefaultLobbyPlayerPassword();
+}
+
+function lobbyStop()
+{
+    getGUIObjectByName("connectFeedback").caption = "";
+    getGUIObjectByName("registerFeedback").caption = "";
+
+    if (g_LobbyIsConnecting == false)
+        return;
+
+    g_LobbyIsConnecting = false;
+    Engine.StopXmppClient();
+}
+
+function lobbyStart()
+{
+    if (g_LobbyIsConnecting != false)
+        return;
+
+    var username = getGUIObjectByName("connectUsername").caption;
+    var password = getGUIObjectByName("connectPassword").caption;
+    var playername = getGUIObjectByName("joinPlayerName").caption;
+    var feedback = getGUIObjectByName("connectFeedback");
+
+    if (!username || !password)
+    {
+        feedback.caption = "Username or password empty";
+    }
+    else
+    {
+        feedback.caption = "Connecting..";
+        Engine.StartXmppClient(username, password, "arena", playername);
+        g_LobbyIsConnecting=true;
+        Engine.ConnectXmppClient();
+    }
+}
+
+function lobbyStartRegister()
+{
+    if (g_LobbyIsConnecting != false)
+        return;
+
+    var account = getGUIObjectByName("registerUsername").caption;
+    var password = getGUIObjectByName("registerPassword").caption;
+    var passwordAgain = getGUIObjectByName("registerPasswordAgain").caption;
+    var feedback = getGUIObjectByName("registerFeedback");
+
+    if (!account || !password || !passwordAgain)
+    {
+        feedback.caption = "Account name or password empty";
+    }
+    else if (password != passwordAgain)
+    {
+        feedback.caption = "Password mismatch";
+        getGUIObjectByName("registerPassword").caption = "";
+        getGUIObjectByName("registerPasswordAgain").caption = "";
+    }
+    else
+    {
+        feedback.caption = "Registering..";
+        Engine.StartRegisterXmppClient(
+                account,
+                password);
+        g_LobbyIsConnecting=true;
+        Engine.ConnectXmppClient();
+    }
+}
+
+function onTick()
+{
+    if (!g_LobbyIsConnecting)
+    {
+        // The Xmpp Client has not been created
+    }
+    else
+    {
+        // The XmppClient has been created, we are waiting
+        // to be connected or to receive an error.
+
+        //Wake up XmppClient
+        Engine.RecvXmppClient();
+
+        //Receive messages
+        while (true)
+        {
+            var message = Engine.LobbyGuiPollMessage();
+            if (!message)
+                break;
+
+            if (message.type == "system" && message.text == "connected")
+            {
+                // We are connected, switch to the lobby page
+                Engine.PopGuiPage();
+                var sname = getGUIObjectByName("joinPlayerName").caption;
+                Engine.PushGuiPage("page_lobby.xml", { name: sname } );
+
+                var username = getGUIObjectByName("connectUsername").caption;
+                var password = getGUIObjectByName("connectPassword").caption;
+                // Store latest username and password if they changed
+                if(username != g_InitialUsername || password != g_InitialPassword)
+                {
+                    Engine.SetDefaultLobbyPlayerPair(username, password);
+                }
+
+                return;
+            }
+            else if (message.type == "system" && message.text == "registered")
+            {
+                // Great, we are registered. Switch to the connection window.
+                getGUIObjectByName("registerFeedback").caption = message.text;
+                getGUIObjectByName("connectFeedback").caption = message.text;
+                Engine.StopXmppClient();
+                g_LobbyIsConnecting = false;
+                getGUIObjectByName("connectUsername").caption = getGUIObjectByName("registerUsername").caption;
+                getGUIObjectByName("pageRegister").hidden = true;
+                getGUIObjectByName("pageConnect").hidden = false;
+            }
+            else if(message.type == "system" && message.level == "error")
+            {
+                getGUIObjectByName("connectFeedback").caption = message.text;
+                getGUIObjectByName("registerFeedback").caption = message.text;
+                Engine.StopXmppClient();
+                g_LobbyIsConnecting = false;
+            }
+        }
+    }
+}

binaries/data/mods/public/gui/lobby/prelobby.xml

@@ +1 @@
+<?xml version="1.0" encoding="utf-8"?>
+
+<objects>
+  <script file="gui/lobby/prelobby.js"/>
+
+  <script file="gui/common/functions_global_object.js"/>
+  <script file="gui/common/functions_utility.js"/>
+
+  <object name="dialog" type="image" style="StoneDialog" size="50%-190 50%-140 50%+190 50%+140">
+
+    <action on="Tick">
+      onTick();
+    </action>
+  
+    <object name="pageConnecting" hidden="true">
+      <object name="connectionStatus" type="text" text_align="center" size="0 100 100% 120">
+        [Connection status]
+      </object>
+    </object>
+
+    <object style="TitleText" type="text" size="50%-128 0%-16 50%+128 16">
+      Multiplayer Lobby
+    </object>
+
+    <object name="pageConnect" size="0 32 100% 100%">
+      <object type="text" style="CenteredLabelText" size="0 0 400 30">
+        Connect to the game lobby.
+      </object>
+      <object type="text" size="0 40 200 70" style="RightLabelText">
+        Player name:
+      </object>
+      <object name="joinPlayerName" type="input" size="210 40 100%-32 64" style="StoneInput">
+        <action on="Load"><![CDATA[
+          this.caption = Engine.GetDefaultPlayerName();
+        ]]></action>
+      </object>
+      <object type="text" size="0 80 200 110" style="RightLabelText">
+        0ad xmpp id:
+      </object>
+      <object name="connectUsername" type="input" size="210 80 100%-32 104" style="StoneInput">
+        <action on="Load"><![CDATA[
+          this.caption = Engine.GetDefaultLobbyPlayerUsername();
+        ]]></action>
+      </object>
+      <object type="text" size="0 120 200 150" style="RightLabelText">
+        Password:
+      </object>
+      <object name="connectPassword" type="input" size="210 120 100%-32 144" style="StoneInput">
+        <action on="Load"><![CDATA[
+          this.caption = Engine.GetDefaultLobbyPlayerPassword();
+        ]]></action>
+      </object>
+      <object name="connectFeedback" type="text" style="CenteredLabelText" size="32 150 100%-32 180" textcolor="red"/>
+      <object type="button" size="32 100%-60 122 100%-32" style="StoneButton">
+        Cancel
+        <action on="Press"><![CDATA[
+          lobbyStop();
+          Engine.PopGuiPage();
+        ]]></action>
+      </object>
+      <object type="button" size="145 100%-60 235 100%-32" style="StoneButton">
+        Register
+        <action on="Press"><![CDATA[
+          lobbyStop();
+          getGUIObjectByName("pageConnect").hidden = true;
+          getGUIObjectByName("pageRegister").hidden = false;
+        ]]></action>
+      </object>
+      <object type="button" size="258 100%-60 100%-32 100%-32" style="StoneButton">
+        Connect
+        <action on="Press"><![CDATA[
+          lobbyStart();
+        ]]></action>
+      </object>
+    </object>
+
+    <object name="pageRegister" size="0 32 100% 100%" hidden="true">
+      <object type="text" style="CenteredLabelText" size="0 0 400 30">
+        Register to the game lobby.
+      </object>
+      <object type="text" size="0 40 200 70" style="RightLabelText">
+        Account name:
+      </object>
+      <object name="registerUsername" type="input" size="210 40 100%-32 64" style="StoneInput">
+      </object>
+      <object type="text" size="0 80 200 110" style="RightLabelText">
+        Password:
+      </object>
+      <object name="registerPassword" type="input" size="210 80 100%-32 104" style="StoneInput">
+      </object>
+      <object type="text" size="0 120 200 150" style="RightLabelText">
+        Password again:
+      </object>
+      <object name="registerPasswordAgain" type="input" size="210 120 100%-32 144" style="StoneInput">
+      </object>
+      <object name="registerFeedback" type="text" style="CenteredLabelText" size="32 150 100%-32 180" textcolor="red"/>
+      <object type="button" size="32 100%-60 122 100%-32" style="StoneButton">
+        Back
+        <action on="Press"><![CDATA[
+          lobbyStop();
+          getGUIObjectByName("pageRegister").hidden = true;
+          getGUIObjectByName("pageConnect").hidden = false;
+        ]]></action>
+      </object>
+      <object type="button" size="258 100%-60 100%-32 100%-32" style="StoneButton">
+        Register
+        <action on="Press"><![CDATA[
+          lobbyStartRegister()
+        ]]></action>
+      </object>
+    </object>
+
+  </object>
+
+</objects>

binaries/data/mods/public/gui/page_prelobby.xml

@@ +1 @@
+<?xml version="1.0" encoding="utf-8"?>
+<page>
+  <include>common/setup.xml</include>
+  <include>common/styles.xml</include>
+  <include>common/sprite1.xml</include>
+
+<include>common/common_sprites.xml</include>
+<include>common/common_styles.xml</include>
+
+  <include>gamesetup/styles.xml</include>
+  <include>summary/sprites.xml</include>
+  <include>lobby/prelobby.xml</include>
+</page>
+

binaries/data/config/default.cfg

@@ -241 +241 @@
 joystick.camera.rotate.y = 2
 joystick.camera.zoom.in = 5
 joystick.camera.zoom.out = 4
+
+; Multiplayer lobby preferences
+lobby.server = "localhost"
+lobby.xpartamupp = "xpartamupp"