/*==LICENSE==*

CyanWorlds.com Engine - MMOG client, server and tools
Copyright (C) 2011  Cyan Worlds, Inc.

This program 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 3 of the License, or
(at your option) any later version.

This program 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 this program.  If not, see <http://www.gnu.org/licenses/>.

You can contact Cyan Worlds, Inc. by email legal@cyan.com
 or by snail mail at:
      Cyan Worlds, Inc.
      14617 N Newport Hwy
      Mead, WA   99021

*==LICENSE==*/
#include "pyVarSyncGame.h"

#include <Python.h>
#include "../../pyEnum.h"

///////////////////////////////////////////////////////////////////////////////
//
// Base VarSync game client class
//

PYTHON_CLASS_DEFINITION(ptVarSyncGame, pyVarSyncGame);

PYTHON_DEFAULT_NEW_DEFINITION(ptVarSyncGame, pyVarSyncGame)
PYTHON_DEFAULT_DEALLOC_DEFINITION(ptVarSyncGame)

PYTHON_NO_INIT_DEFINITION(ptVarSyncGame)

PYTHON_GLOBAL_METHOD_DEFINITION(PtIsVarSyncGame, args, "Params: typeID\nReturns true if the specifed typeID (guid as a string) is a VarSync game")
{
    PyObject* textObj;
    if (!PyArg_ParseTuple(args, "O", &textObj))
    {
        PyErr_SetString(PyExc_TypeError, "PtIsVarSyncGame expects a unicode string");
        PYTHON_RETURN_ERROR;
    }
    if (PyUnicode_Check(textObj))
    {
        int strLen = PyUnicode_GetSize(textObj);
        wchar_t* text = TRACKED_NEW wchar_t[strLen + 1];
        PyUnicode_AsWideChar((PyUnicodeObject*)textObj, text, strLen);
        text[strLen] = L'\0';
        bool retVal = pyVarSyncGame::IsVarSyncGame(text);
        delete [] text;
        PYTHON_RETURN_BOOL(retVal);
    }
    else if (PyString_Check(textObj))
    {
        // we'll allow this, just in case something goes weird
        char* text = PyString_AsString(textObj);
        wchar_t* wText = hsStringToWString(text);
        bool retVal = pyVarSyncGame::IsVarSyncGame(wText);
        delete [] wText;
        PYTHON_RETURN_BOOL(retVal);
    }
    else
    {
        PyErr_SetString(PyExc_TypeError, "PtIsVarSyncGame expects a unicode string");
        PYTHON_RETURN_ERROR;
    }
}

PYTHON_GLOBAL_METHOD_DEFINITION(PtJoinCommonVarSyncGame, args, "Params: callbackKey\nJoins the common VarSync game. If one doesn't exist, it creates it")
{
    PyObject* callbackObj = NULL;
    if (!PyArg_ParseTuple(args, "O", &callbackObj))
    {
        PyErr_SetString(PyExc_TypeError, "PtJoinCommonVarSyncGame expects a ptKey");
        PYTHON_RETURN_ERROR;
    }
    if (!pyKey::Check(callbackObj))
    {
        PyErr_SetString(PyExc_TypeError, "PtJoinCommonVarSyncGame expects a ptKey");
        PYTHON_RETURN_ERROR;
    }
    pyKey* key = pyKey::ConvertFrom(callbackObj);
    pyVarSyncGame::JoinCommonVarSyncGame(*key);
    PYTHON_RETURN_NONE;
}

