lng.cpp

#include "..\deleaker\mem2.h"
#include "..\include\Lib_Clara.h" 
#include "..\include\Dir.h" 
#include "header\structs.h"
#include "header\lng.h"
#include "header\string.h"

extern wchar_t *items[];

char *getparam2(char *buf, char *mask, char end, int fsize);
void Lang_Initialize();
void Lang_Remove();
void char2unicode(wchar_t *ws, char const *s, int len);

int fsize=0;

wchar_t *lng[]={
  L"Âðåìÿ íà÷àëà",
  L"Âðåìÿ êîíöà",
  L"Ñîáûòèå", 
  L"Äíè", 
  L"Äàòà íà÷àëà", 
  L"Äàòà êîíöà",
  L"Íàçâàíèå",
  L"Íàïîìèíàíèÿ", 
  L"GPS",
  L"Ñîçäàòü",
  L"Ïîíåäåëüíèê",
  L"Âòîðíèê",
  L"Ñðåäà",
  L"×åòâåðã",
  L"Ïÿòíèöà",
  L"Ñóááîòà",
  L"Âîñêðåñåíèå",
  L"Ðàáî÷èå äíè",
  L"Âûõîäíûå",
  L"Âñå äíè",
  L"Äî íà÷àëà:",
  L"Ïîñëå íà÷àëà:",
  L"Äî êîíöà:",
  L"Ïîñëå êîíöà:", 
  L"Ìèíóòû",
  L"Òèï íàïîìèíàíèÿ",
  L"Ïî äíÿì",
  L"Äàòà",
  L"Òèï âðåìåíè",
  L"Îïð. âðåìÿ",
  L"Èíòåðâàë",
  L"Âûêë.",
  L"Âêë.",
  L"Âêë. (áåç çâóêà)",
  L"Îáû÷íûé",
  L"Ëþáàÿ êëàâèøà",
  L"Àâòîìàòè÷åñêè",
  L"Ïðè¸ì âñåõ",
  L"Èç ñïèñêà",
  L"Íåò",
  L"Âûáåðèòå ïðîôèëü",
  L"Âðåìÿ íà÷àëà ñîáûòèÿ",
  L"Âðåìÿ êîíöà ñîáûòèÿ (åñëè âûáðàí ðåæèì 'èíòåðâàë')",
  L"Äåéñòâèå, óñòàíîâëåííîå íà äàííîå âðåìÿ",
  L"Äíè âûïîëíåíèÿ ñîáûòèÿ (åñëè âûáðàí ðåæèì 'ïî äíÿì')",
  L"Äàòà íà÷àëà (åñëè âûáðàí ðåæèì 'äàòà')",
  L"Äàòà êîíöà (åñëè âûáðàí ðåæèì 'äàòà')",
  L"Íàçâàíèå ñîáûòèÿ, êîòîðîå áóäåò èñïîëüçîâàòüñÿ â íàïîìèíàíèÿõ, à òàêæå íà ðàáî÷åì ñòîëå ýëüôîì EvtDesk",
  L"Âðåìÿ íàïîìèíàíèé",
  L"GPS-ìåòêà. Èñïîëüçóåòñÿ çíà÷åíèå âèäà CID-LAC. Íàïðèìåð, '2028-4ABC'.",
  L"Êëîíîãåíåðàòîð",
  L"Äàííàÿ ôóíêöèÿ èñïîëüçóåòñÿ äëÿ 'êëîíèðîâàíèÿ' ñîáûòèÿ ÷åðåç îïðåäåë¸ííûå ïðîìåæóòêè âðåìåíè",
  L"Èíäèêàöèÿ",
  L"Öâåòíûå äèîäû",
  L"Îðàíæ. äèîä",
  L"Êðàñíûé äèîä",
  L"Âèáðàöèÿ",
  L"Çâóê",
  L"Ñåêóíäû",
  L"Ââåäèòå èíòåðâàë",
  L"Ââåäèòå ìàêñ.êîë-âî",
  L"Ñòàíäàðòíûå íàñòðîéêè",
  L"Âûáîð",
  L"Ãðîìêîñòü",
  L"Äíè",
  L"Äåéñòâèÿ",
  L"Ìóç.ôàéë",
  L"Òåêóùèé ñòàòóñ",
  L"Ìóç.ôàéë íå óñòàíîâëåí",
  L"Äàòà",
  L"Âðåìÿ",
  L"Ñîõðàíèòü",
  L"Íà êàðòó ïàìÿòè",
  L"Íà òåëåôîí",
  0,0,0
};


