// rc2wxr.cpp: implementation of the rc2wxr class.

//

//////////////////////////////////////////////////////////////////////

//Author:  Brian Gavin 9/24/00

//License: wxWindows License

/*

WARNING- I know this code has some bugs to work out but

I don't plan to fix them since I feel that wxr files will

not be used much longer.

This code was used as a starting point for my rc2xml converter

*/

#ifdef __GNUG__

#pragma implementation "rc2wxr.cpp"

#pragma interface "rc2wxr.cpp"

#endif



// For compilers that support precompilation, includes "wx/wx.h".

#include "wx/wxprec.h"



#ifdef __BORLANDC__

#pragma hdrstop

#endif



// for all others, include the necessary headers (this file is usually all you

// need because it includes almost all "standard" wxWindows headers

#ifndef WX_PRECOMP

#include <wx/wx.h>

#endif





#include "rc2wxr.h"

#include "wx/image.h"

#include "wx/resource.h"

//////////////////////////////////////////////////////////////////////

// Construction/Destruction

//////////////////////////////////////////////////////////////////////



rc2wxr::rc2wxr()

{

m_done=FALSE;

m_controlid=6000;

}



rc2wxr::~rc2wxr()

{



}



void rc2wxr::Convert(wxString wxrfile, wxString rcfile)

{

m_rc.Open(rcfile);

m_filesize=m_rc.Length();

if( (m_wxr  = fopen( wxrfile, "wt" )) == NULL )

{

  return;

}





wxString tok,prevtok;





while (!m_done)

{



tok=GetToken();



if (tok=="DIALOG")

{

ParseDialog(prevtok);

}

	



if (tok=="MENU")

{

ParseMenu(prevtok);

}	



prevtok=tok;

}



fclose(m_wxr);

//fclose(m_rc);  

m_rc.Close();



}





/*

Example .rc 

Microsoft style as of v5.0

IDD_ABOUTBOX DIALOG DISCARDABLE  0, 0, 217, 55

STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU

CAPTION "About Funimator"

FONT 8, "MS Sans Serif"



  Borland 4.5 style rc

IDD_DIBATTR DIALOG 7, 16, 172, 119

STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU

CAPTION "DIB Attributes"

FONT 8, "MS Sans Serif"

{

 DEFPUSHBUTTON "Ok", IDOK, 114, 8, 50, 14

 PUSHBUTTON "Cancel", IDCANCEL, 114, 28, 50, 14







*/

void rc2wxr::ParseDialog(wxString dlgname)

{

wxString tok;

static int dlgid=999;

dlgid++;

/* Make sure that this really is a dialog 

microsoft reuses the keyword DIALOG for other things

*/

tok=PeekToken();

//Microsoft notation?

if (tok=="DISCARDABLE")

{

tok=GetToken();

tok=PeekToken();

}

//This isn't a Dialog resource eject eject

if (!tok.IsNumber())

    return;

//Generate Dialog text

fprintf(m_wxr,"static char *dialog%i = \"dialog(name = '%s',\\\n",dlgid,dlgname);

//be lazy about style for now. add it later

fprintf(m_wxr,"style = 'wxRAISED_BORDER | wxCAPTION | wxTHICK_FRAME | wxSYSTEM_MENU',\\\n");



fprintf(m_wxr,"id = %i,\\\n",dlgid);



//Record x,y,width,height

int x,y,width,height;

ReadRect(x,y,width,height);

fprintf(m_wxr,"x = %i, y = %i, width = %i, height = %i,\\\n",x,y,width,height);





//CAPTION "About Funimator"

//Get Title

tok=GetToken();

wxString title;



while ((tok!="BEGIN")&(tok!="{"))

{

if (tok=="CAPTION")

{

title=GetQuoteField();

fprintf(m_wxr,"title = '%s',\\\n",title);

}

tok=GetToken();

}

fprintf(m_wxr,"use_dialog_units = 1,\\\n");

fprintf(m_wxr,"use_system_defaults = 0,\\\n");



fprintf(m_wxr,"font = [8, 'wxSWISS', 'wxNORMAL', 'wxNORMAL', 0, 'MS Sans Serif'],\\\n");

ParseControls();

fprintf(m_wxr,").\";\n\n");

}



