]> git.saurik.com Git - wxWidgets.git/blob - contrib/utils/convertrc/rc2xml.cpp
src/common/wxchar.cpps/wxConvLocal/wxConvLibs/g as otherwise we may fail to convert...
[wxWidgets.git] / 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" wxWidgets 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")) != wxNOT_FOUND)
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 int ch1=0;
442
443 ReadChar(ch);
444
445 // !! Changed by MS, 15th/11/04. Can now read strings such as
446 // """Catapult"" - blah blah", ...
447
448 while (ch!=34)
449 ReadChar(ch);
450
451 // found first '"'
452 while (true)
453 {
454 ReadChar(ch);
455 if (ch == 34)
456 {
457 // another quote?
458 ReadChar(ch1);
459 if (ch1 != 34)
460 {
461 // real end of string..
462 break;
463 }
464
465 // add a single quote - fall through
466 }
467 phrase+=(char)ch;
468 }
469
470 return phrase;
471 }
472
473 // string in stringtable may contain embedded quotes
474 // escape characters retained to allow strings to be rewritten
475 wxString rc2xml::GetStringQuote()
476 {
477 wxString phrase;
478 //ASCII code 34 "
479 bool done=false;
480 int ch=0,lastch=0;
481 ReadChar(ch);
482
483 while (ch!=34)
484 ReadChar(ch);
485
486 ReadChar(ch);
487 while (done==false)
488 {
489 if ((ch==34)&&(lastch!='\\'))
490 {
491 wxFileOffset p = m_rc.Tell();
492 ReadChar(ch);
493 // RC supports "", for embedded quote, as well as \"
494 if (ch==34)
495 phrase+='\\';
496 else
497 {
498 m_rc.Seek(p);
499 done = true;
500 }
501 }
502 if (done==true)
503 break;
504 if (ch=='\r')
505 ReadChar(ch); // skip
506 if ((ch=='\n')&&(lastch=='\\')) // lastch <should> be this
507 phrase+='n'; // escape
508 else
509 phrase+=(char)ch;
510
511 lastch=ch;
512 ReadChar(ch);
513 }
514
515 return phrase;
516 }
517
518 void rc2xml::ReadChar(int &ch)
519 {
520 wxFileOffset result = m_rc.Tell();
521
522 if((result>=m_filesize))
523 m_done=true;
524
525 result = m_rc.Read(&ch,1);
526
527 if( result == wxInvalidOffset )
528 m_done=true;
529
530 if(ch==EOF)
531 m_done=true;
532 }
533
534 void rc2xml::ParseComboBox(wxString varname)
535 {
536 /* COMBOBOX IDC_SCALECOMBO,10,110,48,52,CBS_DROPDOWNLIST | CBS_SORT |
537 WS_VSCROLL | WS_TABSTOP */
538 wxString token,style;
539 int x,y,width,height;
540 bool GotOrs;
541 GotOrs = ReadOrs(token);
542 if (ReadRect(x,y,width,height))
543 if (GotOrs==false)
544 ReadOrs(token);
545
546 m_xmlfile.Write(_T("\t\t<object class=\"wxComboBox\""));
547 WriteBasicInfo(x,y,width,height,varname);
548 if (token.Find(_T("CBS_SIMPLE")) != wxNOT_FOUND)
549 WriteStyle(_T("wxCB_SIMPLE"));
550 if (token.Find(_T("CBS_SORT")) != wxNOT_FOUND)
551 WriteStyle(_T("wxCB_SORT"));
552 if (token.Find(_T("CBS_DISABLENOSCROLL")) != wxNOT_FOUND)
553 WriteStyle(_T("wxLB_ALWAYS_SB"));
554 m_xmlfile.Write(_T("\n\t\t</object>\n"));
555
556 }
557
558 void rc2xml::ParseMenu(wxString varname)
559 {
560 wxString token=wxEmptyString;
561
562 //Write menubar to xml file
563 m_xmlfile.Write(_T("\t<object class=\"wxMenuBar\""));
564 //Avoid duplicate names this way
565 varname.Replace(_T("IDR_"),_T("MB_"));
566 WriteName(varname);
567 m_xmlfile.Write(_T(">\n"));
568
569 while ((token!=_T("BEGIN"))&(token!=_T("{")))
570 token=GetToken();
571
572 while ((token!=_T("END"))&(token!=_T("}")))
573 {
574 token=GetToken();
575 token.MakeUpper();
576
577 if (token==_T("POPUP"))
578 {
579 ParsePopupMenu();
580 }
581 }
582 m_xmlfile.Write(_T("\t</object>\n"));
583 }
584
585 void rc2xml::ParsePopupMenu()
586 {
587 static int menucount=0;
588 menucount++;
589 wxString token,name,msg,longhelp,tip;
590 token=GetQuoteField();
591
592 //Remove \t because it causes problems
593
594 //spot=token.First("\\t");
595 //token=token.Left(spot);
596
597 //Write Menu item
598 //Generate a fake name since RC menus don't have one
599 name << _T("Menu_") << menucount;
600 m_xmlfile.Write(_T("\t\t<object class=\"wxMenu\""));
601 WriteName(name);
602 m_xmlfile.Write(_T(">\n"));
603 WriteLabel(token);
604
605 while ((token!=_T("BEGIN"))&(token!=_T("{")))
606 token=GetToken();
607
608 while ((token!=_T("END"))&(token!=_T("}")))
609 {
610 token=GetToken();
611 token.MakeUpper();
612
613 if (token==_T("POPUP"))
614 ParsePopupMenu();
615
616 if (token==_T("MENUITEM"))
617 ParseMenuItem();
618 }
619 m_xmlfile.Write(_T("\t\t\t</object>\n"));
620 }
621
622 wxString rc2xml::PeekToken()
623 {
624 wxFileOffset p = m_rc.Tell();
625 wxString token=GetToken();
626
627 m_rc.Seek(p);
628 return token;
629 }
630
631 //MS Windows pain in the butt CONTROL
632 void rc2xml::ParseControlMS()
633 {
634 wxString token = PeekToken();
635
636 if (token.Contains(_T("\"")))
637 ParseNormalMSControl();
638 else
639 ParseWeirdMSControl();
640 }
641
642 /* CONTROL "Slider1",IDC_SLIDER1,"msctls_trackbar32",TBS_BOTH |
643 TBS_NOTICKS | WS_TABSTOP,52,73,100,15
644 */
645
646 void rc2xml::ParseSlider(wxString WXUNUSED(label), wxString varname)
647 {
648 wxString token,style;
649 ReadOrs(token);
650 if (token.Find(_T("TBS_VERT"))!=wxNOT_FOUND)
651 style+=_T("wxSL_VERTICAL");
652 //MFC RC Default is horizontal
653 else
654 style+=_T("wxSL_HORIZONTAL");
655
656 int x,y,width,height;
657 ReadRect(x,y,width,height);
658 m_xmlfile.Write(_T("\t\t<object class=\"wxSlider\""));
659 WriteBasicInfo(x,y,width,height,varname);
660 WriteStyle(style);
661 m_xmlfile.Write(_T("\n\t\t</object>\n"));
662
663 }
664 /*
665 CONTROL "Progress1",CG_IDC_PROGDLG_PROGRESS,"msctls_progress32",
666 WS_BORDER,15,52,154,13
667 */
668 void rc2xml::ParseProgressBar(wxString WXUNUSED(label), wxString varname)
669 {
670 wxString token,style;
671 ReadOrs(token);
672
673 int x,y,width,height;
674 ReadRect(x,y,width,height);
675
676 //Always horizontal in MFC
677 m_xmlfile.Write(_T("\t\t<object class=\"wxGauge\""));
678 WriteBasicInfo(x,y,width,height,varname);
679 WriteStyle(style);
680 m_xmlfile.Write(_T("\t\t</object>\n"));
681 }
682
683 bool rc2xml::ReadOrs(wxString & orstring)
684 {
685 wxString token;
686
687 token=PeekToken();
688 if (token.IsNumber())
689 return false;
690 orstring=GetToken();
691
692 while(PeekToken()==_T("|"))
693 {
694 //Grab |
695 orstring+=GetToken();
696 //Grab next token
697 orstring+=GetToken();
698 }
699 return true;
700 }
701
702 //Is it a checkbutton or a radiobutton or a pushbutton or a groupbox
703 void rc2xml::ParseCtrlButton(wxString label, wxString varname)
704 {
705 wxString token;
706 wxFileOffset p = m_rc.Tell();
707 ReadOrs(token);
708 m_rc.Seek(p);
709
710 if (token.Find(_T("BS_AUTOCHECKBOX"))!=wxNOT_FOUND)
711 ParseCheckBox(label, varname);
712 else if ((token.Find(_T("BS_AUTORADIOBUTTON"))!=wxNOT_FOUND)||
713 (token.Find(_T("BS_RADIOBUTTON"))!=wxNOT_FOUND))
714 ParseRadioButton(label, varname);
715 else if (token.Find(_T("BS_GROUPBOX"))!=wxNOT_FOUND)
716 ParseGroupBox(label, varname);
717 else // if ((token.Find("BS_PUSHBUTTON")!=wxNOT_FOUND)||
718 // (token.Find("BS_DEFPUSHBUTTON")!=wxNOT_FOUND))
719 ParsePushButton(label, varname); // make default case
720 }
721
722 void rc2xml::WriteSize(int width, int height)
723 {
724 wxString msg;
725 msg << _T(" <size>") << width << _T(",") << height << _T("d</size>");
726 m_xmlfile.Write(msg);
727 }
728
729 void rc2xml::WritePosition(int x, int y)
730 {
731 wxString msg;
732 msg << _T(" <pos>") << x << _T(",") << y << _T("d</pos>");
733 m_xmlfile.Write(msg);
734 }
735
736 void rc2xml::WriteTitle(wxString title)
737 {
738 wxString msg;
739 msg=_T("\t\t<title>")+title+_T("</title>\n");
740 m_xmlfile.Write(msg);
741 }
742
743 void rc2xml::WriteName(wxString name)
744 {
745
746 //Try to convert any number ids into names
747 name=LookUpId(name);
748 //Replace common MS ids with wxWidgets ids
749 //I didn't do everyone of them
750 if (name==_T("IDOK"))
751 name=_T("wxID_OK");
752 else if (name==_T("IDCANCEL"))
753 name=_T("wxID_CANCEL");
754 else if (name==_T("IDAPPLY"))
755 name=_T("wxID_APPLY");
756 else if (name==_T("ID_FILE_OPEN"))
757 name=_T("wxID_OPEN");
758 else if (name==_T("ID_FILE_CLOSE"))
759 name=_T("wxID_CLOSE");
760 else if (name==_T("ID_FILE_SAVE"))
761 name=_T("wxID_SAVE");
762 else if (name==_T("ID_FILE_SAVE_AS"))
763 name=_T("wxID_SAVEAS");
764 else if (name==_T("ID_APP_EXIT"))
765 name=_T("wxID_EXIT");
766 else if (name==_T("ID_FILE_PRINT"))
767 name=_T("wxID_PRINT");
768 else if (name==_T("ID_FILE_PRINT_PREVIEW"))
769 name=_T("wxID_PREVIEW");
770 else if (name==_T("ID_FILE_PRINT_SETUP"))
771 name=_T("wxID_PRINT_SETUP");
772 else if (name==_T("ID_APP_ABOUT"))
773 name=_T("wxID_ABOUT");
774 else if (name==_T("ID_EDIT_UNDO"))
775 name=_T("wxID_UNDO");
776 else if (name==_T("ID_EDIT_CUT"))
777 name=_T("wxID_CUT");
778 else if (name==_T("ID_EDIT_COPY"))
779 name=_T("wxID_COPY");
780 else if (name==_T("ID_EDIT_PASTE"))
781 name=_T("wxID_PASTE");
782 else if (name==_T("IDYES"))
783 name=_T("wxID_YES");
784 else if (name==_T("IDNO"))
785 name=_T("wxID_NO");
786 else if (name==_T("IDHELP"))
787 name=_T("wxID_HELP");
788
789 m_xmlfile.Write(_T(" name= \"")+name+_T("\""));
790 }
791
792 void rc2xml::WriteLabel(wxString label)
793 {
794 label.Replace(_T("&"),_T("$"));
795 // changes by MS, handle '<' '>' characters within a label.
796 label.Replace(_T("<"),_T("&lt;"));
797 label.Replace(_T(">"),_T("&gt;"));
798 m_xmlfile.Write(_T("\t\t\t<label>")+label+_T("</label>\n"));
799 }
800
801 void rc2xml::WriteBasicInfo(int x, int y, int width, int height, wxString name)
802 {
803 WriteName(name);
804 m_xmlfile.Write(_T(">\n"));
805 m_xmlfile.Write(_T("\t\t\t"));
806 WritePosition(x,y);
807 WriteSize(width,height);
808 m_xmlfile.Write(_T("\n"));
809 }
810
811 void rc2xml::WriteStyle(wxString style)
812 {
813 if (style.Length()==0)
814 return;
815 m_xmlfile.Write(_T("\t\t\t<style>")+style+_T("</style>\n"));
816 }
817 /*
818 LISTBOX IDC_LIST1,16,89,48,40,LBS_SORT | LBS_MULTIPLESEL |
819 LBS_NOINTEGRALHEIGHT | WS_VSCROLL | WS_TABSTOP
820 */
821 void rc2xml::ParseListBox(wxString varname)
822 {
823 wxString token;
824 token=PeekToken();
825 while (!token.IsNumber())
826 {
827 token=GetToken();
828 token=PeekToken();
829 }
830 int x,y,width,height;
831 ReadRect(x,y,width,height);
832
833 m_xmlfile.Write(_T("\t\t<object class=\"wxListBox\""));
834 WriteBasicInfo(x,y,width,height,varname);
835 m_xmlfile.Write(_T("\n\t\t</object>\n"));
836
837 }
838 /*
839 CONTROL "",IDC_RICHEDIT1,"RICHEDIT",ES_AUTOHSCROLL | WS_BORDER |
840 WS_TABSTOP,103,110,40,14
841 */
842 void rc2xml::ParseRichEdit(wxString WXUNUSED(label), wxString varname)
843 {
844 wxString token;
845 //while (ReadOrs(token));
846 ReadOrs(token);
847 int x,y,width,height;
848 ReadRect(x,y,width,height);
849 wxString style;
850 //Make it a rich text control
851 style+=_T("wxTE_MULTILINE ");
852 m_xmlfile.Write(_T("\t\t<object class=\"wxTextCtrl\""));
853 WriteBasicInfo(x,y,width,height,varname);
854 WriteStyle(style);
855 m_xmlfile.Write(_T("\t\t</object>\n"));
856
857 }
858 /*
859 CONTROL "Spin1",IDC_SPIN1,"msctls_updown32",UDS_ARROWKEYS,209,72,
860 19,26
861 */
862 void rc2xml::ParseSpinCtrl(wxString WXUNUSED(label), wxString varname)
863 {
864 wxString token,style;
865
866 ReadOrs(token);
867 if (token.Find(_T("UDS_HORZ"))!=wxNOT_FOUND)
868 style=_T("wxSP_HORIZONTAL");
869 //MFC default
870 else
871 style=_T("wxSP_VERTICAL");
872
873 int x,y,width,height;
874 ReadRect(x,y,width,height);
875 m_xmlfile.Write(_T("\t\t<object class=\"wxSpinButton\""));
876 WriteBasicInfo(x,y,width,height,varname);
877 WriteStyle(style);
878 m_xmlfile.Write(_T("\n\t\t</object>\n"));
879
880 }
881
882 void rc2xml::FirstPass()
883 {
884 wxString token,prevtok;
885 while (!m_done)
886 {
887 token=GetToken();
888 if (token==_T("BITMAP"))
889 ParseBitmap(prevtok);
890 else if (token==_T("STRINGTABLE"))
891 ParseStringTable(prevtok);
892 else if (token==_T("ICON"))
893 ParseIcon(prevtok);
894
895 prevtok=token;
896 }
897 }
898
899 void rc2xml::ParseBitmap(wxString varname)
900 {
901 wxString token;
902 wxString *bitmapfile;
903
904 token=PeekToken();
905 //Microsoft notation?
906 if (token==_T("DISCARDABLE"))
907 {
908 token=GetToken();
909 token=PeekToken();
910 }
911 bitmapfile=new wxString;
912 *bitmapfile=GetQuoteField();
913 m_bitmaplist->Append(varname,bitmapfile);
914
915 }
916
917
918 void rc2xml::SecondPass()
919 {
920 wxString token,prevtok;
921 while (!m_done)
922 {
923 token=GetToken();
924 if ((token==_T("DIALOG"))||(token==_T("DIALOGEX")))
925 ParseDialog(prevtok);
926 else if (token==_T("MENU"))
927 ParseMenu(prevtok);
928 else if (token==_T("TOOLBAR"))
929 ParseToolBar(prevtok);
930
931 prevtok=token;
932 }
933
934 }
935
936 void rc2xml::ParseToolBar(wxString varname)
937 {
938 wxString token;
939 token=GetToken();
940 wxASSERT_MSG(token==_T("DISCARDABLE"),_T("Error in toolbar parsing"));
941 //Look up bitmap for toolbar and load
942 wxNode *node=m_bitmaplist->Find(LookUpId(varname));
943 wxString *bitmappath;
944 bitmappath=(wxString *)node->GetData();
945 wxBitmap bitmap;
946 if (!bitmap.LoadFile(*bitmappath,wxBITMAP_TYPE_BMP ))
947 wxLogError(_T("Unable to load bitmap:")+*bitmappath);
948
949 //Write toolbar to xml file
950 m_xmlfile.Write(_T("\t<object class=\"wxToolBar\""));
951 //Avoid duplicate names this way
952 varname.Replace(_T("IDR_"),_T("TB_"));
953 WriteName(varname);
954 m_xmlfile.Write(_T(">\n"));
955 wxString style;
956 style+=_T("wxTB_FLAT");
957 WriteStyle(style);
958
959
960 //Grab width and height
961 int width,height;
962 width=wxAtoi(GetToken());
963 height=wxAtoi(GetToken());
964
965 int c=0;
966 wxString buttonname,msg,tip,longhelp;
967 token=GetToken();
968 while ((token!=_T("BEGIN"))&(token!=_T("{")))
969 token=GetToken();
970
971 while ((token!=_T("END"))&(token!=_T("}")))
972 {
973 if (token==_T("BUTTON"))
974 {
975 buttonname=GetToken();
976 m_xmlfile.Write(_T("\t\t\t<object class=\"tool\""));
977 WriteName(buttonname);
978 m_xmlfile.Write(_T(">\n"));
979 //Write tool tip if any
980 if (LookUpString(buttonname,msg))
981 {
982 SplitHelp(msg,tip,longhelp);
983 m_xmlfile.Write(_T("\t\t\t\t<tooltip>")+tip+_T("</tooltip>\n"));
984 m_xmlfile.Write(_T("\t\t<longhelp>")+longhelp+_T("</longhelp>\n"));
985 }
986 //Make a bitmap file name
987 buttonname=CleanName(buttonname);
988 buttonname+=_T(".bmp");
989 m_xmlfile.Write(_T("\t\t\t\t<bitmap>")+buttonname+_T("</bitmap>\n"));
990 WriteToolButton(buttonname,c,width,height,bitmap);
991 m_xmlfile.Write(_T("\t\t\t</object>\n"));
992 c++;
993 }
994 else if (token==_T("SEPARATOR"))
995 {
996 m_xmlfile.Write(_T("\t\t\t<object class=\"separator\"/>\n"));
997 }
998 token=GetToken();
999 }
1000 m_xmlfile.Write(_T("\t</object>\n"));
1001 }
1002
1003 //Extract bitmaps from larger toolbar bitmap
1004 void rc2xml::WriteToolButton(wxString name,int index, int width, int height, wxBitmap bitmap)
1005 {
1006 int x;
1007 x=index*width;
1008 wxRect r(x,0,width,height);
1009 wxBitmap little;
1010 little=bitmap.GetSubBitmap(r);
1011 little.SaveFile(m_targetpath+name,wxBITMAP_TYPE_BMP);
1012 }
1013
1014 void rc2xml::ParseStringTable(wxString WXUNUSED(varname))
1015 {
1016 wxString token;
1017 token=GetToken();
1018 while ((token!=_T("BEGIN"))&(token!=_T("{")))
1019 token=GetToken();
1020 token=GetToken();
1021 wxString *msg;
1022
1023 while ((token!=_T("END"))&(token!=_T("}")))
1024 {
1025 msg=new wxString;
1026 *msg=GetStringQuote();
1027 m_stringtable->Append(token,msg);
1028 token=GetToken();
1029 }
1030 }
1031
1032 bool rc2xml::LookUpString(wxString strid,wxString & st)
1033 {
1034 wxNode *node=m_stringtable->Find(strid);
1035 wxString *s;
1036 if (node==NULL)
1037 return false;
1038
1039 s=(wxString *)node->GetData();
1040 st=*s;
1041
1042 return true;
1043 }
1044
1045 bool rc2xml::SplitHelp(wxString msg, wxString &shorthelp, wxString &longhelp)
1046 {
1047 int spot;
1048 spot=msg.Find(_T("\\n"));
1049 if (spot==wxNOT_FOUND)
1050 {
1051 shorthelp=msg;
1052 longhelp=msg;
1053 }
1054
1055 longhelp=msg.Left(spot);
1056 spot=msg.Length()-spot-2;
1057 shorthelp=msg.Right(spot);
1058 return true;
1059 }
1060
1061 void rc2xml::ParseMenuItem()
1062 {
1063 wxString token,name,msg,tip,longhelp;
1064 //int spot;
1065 if (PeekToken()==_T("SEPARATOR"))
1066 {
1067 m_xmlfile.Write(_T("\t\t\t<object class=\"separator\"/>\n"));
1068 return;
1069 }
1070
1071 token=GetQuoteField();
1072 name=GetToken();
1073 //Remove \t because it causes problems
1074 //spot=token.First("\\t");
1075 //token=token.Left(spot);
1076 m_xmlfile.Write(_T("\t\t\t<object class=\"wxMenuItem\""));
1077 WriteName(name);
1078 m_xmlfile.Write(_T(">\n"));
1079 WriteLabel(token);
1080 //Look up help if any listed in stringtable
1081 //can't assume numbers correlate, restrict to string identifiers
1082 if ((!name.IsNumber())&&(LookUpString(name,msg)))
1083 {
1084 SplitHelp(msg,tip,longhelp);
1085 m_xmlfile.Write(_T("\t\t\t<help>")
1086 +longhelp+_T("</help>\n"));
1087 }
1088 //look for extra attributes like checked and break
1089 wxString ptoken;
1090 ptoken=PeekToken();
1091 ptoken.MakeUpper();
1092 while ((ptoken!=_T("MENUITEM"))&(ptoken!=_T("POPUP"))&(ptoken!=_T("END")))
1093 {
1094 token=GetToken();
1095 ptoken.MakeUpper();
1096 if (token==_T("CHECKED"))
1097 m_xmlfile.Write(_T("\t\t\t<checkable>1</checkable>\n"));
1098 else if (token==_T("MENUBREAK"))
1099 ;
1100 //m_xmlfile.Write("\t\t\t</break>\n");
1101 else if (token==_T("GRAYED"))
1102 ;
1103 else
1104 wxLogError(_T("Unknown Menu Item token:")+token);
1105
1106 ptoken=PeekToken();
1107 ptoken.MakeUpper();
1108 }
1109 m_xmlfile.Write(_T("\t\t\t</object>\n"));
1110
1111 }
1112
1113 //ICON IDR_MAINFRAME,IDC_STATIC,11,17,20,20
1114 void rc2xml::ParseIconStatic()
1115 {
1116 wxString token;
1117 wxString varname,iconname;
1118 token = PeekToken();
1119 if (token.Contains(_T("\"")))
1120 iconname = GetQuoteField();
1121 else
1122 iconname=GetToken();
1123 //Look up icon
1124 varname=GetToken();
1125
1126 int x,y,width,height;
1127 ReadRect(x,y,width,height);
1128
1129 m_xmlfile.Write(_T("\t\t<object class=\"wxStaticBitmap\""));
1130 WriteBasicInfo(x,y,width,height,varname);
1131 //Save icon as a bitmap
1132 WriteIcon(iconname);
1133 m_xmlfile.Write(_T("\t\t</object>\n"));
1134
1135 }
1136 //IDR_MAINFRAME ICON DISCARDABLE "res\\mfcexample.ico"
1137 void rc2xml::ParseIcon(wxString varname)
1138 {
1139 wxString token;
1140 wxString *iconfile;
1141 iconfile=new wxString;
1142 token=PeekToken();
1143
1144 *iconfile=GetQuoteField();
1145 m_iconlist->Append(varname,iconfile);
1146
1147
1148 }
1149
1150 wxString rc2xml::CleanName(wxString name)
1151 {
1152 name.MakeLower();
1153 name.Replace(_T("id_"),wxEmptyString);
1154 name.Replace(_T("idr_"),wxEmptyString);
1155 name.Replace(_T("idb_"),wxEmptyString);
1156 name.Replace(_T("idc_"),wxEmptyString);
1157
1158 name.Replace(_T(".ico"),wxEmptyString);
1159
1160 name.Replace(_T(".bmp"),wxEmptyString);
1161 return name;
1162 }
1163 // And the award for most messed up control goes to...
1164 // CONTROL IDB_FACE,IDC_STATIC,"Static",SS_BITMAP,26,62,32,30
1165 void rc2xml::ParseStaticBitmap(wxString bitmapname, wxString varname)
1166 {
1167 wxString token;
1168 //Grab SS_BITMAP
1169 ReadOrs(token);
1170
1171
1172 int x,y,width,height;
1173 ReadRect(x,y,width,height);
1174
1175 m_xmlfile.Write(_T("\t\t<object class=\"wxStaticBitmap\""));
1176 WriteBasicInfo(x,y,width,height,varname);
1177 WriteBitmap(bitmapname);
1178 m_xmlfile.Write(_T("\t\t</object>\n"));
1179
1180 }
1181
1182 void rc2xml::ParseNormalMSControl()
1183 {
1184 wxString label=GetQuoteField();
1185 wxString varname=GetToken();
1186 wxString kindctrl=GetQuoteField();
1187 kindctrl.MakeUpper();
1188
1189 if (kindctrl==_T("MSCTLS_UPDOWN32"))
1190 ParseSpinCtrl(label,varname);
1191 else if (kindctrl==_T("MSCTLS_TRACKBAR32"))
1192 ParseSlider(label,varname);
1193 else if (kindctrl==_T("MSCTLS_PROGRESS32"))
1194 ParseProgressBar(label,varname);
1195 else if (kindctrl==_T("SYSTREEVIEW32"))
1196 ParseTreeCtrl(label,varname);
1197 else if (kindctrl==_T("SYSMONTHCAL32"))
1198 ParseCalendar(label,varname);
1199 else if (kindctrl==_T("SYSLISTVIEW32"))
1200 ParseListCtrl(label,varname);
1201 else if (kindctrl==_T("BUTTON"))
1202 ParseCtrlButton(label,varname);
1203 else if (kindctrl==_T("RICHEDIT"))
1204 ParseRichEdit(label,varname);
1205 else if (kindctrl==_T("STATIC"))
1206 {
1207 wxString token;
1208 wxFileOffset p = m_rc.Tell();
1209 ReadOrs(token);
1210 m_rc.Seek(p);
1211 if (token.Find(_T("SS_BITMAP"))!=wxNOT_FOUND)
1212 ParseStaticBitmap(label,varname);
1213 else
1214 ParseStaticText(label,varname);
1215 }
1216 else if (kindctrl==_T("EDIT"))
1217 ParseTextCtrl(varname);
1218 else if (kindctrl==_T("LISTBOX"))
1219 ParseListBox(varname);
1220 else if (kindctrl==_T("COMBOBOX"))
1221 ParseComboBox(varname);
1222 }
1223
1224 void rc2xml::ParseWeirdMSControl()
1225 {
1226 wxString id = GetToken();
1227 wxString varname = GetToken();
1228 wxString kindctrl = GetQuoteField();
1229 kindctrl.MakeUpper();
1230 // CONTROL IDB_FACE,IDC_STATIC,"Static",SS_BITMAP,26,62,32,30
1231 if (kindctrl==_T("STATIC"))
1232 {
1233 if (PeekToken()==_T("SS_BITMAP"))
1234 ParseStaticBitmap(id,varname);
1235 else
1236 wxLogError(_T("Unknown MS Control Static token"));
1237 }
1238 }
1239
1240 //SCROLLBAR IDC_SCROLLBAR1,219,56,10,40,SBS_VERT
1241 void rc2xml::ParseScrollBar()
1242 {
1243 wxString token;
1244 wxString varname;
1245
1246 varname=GetToken();
1247 int x,y,width,height;
1248 ReadRect(x,y,width,height);
1249 wxString style;
1250
1251 ReadOrs(token);
1252
1253 if (token.Find(_T("SBS_VERT"))!=wxNOT_FOUND)
1254 style=_T("wxSB_VERTICAL");
1255 //Default MFC style is horizontal
1256 else
1257 style=_T("wxSB_HORIZONTAL");
1258
1259 m_xmlfile.Write(_T("\t\t<object class=\"wxScrollBar\""));
1260 WriteBasicInfo(x,y,width,height,varname);
1261 WriteStyle(style);
1262 m_xmlfile.Write(_T("\n\t\t</object>\n"));
1263
1264 }
1265 // CONTROL "Tree1",IDC_TREE1,"SysTreeView32",WS_BORDER | WS_TABSTOP,
1266 // 7,7,66,61
1267
1268 void rc2xml::ParseTreeCtrl(wxString WXUNUSED(label), wxString varname)
1269 {
1270 wxString token;
1271 //while (ReadOrs(token));
1272 ReadOrs(token);
1273 int x,y,width,height;
1274 ReadRect(x,y,width,height);
1275 m_xmlfile.Write(_T("\t\t<object class=\"wxTreeCtrl\""));
1276 WriteBasicInfo(x,y,width,height,varname);
1277 m_xmlfile.Write(_T("\t\t</object>\n"));
1278
1279 }
1280 // CONTROL "MonthCalendar1",IDC_MONTHCALENDAR1,"SysMonthCal32",
1281 //MCS_NOTODAY | WS_TABSTOP,105,71,129,89
1282
1283 void rc2xml::ParseCalendar(wxString WXUNUSED(label), wxString varname)
1284 {
1285 wxString token;
1286 //while (ReadOrs(token));
1287 ReadOrs(token);
1288 int x,y,width,height;
1289 ReadRect(x,y,width,height);
1290 m_xmlfile.Write(_T("\t\t<object class=\"wxCalendarCtrl\""));
1291 WriteBasicInfo(x,y,width,height,varname);
1292 m_xmlfile.Write(_T("\t\t</object>\n"));
1293 }
1294 // CONTROL "List1",IDC_LIST1,"SysListView32",WS_BORDER | WS_TABSTOP,
1295 // 7,89,68,71
1296
1297 void rc2xml::ParseListCtrl(wxString WXUNUSED(label), wxString varname)
1298 {
1299 wxString token;
1300 //while (ReadOrs(token));
1301 ReadOrs(token);
1302 int x,y,width,height;
1303 ReadRect(x,y,width,height);
1304 m_xmlfile.Write(_T("\t\t<object class=\"wxListCtrl\""));
1305 WriteBasicInfo(x,y,width,height,varname);
1306 m_xmlfile.Write(_T("\t\t</object>\n"));
1307
1308 }
1309
1310 void rc2xml::WriteBitmap(wxString bitmapname)
1311 {
1312 //Look up bitmap
1313 wxNode *node=m_bitmaplist->Find(LookUpId(bitmapname));
1314 if (node==NULL)
1315 {
1316 m_xmlfile.Write(_T("\t\t\t<bitmap>missingfile</bitmap>\n"));
1317 wxLogError(_T("Unable to find bitmap:")+bitmapname);
1318 return;
1319 }
1320
1321 wxString *bitmappath;
1322 bitmappath=(wxString *)node->GetData();
1323
1324 bitmapname=wxFileNameFromPath(*bitmappath);
1325 wxBitmap bitmap;
1326 if (!bitmap.LoadFile(*bitmappath,wxBITMAP_TYPE_BMP ))
1327 wxLogError(_T("Unable to load bitmap:")+*bitmappath);
1328
1329 //Make a bitmap file name
1330 bitmapname=CleanName(bitmapname);
1331 bitmapname+=_T(".bmp");
1332 m_xmlfile.Write(_T("\t\t\t<bitmap>")+bitmapname+_T("</bitmap>\n"));
1333 bitmap.SaveFile(m_targetpath+bitmapname,wxBITMAP_TYPE_BMP);
1334 }
1335
1336 void rc2xml::WriteIcon(wxString iconname)
1337 {
1338 wxNode *node=m_iconlist->Find(iconname);
1339 if (node==NULL)
1340 {
1341 m_xmlfile.Write(_T("\t\t\t<bitmap>missing_file</bitmap>\n"));
1342 wxLogError(_T("Unable to find icon:")+iconname);
1343 }
1344 wxString *iconpath;
1345 iconpath=(wxString *)node->GetData();
1346 wxIcon icon;
1347 wxBitmap bitmap;
1348 if (!icon.LoadFile(*iconpath,wxBITMAP_TYPE_ICO ))
1349 wxLogError(_T("Unable to load icon:")+*iconpath);
1350 #ifdef __WXMSW__
1351 bitmap.CopyFromIcon(icon);
1352 #else
1353 bitmap = icon;
1354 #endif
1355 iconname=wxFileNameFromPath(*iconpath);
1356 //Make a bitmap file name
1357 iconname=CleanName(iconname);
1358 iconname+=_T(".bmp");
1359 m_xmlfile.Write(_T("\t\t\t<bitmap>")+iconname+_T("</bitmap>\n"));
1360 bitmap.SaveFile(m_targetpath+iconname,wxBITMAP_TYPE_BMP);
1361
1362
1363 }
1364 /*Unfortunately sometimes the great MSVC Resource editor decides
1365 to use numbers instead of the word id. I have no idea why they
1366 do this, but that is the way it is.
1367 */
1368 /* this is a quick and dirty way to parse the resource.h file
1369 it will not recognize #ifdef so it can be easily fooled
1370 */
1371 void rc2xml::ParseResourceHeader()
1372 {
1373 wxTextFile r;
1374 //Attempt to load resource.h in current path
1375 if (!r.Open(_T("resource.h")))
1376 {
1377 wxLogError(_T("Warining Unable to load resource.h file"));
1378 return;
1379 }
1380
1381 wxString str;
1382 wxString id,v;
1383 wxStringTokenizer tok;
1384 wxString *varname;
1385
1386
1387 long n;
1388
1389 //Read through entire file
1390 for ( str = r.GetFirstLine(); !r.Eof(); str = r.GetNextLine() )
1391 {
1392 if (str.Find(_T("#define"))!=wxNOT_FOUND)
1393 {
1394 tok.SetString(str);
1395 //Just ignore #define token
1396 tok.GetNextToken();
1397 v=tok.GetNextToken();
1398 id=tok.GetNextToken();
1399 if (id.IsNumber())
1400 {
1401 varname=new wxString;
1402 id.ToLong(&n);
1403 *varname=v;
1404 m_resourcelist->Append(n,varname);
1405 }
1406 }
1407 }
1408
1409
1410
1411 }
1412
1413
1414 wxString rc2xml::LookUpId(wxString id)
1415 {
1416 wxString st;
1417
1418 if (!id.IsNumber())
1419 return id;
1420 long n;
1421 id.ToLong(&n);
1422 wxNode *node=m_resourcelist->Find(n);
1423 wxString *s;
1424 if (node==NULL)
1425 return id;
1426
1427 s=(wxString *)node->GetData();
1428 st=*s;
1429 return st;
1430 }