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