/*

BEGIN







    EDITTEXT        IDC_BANDS,36,83,22,14,ES_AUTOHSCROLL | ES_NUMBER | NOT 

                    WS_TABSTOP

    LTEXT           "Bands",IDC_STATIC,11,86,21,8

    EDITTEXT        IDC_NAME,10,3,75,14,ES_AUTOHSCROLL

END

*/

void rc2wxr::ParseControls()

{

wxString tok;



tok=GetToken();

while ((tok!="END")&(tok!="}"))

{

if (tok=="LTEXT")

    ParseStaticText();

if (tok=="EDITTEXT")

    ParseTextCtrl();

if (tok=="PUSHBUTTON")

    ParsePushButton();

if (tok=="DEFPUSHBUTTON")

    ParsePushButton();

if (tok=="GROUPBOX")

    ParseGroupBox();

if (tok=="COMBOBOX")

    ParseComboBox();

if (tok=="CONTROL")

    ParseControlMS();



tok=GetToken();

}



}

//LTEXT           "Radius",IDC_STATIC,9,67,23,8

void rc2wxr::ParseStaticText()

{

wxString tok;

wxString phrase,varname;

phrase=GetQuoteField();

varname=GetToken();

m_controlid++;

int x,y,width,height;

ReadRect(x,y,width,height);

fprintf(m_wxr,"  control = [%i,wxStaticText,'%s','0','%s',",m_controlid,phrase,varname);

fprintf(m_wxr,"%i,%i,%i,%i,'',\\\n",x,y,width,height);

fprintf(m_wxr,"[8, 'wxSWISS', 'wxNORMAL', 'wxNORMAL', 0, 'MS Sans Serif']],\\\n");

}

//EDITTEXT        IDC_RADIUS,36,65,40,14,ES_AUTOHSCROLL

void rc2wxr::ParseTextCtrl()

{

wxString tok;

wxString varname;

varname=GetToken();

m_controlid++;

int x,y,width,height;

ReadRect(x,y,width,height);

fprintf(m_wxr,"  control = [%i,wxTextCtrl,'','0','%s',",m_controlid,varname);

fprintf(m_wxr,"%i,%i,%i,%i,'',\\\n",x,y,width,height);

fprintf(m_wxr,"[8, 'wxSWISS', 'wxNORMAL', 'wxNORMAL', 0, 'MS Sans Serif']],\\\n");



}

//PUSHBUTTON      "Create/Update",IDC_CREATE,15,25,53,13,NOT WS_TABSTOP

void rc2wxr::ParsePushButton()

{

wxString tok;

wxString phrase,varname;

phrase=GetQuoteField();

varname=GetToken();

int c;

m_controlid++;

c=m_controlid;

if (varname=="IDOK")

c=wxID_OK;



if (varname=="IDCANCEL")

c=wxID_CANCEL;



if (varname=="IDAPPLY")

c=wxID_APPLY;



int x,y,width,height;

ReadRect(x,y,width,height);

fprintf(m_wxr,"  control = [%i,wxButton,'%s','0','%s',",c,phrase,varname);

fprintf(m_wxr,"%i,%i,%i,%i,'',\\\n",x,y,width,height);

fprintf(m_wxr,"[8, 'wxSWISS', 'wxNORMAL', 'wxNORMAL', 0, 'MS Sans Serif']],\\\n");



}





bool rc2wxr::Seperator(int ch)

{

if ((ch==' ')|(ch==',')|(ch==13)|(ch==10)|(ch=='|'))

   return TRUE;



if (ch==EOF)

{

m_done=TRUE;

return TRUE;

}

return FALSE;

}



void rc2wxr::ParseGroupBox()

