#include <swilib.h>
#include "lang.h"
#include "string_util.h"
#include "rect_patcher.h"
#include "moods.h"
#include "main.h"
#include "jabber_util.h"

#define moods_items 62
extern char My_Mood_Presence;
extern const char PATH_TO_PIC[128];
char PATH_TO_MOODS[256];
int moodt_pos;
char *smood;

const char *moods_texts[moods_items] = 
{
  LG_M_EMPTY,
  LG_M_AFRAID,
  LG_M_AMAZED,
  LG_M_ANGRY,
  LG_M_ANNOYED,
  LG_M_ANXIOUS,
  LG_M_AROUSED,
  LG_M_ASHAMED,
  LG_M_BORED,
  LG_M_BRAVE,
  LG_M_CALM,
  LG_M_COLD,
  LG_M_CONFUSED,
  LG_M_CONTENTED,
  LG_M_CRANKY,
  LG_M_CURIOUS,
  LG_M_DEPRESSED,
  LG_M_DISAPPOINTED,
  LG_M_DISGUSTED,
  LG_M_DISTRACTED,
  LG_M_EMBARRASSED,
  LG_M_EXCITED,
  LG_M_FLIRTATIOUS,
  LG_M_FRUSTRATED,
  LG_M_GRUMPY,
  LG_M_GUILTY,
  LG_M_HAPPY,
  LG_M_HOT,
  LG_M_HUMBLED,
  LG_M_HUMILIATED,
  LG_M_HUNGRY,
  LG_M_HURT,
  LG_M_IMPRESSED,
  LG_M_IN_AWE,
  LG_M_IN_LOVE,
  LG_M_INDIGNANT,
  LG_M_INTERESTED,
  LG_M_INTOXICATED,
  LG_M_INVINCIBLE,
  LG_M_JEALOUS,
  LG_M_LONELY,
  LG_M_MEAN,
  LG_M_MOODY,
  LG_M_NERVOUS,
  LG_M_NEUTRAL,
  LG_M_OFFENDED,
  LG_M_PLAYFUL,
  LG_M_PROUD,
  LG_M_RELIEVED,
  LG_M_REMORSEFUL,
  LG_M_RESTLESS,
  LG_M_SAD,
  LG_M_SARCASTIC,
  LG_M_SERIOUS,
  LG_M_SHOCKED,
  LG_M_SHY,
  LG_M_SICK,
  LG_M_SLEEPY,
  LG_M_STRESSED,
  LG_M_SURPRISED,
  LG_M_THIRSTY,
  LG_M_WORRIED
};

char *moods[moods_items] = 
{
  "EMPTY",
  "afraid",
  "amazed",
  "angry",
  "annoyed",
  "anxious",
  "aroused",
  "ashamed",
  "bored",
  "brave",
  "calm",
  "cold",
  "confused",
  "contented",
  "cranky",
  "curious",
  "depressed",
  "disappointed",
  "disgusted",
  "distracted",
  "embarrassed",
  "excited",
  "flirtatious",
  "frustrated",
  "grumpy",
  "guilty",
  "happy",
  "hot",
  "humbled",
  "humiliated",
  "hungry",
  "hurt",
  "impressed",
  "in_awe",
  "in_love",
  "indignant",
  "interested",
  "intoxicated",
  "invincible",
  "jealous",
  "lonely",
  "mean",
  "moody",
  "nervous",
  "neutral",
  "offended",
  "playful",
  "proud",
  "relieved",
  "remorseful",
  "restless",
  "sad",
  "sarcastic",
  "serious",
  "shocked",
  "shy",
  "sick",
  "sleepy",
  "stressed",
  "surprised",
  "thirsty",
  "worried"
};

void moodt_locret(void) {};

int moodt_onkey(GUI *gui, GUI_MSG *msg)
{
  if (msg->gbsmsg->msg == KEY_DOWN)
  {
    if ((msg->gbsmsg->submess == GREEN_BUTTON) || (msg->keys == 0x0018))
    {
      EDITCONTROL ec;
      char *s = malloc(256);
      int len;
      ExtractEditControl(gui, moodt_pos, &ec);
      ws_2utf8(ec.pWS, s, &len, 256);
      SUBPROC((void *)Send_Mood, smood, s);
      return 1;
    }
  }
  return 0;
}

void moodt_ghook(GUI *gui, int cmd)
{
  if (cmd == TI_CMD_REDRAW)
  {
    static SOFTKEY_DESC sk = {0x0018, 0x0000, (int)LG_OK};
#ifdef NEWSGOLD
    SetSoftKey(gui, &sk, 0);
#else
    SetSoftKey(gui, &sk, 1);
#endif
  }
}

