utils/dialoged/src/reswrite.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        reswrite.cpp
   3 // Purpose:     Resource writing functionality
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows license
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx/wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifdef __BORLANDC__
  20 #pragma hdrstop
  21 #endif
  22
  23 #ifndef WX_PRECOMP
  24 #include "wx/wx.h"
  25 #endif
  26
  27 #include <ctype.h>
  28 #include <stdlib.h>
  29 #include <math.h>
  30 #include <string.h>
  31
  32 #include "wx/scrolbar.h"
  33 #include "wx/string.h"
  34 #include "wx/wfstream.h"
  35 #include "wx/txtstrm.h"
  36
  37 #include "reseditr.h"
  38
  39 char *SafeString(char *s);
  40 char *SafeWord(const wxString& s);
  41
  42 // Save an association between the child resource and the panel item, to allow
  43 // us not to require unique window names.
  44 wxControl *wxResourceTableWithSaving::CreateItem(wxPanel *panel, const wxItemResource *childResource, const wxItemResource* parentResource)
  45 {
  46   wxControl *item = wxResourceTable::CreateItem(panel, childResource, parentResource);
  47   if (item)
  48     wxResourceManager::GetCurrentResourceManager()->GetResourceAssociations().Put((long)childResource, item);
  49   return item;
  50 }
  51
  52 void wxResourceTableWithSaving::OutputFont(wxTextOutputStream& stream, const wxFont& font)
  53 {
  54   stream << "[" << font.GetPointSize() << ", '";
  55   stream << font.GetFamilyString() << "', '";
  56   stream << font.GetStyleString() << "', '";
  57   stream << font.GetWeightString() << "', ";
  58   stream << (int)font.GetUnderlined();
  59   if (font.GetFaceName() != "")
  60     stream << ", '" << font.GetFaceName() << "'";
  61   stream << "]";
  62 }
  63
  64 /*
  65  * Resource table with saving (basic one only has loading)
  66  */
  67
  68 bool wxResourceTableWithSaving::Save(const wxString& filename)
  69 {
  70   wxFileOutputStream file_output( filename.fn_str() );
  71   if (file_output.LastError())
  72     return FALSE;
  73
  74   wxTextOutputStream stream( file_output );
  75
  76   BeginFind();
  77   wxNode *node = NULL;
  78   while ((node = Next()))
  79   {
  80     wxItemResource *item = (wxItemResource *)node->Data();
  81     wxString resType(item->GetType());
  82
  83     if (resType == "wxDialogBox" || resType == "wxDialog" || resType == "wxPanel" || resType == "wxBitmap")
  84     {
  85       if (!SaveResource(stream, item, (wxItemResource*) NULL))
  86         return FALSE;
  87     }
  88   }
  89   return TRUE;
  90 }
  91
  92 bool wxResourceTableWithSaving::SaveResource(wxTextOutputStream& stream, wxItemResource* item, wxItemResource* parentItem)
  93 {
  94   char styleBuf[400];
  95   wxString itemType(item->GetType());
  96
  97   if (itemType == "wxDialogBox" || itemType == "wxDialog" || itemType == "wxPanel")
  98     {
  99       if (itemType == "wxDialogBox" || itemType == "wxDialog")
 100       {
 101         stream << "static char *" << item->GetName() << " = \"dialog(name = '" << item->GetName() << "',\\\n";
 102         GenerateDialogStyleString(item->GetStyle(), styleBuf);
 103       }
 104       else
 105       {
 106         stream << "static char *" << item->GetName() << " = \"panel(name = '" << item->GetName() << "',\\\n";
 107         GenerateDialogStyleString(item->GetStyle(), styleBuf);
 108       }
 109
 110       stream << "  style = '" << styleBuf << "',\\\n";
 111       stream << "  title = '" << item->GetTitle() << "',\\\n";
 112       stream << "  id = " << item->GetId() << ",\\\n";
 113       stream << "  x = " << item->GetX() << ", y = " << item->GetY();
 114       stream << ", width = " << item->GetWidth() << ", height = " << item->GetHeight();
 115
 116       if (1) // item->GetStyle() & wxNO_3D)
 117       {
 118         if (item->GetBackgroundColour().Ok())
 119         {
 120           char buf[7];
 121           wxDecToHex(item->GetBackgroundColour().Red(), buf);
 122           wxDecToHex(item->GetBackgroundColour().Green(), buf+2);
 123           wxDecToHex(item->GetBackgroundColour().Blue(), buf+4);
 124           buf[6] = 0;
 125
 126           stream << ",\\\n  " << "background_colour = '" << buf << "'";
 127         }
 128       }
 129
 130       int dialogUnits = 0;
 131       int useDefaults = 0;
 132       if ((item->GetResourceStyle() & wxRESOURCE_DIALOG_UNITS) != 0)
 133         dialogUnits = 1;
 134       if ((item->GetResourceStyle() & wxRESOURCE_USE_DEFAULTS) != 0)
 135         useDefaults = 1;
 136
 137       stream << ",\\\n  " << "use_dialog_units = " << dialogUnits;
 138       stream << ",\\\n  " << "use_system_defaults = " << useDefaults;
 139
 140       if (item->GetFont().Ok())
 141       {
 142         stream << ",\\\n  font = ";
 143         OutputFont(stream, item->GetFont());
 144       }
 145
 146       if (item->GetChildren().Number() > 0)
 147         stream << ",\\\n";
 148       else
 149         stream << "\\\n";
 150       wxNode *node = item->GetChildren().First();
 151       while (node)
 152       {
 153         wxItemResource *child = (wxItemResource *)node->Data();
 154
 155         stream << "  control = [";
 156
 157         SaveResource(stream, child, item);
 158
 159         stream << "]";
 160
 161         if (node->Next())
 162           stream << ",\\\n";
 163         node = node->Next();
 164       }
 165       stream << ").\";\n\n";
 166     }
 167   else if (itemType == "wxButton" || itemType == "wxBitmapButton")
 168     {
 169       GenerateControlStyleString(itemType, item->GetStyle(), styleBuf);
 170       stream << item->GetId() << ", " << itemType << ", " << SafeWord(item->GetTitle()) << ", '" << styleBuf << "', ";
 171       stream << SafeWord(item->GetName()) << ", " << item->GetX() << ", " << item->GetY() << ", ";
 172       stream << item->GetWidth() << ", " << item->GetHeight();
 173       if (item->GetValue4())
 174         stream << ", '" << item->GetValue4() << "'";
 175       if (item->GetFont().Ok())
 176       {
 177         stream << ",\\\n      ";
 178         OutputFont(stream, item->GetFont());
 179       }
 180     }
 181   else if (itemType == "wxStaticText" || itemType == "wxStaticBitmap")
 182     {
 183       GenerateControlStyleString(itemType, item->GetStyle(), styleBuf);
 184       stream << item->GetId() << ", " << itemType << ", " << SafeWord(item->GetTitle()) << ", '" << styleBuf << "', ";
 185       stream << SafeWord(item->GetName()) << ", " << item->GetX() << ", " << item->GetY() << ", ";
 186       stream << item->GetWidth() << ", " << item->GetHeight();
 187       if (item->GetValue4())
 188         stream << ", '" << item->GetValue4() << "'";
 189       if (item->GetFont().Ok())
 190       {
 191         stream << ",\\\n      ";
 192         OutputFont(stream, item->GetFont());
 193       }
 194     }
 195   else if (itemType == "wxCheckBox")
 196     {
 197       GenerateControlStyleString(itemType, item->GetStyle(), styleBuf);
 198       stream << item->GetId() << ", " << "wxCheckBox, " << SafeWord(item->GetTitle()) << ", '" << styleBuf << "', ";
 199       stream << SafeWord(item->GetName()) << ", " << item->GetX() << ", " << item->GetY() << ", ";
 200       stream << item->GetWidth() << ", " << item->GetHeight();
 201       stream << ", " << item->GetValue1();
 202       if (item->GetFont().Ok())
 203       {
 204         stream << ",\\\n      ";
 205         OutputFont(stream, item->GetFont());
 206       }
 207     }
 208   else if (itemType == "wxRadioButton")
 209     {
 210       GenerateControlStyleString(itemType, item->GetStyle(), styleBuf);
 211       stream << item->GetId() << ", " << "wxRadioButton, " << SafeWord(item->GetTitle()) << ", '" << styleBuf << "', ";
 212       stream << SafeWord(item->GetName()) << ", " << item->GetX() << ", " << item->GetY() << ", ";
 213       stream << item->GetWidth() << ", " << item->GetHeight();
 214       stream << ", " << item->GetValue1();
 215       if (item->GetFont().Ok())
 216       {
 217         stream << ",\\\n      ";
 218         OutputFont(stream, item->GetFont());
 219       }
 220     }
 221   else if (itemType == "wxStaticBox")
 222     {
 223       GenerateControlStyleString(itemType, item->GetStyle(), styleBuf);
 224       stream << item->GetId() << ", " << "wxStaticBox, " << SafeWord(item->GetTitle()) << ", '" << styleBuf << "', ";
 225       stream << SafeWord(item->GetName()) << ", " << item->GetX() << ", " << item->GetY() << ", ";
 226       stream << item->GetWidth() << ", " << item->GetHeight();
 227       if (item->GetFont().Ok())
 228       {
 229         stream << ",\\\n      ";
 230         OutputFont(stream, item->GetFont());
 231       }
 232     }
 233   else if (itemType == "wxText" || itemType == "wxMultiText" || itemType == "wxTextCtrl")
 234     {
 235       GenerateControlStyleString(itemType, item->GetStyle(), styleBuf);
 236       stream << item->GetId() << ", " << "wxTextCtrl, ";
 237       stream << SafeWord(item->GetTitle()) << ", '" << styleBuf << "', ";
 238       stream << SafeWord(item->GetName()) << ", " << item->GetX() << ", " << item->GetY() << ", ";
 239       stream << item->GetWidth() << ", " << item->GetHeight();
 240       stream << ", " << SafeWord(item->GetValue4());
 241       if (item->GetFont().Ok())
 242       {
 243         stream << ",\\\n      ";
 244         OutputFont(stream, item->GetFont());
 245       }
 246     }
 247   else if (itemType == "wxGauge")
 248     {
 249       GenerateControlStyleString(itemType, item->GetStyle(), styleBuf);
 250       stream << item->GetId() << ", " << "wxGauge, " << SafeWord(item->GetTitle()) << ", '" << styleBuf << "', ";
 251       stream << SafeWord(item->GetName()) << ", " << item->GetX() << ", " << item->GetY() << ", ";
 252       stream << item->GetWidth() << ", " << item->GetHeight();
 253       stream << ", " << item->GetValue1() << ", " << item->GetValue2();
 254       if (item->GetFont().Ok())
 255       {
 256         stream << ",\\\n      ";
 257         OutputFont(stream, item->GetFont());
 258       }
 259     }
 260   else if (itemType == "wxSlider")
 261     {
 262       GenerateControlStyleString(itemType, item->GetStyle(), styleBuf);
 263       stream << item->GetId() << ", " << "wxSlider, " << SafeWord(item->GetTitle()) << ", '" << styleBuf << "', ";
 264       stream << SafeWord(item->GetName()) << ", " << item->GetX() << ", " << item->GetY() << ", ";
 265       stream << item->GetWidth() << ", " << item->GetHeight();
 266       stream << ", " << item->GetValue1() << ", " << item->GetValue2() << ", " << item->GetValue3();
 267       if (item->GetFont().Ok())
 268       {
 269         stream << ",\\\n      ";
 270         OutputFont(stream, item->GetFont());
 271       }
 272     }
 273   else if (itemType == "wxScrollBar")
 274     {
 275       GenerateControlStyleString(itemType, item->GetStyle(), styleBuf);
 276       stream << item->GetId() << ", " << "wxScrollBar, " << SafeWord(item->GetTitle()) << ", '" << styleBuf << "', ";
 277       stream << SafeWord(item->GetName()) << ", " << item->GetX() << ", " << item->GetY() << ", ";
 278       stream << item->GetWidth() << ", " << item->GetHeight();
 279       stream << ", " << item->GetValue1() << ", " << item->GetValue2() << ", " << item->GetValue3() << ", ";
 280       stream << item->GetValue5();
 281     }
 282   else if (itemType == "wxListBox")
 283     {
 284       GenerateControlStyleString(itemType, item->GetStyle(), styleBuf);
 285       stream << item->GetId() << ", " << "wxListBox, " << SafeWord(item->GetTitle()) << ", '" << styleBuf << "', ";
 286       stream << SafeWord(item->GetName()) << ", " << item->GetX() << ", " << item->GetY() << ", ";
 287       stream << item->GetWidth() << ", " << item->GetHeight();
 288
 289       // Default list of values
 290
 291       stream << ", [";
 292       if (item->GetStringValues().Number() > 0)
 293       {
 294         wxNode *node = item->GetStringValues().First();
 295         while (node)
 296         {
 297           char *s = (char *)node->Data();
 298           stream << SafeWord(s);
 299           if (node->Next())
 300             stream << ", ";
 301           node = node->Next();
 302         }
 303       }
 304       stream << "]";
 305 /* Styles are now in the window style, not in a separate arg
 306       stream << ", ";
 307       switch (item->GetValue1())
 308       {
 309         case wxLB_MULTIPLE:
 310         {
 311           stream << "'wxLB_MULTIPLE'";
 312           break;
 313         }
 314         case wxLB_EXTENDED:
 315         {
 316           stream << "'wxLB_EXTENDED'";
 317           break;
 318         }
 319         case wxLB_SINGLE:
 320         default:
 321         {
 322           stream << "'wxLB_SINGLE'";
 323           break;
 324         }
 325       }
 326  */
 327
 328       if (item->GetFont().Ok())
 329       {
 330         stream << ",\\\n      ";
 331         OutputFont(stream, item->GetFont());
 332       }
 333     }
 334   else if (itemType == "wxChoice" || itemType == "wxComboBox")
 335     {
 336       GenerateControlStyleString(itemType, item->GetStyle(), styleBuf);
 337
 338       stream << item->GetId() << ", " << itemType << ", " << SafeWord(item->GetTitle()) << ", '" << styleBuf << "', ";
 339       stream << SafeWord(item->GetName()) << ", " << item->GetX() << ", " << item->GetY() << ", ";
 340       stream << item->GetWidth() << ", " << item->GetHeight();
 341
 342       if (itemType == "wxComboBox")
 343         stream << ", " << SafeWord(item->GetValue4());
 344
 345       // Default list of values
 346
 347       stream << ", [";
 348       if (item->GetStringValues().Number() > 0)
 349       {
 350         wxNode *node = item->GetStringValues().First();
 351         while (node)
 352         {
 353           char *s = (char *)node->Data();
 354           stream << SafeWord(s);
 355           if (node->Next())
 356             stream << ", ";
 357           node = node->Next();
 358         }
 359       }
 360       stream << "]";
 361       if (item->GetFont().Ok())
 362       {
 363         stream << ",\\\n      ";
 364         OutputFont(stream, item->GetFont());
 365       }
 366     }
 367   else if (itemType == "wxRadioBox")
 368     {
 369       // Must write out the orientation and number of rows/cols!!
 370       GenerateControlStyleString(itemType, item->GetStyle(), styleBuf);
 371       stream << item->GetId() << ", " << "wxRadioBox, " << SafeWord(item->GetTitle()) << ", '" << styleBuf << "', ";
 372       stream << SafeWord(item->GetName()) << ", " << item->GetX() << ", " << item->GetY() << ", ";
 373       stream << item->GetWidth() << ", " << item->GetHeight();
 374
 375       // Default list of values
 376
 377       stream << ", [";
 378       if (item->GetStringValues().Number() > 0)
 379       {
 380         wxNode *node = item->GetStringValues().First();
 381         while (node)
 382         {
 383           char *s = (char *)node->Data();
 384           stream << SafeWord(s);
 385           if (node->Next())
 386             stream << ", ";
 387           node = node->Next();
 388         }
 389       }
 390       stream << "], " << item->GetValue1();
 391       if (item->GetFont().Ok())
 392       {
 393         stream << ",\\\n      ";
 394         OutputFont(stream, item->GetFont());
 395       }
 396     }
 397   else if (itemType == "wxBitmap")
 398     {
 399       stream << "static char *" << item->GetName() << " = \"bitmap(name = '" << item->GetName() << "',\\\n";
 400
 401       wxNode *node = item->GetChildren().First();
 402       while (node)
 403       {
 404         wxItemResource *child = (wxItemResource *)node->Data();
 405         stream << "  bitmap = [";
 406
 407         char buf[400];
 408         strcpy(buf, child->GetName());
 409 #ifdef __WXMSW__
 410         wxDos2UnixFilename(buf);
 411 #endif
 412
 413         stream << "'" << buf << "', ";
 414
 415         int bitmapType = (int)child->GetValue1();
 416         switch (bitmapType)
 417         {
 418           case wxBITMAP_TYPE_XBM_DATA:
 419           {
 420             stream << "wxBITMAP_TYPE_XBM_DATA";
 421             break;
 422           }
 423           case wxBITMAP_TYPE_XPM_DATA:
 424           {
 425             stream << "wxBITMAP_TYPE_XPM_DATA";
 426             break;
 427           }
 428           case wxBITMAP_TYPE_XBM:
 429           {
 430             stream << "wxBITMAP_TYPE_XBM";
 431             break;
 432           }
 433           case wxBITMAP_TYPE_XPM:
 434           {
 435             stream << "wxBITMAP_TYPE_XPM";
 436             break;
 437           }
 438           case wxBITMAP_TYPE_BMP:
 439           {
 440             stream << "wxBITMAP_TYPE_BMP";
 441             break;
 442           }
 443           case wxBITMAP_TYPE_BMP_RESOURCE:
 444           {
 445             stream << "wxBITMAP_TYPE_BMP_RESOURCE";
 446             break;
 447           }
 448           case wxBITMAP_TYPE_GIF:
 449           {
 450             stream << "wxBITMAP_TYPE_GIF";
 451             break;
 452           }
 453           case wxBITMAP_TYPE_TIF:
 454           {
 455             stream << "wxBITMAP_TYPE_TIF";
 456             break;
 457           }
 458           case wxBITMAP_TYPE_ICO:
 459           {
 460             stream << "wxBITMAP_TYPE_ICO";
 461             break;
 462           }
 463           case wxBITMAP_TYPE_ICO_RESOURCE:
 464           {
 465             stream << "wxBITMAP_TYPE_ICO_RESOURCE";
 466             break;
 467           }
 468           case wxBITMAP_TYPE_CUR:
 469           {
 470             stream << "wxBITMAP_TYPE_CUR";
 471             break;
 472           }
 473           case wxBITMAP_TYPE_CUR_RESOURCE:
 474           {
 475             stream << "wxBITMAP_TYPE_CUR_RESOURCE";
 476             break;
 477           }
 478           default:
 479           case wxBITMAP_TYPE_ANY:
 480           {
 481             stream << "wxBITMAP_TYPE_ANY";
 482             break;
 483           }
 484         }
 485         stream << ", ";
 486         int platform = child->GetValue2();
 487         switch (platform)
 488         {
 489           case RESOURCE_PLATFORM_WINDOWS:
 490           {
 491             stream << "'WINDOWS'";
 492             break;
 493           }
 494           case RESOURCE_PLATFORM_X:
 495           {
 496             stream << "'X'";
 497             break;
 498           }
 499           case RESOURCE_PLATFORM_MAC:
 500           {
 501             stream << "'MAC'";
 502             break;
 503           }
 504           case RESOURCE_PLATFORM_ANY:
 505           {
 506             stream << "'ANY'";
 507             break;
 508           }
 509         }
 510         int noColours = (int)child->GetValue3();
 511         if (noColours > 0)
 512           stream << ", " << noColours;
 513
 514         stream << "]";
 515
 516         if (node->Next())
 517          stream << ",\\\n";
 518
 519         node = node->Next();
 520       }
 521       stream << ").\";\n\n";
 522     }
 523     else
 524     {
 525         wxString str("Unimplemented resource type: ");
 526         str += itemType;
 527         wxMessageBox(str);
 528     }
 529   return TRUE;
 530 }
 531
 532 void wxResourceTableWithSaving::GenerateDialogStyleString(long windowStyle, char *buf)
 533 {
 534   buf[0] = 0;
 535   m_styleTable.GenerateStyleStrings("wxWindow", windowStyle, buf);
 536   m_styleTable.GenerateStyleStrings("wxPanel", windowStyle, buf);
 537   m_styleTable.GenerateStyleStrings("wxDialog", windowStyle, buf);
 538
 539   if (strlen(buf) == 0)
 540     strcat(buf, "0");
 541 }
 542
 543 void wxResourceTableWithSaving::GeneratePanelStyleString(long windowStyle, char *buf)
 544 {
 545   buf[0] = 0;
 546   m_styleTable.GenerateStyleStrings("wxWindow", windowStyle, buf);
 547   m_styleTable.GenerateStyleStrings("wxPanel", windowStyle, buf);
 548
 549   if (strlen(buf) == 0)
 550     strcat(buf, "0");
 551 }
 552
 553
 554 void wxResourceTableWithSaving::GenerateControlStyleString(const wxString& windowClass, long windowStyle, char *buf)
 555 {
 556   buf[0] = 0;
 557   m_styleTable.GenerateStyleStrings("wxWindow", windowStyle, buf);
 558   m_styleTable.GenerateStyleStrings("wxControl", windowStyle, buf);
 559   m_styleTable.GenerateStyleStrings(windowClass, windowStyle, buf);
 560
 561   if (strlen(buf) == 0)
 562     strcat(buf, "0");
 563 }
 564
 565 // Returns quoted string or "NULL"
 566 char *SafeString(const wxString& s)
 567 {
 568   if (s == "")
 569     return "NULL";
 570   else
 571   {
 572     strcpy(wxBuffer, "\"");
 573     strcat(wxBuffer, s);
 574     strcat(wxBuffer, "\"");
 575     return wxBuffer;
 576   }
 577 }
 578
 579 // Returns quoted string or ''
 580 char *SafeWord(const wxString& s)
 581 {
 582   if (s == "")
 583     return "''";
 584   else
 585   {
 586     strcpy(wxBuffer, "'");
 587     strcat(wxBuffer, (const char*) s);
 588     strcat(wxBuffer, "'");
 589     return wxBuffer;
 590   }
 591 }
 592