{

//    GROUPBOX        "Rotate",IDC_STATIC,1,1,71,79

wxString tok;

wxString phrase,varname;

phrase=GetQuoteField();

varname=GetToken();

m_controlid++;

int x,y,width,height;

ReadRect(x,y,width,height);

fprintf(m_wxr,"  control = [%i,wxStaticBox,'%s','0','%s',",m_controlid,phrase,varname);

fprintf(m_wxr,"%i,%i,%i,%i,'',\\\n",x,y,width,height);

fprintf(m_wxr,"[8, 'wxSWISS', 'wxNORMAL', 'wxNORMAL', 0, 'MS Sans Serif']],\\\n");





}



void rc2wxr::ReadRect(int & x, int & y, int & width, int & height)

{

x=atoi(GetToken());

y=atoi(GetToken());

width=atoi(GetToken());

height=atoi(GetToken());



}



wxString rc2wxr::GetToken()

{

wxString tok="";



if (m_rc.Eof())

{

m_done=TRUE;

return tok;

}



int ch=0;

ReadChar(ch);

if (ch==EOF)

{

m_done=TRUE;

return tok;

}



while (Seperator(ch))

{

  ReadChar(ch);

  if (m_done)

  return tok;

}



if (ch==EOF)

{

m_done=TRUE;



}

  



while (!Seperator(ch))

{

tok+=(char)ch;

ReadChar(ch);



}



if (ch==EOF)

   m_done=TRUE;





return tok;

}



wxString rc2wxr::GetQuoteField()

{

wxString phrase;

//ASCII code 34 "

int ch=0;

ReadChar(ch);



while (ch!=34)

  ReadChar(ch);

  

  ReadChar(ch);



while (ch!=34)

{

  phrase+=(char)ch;

  ReadChar(ch);

}

return phrase;

}



void rc2wxr::ReadChar(int &ch)

{

	int result;

result=m_rc.Tell();



if((result>=m_filesize))

    m_done=TRUE;



result=m_rc.Read(&ch,1);



if((result==-1))

   m_done=TRUE;



if(ch==EOF)

   m_done=TRUE;

}



void rc2wxr::ParseComboBox()

{

/* COMBOBOX        IDC_SCALECOMBO,10,110,48,52,CBS_DROPDOWNLIST | CBS_SORT | 

                    WS_VSCROLL | WS_TABSTOP */

wxString tok;

wxString varname;

varname=GetToken();

m_controlid++;

int x,y,width,height;

ReadRect(x,y,width,height);



fprintf(m_wxr,"  control = [%i,wxChoice,'','0','%s',",m_controlid,varname);

fprintf(m_wxr,"%i,%i,%i,%i,[],\\\n",x,y,width,height);

fprintf(m_wxr,"[8, 'wxSWISS', 'wxNORMAL', 'wxNORMAL', 0, 'MS Sans Serif']],\\\n");





}



void rc2wxr::ParseMenu(wxString name)

{

wxString tok="";

static int menuid=0;

menuid++;

fprintf(m_wxr,"static char *MenuBar%i = \"menu(name = '%s',\\\n",menuid,name);  

fprintf(m_wxr,"menu = \\\n");

fprintf(m_wxr,"[\\\n");



while ((tok!="BEGIN")&(tok!="{"))

   tok=GetToken();



while ((tok!="END")&(tok!="}"))

{

   tok=GetToken();

if (tok=="POPUP")

	{

    ParsePopupMenu();

	fprintf(m_wxr,"  ],\\\n");

	}

}



fprintf(m_wxr,"]).\";\n\n");

}



void rc2wxr::ParsePopupMenu()

{

static int menuitem=99;

menuitem++;



wxString tok;

tok=GetQuoteField();

int spot;

//Remove /t because it causes problems

spot=tok.First("\\t");

tok=tok.Left(spot);

fprintf(m_wxr,"  ['%s',%i,'',\\\n",tok,menuitem);

while ((tok!="BEGIN")&(tok!="{"))

   tok=GetToken();



while ((tok!="END")&(tok!="}"))

{

   tok=GetToken();

if (tok=="MENUITEM")

{

if (PeekToken()=="SEPARATOR")

fprintf(m_wxr,"      [],\\\n");

else

{

tok=GetQuoteField();

//Remove /t because it causes problems

spot=tok.First("\\t");

tok=tok.Left(spot);

menuitem++;

fprintf(m_wxr,"      ['%s',%i,''],\\\n",tok,menuitem);

}

}



}



    

}