bool isbetween(int f, int f1, int f2)
{
  if (f>=f1 && f<=f2)return true;
  return false;
};

bool isNative(void *f)
{
  return isbetween((int)f, (int)&ELF_BEGIN, ((int)&ELF_BEGIN)+fsize);
};


int lng_load(wchar_t *path, wchar_t *name)
{
  Lang_Initialize();
  int res=1;
  int file;
  FSTAT fst;
  if (fstat(path,name,&fst)==0)
  {
    res=0;
    if ((file=_fopen(path,name,FSX_O_RDONLY,FSX_S_IREAD|FSX_S_IWRITE,0))>=0)
    {
      char * buf;
      char * param;
      buf=new char[fst.fsize+1];
      fread(file,buf,fst.fsize);
      int x=0;
      char endsymbol=';';
      
      while (1)
      {
        char pattern[128];
        sprintf(pattern,"lnged_%d)",x);
        if (param=getparam2(buf,pattern,endsymbol, fst.fsize))
        {
          
          if (lng[x])
          {
            if (!isNative(lng[x]))
            {
              delete(lng[x]);
            }
          }
          lng[x]=new wchar_t[strlen(param)+1];
          char2unicode(lng[x],param,strlen(param));
          delete(param);
        }
        else break;
        x++;
      }
      x=0;
      while (1)
      {
        char pattern[128];
        sprintf(pattern,"items_%d)",x);
        if (param=getparam2(buf,pattern,endsymbol, fst.fsize))
        {
          if (items[x])
          {
            
            if (!isNative(items[x]))
            {
              delete(items[x]);
            }
          }
          items[x]=new wchar_t[strlen(param)+1];
          char2unicode(items[x],param,strlen(param));
          delete(param);
        }
        else 
          goto L_away;
        x++;
      }
    L_away:
      ;
    }
    fclose(file);
  }
  return res;
};

void destroy_innative_lng()
{
  Lang_Remove();
  int x=0;
  while (1)
  {
    if (!items[x])break;
    if (!isNative(items[x]))
    {
      delete(items[x]);
    }
    x++;
  };
  x=0;
  while (1)
  {
    if (!lng[x])return;
    if (!isNative(lng[x]))
    {
      delete(lng[x]);
    }
    x++;
  };
};
extern wchar_t *extFolder;
extern wchar_t *intFolder;
wchar_t *checkfile(wchar_t *name)
{
  FSTAT fst;
  if (fstat(extFolder,name,&fst)==0)
  {
    return extFolder;
  }
  else if (fstat(intFolder,name,&fst)==0)
  {
    return intFolder;
  }
  return intFolder;
};

wchar_t *checkfile(wchar_t*);
char *fbuf=0;

void char2unicode(wchar_t *ws, char const *s, int len) 
{
  if (fbuf)
  {
    int c;
    char * buf=fbuf;
    while((c = *s++) && ((len--) > 0))   
    {
      if (c == 0x7E) c = 0x0A;
      if (fbuf) c = (buf[2 * c] << 8)  | buf[2 * c + 1];
      *ws++ = c;
  
    }
    *ws=0;
  }
  else
  {
    str2wstr(ws, s);
  }
};

void Lang_Initialize()
{
  // Îòêðûâàåì ëýíã è ÷èòàåì â FBUF
  fbuf=0;
  int file;
  FSTAT fst;
  if(fstat(checkfile(L"encoding.bin"), L"encoding.bin", &fst) == 0)
  {
    if( ((file = _fopen(checkfile(L"encoding.bin"), L"encoding.bin", FSX_O_RDONLY, FSX_S_IREAD|FSX_S_IWRITE, 0)) >= 0) && fst.fsize == 512 )
    {
      fbuf = new char[512];
      fread(file, fbuf, 512);
    }
    fclose(file);
  }
};

void Lang_Remove()
{
  if (fbuf)
  {
    delete(fbuf);
    fbuf=0;
  }
};