PYTHON_METHOD_DEFINITION(ptVarSyncGame, setStringVar, args)
{
    unsigned long id;
    PyObject* valueObj = NULL;
    if (!PyArg_ParseTuple(args, "kO", &id, &valueObj))
    {
        PyErr_SetString(PyExc_TypeError, "setStringVar expects an unsigned long and a string");
        PYTHON_RETURN_ERROR;
    }

    if (PyUnicode_Check(valueObj))
    {
        int strLen = PyUnicode_GetSize(valueObj);
        wchar_t* text = TRACKED_NEW wchar_t[strLen + 1];
        PyUnicode_AsWideChar((PyUnicodeObject*)valueObj, text, strLen);
        text[strLen] = L'\0';
        self->fThis->SetStringVar(id, text);
        delete [] text;
        PYTHON_RETURN_NONE;
    }
    else if (PyString_Check(valueObj))
    {
        // we'll allow this, just in case something goes weird
        char* text = PyString_AsString(valueObj);
        wchar_t* wText = hsStringToWString(text);
        self->fThis->SetStringVar(id, wText);
        delete [] wText;
        PYTHON_RETURN_NONE;
    }
    else
    {
        PyErr_SetString(PyExc_TypeError, "setStringVar expects an unsigned long and a string");
        PYTHON_RETURN_ERROR;
    }
}

PYTHON_METHOD_DEFINITION(ptVarSyncGame, setNumericVar, args)
{
    unsigned long id;
    PyObject* valueObj = NULL;
    if (!PyArg_ParseTuple(args, "kO", &id, &valueObj))
    {
        PyErr_SetString(PyExc_TypeError, "setNumericVar expects an unsigned long and a number");
        PYTHON_RETURN_ERROR;
    }

    double val = 0;
    if (PyFloat_Check(valueObj))
        val = PyFloat_AsDouble(valueObj);
    else if (PyInt_Check(valueObj))
        val = (double)PyInt_AsLong(valueObj);
    else if (PyLong_Check(valueObj))
        val = PyLong_AsDouble(valueObj);
    else
    {
        PyErr_SetString(PyExc_TypeError, "setNumericVar expects an unsigned long and a number");
        PYTHON_RETURN_ERROR;
    }

    self->fThis->SetNumericVar(id, val);
    PYTHON_RETURN_NONE;
}

PYTHON_BASIC_METHOD_DEFINITION(ptVarSyncGame, requestAllVars, RequestAllVars)

PYTHON_METHOD_DEFINITION(ptVarSyncGame, createStringVar, args)
{
    PyObject* varNameObj = NULL;
    PyObject* valueObj = NULL;
    if (!PyArg_ParseTuple(args, "OO", &varNameObj, &valueObj))
    {
        PyErr_SetString(PyExc_TypeError, "createStringVar expects two strings");
        PYTHON_RETURN_ERROR;
    }

    std::wstring varName = L"";
    if (PyUnicode_Check(varNameObj))
    {
        int strLen = PyUnicode_GetSize(varNameObj);
        wchar_t* text = TRACKED_NEW wchar_t[strLen + 1];
        PyUnicode_AsWideChar((PyUnicodeObject*)varNameObj, text, strLen);
        text[strLen] = L'\0';
        varName = text;
        delete [] text;
    }
    else if (PyString_Check(varNameObj))
    {
        // we'll allow this, just in case something goes weird
        char* text = PyString_AsString(varNameObj);
        wchar_t* wText = hsStringToWString(text);
        varName = wText;
        delete [] wText;
    }
    else
    {
        PyErr_SetString(PyExc_TypeError, "createStringVar expects two strings");
        PYTHON_RETURN_ERROR;
    }

    std::wstring val = L"";
    if (PyUnicode_Check(valueObj))
    {
        int strLen = PyUnicode_GetSize(valueObj);
        wchar_t* text = TRACKED_NEW wchar_t[strLen + 1];
        PyUnicode_AsWideChar((PyUnicodeObject*)valueObj, text, strLen);
        text[strLen] = L'\0';
        val = text;
        delete [] text;
    }
    else if (PyString_Check(valueObj))
    {
        // we'll allow this, just in case something goes weird
        char* text = PyString_AsString(valueObj);
        wchar_t* wText = hsStringToWString(text);
        val = wText;
        delete [] wText;
    }
    else
    {
        PyErr_SetString(PyExc_TypeError, "createStringVar expects two strings");
        PYTHON_RETURN_ERROR;
    }

    self->fThis->CreateStringVar(varName, val);
    PYTHON_RETURN_NONE;
}