SOFTKEY_DESC moodt_sk[]=
{
  {0x0018,0x0000,(int)LG_OK},
  {0x0001,0x0000,(int)LG_CLOSE},
  {0x003D,0x0000,(int)LGP_DOIT_PIC}
};

SOFTKEYSTAB moodt_skt=
{
  moodt_sk,0
};

HEADER_DESC moodt_hdr={0,0,0,0,NULL,(int)LG_MOOD_TEXT,LGP_NULL};

INPUTDIA_DESC moodt_desc=
{
  1,
  moodt_onkey,
  moodt_ghook,
  (void *)moodt_locret,
  0,
  &moodt_skt,
  {0,0,0,0},
  4,
  100,
  101,
  0,
  0,
  0x40000000
};

void ShowMoodTextDialog(char *mood)
{
  if (mood=="EMPTY")
  {
    smood=NULL;
    SUBPROC((void *)Send_Mood, NULL, NULL);
    return;
  } else smood = mood;
  
  WSHDR *ws = AllocWS(256);
  EDITCONTROL ec;
  void *ma=malloc_adr();
  void *eq=AllocEQueue(ma,mfree_adr());
  
  extern const char empty_t[];

  wsprintf(ws, empty_t);
  PrepareEditControl(&ec);
  ConstructEditControl(&ec, ECT_NORMAL_TEXT, ECF_APPEND_EOL, ws, 256);
  moodt_pos = AddEditControlToEditQend(eq,&ec,ma);
  FreeWS(ws);
  patch_header(&moodt_hdr);
  patch_input(&moodt_desc);
  CreateInputTextDialog(&moodt_desc,&moodt_hdr,eq,1,NULL);
}

static int moodsmenu_keyhook(void *data, GUI_MSG *msg)
{
  if ((msg->keys==0x18)||(msg->keys==0x3D))
  {
    My_Mood_Presence = GetCurMenuItem(data);
    ShowMoodTextDialog(moods[My_Mood_Presence]);
    return 1;
  }
  return 0;
}

int moods_icons[moods_items];

void moodsmenu_ghook(void *data, int cmd)
{
  if (cmd==TI_CMD_FOCUS)
  {
    DisableIDLETMR();
  }
  if (cmd==TI_CMD_CREATE)
  {
    SetCursorToMenuItem(data,My_Mood_Presence);
  }
  if (cmd==TI_CMD_DESTROY)
  {
  for (int i = 0; i < moods_items; i++)
   {
    mfree((void*)moods_icons[i]);
   }
  }
}

int moodsmenusoftkeys[]={0,1,2};

static const SOFTKEY_DESC moodsmenu_sk[]=
{
  {0x0018,0x0000,(int)LG_SELECT},
  {0x0001,0x0000,(int)LG_BACK},
  {0x003D,0x0000,(int)LGP_DOIT_PIC}
};

static const SOFTKEYSTAB moodsmenu_skt=
{
  moodsmenu_sk,0
};

void moodsmenuitemhandler(void *data, int curitem, void *unk)
{
  WSHDR *ws;
  void *item=AllocMenuItem(data);
  ws=AllocMenuWS(data,strlen(moods_texts[curitem]));
  ascii2ws(ws, moods_texts[curitem]);
  SetMenuItemIconArray(data, item, moods_icons + curitem);
  SetMenuItemText(data, item, ws, curitem);
}

static const MENU_DESC moods_menu=
{
  8,
  moodsmenu_keyhook,
  moodsmenu_ghook,
  NULL,
  moodsmenusoftkeys,
  &moodsmenu_skt,
  0x11,
  moodsmenuitemhandler,
  NULL,
  NULL,
  moods_items
};

HEADER_DESC moods_menuhdr={0,0,131,21,NULL,(int)LG_MOODS,LGP_NULL};

void Show_Moods_Menu()
{
  sprintf(PATH_TO_MOODS, "%smoods\\", PATH_TO_PIC);
  for (int i = 0; i < moods_items; i++)
  {
    char *text = malloc(256);
    sprintf(text, "%s%s.png", PATH_TO_MOODS, moods[i]);
    moods_icons[i] = (int)text;
  }
  patch_header(&moods_menuhdr);
  moods_menuhdr.icon = &moods_icons[My_Mood_Presence];
  CreateMenu(0,0,&moods_menu,&moods_menuhdr,0,moods_items,0,0);
}
// EOL,EOF