#include "..\..\inc\swilib.h"
//#include "..\..\inc\xtask_ipc.h"
#include "mainmenu.h"
#include "..\multisim_ipc.h"
//#include "..\inc\swilib.h"
#include "conf_loader.h"

extern void kill_data(void *p, void (*func_p)(void *));
extern const unsigned int onc_ena;
extern const unsigned int onc_sim;
extern const unsigned int onc_sim2;\
  int curblock=0;;
int maincsm;
int patchversion=0;

//unsigned char bp[1024];
     IPC_REQ gipc;

const int minus11=-11;

//__root int xxx=123;
//volatile static int yyy;
IPC_REQ gipc2;
 void SendRequest(int submess, void *data){
      gipc2.name_to=IPC_MSIM_NAME;
      gipc2.name_from=ELF_MSIM_NAME;
      gipc2.data=data;
      GBS_SendMessage(MMI_CEPID,MSG_IPC,submess,&gipc2);


}

 void ChangeSim( int num)
{
  SendRequest(IPC_MSIM_SWITCH,(void*)num);
//  RefreshGUI();

}


typedef struct
{
  CSM_RAM csm;
  int gui_id;
}MAIN_CSM;


inline void ReadConfig(){
  InitConfig();
}

extern int simnum;
extern int simcnt;
extern int WriteFile(char *, unsigned char *,int );
extern const char f5401s[];
extern const char f5402s[];
//char buf5401[0x30*20];
BLOCK5401 block5401[MAX_SIM_CNT];
void Get5401(void){
  simnum=0;
  EEFullReadBlock(5403,&simnum,0x2F,1,0,0);

  EEFullReadBlock(5401,&block5401,0,BL_SZ_5401,0,0);
  int i;
  for (i=0;i<20&&(block5401[i].SPN[1]!=0);i++);
  simcnt=i;
}

void maincsm_oncreate(CSM_RAM *data)
{
//  MAIN_GUI *main_gui=malloc(sizeof(MAIN_GUI));
  MAIN_CSM*csm=(MAIN_CSM*)data;
//  zeromem(main_gui,sizeof(MAIN_GUI));
  /*
  main_gui->gui.canvas=(void *)(&Canvas);
  main_gui->gui.flag30=2;
  main_gui->gui.methods=(void *)gui_methods;
  main_gui->gui.item_ll.data_mfree=(void (*)(void *))mfree_adr();
 */
  csm->csm.state=0;
  csm->csm.unk1=0;
///  csm->gui_id=CreateGUI(main_gui);
//  csm->gui_id=    ShowMainMenu();
//  maincsm=
  Get5401();
            if (!onc_ena){
            csm->gui_id=    ShowMainMenu();
            RefreshGUI();
          }else{
            if (simnum==onc_sim)ChangeSim(onc_sim2);else
              ChangeSim(onc_sim);
          }
}

void ELF_KILLER(void)
{
  extern void *ELF_BEGIN;
  kill_data(&ELF_BEGIN,(void (*)(void *))mfree_adr());
}

void maincsm_onclose(CSM_RAM *csm)
{
  SUBPROC((void *)ELF_KILLER);
}



int maincsm_onmessage(CSM_RAM *data, GBS_MSG *msg)
{
  MAIN_CSM *csm=(MAIN_CSM*)data;
  if(msg->msg == MSG_RECONFIGURE_REQ)
  {
    extern const char *successed_config_filename;
    if (strcmp(successed_config_filename,(char *)msg->data0)==0)
//    if (strcmp_nocase(successed_config_filename,(char *)msg->data0)==0)
    {
      ShowMSG(1,(int)"MultisimElf config updated!");
      ReadConfig();
    }

  }

  if (msg->msg==MSG_IPC)
  {
    IPC_REQ *ipc;
    if ((ipc=(IPC_REQ*)msg->data0))
    {
      if (strcmp(ipc->name_from,IPC_MSIM_NAME)==0)
      {

	switch (msg->submess)
	{
	case IPC_MSIM_SWITCHED:
          if (onc_ena){
              CloseCSM(maincsm);
          }else
            GeneralFuncF1(1);
	  break;
	}

      }
    }
  }
  if ((msg->msg==MSG_GUI_DESTROYED)&&((int)msg->data0==csm->gui_id))
  {
    csm->csm.state=-3;
  }
  return(1);
}

unsigned short maincsm_name_body[140];

const struct
{
  CSM_DESC maincsm;
  WSHDR maincsm_name;
}MAINCSM =
{
  {
    maincsm_onmessage,
    maincsm_oncreate,
#ifdef NEWSGOLD
0,
0,
0,
0,
#endif
maincsm_onclose,
sizeof(MAIN_CSM),
1,
&minus11
  },
  {
    maincsm_name_body,
    NAMECSM_MAGIC1,
    NAMECSM_MAGIC2,
    0x0,
    139
  }
};

void UpdateCSMname(void)
{
  wsprintf((WSHDR *)(&MAINCSM.maincsm_name),ELF_MSIM_NAME);
}


