]> git.saurik.com Git - wxWidgets.git/blob - contrib/utils/convertrc/rc2xml.cpp
Inital fill in background, removed tabs, -1->wxID_ANY, TRUE->true, FALSE->false
[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")) != -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 wxWidgets 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 }