wxString rc2wxr::PeekToken()

{

wxString tok;

int p;

p=m_rc.Tell();

tok=GetToken();



m_rc.Seek(p);

return tok;

}

//Windows pain in the butt CONTROL

void rc2wxr::ParseControlMS()

{

wxString label,varname,kindctrl,tok;

label=GetQuoteField();

varname=GetToken();

kindctrl=GetQuoteField();

kindctrl.MakeUpper();





if (kindctrl=="MSCTLS_TRACKBAR32")

   ParseSlider(label,varname);

if (kindctrl=="MSCTLS_PROGRESS32")

   ParseProgressBar(label,varname);

if (kindctrl=="BUTTON")

   ParseCtrlButton(label,varname);

}

/*    CONTROL         "Slider1",IDC_SLIDER1,"msctls_trackbar32",TBS_BOTH | 

                    TBS_NOTICKS | WS_TABSTOP,52,73,100,15

*/



void rc2wxr::ParseSlider(wxString label, wxString varname)

{

wxString tok;

while (ReadOrs(tok));

fprintf(m_wxr,"  control = [%i,wxSlider,'','wxSL_HORIZONTAL','%s',",m_controlid,varname);  

int x,y,width,height;

ReadRect(x,y,width,height);

fprintf(m_wxr,"%i,%i,%i,%i,",x,y,width,height);

fprintf(m_wxr," 1, 1, 10,\\\n");

fprintf(m_wxr,"[8, 'wxSWISS', 'wxNORMAL', 'wxNORMAL', 0, 'MS Sans Serif']],\\\n");

}

/*    

CONTROL         "Progress1",CG_IDC_PROGDLG_PROGRESS,"msctls_progress32",

                    WS_BORDER,15,52,154,13

*/

void rc2wxr::ParseProgressBar(wxString label, wxString varname)

{

wxString tok;

while (ReadOrs(tok));

fprintf(m_wxr,"  control = [%i,wxGauge,'','wxGA_HORIZONTAL','%s',",m_controlid,varname);  

int x,y,width,height;

ReadRect(x,y,width,height);

fprintf(m_wxr,"%i,%i,%i,%i,",x,y,width,height);

fprintf(m_wxr," 0, 10,\\\n");

fprintf(m_wxr,"[8, 'wxSWISS', 'wxNORMAL', 'wxNORMAL', 0, 'MS Sans Serif']],\\\n");

}



bool rc2wxr::ReadOrs(wxString & w)

{

wxString tok;

tok=PeekToken();

if (tok.IsNumber())

   return false;

w=GetToken();

return TRUE;

}



//Is it a check button or a radio button

void rc2wxr::ParseCtrlButton(wxString label, wxString varname)

{

wxString tok;

tok=GetToken();



m_controlid++;

int x,y,width,height;



if (tok=="BS_AUTOCHECKBOX")

{

    fprintf(m_wxr,"  control = [%i,wxCheckBox,'%s','0','%s',",m_controlid,label,varname);    

    while (ReadOrs(tok));	

    ReadRect(x,y,width,height);

    fprintf(m_wxr,"%i,%i,%i,%i,0,\\\n",x,y,width,height);

    fprintf(m_wxr,"[8, 'wxSWISS', 'wxNORMAL', 'wxNORMAL', 0, 'MS Sans Serif']],\\\n");

}



if (tok=="BS_AUTORADIOBUTTON")

{

    fprintf(m_wxr,"  control = [%i,wxRadioButton,'%s','0','%s',",m_controlid,label,varname);    

    while(ReadOrs(tok));	

    ReadRect(x,y,width,height);

    fprintf(m_wxr,"%i,%i,%i,%i,0,\\\n",x,y,width,height);

    fprintf(m_wxr,"[8, 'wxSWISS', 'wxNORMAL', 'wxNORMAL', 0, 'MS Sans Serif']],\\\n");

}







}