void UpdateTesters(){
  unsigned char *block5401=(unsigned char*)malloc(0x50*20);
  EEFullCreateBlock(5403,BL_SZ_5403,1,0,0);
  EEFullReadBlock(5402,block5401,0,BL_SZ_5403,0,0);
  WriteFile("0:\\misc\\5402.bak",block5401,BL_SZ_5403);
  EEFullWriteBlock(5403,block5401,0,0x50,0,0);
  EEFullDeleteBlock(5402,0,0);

  EEFullCreateBlock(5402,BL_SZ_5402,1,0,0);
  EEFullReadBlock(5401,block5401,0,BL_SZ_5402,0,0);
  WriteFile("0:\\misc\\5401.bak",block5401,BL_SZ_5402);
  EEFullWriteBlock(5402,block5401,0,BL_SZ_5402,0,0);
  EEFullDeleteBlock(5401,0,0);

  EEFullCreateBlock(5401,BL_SZ_5401,1,0,0);
  EEFullReadBlock(5400,block5401,0,BL_SZ_5401,0,0);
  WriteFile("0:\\misc\\5400.bak",block5401,BL_SZ_5401);
  EEFullWriteBlock(5401,block5401,0,BL_SZ_5401,0,0);
  EEFullDeleteBlock(5400,0,0);

  ShowMSG(1,(int)"Block 5400-5402 moved. Update patch to new version") ;
  mfree(block5401);
  SwitchPhoneOff();
};

void UpdateFromOld() {
 unsigned char *block5400=(unsigned char*)malloc(1024);
 unsigned char *block5401=(unsigned char*)malloc(0x50*20);

 EEFullReadBlock(5400, block5400, 0, 1024, 0, 0);
 memset(block5401, 0, 0x50*20);
 memcpy(block5401+0x21, "Physical", 8);

 for (int i=0; i<10; i++) {
  memcpy(block5401+0x30*(i+1),      block5400+0x50*i,      0x0C);//imsi
  memcpy(block5401+0x30*(i+1)+0x10, block5400+0x50*i+0x10, 0x10);//ki
  memcpy(block5401+0x30*(i+1)+0x20, block5400+0x50*i+0x20, 0x10);//name
 }
 EEFullCreateBlock(5401, 0x30*20, 1, 0, 0);
 EEFullWriteBlock(5401, block5401, 0, 0x30*20, 0, 0);//5401 done!


 for (int i=0; i<20; i++) {//prepare 5402
  memset(block5401+0x50*i,      0xFF, 0x2F);
  memset(block5401+0x50*i+0x30, 0x00, 0x20);
  block5401[0x50*i+0x2F]=(unsigned char)i;
 }

 //physical sim data
 memcpy(block5401,      block5400+0x340, 0x10);//loci
 memcpy(block5401+0x4C, block5400+0x331, 0x04);//profiles

 for (int i=0; i<10; i++) {
  memcpy(block5401+0x50*(i+1),      block5400+0x50*i+0x40, 0x10);//loci
  memcpy(block5401+0x50*(i+1)+0x30, block5400+0x50*i+0x30, 0x10);//smsc
  memcpy(block5401+0x50*(i+1)+0x4C, block5400+0x50*i+0x0C, 0x04);//profiles
 }

 EEFullCreateBlock(5402, 0x50*20, 1, 0, 0);
 EEFullWriteBlock(5402, block5401, 0, 0x50*20, 0, 0);

 EEFullCreateBlock(5403, 0x50, 1, 0, 0);
 EEFullWriteBlock(5403, block5401, 0, 0x50, 0, 0);

 EEFullDeleteBlock(5400, 0, 0);

 ShowMSG(1,(int)"Block 5401-5403 created. Update patch to new version");
 mfree(block5400);
 mfree(block5401);
 SwitchPhoneOff();
};

extern int ReadFile(char *name);
extern unsigned char bp[BL_SZ_5402];
//todo
void CreateBlocksFromFiles(){

  if (ReadFile("0:\\misc\\5401.txt")==BL_SZ_5401){
    EEFullCreateBlock(5401,BL_SZ_5401,1,0,0);
    EEFullWriteBlock(5401, bp, 0, BL_SZ_5401,0,0);
     ShowMSG(1,(int)"Block 5401 created.") ;
  }
  if (ReadFile("0:\\misc\\5402.txt")==BL_SZ_5402){
    EEFullCreateBlock(5402,BL_SZ_5402,1,0,0);
    EEFullWriteBlock(5402, bp, 0, BL_SZ_5402,0,0);
     ShowMSG(1,(int)"Block 5402 created.") ;
  }
  if (ReadFile("0:\\misc\\5403.txt")==BL_SZ_5403){
    EEFullCreateBlock(5403,BL_SZ_5403,1,0,0);
    EEFullWriteBlock(5403, bp, 0, BL_SZ_5403,0,0);
     ShowMSG(1,(int)"Block 5403 created.") ;
  }

};

int main()
{
    int sz;
    char ver;
  patchversion=EEFullGetBlockInfo(5402,&sz,&ver);
  if (!patchversion&&ver==0){patchversion=1;// old beta testers
    UpdateTesters();
  }
  if (patchversion==2){//block not exist
    patchversion=EEFullGetBlockInfo(5400,&sz,&ver)+2;
    if(patchversion==2)UpdateFromOld();else
      CreateBlocksFromFiles();

  }
  if (patchversion)return 4;
    /*
      0-- good
      1-- // old beta testers
      2- block5400  present
      4- block5400 not present
  */

  ReadConfig();

  char dummy[sizeof(MAIN_CSM)];
  UpdateCSMname();
  LockSched();


  maincsm=CreateCSM(&MAINCSM.maincsm,dummy,0);

  UnlockSched();

  return 0;

}

//---------------------------------------------------------------------------
// Test menu
//---------------------------------------------------------------------------