/*
 *    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 2 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, write to the Free Software
 *    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

/*
 *    Author : Boris Mikhailenko <stg34@stargazer.dp.ua>
 */

 /*
 $Revision: 1.18 $
 $Date: 2010/08/04 00:40:00 $
 $Author: faust $
 */

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <string>

#include "stg/common.h"
#include "stg/const.h"
#include "stg/servconf.h"

using namespace std;

//-----------------------------------------------------------------------------
//-----------------------------------------------------------------------------
//-----------------------------------------------------------------------------
PARSER_GET_USERS::PARSER_GET_USERS()
    : RecvUserDataCb(NULL),
      userDataCb(NULL),
      user(),
      depth(0),
      error(false)
{
}
//-----------------------------------------------------------------------------
int PARSER_GET_USERS::ParseStart(const char *el, const char **attr)
{
depth++;
if (depth == 1)
    {
    ParseUsers(el, attr);
    }

if (depth == 2)
    {
    ParseUser(el, attr);
    }

if (depth == 3)
    {
    ParseUserParams(el, attr);
    }
return 0;
}
//-----------------------------------------------------------------------------
void PARSER_GET_USERS::ParseEnd(const char *)
{
depth--;
if (depth == 1)
    {
    if (RecvUserDataCb)
        {
        RecvUserDataCb(&user, userDataCb);
        }
    }
}
//-----------------------------------------------------------------------------
void PARSER_GET_USERS::ParseUsers(const char * el, const char ** attr)
{
if (strcasecmp(el, "users") == 0)
    {
    if (*attr != NULL)
        return;
    return;
    }
}
//-----------------------------------------------------------------------------
void PARSER_GET_USERS::ParseUser(const char * el, const char ** attr)
{
if (el && attr[0])
    {
    if (strcasecmp(el, "user") != 0)
        {
        return;
        }

    if (strcasecmp(attr[0], "login") != 0)
        {
        return;
        }
    user.login = attr[1];
    }
}
//-----------------------------------------------------------------------------
void PARSER_GET_USERS::ParseUserParams(const char * el, const char ** attr)
{
if (strcasecmp(el, "cash") == 0)
    {
    if (strtodouble2(attr[1], user.cash) < 0)
        {
        return;
        }
    }

/*if (strcasecmp(el, "LastCash") == 0)
    {
    if (strtodouble2(attr[1], user.lastCash) < 0)
        {
        MessageDlg("Error in answer", mtError, TMsgDlgButtons() << mbOK, 0);
        return 0;
        }
    }*/

/*if (strcasecmp(el, "LastActivityTime") == 0)
    {
    if (strtol(attr[1], user.lastActivityTime) < 0)
        {
        MessageDlg("Error in answer", mtError, TMsgDlgButtons() << mbOK, 0);
        return 0;
        }
    }*/


/*if (strcasecmp(el, "LastTimeCash") == 0)
    {
    if (strtol(attr[1], user.lastTimeCash) < 0)
        {
        MessageDlg("Error in answer", mtError, TMsgDlgButtons() << mbOK, 0);
        return 0;
        }
    }*/

/*if (strcasecmp(el, "CashExpire") == 0)
    {
    if (strtol(attr[1], user.cashExpire) < 0)
        {
        MessageDlg("Error in answer", mtError, TMsgDlgButtons() << mbOK, 0);
        return 0;
        }
    }*/

if (strcasecmp(el, "credit") == 0)
    {
    if (strtodouble2(attr[1], user.credit) < 0)
        {
        return;
        }
    }

if (strcasecmp(el, "creditExpire") == 0)
    {
    if (str2x(attr[1], user.creditExpire) < 0)
        {
        return;
        }
    }

/*if (strcasecmp(el, "freemb") == 0)
    {
    if (strtodouble2(attr[1], user.freeMb) < 0)
        {
        MessageDlg("Error in answer", mtError, TMsgDlgButtons() << mbOK, 0);
        return 0;
        }
    }*/

if (strcasecmp(el, "down") == 0)
    {
    if (str2x(attr[1], user.down) < 0)
        {
        return;
        }
    }

if (strcasecmp(el, "passive") == 0)
    {
    if (str2x(attr[1], user.passive) < 0)
        {
        return;
        }
    }

if (strcasecmp(el, "disableDetailStat") == 0)
    {
    if (str2x(attr[1], user.disableDetailStat) < 0)
        {
        return;
        }
    }


if (strcasecmp(el, "status") == 0)
    {
    if (str2x(attr[1], user.connected) < 0)
        {
        return;
        }
    }

if (strcasecmp(el, "aonline") == 0)
    {
    if (str2x(attr[1], user.alwaysOnline) < 0)
        {
        return;
        }
    }

if (strcasecmp(el, "currip") == 0)
    {
    user.ip = inet_addr(attr[1]);
    }

if (strcasecmp(el, "ip") == 0)
    {
    user.ips = attr[1];
    }


if (strcasecmp(el, "tariff") == 0)
    {
    //KOIToWin(user.tariff, *(attr+1), TARIFF_LEN);
    user.tariff = attr[1];
    return;
    }

if (strcasecmp(el, "password") == 0)
    {
    user.password = *(attr+1);
    return;
    }

if (strcasecmp(el, "iface") == 0)
    {
    user.iface = attr[1];
    return;
    }

/*if (strcasecmp(el, "name") == 0)
    {
    / *char nameEnc[REALNM_LEN * 2 + 1];
    char name[REALNM_LEN];
    strncpy(nameEnc, attr[1], REALNM_LEN * 2 + 1);
    Decode21(name, nameEnc);
    KOIToWin(user.realName, name, REALNM_LEN);* /
    Decode21str(user.realName, attr[1]);
    return;
    }*/

if (strcasecmp(el, "address") == 0)
    {
    /*char addressEnc[ADDR_LEN * 2 + 1];
    char address[ADDR_LEN];
    strncpy(addressEnc, attr[1], ADDR_LEN * 2 + 1);
    Decode21(address, addressEnc);
    KOIToWin(user.address, address, ADDR_LEN);*/
    Decode21str(user.address, attr[1]);
    return;
    }

if (strcasecmp(el, "phone") == 0)
    {
    /*char phoneEnc[PHONE_LEN * 2 + 1];
    char phone[PHONE_LEN];
    strncpy(phoneEnc, attr[1], PHONE_LEN * 2 + 1);
    Decode21(phone, phoneEnc);
    KOIToWin(user.phone, phone, PHONE_LEN);*/
    Decode21str(user.phone, attr[1]);
    return;
    }

if (strcasecmp(el, "note") == 0)
    {
    /*char noteEnc[NOTE_LEN * 2 + 1];
    char note[NOTE_LEN];
    strncpy(noteEnc, attr[1], NOTE_LEN * 2 + 1);*/
    //KOIToWin(user.note, note, NOTE_LEN);
    //user.note = note;
    Decode21str(user.note, attr[1]);
    return;
    }

if (strcasecmp(el, "email") == 0)
    {
    /*char emailEnc[EMAIL_LEN * 2 + 1];
    char email[EMAIL_LEN];
    strncpy(emailEnc, attr[1], EMAIL_LEN * 2 + 1);
    Decode21(email, emailEnc);
    //KOIToWin(user.email, email, EMAIL_LEN);
    user.email = email;*/
    Decode21str(user.email, attr[1]);
    return;
    }

if (strcasecmp(el, "group") == 0)
    {
    /*char groupEnc[GROUP_LEN * 2 + 1];
    char group[GROUP_LEN];
    strncpy(groupEnc, attr[1], GROUP_LEN * 2 + 1);
    Decode21(group, groupEnc);
    //KOIToWin(user.group, group, GROUP_LEN);
    user.group = group;*/
    Decode21str(user.group, attr[1]);
    return;
    }

if (strcasecmp(el, "traff") == 0)
    {
    ParseUserLoadStat(el, attr);
    return;
    }

}
//-----------------------------------------------------------------------------
void PARSER_GET_USERS::ParseUserLoadStat(const char *, const char ** attr)
{
int i = 0;
char dir[6];
while (attr[i])
    {
    for (int j = 0; j < DIR_NUM; j++)
        {
        sprintf(dir, "MU%d", j);
        if (strcasecmp(dir, attr[i]) == 0)
            {
            str2x(attr[i+1], user.stat.mu[j]);
            break;
            }
        }
    for (int j = 0; j < DIR_NUM; j++)
        {
        sprintf(dir, "MD%d", j);
        if (strcasecmp(dir, attr[i]) == 0)
            {
            str2x(attr[i+1], user.stat.md[j]);
            break;
            }
        }
    for (int j = 0; j < DIR_NUM; j++)
        {
        sprintf(dir, "SU%d", j);
        if (strcasecmp(dir, attr[i]) == 0)
            {
            str2x(attr[i+1], user.stat.su[j]);
            break;
            }
        }
    for (int j = 0; j < DIR_NUM; j++)
        {
        sprintf(dir, "SD%d", j);
        if (strcasecmp(dir, attr[i]) == 0)
            {
            str2x(attr[i+1], user.stat.sd[j]);
            break;
            }
        }
    i+=2;
    }
return;
}
//-----------------------------------------------------------------------------
void PARSER_GET_USERS::SetUserDataRecvCb(RecvUserDataCb_t f, void * data)
{
RecvUserDataCb = f;
userDataCb = data;
}
//-----------------------------------------------------------------------------
//-----------------------------------------------------------------------------
//-----------------------------------------------------------------------------
PARSER_CHG_USER::PARSER_CHG_USER()
    : RecvChgUserCb(NULL),
      chgUserCbData(NULL),
      depth(0),
      error(false)
{
}
//-----------------------------------------------------------------------------
int PARSER_CHG_USER::ParseStart(const char *el, const char **attr)
{
depth++;
if (depth == 1)
    {
    if (strcasecmp(el, "SetUser") == 0)
        {
        ParseAnswer(el, attr);
        }
    else if (strcasecmp(el, "DelUser") == 0)
        {
        ParseAnswer(el, attr);
        }
    else if (strcasecmp(el, "AddUser") == 0)
        {
        ParseAnswer(el, attr);
        }
    }
return 0;
}
//-----------------------------------------------------------------------------
void PARSER_CHG_USER::ParseEnd(const char *)
{
depth--;
}
//-----------------------------------------------------------------------------
void PARSER_CHG_USER::ParseAnswer(const char *, const char **attr)
{
if (RecvChgUserCb)
    {
    RecvChgUserCb(attr[1], chgUserCbData);
    }
}
//-----------------------------------------------------------------------------
void PARSER_CHG_USER::SetChgUserRecvCb(RecvChgUserCb_t f, void * data)
{
RecvChgUserCb = f;
chgUserCbData = data;
}
//-----------------------------------------------------------------------------
//-----------------------------------------------------------------------------
//-----------------------------------------------------------------------------
PARSER_SEND_MESSAGE::PARSER_SEND_MESSAGE()
    : RecvSendMessageCb(NULL),
      sendMessageCbData(NULL),
      depth(0),
      error(false)
{
}
//-----------------------------------------------------------------------------
int  PARSER_SEND_MESSAGE::ParseStart(const char *el, const char **attr)
{
depth++;
if (depth == 1)
    {
    if (strcasecmp(el, "SendMessageResult") == 0)
        {
        ParseAnswer(el, attr);
        }
    }
return 0;
}
//-----------------------------------------------------------------------------
void PARSER_SEND_MESSAGE::ParseEnd(const char *)
{
depth--;
}
//-----------------------------------------------------------------------------
void PARSER_SEND_MESSAGE::ParseAnswer(const char *, const char **attr)
{
if (RecvSendMessageCb)
    RecvSendMessageCb(attr[1], sendMessageCbData);
}
//-----------------------------------------------------------------------------
void PARSER_SEND_MESSAGE::SetSendMessageRecvCb(RecvSendMessageCb_t f, void * data)
{
RecvSendMessageCb = f;
sendMessageCbData = data;
}
//-----------------------------------------------------------------------------