PYTHON_METHOD_DEFINITION(ptVarSyncGame, createNumericVar, args)
{
    PyObject* varNameObj = NULL;
    PyObject* valueObj = NULL;
    if (!PyArg_ParseTuple(args, "OO", &varNameObj, &valueObj))
    {
        PyErr_SetString(PyExc_TypeError, "createNumericVar expects a string and a number");
        PYTHON_RETURN_ERROR;
    }

    std::wstring varName = L"";
    if (PyUnicode_Check(varNameObj))
    {
        int strLen = PyUnicode_GetSize(varNameObj);
        wchar_t* text = TRACKED_NEW wchar_t[strLen + 1];
        PyUnicode_AsWideChar((PyUnicodeObject*)varNameObj, text, strLen);
        text[strLen] = L'\0';
        varName = text;
        delete [] text;
    }
    else if (PyString_Check(varNameObj))
    {
        // we'll allow this, just in case something goes weird
        char* text = PyString_AsString(varNameObj);
        wchar_t* wText = hsStringToWString(text);
        varName = wText;
        delete [] wText;
    }
    else
    {
        PyErr_SetString(PyExc_TypeError, "createNumericVar expects a string and a number");
        PYTHON_RETURN_ERROR;
    }

    double val = 0;
    if (PyFloat_Check(valueObj))
        val = PyFloat_AsDouble(valueObj);
    else if (PyInt_Check(valueObj))
        val = (double)PyInt_AsLong(valueObj);
    else if (PyLong_Check(valueObj))
        val = PyLong_AsDouble(valueObj);
    else
    {
        PyErr_SetString(PyExc_TypeError, "createNumericVar expects a string and a number");
        PYTHON_RETURN_ERROR;
    }

    self->fThis->CreateNumericVar(varName, val);
    PYTHON_RETURN_NONE;
}

PYTHON_START_METHODS_TABLE(ptVarSyncGame)
    PYTHON_METHOD(ptVarSyncGame, setStringVar, "Params: varID, value\nAttempts to set a string variable to the specified string (clipped to 255 chars)"),
    PYTHON_METHOD(ptVarSyncGame, setNumericVar, "Params: varID, value\nAttempts to set a numeric variable to the specified number (clipped to double)"),
    PYTHON_BASIC_METHOD(ptVarSyncGame, requestAllVars, "Requests all the vars the server knows about"),
    PYTHON_METHOD(ptVarSyncGame, createStringVar, "Params: varName, value\nAttempts to create a new string variable and set it to the specified string (clipped to 255 chars)"),
    PYTHON_METHOD(ptVarSyncGame, createNumericVar, "Params: varName, value\nAttempts to create a new numeric variable and set it to the specified number (clipped to double)"),
PYTHON_END_METHODS_TABLE;

// Type structure definition
PLASMA_DEFAULT_TYPE_WBASE(ptVarSyncGame, pyGameCli, "Game client for the VarSync game");

// required functions for PyObject interoperability
PyObject* pyVarSyncGame::New(pfGameCli* client)
{
    ptVarSyncGame *newObj = (ptVarSyncGame*)ptVarSyncGame_type.tp_new(&ptVarSyncGame_type, NULL, NULL);
    if (client && (client->GetGameTypeId() == kGameTypeId_VarSync))
        newObj->fThis->gameClient = client;
    return (PyObject*)newObj;
}

PYTHON_CLASS_CHECK_IMPL(ptVarSyncGame, pyVarSyncGame)
PYTHON_CLASS_CONVERT_FROM_IMPL(ptVarSyncGame, pyVarSyncGame)

// Module and method definitions
void pyVarSyncGame::AddPlasmaClasses(PyObject* m)
{
    PYTHON_CLASS_IMPORT_START(m);
    PYTHON_CLASS_IMPORT(m, ptVarSyncGame);
    PYTHON_CLASS_IMPORT_END(m);
}

void pyVarSyncGame::AddPlasmaMethods(std::vector<PyMethodDef>& methods)
{
    PYTHON_GLOBAL_METHOD(methods, PtIsVarSyncGame);
    PYTHON_GLOBAL_METHOD(methods, PtJoinCommonVarSyncGame);
}