contrib/utils/convertrc/rc2xml.cpp

   1 // rc2xml.cpp: implementation of the rc2xml class.
   2 //Author:  Brian Gavin 9/24/00
   3 //License: wxWindows License
   4 /*
   5 How to use:
   6 #include "rc2xml.h"
   7 ...
   8 rc2xml trans;
   9 trans->Convert("Myfile.rc","Myfile.xml");
  10 */
  11 /* TODO
  12 1.  Figure how to fix memory leaks in all wxLists in this class
  13 2.  Find a way to rename MS Windows fonts so that they work
  14 cross platform (wxGTK,etc)
  15 3.  Be able to abort incorrectly formated files without crashing
  16 */
  17
  18 #ifdef __GNUG__
  19 #pragma implementation "rc2xml.cpp"
  20 #pragma interface "rc2xml.cpp"
  21 #endif
  22
  23 // For compilers that support precompilation, includes "wx/wx.h".
  24 #include "wx/wxprec.h"
  25
  26 #ifdef __BORLANDC__
  27 #pragma hdrstop
  28 #endif
  29
  30 // for all others, include the necessary headers (this file is usually all you
  31 // need because it includes almost all "standard" wxWindows headers
  32 #ifndef WX_PRECOMP
  33 #include <wx/wx.h>
  34 #endif
  35
  36
  37 #include "rc2xml.h"
  38 #include "wx/image.h"
  39 #include "wx/deprecated/setup.h"
  40 #include "wx/deprecated/resource.h"
  41 #include <wx/textfile.h>
  42 #include <wx/tokenzr.h>
  43
  44
  45
  46 //////////////////////////////////////////////////////////////////////
  47 // Construction/Destruction
  48 //////////////////////////////////////////////////////////////////////
  49
  50 rc2xml::rc2xml()
  51 {
  52     m_done=FALSE;
  53     m_bitmaplist=new wxList(wxKEY_STRING);
  54     m_stringtable=new wxList(wxKEY_STRING);
  55     m_iconlist = new wxList(wxKEY_STRING);
  56     m_resourcelist =new wxList(wxKEY_INTEGER);
  57 }
  58
  59 rc2xml::~rc2xml()
  60 {
  61     delete m_bitmaplist;
  62     delete m_stringtable;
  63     delete m_iconlist;
  64     delete m_resourcelist;
  65 }
  66
  67 bool rc2xml::Convert(wxString rcfile, wxString xmlfile)
  68 {
  69     m_rc.Open(rcfile.c_str());
  70     m_filesize=m_rc.Length();
  71
  72
  73     m_workingpath=wxPathOnly(rcfile);
  74
  75     m_targetpath=wxPathOnly(xmlfile) + _T("\\");
  76
  77
  78
  79     wxSetWorkingDirectory(m_workingpath);
  80
  81
  82     bool result;
  83     result=m_xmlfile.Open(xmlfile.c_str(),_T("w+t"));
  84     wxASSERT_MSG(result,_T("Couldn't create XML file"));
  85     if (!result)
  86         return FALSE;
  87
  88
  89 /* Write Basic header for XML file */
  90     m_xmlfile.Write(_T("<?xml version=\"1.0\" ?>\n"));
  91     m_xmlfile.Write(_T("<resource>\n"));
  92
  93 //Read resource.h
  94     ParseResourceHeader();
  95 //Gather all the resource we need for toolbars,menus, and etc
  96     FirstPass();
  97     m_done=FALSE;
  98     m_rc.Seek(0);
  99 //Read in dialogs, toolbars,menus
 100     SecondPass();
 101
 102     m_xmlfile.Write(_T("</resource>\n"));
 103     m_xmlfile.Close();
 104     m_rc.Close();
 105     wxMessageBox(_("Conversion complete."), _("Done"),
 106                             wxOK | wxICON_INFORMATION);
 107
 108 return TRUE;
 109 }
 110
 111
 112 void rc2xml::ParseDialog(wxString dlgname)
 113 {
 114     wxString token;
 115     static int dlgid=999;
 116     dlgid++;
 117 /* Make sure that this really is a dialog
 118 microsoft reuses the keyword DIALOG for other things
 119 */
 120     token=PeekToken();
 121 //Microsoft notation?
 122     while ((token==_T("DISCARDABLE"))
 123             ||(token==_T("LOADONCALL"))||(token==_T("MOVEABLE")))
 124     {
 125     token=GetToken();
 126     token=PeekToken();
 127     }
 128 //Error isn't a Dialog resource eject eject
 129     if (!token.IsNumber())
 130     return;
 131
 132 //Record x,y,width,height
 133     int x,y,width,height;
 134     ReadRect(x,y,width,height);
 135 //Get Title
 136     token=GetToken();
 137     wxString title;
 138     wxString ptsize,face;
 139
 140     m_xmlfile.Write(_T("\t<object class=\"wxDialog\""));
 141     //Avoid duplicate names this way
 142     dlgname.Replace(_T("IDD_"),_T("DLG_"));
 143     WriteBasicInfo(x,y,width,height,dlgname);
 144     WriteTitle(title);
 145
 146
 147     while ((token!=_T("BEGIN"))&(token!=_T("{")))
 148     {
 149     if (token==_T("CAPTION"))
 150         {
 151         title=GetQuoteField();
 152         }
 153
 154 //TODO fix face name so that it is cross platform name
 155 //  FONT 8, "MS Sans Serif"
 156     if (token==_T("FONT"))
 157         {
 158         ptsize=GetToken();
 159         face=GetQuoteField();
 160         m_xmlfile.Write(_T("\t\t<font>\n"));
 161         m_xmlfile.Write(_T("\t\t\t<size>")+ptsize+_T("</size>\n"));
 162         m_xmlfile.Write(_T("\t\t\t<face>")+face+_T("</face>\n"));
 163         m_xmlfile.Write(_T("\t\t</font>\n"));
 164         }
 165
 166     token=GetToken();
 167     }
 168
 169     ParseControls();
 170     m_xmlfile.Write(_T("\t</object>\n"));
 171 }
 172
 173 /*
 174 BEGIN
 175     EDITTEXT        IDC_BANDS,36,83,22,14,ES_AUTOHSCROLL | ES_NUMBER | NOT
 176                     WS_TABSTOP
 177     LTEXT           "Bands",IDC_STATIC,11,86,21,8
 178     EDITTEXT        IDC_NAME,10,3,75,14,ES_AUTOHSCROLL
 179 END
 180 */
 181 void rc2xml::ParseControls()
 182 {
 183     wxString token;
 184     wxString label,varname;
 185
 186     token=GetToken();
 187     while ((token!=_T("END"))&(token!=_T("}")))
 188         {
 189         if (token==_T("AUTOCHECKBOX"))
 190            {
 191             label=GetQuoteField();
 192             varname=GetToken();
 193             ParseCheckBox(label,varname);
 194             }
 195         else
 196         if (token==_T("AUTORADIOBUTTON"))
 197            {
 198             label=GetQuoteField();
 199             varname=GetToken();
 200             ParseRadioButton(label,varname);
 201            }
 202         else
 203         if (token==_T("LTEXT"))
 204            {
 205             label=GetQuoteField();
 206             varname=GetToken();
 207             ParseStaticText(label,varname);
 208             }
 209         else if (token==_T("EDITTEXT"))
 210            {
 211             varname=GetToken();
 212             ParseTextCtrl(varname);
 213             }
 214         else if ((token==_T("PUSHBUTTON"))||(token==_T("DEFPUSHBUTTON")))
 215            {
 216             label=GetQuoteField();
 217             varname=GetToken();
 218             ParsePushButton(label,varname);
 219             }
 220         else if (token==_T("GROUPBOX"))
 221            {
 222             label=GetQuoteField();
 223             varname=GetToken();
 224             ParseGroupBox(label,varname);
 225             }
 226         else if (token==_T("COMBOBOX"))
 227             {
 228             varname=GetToken();
 229             ParseComboBox(varname);
 230              }
 231         else if (token==_T("CONTROL"))
 232             ParseControlMS();
 233         else if (token==_T("LISTBOX"))
 234            {
 235             varname=GetToken();
 236             ParseListBox(varname);
 237             }
 238         else if (token==_T("ICON"))
 239             ParseIconStatic();
 240         else if (token==_T("SCROLLBAR"))
 241             ParseScrollBar();
 242         token=GetToken();
 243         }
 244
 245 }
 246 //LTEXT           "Radius",IDC_STATIC,9,67,23,8
 247 void rc2xml::ParseStaticText(wxString phrase, wxString varname)
 248 {
 249     wxString token;
 250     token=PeekToken();
 251     while (!token.IsNumber())
 252         {
 253         token=GetToken();
 254         token=PeekToken();
 255         }
 256     int x,y,width,height;
 257     ReadRect(x,y,width,height);
 258
 259     m_xmlfile.Write(_T("\t\t<object class=\"wxStaticText\""));
 260     WriteBasicInfo(x,y,width,height,varname);WriteLabel(phrase);
 261     m_xmlfile.Write(_T("\t\t</object>\n"));
 262
 263 }
 264 //EDITTEXT        IDC_RADIUS,36,65,40,14,ES_AUTOHSCROLL
 265 void rc2xml::ParseTextCtrl(wxString varname)
 266 {
 267     wxString token;
 268     wxString style;
 269     token=PeekToken();
 270     while (!token.IsNumber())
 271         {
 272         token=GetToken();
 273         token=PeekToken();
 274         }
 275     int x,y,width,height;
 276     ReadRect(x,y,width,height);
 277 //TODO
 278 //style=GetToken();
 279     m_xmlfile.Write(_T("\t\t<object class=\"wxTextCtrl\""));
 280     WriteBasicInfo(x,y,width,height,varname);
 281     m_xmlfile.Write(_T("\t\t</object>\n"));
 282
 283 }
 284 //AUTOCHECKBOX "&log.", ID_XLOG, 25, 24, 21, 12
 285 void rc2xml::ParseCheckBox(wxString phrase, wxString varname)
 286 {
 287     wxString token;
 288     token=PeekToken();
 289     while (!token.IsNumber())
 290         {
 291         token=GetToken();
 292         token=PeekToken();
 293         }
 294     int x,y,width,height;
 295     ReadRect(x,y,width,height);
 296
 297     m_xmlfile.Write(_T("\t\t<object class=\"wxCheckBox\""));
 298     WriteBasicInfo(x,y,width,height,varname);
 299     WriteLabel(phrase);
 300     m_xmlfile.Write(_T("\t\t</object>\n"));
 301
 302 }
 303 //AUTORADIOBUTTON "&text", ID_SW10, 13, 12, 68, 10, BS_AUTORADIOBUTTON | WS_GROUP
 304 void rc2xml::ParseRadioButton(wxString phrase, wxString varname)
 305 {
 306     wxString token,style;
 307     int x,y,width,height;
 308     bool GotOrs;
 309     GotOrs = ReadOrs(token);
 310     if (ReadRect(x,y,width,height))
 311         if (GotOrs==FALSE)
 312       ReadOrs(token);
 313     if (token.Find(_T("WS_GROUP")) != -1)
 314         style += _T("wxRB_GROUP");
 315
 316     m_xmlfile.Write(_T("\t\t<object class=\"wxRadioButton\""));
 317     WriteBasicInfo(x,y,width,height,varname);
 318     WriteLabel(phrase);
 319     WriteStyle(style);
 320     m_xmlfile.Write(_T("\t\t</object>\n"));
 321
 322 }
 323
 324 //PUSHBUTTON      "Create/Update",IDC_CREATE,15,25,53,13,NOT WS_TABSTOP
 325 void rc2xml::ParsePushButton(wxString phrase, wxString varname)
 326 {
 327     wxString token;
 328
 329     token=PeekToken();
 330     while (!token.IsNumber())
 331         {
 332         token=GetToken();
 333         token=PeekToken();
 334         }
 335     int x,y,width,height;
 336     ReadRect(x,y,width,height);
 337
 338     m_xmlfile.Write(_T("\t\t<object class=\"wxButton\""));
 339     WriteBasicInfo(x,y,width,height,varname);
 340     WriteLabel(phrase);
 341     m_xmlfile.Write(_T("\t\t</object>\n"));
 342
 343 }
 344
 345
 346 bool rc2xml::Seperator(int ch)
 347 {
 348 //if ((ch==' ')|(ch==',')|(ch==13)|(ch==10)|(ch=='|')|(ch=='\t'))
 349     if ((ch==' ')|(ch==',')|(ch==13)|(ch==10)|(ch=='\t'))
 350         return TRUE;
 351
 352     if (ch==EOF)
 353         {
 354         m_done=TRUE;
 355         return TRUE;
 356         }
 357
 358     return FALSE;
 359 }
 360
 361 void rc2xml::ParseGroupBox(wxString phrase, wxString varname)
 362 {
 363 //    GROUPBOX        "Rotate",IDC_STATIC,1,1,71,79
 364     wxString token;
 365     token=PeekToken();
 366     while (!token.IsNumber())
 367         {
 368         token=GetToken();
 369         token=PeekToken();
 370         }
 371     int x,y,width,height;
 372     ReadRect(x,y,width,height);
 373
 374     m_xmlfile.Write(_T("\t\t<object class=\"wxStaticBox\""));
 375     WriteBasicInfo(x,y,width,height,varname);
 376     WriteLabel(phrase);
 377     m_xmlfile.Write(_T("\t\t</object>\n"));
 378 }
 379
 380 bool rc2xml::ReadRect(int & x, int & y, int & width, int & height)
 381 {
 382     x=wxAtoi(GetToken());
 383     y=wxAtoi(GetToken());
 384     width=wxAtoi(GetToken());
 385     bool ret;
 386     wxString tmp = GetToken(&ret);
 387     height=wxAtoi(tmp);
 388     return ret; // check for more parameters
 389 }
 390
 391 wxString rc2xml::GetToken(bool *listseperator)
 392 {
 393     wxString token=wxEmptyString;
 394
 395     if (m_rc.Eof())
 396     {
 397     m_done=TRUE;
 398     return token;
 399 }
 400
 401     int ch=0;
 402     ReadChar(ch);
 403     if (ch==EOF)
 404     {
 405     m_done=TRUE;
 406     return token;
 407     }
 408
 409     while (Seperator(ch))
 410     {
 411     ReadChar(ch);
 412     if (m_done)
 413         return token;
 414     }
 415
 416     if (ch==EOF)
 417     {
 418     m_done=TRUE;
 419     }
 420
 421
 422     while (!Seperator(ch))
 423     {
 424     token += (char)ch;
 425     ReadChar(ch);
 426     }
 427
 428     if (ch == EOF)
 429         m_done = TRUE;
 430
 431     if (listseperator)
 432       *listseperator = (ch == ',');
 433     return token;
 434 }
 435
 436 wxString rc2xml::GetQuoteField()
 437 {
 438     wxString phrase;
 439     //ASCII code 34 "
 440     int ch=0;
 441     ReadChar(ch);
 442
 443     while (ch!=34)
 444         ReadChar(ch);
 445     ReadChar(ch);
 446
 447     while (ch!=34)
 448     {
 449     phrase+=(char)ch;
 450     ReadChar(ch);
 451     }
 452     return phrase;
 453 }
 454
 455 // string in stringtable may contain embedded quotes
 456 // escape characters retained to allow strings to be rewritten
 457 wxString rc2xml::GetStringQuote()
 458 {
 459     wxString phrase;
 460     //ASCII code 34 "
 461     bool done=FALSE;
 462     int p,ch=0,lastch=0;
 463     ReadChar(ch);
 464
 465     while (ch!=34)
 466         ReadChar(ch);
 467     ReadChar(ch);
 468     while (done==FALSE)
 469         {
 470         if ((ch==34)&&(lastch!='\\'))
 471             {
 472             p=m_rc.Tell();
 473             ReadChar(ch);
 474 // RC supports "", for embedded quote, as well as  \"
 475             if (ch==34)
 476                 phrase+='\\';
 477             else
 478     {
 479                 m_rc.Seek(p);
 480                 done = TRUE;
 481                 }
 482             }
 483          if (done==TRUE)
 484              break;
 485          if (ch=='\r')
 486              ReadChar(ch);                    // skip
 487          if ((ch=='\n')&&(lastch=='\\'))      // lastch <should> be this
 488              phrase+='n';                     // escape
 489          else
 490     phrase+=(char)ch;
 491          lastch=ch;
 492     ReadChar(ch);
 493     }
 494
 495     return phrase;
 496 }
 497
 498 void rc2xml::ReadChar(int &ch)
 499 {
 500     int result;
 501     result=m_rc.Tell();
 502
 503     if((result>=m_filesize))
 504         m_done=TRUE;
 505
 506     result=m_rc.Read(&ch,1);
 507
 508     if((result==-1))
 509         m_done=TRUE;
 510
 511     if(ch==EOF)
 512         m_done=TRUE;
 513 }
 514
 515 void rc2xml::ParseComboBox(wxString varname)
 516 {
 517 /* COMBOBOX        IDC_SCALECOMBO,10,110,48,52,CBS_DROPDOWNLIST | CBS_SORT |
 518                     WS_VSCROLL | WS_TABSTOP */
 519     wxString token,style;
 520     int x,y,width,height;
 521     bool GotOrs;
 522     GotOrs = ReadOrs(token);
 523     if (ReadRect(x,y,width,height))
 524         if (GotOrs==FALSE)
 525       ReadOrs(token);
 526
 527     m_xmlfile.Write(_T("\t\t<object class=\"wxComboBox\""));
 528     WriteBasicInfo(x,y,width,height,varname);
 529     if (token.Find(_T("CBS_SIMPLE")) != -1)
 530         WriteStyle(_T("wxCB_SIMPLE"));
 531     if (token.Find(_T("CBS_SORT")) != -1)
 532         WriteStyle(_T("wxCB_SORT"));
 533     if (token.Find(_T("CBS_DISABLENOSCROLL")) != -1)
 534         WriteStyle(_T("wxLB_ALWAYS_SB"));
 535     m_xmlfile.Write(_T("\n\t\t</object>\n"));
 536
 537 }
 538
 539 void rc2xml::ParseMenu(wxString varname)
 540 {
 541     wxString token=wxEmptyString;
 542
 543     //Write menubar to xml file
 544     m_xmlfile.Write(_T("\t<object class=\"wxMenuBar\""));
 545     //Avoid duplicate names this way
 546     varname.Replace(_T("IDR_"),_T("MB_"));
 547     WriteName(varname);
 548     m_xmlfile.Write(_T(">\n"));
 549
 550     while ((token!=_T("BEGIN"))&(token!=_T("{")))
 551         token=GetToken();
 552
 553     while ((token!=_T("END"))&(token!=_T("}")))
 554     {
 555     token=GetToken();
 556     token.MakeUpper();
 557
 558     if (token==_T("POPUP"))
 559         {
 560         ParsePopupMenu();
 561         }
 562     }
 563     m_xmlfile.Write(_T("\t</object>\n"));
 564 }
 565
 566 void rc2xml::ParsePopupMenu()
 567 {
 568     static int menucount=0;
 569     menucount++;
 570     wxString token,name,msg,longhelp,tip;
 571     token=GetQuoteField();
 572
 573 //Remove \t because it causes problems
 574
 575 //spot=token.First("\\t");
 576 //token=token.Left(spot);
 577
 578 //Write Menu item
 579 //Generate a fake name since RC menus don't have one
 580     name << _T("Menu_") << menucount;
 581     m_xmlfile.Write(_T("\t\t<object class=\"wxMenu\""));
 582     WriteName(name);
 583     m_xmlfile.Write(_T(">\n"));
 584     WriteLabel(token);
 585
 586     while ((token!=_T("BEGIN"))&(token!=_T("{")))
 587         token=GetToken();
 588
 589     while ((token!=_T("END"))&(token!=_T("}")))
 590     {
 591     token=GetToken();
 592     token.MakeUpper();
 593
 594     if (token==_T("POPUP"))
 595         ParsePopupMenu();
 596
 597     if (token==_T("MENUITEM"))
 598         ParseMenuItem();
 599     }
 600     m_xmlfile.Write(_T("\t\t\t</object>\n"));
 601 }
 602
 603 wxString rc2xml::PeekToken()
 604 {
 605     wxString token;
 606     int p;
 607     p=m_rc.Tell();
 608     token=GetToken();
 609
 610     m_rc.Seek(p);
 611     return token;
 612 }
 613 //MS Windows pain in the butt CONTROL
 614 void rc2xml::ParseControlMS()
 615 {
 616     wxString label,varname,kindctrl,token;
 617     token=PeekToken();
 618
 619     if (token.Contains(_T("\"")))
 620         ParseNormalMSControl();
 621     else
 622         ParseWeirdMSControl();
 623
 624 }
 625
 626 /*    CONTROL         "Slider1",IDC_SLIDER1,"msctls_trackbar32",TBS_BOTH |
 627                     TBS_NOTICKS | WS_TABSTOP,52,73,100,15
 628 */
 629
 630 void rc2xml::ParseSlider(wxString WXUNUSED(label), wxString varname)
 631 {
 632     wxString token,style;
 633     ReadOrs(token);
 634     if (token.Find(_T("TBS_VERT"))!=-1)
 635         style+=_T("wxSL_VERTICAL");
 636     //MFC RC Default is horizontal
 637     else
 638         style+=_T("wxSL_HORIZONTAL");
 639
 640     int x,y,width,height;
 641     ReadRect(x,y,width,height);
 642     m_xmlfile.Write(_T("\t\t<object class=\"wxSlider\""));
 643     WriteBasicInfo(x,y,width,height,varname);
 644     WriteStyle(style);
 645     m_xmlfile.Write(_T("\n\t\t</object>\n"));
 646
 647 }
 648 /*
 649 CONTROL         "Progress1",CG_IDC_PROGDLG_PROGRESS,"msctls_progress32",
 650                     WS_BORDER,15,52,154,13
 651 */
 652 void rc2xml::ParseProgressBar(wxString WXUNUSED(label), wxString varname)
 653 {
 654     wxString token,style;
 655     ReadOrs(token);
 656
 657     int x,y,width,height;
 658     ReadRect(x,y,width,height);
 659
 660 //Always horizontal in MFC
 661     m_xmlfile.Write(_T("\t\t<object class=\"wxGauge\""));
 662     WriteBasicInfo(x,y,width,height,varname);
 663     WriteStyle(style);
 664     m_xmlfile.Write(_T("\t\t</object>\n"));
 665 }
 666
 667 bool rc2xml::ReadOrs(wxString & orstring)
 668 {
 669     wxString token;
 670
 671     token=PeekToken();
 672     if (token.IsNumber())
 673         return FALSE;
 674     orstring=GetToken();
 675
 676     while(PeekToken()==_T("|"))
 677     {
 678     //Grab |
 679     orstring+=GetToken();
 680     //Grab next token
 681     orstring+=GetToken();
 682     }
 683     return TRUE;
 684 }
 685
 686 //Is it a checkbutton or a radiobutton or a pushbutton or a groupbox
 687 void rc2xml::ParseCtrlButton(wxString label, wxString varname)
 688 {
 689     wxString token;
 690     int p;
 691     p=m_rc.Tell();
 692     ReadOrs(token);
 693     m_rc.Seek(p);
 694
 695     if (token.Find(_T("BS_AUTOCHECKBOX"))!=-1)
 696         ParseCheckBox(label, varname);
 697     else if ((token.Find(_T("BS_AUTORADIOBUTTON"))!=-1)||
 698                   (token.Find(_T("BS_RADIOBUTTON"))!=-1))
 699         ParseRadioButton(label, varname);
 700     else if (token.Find(_T("BS_GROUPBOX"))!=-1)
 701         ParseGroupBox(label, varname);
 702     else  // if ((token.Find("BS_PUSHBUTTON")!=-1)||
 703 //                (token.Find("BS_DEFPUSHBUTTON")!=-1))
 704         ParsePushButton(label, varname);           // make default case
 705 }
 706
 707 void rc2xml::WriteSize(int width, int height)
 708 {
 709     wxString msg;
 710     msg << _T(" <size>") << width << _T(",") << height << _T("d</size>");
 711     m_xmlfile.Write(msg);
 712 }
 713
 714 void rc2xml::WritePosition(int x, int y)
 715 {
 716     wxString msg;
 717     msg << _T(" <pos>") << x << _T(",") << y << _T("d</pos>");
 718     m_xmlfile.Write(msg);
 719 }
 720
 721 void rc2xml::WriteTitle(wxString title)
 722 {
 723     wxString msg;
 724     msg=_T("\t\t<title>")+title+_T("</title>\n");
 725     m_xmlfile.Write(msg);
 726 }
 727
 728 void rc2xml::WriteName(wxString name)
 729 {
 730
 731 //Try to convert any number ids into names
 732 name=LookUpId(name);
 733 //Replace common MS ids with wxWindows ids
 734 //I didn't do everyone of them
 735     if (name==_T("IDOK"))
 736         name=_T("wxID_OK");
 737     else if (name==_T("IDCANCEL"))
 738         name=_T("wxID_CANCEL");
 739     else if (name==_T("IDAPPLY"))
 740         name=_T("wxID_APPLY");
 741     else if (name==_T("ID_FILE_OPEN"))
 742         name=_T("wxID_OPEN");
 743     else if (name==_T("ID_FILE_CLOSE"))
 744         name=_T("wxID_CLOSE");
 745     else if (name==_T("ID_FILE_SAVE"))
 746         name=_T("wxID_SAVE");
 747     else if (name==_T("ID_FILE_SAVE_AS"))
 748         name=_T("wxID_SAVEAS");
 749     else if (name==_T("ID_APP_EXIT"))
 750         name=_T("wxID_EXIT");
 751     else if (name==_T("ID_FILE_PRINT"))
 752         name=_T("wxID_PRINT");
 753     else if (name==_T("ID_FILE_PRINT_PREVIEW"))
 754         name=_T("wxID_PREVIEW");
 755     else if (name==_T("ID_FILE_PRINT_SETUP"))
 756         name=_T("wxID_PRINT_SETUP");
 757     else if (name==_T("ID_APP_ABOUT"))
 758         name=_T("wxID_ABOUT");
 759     else if (name==_T("ID_EDIT_UNDO"))
 760         name=_T("wxID_UNDO");
 761     else if (name==_T("ID_EDIT_CUT"))
 762         name=_T("wxID_CUT");
 763     else if (name==_T("ID_EDIT_COPY"))
 764         name=_T("wxID_COPY");
 765     else if (name==_T("ID_EDIT_PASTE"))
 766         name=_T("wxID_PASTE");
 767     else if (name==_T("IDYES"))
 768         name=_T("wxID_YES");
 769     else if (name==_T("IDNO"))
 770         name=_T("wxID_NO");
 771     else if (name==_T("IDHELP"))
 772         name=_T("wxID_HELP");
 773
 774     m_xmlfile.Write(_T(" name= \"")+name+_T("\""));
 775 }
 776
 777 void rc2xml::WriteLabel(wxString label)
 778 {
 779     label.Replace(_T("&"),_T("$"));
 780     m_xmlfile.Write(_T("\t\t\t<label>")+label+_T("</label>\n"));
 781 }
 782
 783 void rc2xml::WriteBasicInfo(int x, int y, int width, int height, wxString name)
 784 {
 785     WriteName(name);
 786     m_xmlfile.Write(_T(">\n"));
 787     m_xmlfile.Write(_T("\t\t\t"));
 788     WritePosition(x,y);
 789     WriteSize(width,height);
 790     m_xmlfile.Write(_T("\n"));
 791 }
 792
 793 void rc2xml::WriteStyle(wxString style)
 794 {
 795     if (style.Length()==0)
 796         return;
 797     m_xmlfile.Write(_T("\t\t\t<style>")+style+_T("</style>\n"));
 798 }
 799 /*
 800     LISTBOX         IDC_LIST1,16,89,48,40,LBS_SORT | LBS_MULTIPLESEL |
 801                     LBS_NOINTEGRALHEIGHT | WS_VSCROLL | WS_TABSTOP
 802 */
 803 void rc2xml::ParseListBox(wxString varname)
 804 {
 805     wxString token;
 806     token=PeekToken();
 807     while (!token.IsNumber())
 808         {
 809         token=GetToken();
 810         token=PeekToken();
 811         }
 812     int x,y,width,height;
 813     ReadRect(x,y,width,height);
 814
 815     m_xmlfile.Write(_T("\t\t<object class=\"wxListBox\""));
 816     WriteBasicInfo(x,y,width,height,varname);
 817     m_xmlfile.Write(_T("\n\t\t</object>\n"));
 818
 819 }
 820 /*
 821     CONTROL         "",IDC_RICHEDIT1,"RICHEDIT",ES_AUTOHSCROLL | WS_BORDER |
 822                     WS_TABSTOP,103,110,40,14
 823 */
 824 void rc2xml::ParseRichEdit(wxString label, wxString varname)
 825 {
 826     wxString token;
 827     //while (ReadOrs(token));
 828     ReadOrs(token);
 829     int x,y,width,height;
 830     ReadRect(x,y,width,height);
 831     wxString style;
 832 //Make it a rich text control
 833     style+=_T("wxTE_MULTILINE ");
 834     m_xmlfile.Write(_T("\t\t<object class=\"wxTextCtrl\""));
 835     WriteBasicInfo(x,y,width,height,varname);
 836     WriteStyle(style);
 837     m_xmlfile.Write(_T("\t\t</object>\n"));
 838
 839 }
 840 /*
 841 CONTROL         "Spin1",IDC_SPIN1,"msctls_updown32",UDS_ARROWKEYS,209,72,
 842                  19,26
 843 */
 844 void rc2xml::ParseSpinCtrl(wxString WXUNUSED(label), wxString varname)
 845 {
 846     wxString token,style;
 847
 848     ReadOrs(token);
 849     if (token.Find(_T("UDS_HORZ"))!=-1)
 850         style=_T("wxSP_HORIZONTAL");
 851     //MFC default
 852     else
 853         style=_T("wxSP_VERTICAL");
 854
 855     int x,y,width,height;
 856     ReadRect(x,y,width,height);
 857     m_xmlfile.Write(_T("\t\t<object class=\"wxSpinButton\""));
 858     WriteBasicInfo(x,y,width,height,varname);
 859     WriteStyle(style);
 860     m_xmlfile.Write(_T("\n\t\t</object>\n"));
 861
 862 }
 863
 864 void rc2xml::FirstPass()
 865 {
 866     wxString token,prevtok;
 867     while (!m_done)
 868         {
 869         token=GetToken();
 870         if (token==_T("BITMAP"))
 871             ParseBitmap(prevtok);
 872         else if (token==_T("STRINGTABLE"))
 873             ParseStringTable(prevtok);
 874         else if (token==_T("ICON"))
 875             ParseIcon(prevtok);
 876
 877         prevtok=token;
 878         }
 879 }
 880
 881 void rc2xml::ParseBitmap(wxString varname)
 882 {
 883     wxString token,*bitmapfile;
 884
 885     token=PeekToken();
 886     //Microsoft notation?
 887     if (token==_T("DISCARDABLE"))
 888         {
 889         token=GetToken();
 890         token=PeekToken();
 891         }
 892     bitmapfile=new wxString;
 893     *bitmapfile=GetQuoteField();
 894     m_bitmaplist->Append(varname,bitmapfile);
 895
 896 }
 897
 898
 899 void rc2xml::SecondPass()
 900 {
 901     wxString token,prevtok;
 902     while (!m_done)
 903         {
 904         token=GetToken();
 905         if ((token==_T("DIALOG"))||(token==_T("DIALOGEX")))
 906             ParseDialog(prevtok);
 907         else if (token==_T("MENU"))
 908             ParseMenu(prevtok);
 909         else if (token==_T("TOOLBAR"))
 910             ParseToolBar(prevtok);
 911
 912         prevtok=token;
 913         }
 914
 915 }
 916
 917 void rc2xml::ParseToolBar(wxString varname)
 918 {
 919     wxString token;
 920     token=GetToken();
 921     wxASSERT_MSG(token==_T("DISCARDABLE"),_T("Error in toolbar parsing"));
 922 //Look up bitmap for toolbar and load
 923     wxNode *node=m_bitmaplist->Find(LookUpId(varname));
 924     wxString *bitmappath;
 925     bitmappath=(wxString *)node->GetData();
 926     wxBitmap bitmap;
 927     if (!bitmap.LoadFile(*bitmappath,wxBITMAP_TYPE_BMP ))
 928         wxLogError(_T("Unable to load bitmap:")+*bitmappath);
 929
 930 //Write toolbar to xml file
 931     m_xmlfile.Write(_T("        <object class=\"wxToolBar\""));
 932 //Avoid duplicate names this way
 933     varname.Replace(_T("IDR_"),_T("TB_"));
 934     WriteName(varname);
 935     m_xmlfile.Write(_T(">\n"));
 936     wxString style;
 937     style+=_T("wxTB_FLAT");
 938     WriteStyle(style);
 939
 940
 941 //Grab width and height
 942     int width,height;
 943     width=wxAtoi(GetToken());
 944     height=wxAtoi(GetToken());
 945
 946     int c=0;
 947     wxString buttonname,msg,tip,longhelp;
 948     token=GetToken();
 949     while ((token!=_T("BEGIN"))&(token!=_T("{")))
 950         token=GetToken();
 951
 952     while ((token!=_T("END"))&(token!=_T("}")))
 953         {
 954         if (token==_T("BUTTON"))
 955             {
 956             buttonname=GetToken();
 957             m_xmlfile.Write(_T("\t\t\t<object class=\"tool\""));
 958             WriteName(buttonname);
 959             m_xmlfile.Write(_T(">\n"));
 960     //Write tool tip if any
 961             if (LookUpString(buttonname,msg))
 962                 {
 963                 SplitHelp(msg,tip,longhelp);
 964                 m_xmlfile.Write(_T("\t\t\t\t<tooltip>")+tip+_T("</tooltip>\n"));
 965                 m_xmlfile.Write(_T("            <longhelp>")+longhelp+_T("</longhelp>\n"));
 966                 }
 967             //Make a bitmap file name
 968             buttonname=CleanName(buttonname);
 969             buttonname+=_T(".bmp");
 970             m_xmlfile.Write(_T("\t\t\t\t<bitmap>")+buttonname+_T("</bitmap>\n"));
 971         WriteToolButton(buttonname,c,width,height,bitmap);
 972         m_xmlfile.Write(_T("\t\t\t</object>\n"));
 973         c++;
 974         }
 975     else if (token==_T("SEPARATOR"))
 976     {
 977     m_xmlfile.Write(_T("\t\t\t<object class=\"separator\"/>\n"));
 978     }
 979     token=GetToken();
 980     }
 981     m_xmlfile.Write(_T("\t</object>\n"));
 982 }
 983
 984 //Extract bitmaps from larger toolbar bitmap
 985 void rc2xml::WriteToolButton(wxString name,int index, int width, int height, wxBitmap bitmap)
 986 {
 987     int x;
 988     x=index*width;
 989     wxRect r(x,0,width,height);
 990     wxBitmap little;
 991     little=bitmap.GetSubBitmap(r);
 992     little.SaveFile(m_targetpath+name,wxBITMAP_TYPE_BMP);
 993 }
 994
 995 void rc2xml::ParseStringTable(wxString varname)
 996 {
 997     wxString token;
 998     token=GetToken();
 999     while ((token!=_T("BEGIN"))&(token!=_T("{")))
1000         token=GetToken();
1001     token=GetToken();
1002     wxString *msg;
1003
1004     while ((token!=_T("END"))&(token!=_T("}")))
1005         {
1006         msg=new wxString;
1007         *msg=GetStringQuote();
1008         m_stringtable->Append(token,msg);
1009         token=GetToken();
1010         }
1011
1012 }
1013
1014 bool rc2xml::LookUpString(wxString strid,wxString & st)
1015 {
1016     wxNode *node=m_stringtable->Find(strid);
1017     wxString *s;
1018     if (node==NULL)
1019         return FALSE;
1020
1021     s=(wxString *)node->GetData();
1022     st=*s;
1023
1024     return TRUE;
1025 }
1026
1027 bool rc2xml::SplitHelp(wxString msg, wxString &shorthelp, wxString &longhelp)
1028 {
1029     int spot;
1030     spot=msg.Find(_T("\\n"));
1031     if (spot==-1)
1032         {
1033         shorthelp=msg;
1034         longhelp=msg;
1035         }
1036
1037     longhelp=msg.Left(spot);
1038     spot=msg.Length()-spot-2;
1039     shorthelp=msg.Right(spot);
1040     return TRUE;
1041 }
1042
1043 void rc2xml::ParseMenuItem()
1044 {
1045     wxString token,name,msg,tip,longhelp;
1046 //int spot;
1047     if (PeekToken()==_T("SEPARATOR"))
1048         {
1049         m_xmlfile.Write(_T("\t\t\t<object class=\"separator\"/>\n"));
1050         return;
1051         }
1052
1053     token=GetQuoteField();
1054     name=GetToken();
1055 //Remove \t because it causes problems
1056 //spot=token.First("\\t");
1057 //token=token.Left(spot);
1058     m_xmlfile.Write(_T("\t\t\t<object class=\"wxMenuItem\""));
1059     WriteName(name);
1060     m_xmlfile.Write(_T(">\n"));
1061     WriteLabel(token);
1062 //Look up help if any listed in stringtable
1063 //can't assume numbers correlate, restrict to string identifiers
1064     if ((!name.IsNumber())&&(LookUpString(name,msg)))
1065         {
1066         SplitHelp(msg,tip,longhelp);
1067         m_xmlfile.Write(_T("\t\t\t<help>")
1068             +longhelp+_T("</help>\n"));
1069         }
1070 //look for extra attributes like checked and break
1071     wxString ptoken;
1072     ptoken=PeekToken();
1073     ptoken.MakeUpper();
1074     while ((ptoken!=_T("MENUITEM"))&(ptoken!=_T("POPUP"))&(ptoken!=_T("END")))
1075         {
1076         token=GetToken();
1077         ptoken.MakeUpper();
1078         if (token==_T("CHECKED"))
1079             m_xmlfile.Write(_T("\t\t\t<checkable>1</checkable>\n"));
1080         else if (token==_T("MENUBREAK"))
1081             ;
1082 //m_xmlfile.Write("\t\t\t</break>\n");
1083         else if (token==_T("GRAYED"))
1084             ;
1085         else
1086             wxLogError(_T("Unknown Menu Item token:")+token);
1087
1088         ptoken=PeekToken();
1089         ptoken.MakeUpper();
1090         }
1091     m_xmlfile.Write(_T("\t\t\t</object>\n"));
1092
1093 }
1094
1095 //ICON            IDR_MAINFRAME,IDC_STATIC,11,17,20,20
1096 void rc2xml::ParseIconStatic()
1097 {
1098     wxString token;
1099     wxString varname,iconname;
1100     token = PeekToken();
1101     if (token.Contains(_T("\"")))
1102         iconname = GetQuoteField();
1103     else
1104     iconname=GetToken();
1105 //Look up icon
1106     varname=GetToken();
1107
1108     int x,y,width,height;
1109     ReadRect(x,y,width,height);
1110
1111     m_xmlfile.Write(_T("\t\t<object class=\"wxStaticBitmap\""));
1112     WriteBasicInfo(x,y,width,height,varname);
1113 //Save icon as a bitmap
1114     WriteIcon(iconname);
1115     m_xmlfile.Write(_T("\t\t</object>\n"));
1116
1117 }
1118 //IDR_MAINFRAME           ICON    DISCARDABLE     "res\\mfcexample.ico"
1119 void rc2xml::ParseIcon(wxString varname)
1120 {
1121     wxString token,*iconfile;
1122     iconfile=new wxString;
1123     token=PeekToken();
1124
1125     *iconfile=GetQuoteField();
1126     m_iconlist->Append(varname,iconfile);
1127
1128
1129 }
1130
1131 wxString rc2xml::CleanName(wxString name)
1132 {
1133     name.MakeLower();
1134     name.Replace(_T("id_"),wxEmptyString);
1135     name.Replace(_T("idr_"),wxEmptyString);
1136     name.Replace(_T("idb_"),wxEmptyString);
1137     name.Replace(_T("idc_"),wxEmptyString);
1138
1139     name.Replace(_T(".ico"),wxEmptyString);
1140
1141     name.Replace(_T(".bmp"),wxEmptyString);
1142     return name;
1143 }
1144 // And the award for most messed up control goes to...
1145 //    CONTROL         IDB_FACE,IDC_STATIC,"Static",SS_BITMAP,26,62,32,30
1146 void rc2xml::ParseStaticBitmap(wxString bitmapname, wxString varname)
1147 {
1148     wxString token;
1149     //Grab SS_BITMAP
1150     ReadOrs(token);
1151
1152
1153     int x,y,width,height;
1154     ReadRect(x,y,width,height);
1155
1156     m_xmlfile.Write(_T("\t\t<object class=\"wxStaticBitmap\""));
1157     WriteBasicInfo(x,y,width,height,varname);
1158     WriteBitmap(bitmapname);
1159     m_xmlfile.Write(_T("\t\t</object>\n"));
1160
1161 }
1162
1163 void rc2xml::ParseNormalMSControl()
1164 {
1165 wxString label,varname,kindctrl;
1166
1167 label=GetQuoteField();
1168 varname=GetToken();
1169 kindctrl=GetQuoteField();
1170 kindctrl.MakeUpper();
1171
1172     if (kindctrl==_T("MSCTLS_UPDOWN32"))
1173         ParseSpinCtrl(label,varname);
1174     if (kindctrl==_T("MSCTLS_TRACKBAR32"))
1175         ParseSlider(label,varname);
1176     if (kindctrl==_T("MSCTLS_PROGRESS32"))
1177         ParseProgressBar(label,varname);
1178     if (kindctrl==_T("SYSTREEVIEW32"))
1179         ParseTreeCtrl(label,varname);
1180     if (kindctrl==_T("SYSMONTHCAL32"))
1181         ParseCalendar(label,varname);
1182     if (kindctrl==_T("SYSLISTVIEW32"))
1183         ParseListCtrl(label,varname);
1184     if (kindctrl==_T("BUTTON"))
1185         ParseCtrlButton(label,varname);
1186     if (kindctrl==_T("RICHEDIT"))
1187         ParseRichEdit(label,varname);
1188     if (kindctrl==_T("STATIC"))
1189         {
1190         wxString token;
1191         int p=m_rc.Tell();
1192         ReadOrs(token);
1193         m_rc.Seek(p);
1194         if (token.Find(_T("SS_BITMAP"))!=-1)
1195             ParseStaticBitmap(label,varname);
1196         else
1197             ParseStaticText(label,varname);
1198         }
1199     if (kindctrl==_T("EDIT"))
1200         ParseTextCtrl(varname);
1201     if (kindctrl==_T("LISTBOX"))
1202         ParseListBox(varname);
1203     if (kindctrl==_T("COMBOBOX"))
1204         ParseComboBox(varname);
1205
1206 }
1207
1208 void rc2xml::ParseWeirdMSControl()
1209 {
1210     wxString kindctrl;
1211     wxString varname;
1212     wxString id;
1213     id=GetToken();
1214     varname=GetToken();
1215     kindctrl=GetQuoteField();
1216     kindctrl.MakeUpper();
1217 //    CONTROL         IDB_FACE,IDC_STATIC,"Static",SS_BITMAP,26,62,32,30
1218     if (kindctrl==_T("STATIC"))
1219         {
1220         if (PeekToken()==_T("SS_BITMAP"))
1221             ParseStaticBitmap(id,varname);
1222         else
1223             wxLogError(_T("Unknown MS Control Static token"));
1224         }
1225
1226 }
1227 //SCROLLBAR       IDC_SCROLLBAR1,219,56,10,40,SBS_VERT
1228
1229 void rc2xml::ParseScrollBar()
1230 {
1231     wxString token;
1232     wxString varname;
1233
1234     varname=GetToken();
1235     int x,y,width,height;
1236     ReadRect(x,y,width,height);
1237     wxString style;
1238
1239     ReadOrs(token);
1240
1241 if (token.Find(_T("SBS_VERT"))!=-1)
1242     style=_T("wxSB_VERTICAL");
1243 //Default MFC style is horizontal
1244     else
1245         style=_T("wxSB_HORIZONTAL");
1246
1247     m_xmlfile.Write(_T("\t\t<object class=\"wxScrollBar\""));
1248     WriteBasicInfo(x,y,width,height,varname);
1249     WriteStyle(style);
1250     m_xmlfile.Write(_T("\n\t\t</object>\n"));
1251
1252 }
1253 //    CONTROL         "Tree1",IDC_TREE1,"SysTreeView32",WS_BORDER | WS_TABSTOP,
1254 //                      7,7,66,61
1255
1256 void rc2xml::ParseTreeCtrl(wxString WXUNUSED(label), wxString varname)
1257 {
1258     wxString token;
1259 //while (ReadOrs(token));
1260     ReadOrs(token);
1261     int x,y,width,height;
1262     ReadRect(x,y,width,height);
1263     m_xmlfile.Write(_T("\t\t<object class=\"wxTreeCtrl\""));
1264     WriteBasicInfo(x,y,width,height,varname);
1265     m_xmlfile.Write(_T("\t\t</object>\n"));
1266
1267 }
1268 //    CONTROL         "MonthCalendar1",IDC_MONTHCALENDAR1,"SysMonthCal32",
1269                     //MCS_NOTODAY | WS_TABSTOP,105,71,129,89
1270
1271 void rc2xml::ParseCalendar(wxString WXUNUSED(label), wxString varname)
1272 {
1273     wxString token;
1274 //while (ReadOrs(token));
1275     ReadOrs(token);
1276     int x,y,width,height;
1277     ReadRect(x,y,width,height);
1278     m_xmlfile.Write(_T("\t\t<object class=\"wxCalendarCtrl\""));
1279     WriteBasicInfo(x,y,width,height,varname);
1280     m_xmlfile.Write(_T("\t\t</object>\n"));
1281 }
1282 //    CONTROL         "List1",IDC_LIST1,"SysListView32",WS_BORDER | WS_TABSTOP,
1283   //                  7,89,68,71
1284
1285 void rc2xml::ParseListCtrl(wxString WXUNUSED(label), wxString varname)
1286 {
1287     wxString token;
1288     //while (ReadOrs(token));
1289     ReadOrs(token);
1290     int x,y,width,height;
1291     ReadRect(x,y,width,height);
1292     m_xmlfile.Write(_T("\t\t<object class=\"wxListCtrl\""));
1293     WriteBasicInfo(x,y,width,height,varname);
1294     m_xmlfile.Write(_T("\t\t</object>\n"));
1295
1296 }
1297
1298 void rc2xml::WriteBitmap(wxString bitmapname)
1299 {
1300 //Look up bitmap
1301     wxNode *node=m_bitmaplist->Find(LookUpId(bitmapname));
1302     if (node==NULL)
1303         {
1304         m_xmlfile.Write(_T("\t\t\t<bitmap>missingfile</bitmap>\n"));
1305         wxLogError(_T("Unable to find bitmap:")+bitmapname);
1306         return;
1307         }
1308
1309     wxString *bitmappath;
1310     bitmappath=(wxString *)node->GetData();
1311
1312     bitmapname=wxFileNameFromPath(*bitmappath);
1313     wxBitmap bitmap;
1314     if (!bitmap.LoadFile(*bitmappath,wxBITMAP_TYPE_BMP ))
1315         wxLogError(_T("Unable to load bitmap:")+*bitmappath);
1316
1317     //Make a bitmap file name
1318     bitmapname=CleanName(bitmapname);
1319     bitmapname+=_T(".bmp");
1320     m_xmlfile.Write(_T("\t\t\t<bitmap>")+bitmapname+_T("</bitmap>\n"));
1321     bitmap.SaveFile(m_targetpath+bitmapname,wxBITMAP_TYPE_BMP);
1322 }
1323
1324 void rc2xml::WriteIcon(wxString iconname)
1325 {
1326 wxNode *node=m_iconlist->Find(iconname);
1327     if (node==NULL)
1328         {
1329         m_xmlfile.Write(_T("\t\t\t<bitmap>missing_file</bitmap>\n"));
1330         wxLogError(_T("Unable to find icon:")+iconname);
1331         }
1332     wxString *iconpath;
1333     iconpath=(wxString *)node->GetData();
1334     wxIcon icon;
1335     wxBitmap bitmap;
1336     if (!icon.LoadFile(*iconpath,wxBITMAP_TYPE_ICO ))
1337         wxLogError(_T("Unable to load icon:")+*iconpath);
1338 #ifdef __WXMSW__
1339     bitmap.CopyFromIcon(icon);
1340 #else
1341     bitmap = icon;
1342 #endif
1343     iconname=wxFileNameFromPath(*iconpath);
1344     //Make a bitmap file name
1345     iconname=CleanName(iconname);
1346     iconname+=_T(".bmp");
1347     m_xmlfile.Write(_T("\t\t\t<bitmap>")+iconname+_T("</bitmap>\n"));
1348     bitmap.SaveFile(m_targetpath+iconname,wxBITMAP_TYPE_BMP);
1349
1350
1351 }
1352 /*Unfortunately sometimes the great MSVC Resource editor decides
1353 to use numbers instead of the word id.  I have no idea why they
1354 do this, but that is the way it is.
1355 */
1356 /* this is a quick and dirty way to parse the resource.h file
1357 it will not recognize #ifdef so it can be easily fooled
1358 */
1359 void rc2xml::ParseResourceHeader()
1360 {
1361 wxTextFile r;
1362 //Attempt to load resource.h in current path
1363     if (!r.Open(_T("resource.h")))
1364         {
1365         wxLogError(_T("Warining Unable to load resource.h file"));
1366         return;
1367         }
1368
1369     wxString str;
1370     wxString id,v;
1371     wxStringTokenizer tok;
1372     wxString *varname;
1373
1374
1375     long n;
1376
1377 //Read through entire file
1378     for ( str = r.GetFirstLine(); !r.Eof(); str = r.GetNextLine() )
1379     {
1380     if (str.Find(_T("#define"))!=-1)
1381         {
1382         tok.SetString(str);
1383         //Just ignore #define token
1384         tok.GetNextToken();
1385         v=tok.GetNextToken();
1386         id=tok.GetNextToken();
1387         if (id.IsNumber())
1388             {
1389             varname=new wxString;
1390             id.ToLong(&n);
1391             *varname=v;
1392             m_resourcelist->Append(n,varname);
1393             }
1394         }
1395     }
1396
1397
1398
1399 }
1400
1401
1402 wxString rc2xml::LookUpId(wxString id)
1403 {
1404 wxString st;
1405
1406 if (!id.IsNumber())
1407     return id;
1408 long n;
1409 id.ToLong(&n);
1410 wxNode *node=m_resourcelist->Find(n);
1411     wxString *s;
1412     if (node==NULL)
1413         return id;
1414
1415     s=(wxString *)node->GetData();
1416     st=*s;
1417 return st;
1418 }