samples/internat/internat.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        internat.cpp
   3 // Purpose:     Demonstrates internationalisation (i18n) support
   4 // Author:      Vadim Zeitlin/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 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 // For compilers that support precompilation, includes "wx/wx.h".
  21 #include "wx/wxprec.h"
  22
  23 #ifdef __BORLANDC__
  24 #pragma hdrstop
  25 #endif
  26
  27 #ifndef WX_PRECOMP
  28 #include "wx/wx.h"
  29 #endif
  30
  31 #include "wx/intl.h"
  32 #include "wx/file.h"
  33 #include "wx/log.h"
  34
  35 #if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__) || defined(__WXMGL__)
  36 #include "mondrian.xpm"
  37 #endif
  38
  39 // ----------------------------------------------------------------------------
  40 // private classes
  41 // ----------------------------------------------------------------------------
  42
  43 // Define a new application type
  44 class MyApp: public wxApp
  45 {
  46 public:
  47     virtual bool OnInit();
  48
  49 protected:
  50     wxLocale m_locale; // locale we'll be using
  51 };
  52
  53 // Define a new frame type
  54 class MyFrame: public wxFrame
  55 {
  56 public:
  57     MyFrame(wxLocale& m_locale);
  58
  59 public:
  60     void OnTestLocaleAvail(wxCommandEvent& event);
  61     void OnAbout(wxCommandEvent& event);
  62     void OnQuit(wxCommandEvent& event);
  63
  64     void OnPlay(wxCommandEvent& event);
  65     void OnOpen(wxCommandEvent& event);
  66     void OnTest1(wxCommandEvent& event);
  67     void OnTest2(wxCommandEvent& event);
  68     void OnTest3(wxCommandEvent& event);
  69
  70     DECLARE_EVENT_TABLE()
  71
  72     wxLocale& m_locale;
  73 };
  74
  75 // ----------------------------------------------------------------------------
  76 // constants
  77 // ----------------------------------------------------------------------------
  78
  79 // ID for the menu commands
  80 enum
  81 {
  82     INTERNAT_TEST = wxID_HIGHEST + 1,
  83     INTERNAT_PLAY,
  84     INTERNAT_TEST_1,
  85     INTERNAT_TEST_2,
  86     INTERNAT_TEST_3
  87 };
  88
  89 // language data
  90 static const wxLanguage langIds[] =
  91 {
  92     wxLANGUAGE_DEFAULT,
  93     wxLANGUAGE_FRENCH,
  94     wxLANGUAGE_GERMAN,
  95     wxLANGUAGE_RUSSIAN,
  96     wxLANGUAGE_BULGARIAN,
  97     wxLANGUAGE_CZECH,
  98     wxLANGUAGE_POLISH,
  99     wxLANGUAGE_SWEDISH,
 100 #if wxUSE_UNICODE || defined(__WXMOTIF__)
 101     wxLANGUAGE_JAPANESE,
 102 #endif
 103 #if wxUSE_UNICODE
 104     wxLANGUAGE_GEORGIAN,
 105     wxLANGUAGE_ENGLISH,
 106     wxLANGUAGE_ENGLISH_US,
 107     wxLANGUAGE_ARABIC,
 108     wxLANGUAGE_ARABIC_EGYPT
 109 #endif
 110 };
 111
 112 // note that it makes no sense to translate these strings, they are
 113 // shown before we set the locale anyhow
 114 const wxString langNames[] =
 115 {
 116     _T("System default"),
 117     _T("French"),
 118     _T("German"),
 119     _T("Russian"),
 120     _T("Bulgarian"),
 121     _T("Czech"),
 122     _T("Polish"),
 123     _T("Swedish"),
 124 #if wxUSE_UNICODE || defined(__WXMOTIF__)
 125     _T("Japanese"),
 126 #endif
 127 #if wxUSE_UNICODE
 128     _T("Georgian"),
 129     _T("English"),
 130     _T("English (U.S.)"),
 131     _T("Arabic"),
 132     _T("Arabic (Egypt)")
 133 #endif
 134 };
 135
 136 // the arrays must be in sync
 137 wxCOMPILE_TIME_ASSERT( WXSIZEOF(langNames) == WXSIZEOF(langIds),
 138                        LangArraysMismatch );
 139
 140 // ----------------------------------------------------------------------------
 141 // wxWidgets macros
 142 // ----------------------------------------------------------------------------
 143
 144 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
 145     EVT_MENU(INTERNAT_TEST, MyFrame::OnTestLocaleAvail)
 146     EVT_MENU(wxID_ABOUT, MyFrame::OnAbout)
 147     EVT_MENU(wxID_EXIT, MyFrame::OnQuit)
 148
 149     EVT_MENU(INTERNAT_PLAY, MyFrame::OnPlay)
 150     EVT_MENU(wxID_OPEN, MyFrame::OnOpen)
 151     EVT_MENU(INTERNAT_TEST_1, MyFrame::OnTest1)
 152     EVT_MENU(INTERNAT_TEST_2, MyFrame::OnTest2)
 153     EVT_MENU(INTERNAT_TEST_3, MyFrame::OnTest3)
 154 END_EVENT_TABLE()
 155
 156 IMPLEMENT_APP(MyApp)
 157
 158 // ============================================================================
 159 // implementation
 160 // ============================================================================
 161
 162 // ----------------------------------------------------------------------------
 163 // MyApp
 164 // ----------------------------------------------------------------------------
 165
 166 // `Main program' equivalent, creating windows and returning main app frame
 167 bool MyApp::OnInit()
 168 {
 169     if ( !wxApp::OnInit() )
 170         return false;
 171
 172     long lng = -1;
 173
 174     if ( argc == 2 )
 175     {
 176         // the parameter must be the lang index
 177         wxString tmp(argv[1]);
 178         tmp.ToLong(&lng);
 179     }
 180
 181     if ( lng == -1 )
 182     {
 183         lng = wxGetSingleChoiceIndex
 184               (
 185                 _T("Please choose language:"),
 186                 _T("Language"),
 187                 WXSIZEOF(langNames),
 188                 langNames
 189               );
 190     }
 191
 192     if ( lng != -1 )
 193     {
 194         // don't use wxLOCALE_LOAD_DEFAULT flag so that Init() doesn't return
 195         // false just because it failed to load wxstd catalog
 196         if ( !m_locale.Init(langIds[lng], wxLOCALE_CONV_ENCODING) )
 197         {
 198             wxLogError(_T("This language is not supported by the system."));
 199             return false;
 200         }
 201     }
 202
 203     // normally this wouldn't be necessary as the catalog files would be found
 204     // in the default locations, but when the program is not installed the
 205     // catalogs are in the build directory where we wouldn't find them by
 206     // default
 207     wxLocale::AddCatalogLookupPathPrefix(wxT("."));
 208
 209     // Initialize the catalogs we'll be using
 210     m_locale.AddCatalog(wxT("internat"));
 211
 212     // this catalog is installed in standard location on Linux systems and
 213     // shows that you may make use of the standard message catalogs as well
 214     //
 215     // if it's not installed on your system, it is just silently ignored
 216 #ifdef __LINUX__
 217     {
 218         wxLogNull noLog;
 219         m_locale.AddCatalog(_T("fileutils"));
 220     }
 221 #endif
 222
 223     // Create the main frame window
 224     MyFrame *frame = new MyFrame(m_locale);
 225
 226     // Give it an icon
 227     frame->SetIcon(wxICON(mondrian));
 228
 229     // Make a menubar
 230     wxMenu *file_menu = new wxMenu;
 231     file_menu->Append(INTERNAT_TEST, _("&Test locale availability...\tCtrl-T"));
 232     file_menu->AppendSeparator();
 233     file_menu->Append(wxID_ABOUT, _("&About..."));
 234     file_menu->AppendSeparator();
 235     file_menu->Append(wxID_EXIT, _("E&xit"));
 236
 237     wxMenu *test_menu = new wxMenu;
 238     test_menu->Append(wxID_OPEN, _("&Open bogus file"));
 239     test_menu->Append(INTERNAT_PLAY, _("&Play a game"));
 240     test_menu->AppendSeparator();
 241     test_menu->Append(INTERNAT_TEST_1, _("&1 _() (gettext)"));
 242     test_menu->Append(INTERNAT_TEST_2, _("&2 _N() (ngettext)"));
 243     test_menu->Append(INTERNAT_TEST_3, _("&3 wxTRANSLATE() (gettext_noop)"));
 244
 245     wxMenuBar *menu_bar = new wxMenuBar;
 246     menu_bar->Append(file_menu, _("&File"));
 247     menu_bar->Append(test_menu, _("&Test"));
 248     frame->SetMenuBar(menu_bar);
 249
 250     // Show the frame
 251     frame->Show(true);
 252     SetTopWindow(frame);
 253
 254     return true;
 255 }
 256
 257 // ----------------------------------------------------------------------------
 258 // MyFrame
 259 // ----------------------------------------------------------------------------
 260
 261 // main frame constructor
 262 MyFrame::MyFrame(wxLocale& locale)
 263        : wxFrame(NULL,
 264                  wxID_ANY,
 265                  _("International wxWidgets App")),
 266          m_locale(locale)
 267 {
 268     // this demonstrates RTL layout mirroring for Arabic locales
 269     wxSizer *sizer = new wxBoxSizer(wxHORIZONTAL);
 270     sizer->Add(new wxStaticText(this, wxID_ANY, _("First")),
 271                 wxSizerFlags().Border());
 272     sizer->Add(new wxStaticText(this, wxID_ANY, _("Second")),
 273                 wxSizerFlags().Border());
 274     SetSizer(sizer);
 275 }
 276
 277 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event) )
 278 {
 279     Close(true);
 280 }
 281
 282 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 283 {
 284     wxString localeInfo;
 285     wxString locale = m_locale.GetLocale();
 286     wxString sysname = m_locale.GetSysName();
 287     wxString canname = m_locale.GetCanonicalName();
 288
 289     localeInfo.Printf(_("Language: %s\nSystem locale name:\n%s\nCanonical locale name: %s\n"),
 290         locale.c_str(), sysname.c_str(), canname.c_str() );
 291
 292     wxMessageDialog dlg(
 293                         this,
 294                         wxString(_("I18n sample\n(c) 1998, 1999 Vadim Zeitlin and Julian Smart"))
 295                                  + wxT("\n\n")
 296                                  + localeInfo,
 297                                  _("About Internat"),
 298                         wxOK | wxICON_INFORMATION
 299                        );
 300     dlg.ShowModal();
 301 }
 302
 303 void MyFrame::OnPlay(wxCommandEvent& WXUNUSED(event))
 304 {
 305     wxString str = wxGetTextFromUser
 306                    (
 307                     _("Enter your number:"),
 308                     _("Try to guess my number!"),
 309                     wxEmptyString,
 310                     this
 311                    );
 312
 313     if ( str.empty() )
 314     {
 315         // cancelled
 316         return;
 317     }
 318
 319     long num;
 320     if ( !str.ToLong(&num) || num < 0 )
 321     {
 322         str = _("You've probably entered an invalid number.");
 323     }
 324     else if ( num == 9 )
 325     {
 326         // this message is not translated (not in catalog) because we used _T()
 327         // and not _() around it
 328         str = _T("You've found a bug in this program!");
 329     }
 330     else if ( num == 17 )
 331     {
 332         str.clear();
 333
 334         // string must be split in two -- otherwise the translation would't be
 335         // found
 336         str << _("Congratulations! you've won. Here is the magic phrase:")
 337             << _("cannot create fifo `%s'");
 338     }
 339     else
 340     {
 341         // this is a more implicit way to write _() but note that if you use it
 342         // you must ensure that the strings get extracted in the message
 343         // catalog as by default xgettext won't do it (it only knows of _(),
 344         // not wxGetTranslation())
 345         str = wxGetTranslation(_T("Bad luck! try again..."));
 346     }
 347
 348     wxMessageBox(str, _("Result"), wxOK | wxICON_INFORMATION);
 349 }
 350
 351 void MyFrame::OnTestLocaleAvail(wxCommandEvent& WXUNUSED(event))
 352 {
 353     static wxString s_locale;
 354     wxString locale = wxGetTextFromUser
 355                       (
 356                         _("Enter the locale to test"),
 357                         wxGetTextFromUserPromptStr,
 358                         s_locale,
 359                         this
 360                       );
 361     if ( locale.empty() )
 362         return;
 363
 364     s_locale = locale;
 365     const wxLanguageInfo * const info = wxLocale::FindLanguageInfo(s_locale);
 366     if ( !info )
 367     {
 368         wxLogError(_("Locale \"%s\" is unknown."), s_locale.c_str());
 369         return;
 370     }
 371
 372     if ( wxLocale::IsAvailable(info->Language) )
 373         wxLogMessage(_("Locale \"%s\" is available."), s_locale.c_str());
 374     else
 375         wxLogWarning(_("Locale \"%s\" is not available."), s_locale.c_str());
 376 }
 377
 378 void MyFrame::OnOpen(wxCommandEvent& WXUNUSED(event))
 379 {
 380     // open a bogus file -- the error message should be also translated if
 381     // you've got wxstd.mo somewhere in the search path
 382     wxFile file(wxT("NOTEXIST.ING"));
 383 }
 384
 385 void MyFrame::OnTest1(wxCommandEvent& WXUNUSED(event))
 386 {
 387     const wxChar* title = _("Testing _() (gettext)");
 388     wxTextEntryDialog d(this, _("Please enter text to translate"),
 389         title, wxTRANSLATE("default value"));
 390     if (d.ShowModal() == wxID_OK)
 391     {
 392         wxString v = d.GetValue();
 393         wxString s(title);
 394         s << _T("\n") << v << _T(" -> ")
 395             << wxGetTranslation(v.c_str()) << _T("\n");
 396         wxMessageBox(s);
 397     }
 398 }
 399
 400 void MyFrame::OnTest2(wxCommandEvent& WXUNUSED(event))
 401 {
 402     const wxChar* title = _("Testing _N() (ngettext)");
 403     wxTextEntryDialog d(this,
 404         _("Please enter range for plural forms of \"n files deleted\" phrase"),
 405         title, _T("0-10"));
 406     if (d.ShowModal() == wxID_OK)
 407     {
 408         int first, last;
 409         wxSscanf(d.GetValue(), _T("%d-%d"), &first, &last);
 410         wxString s(title);
 411         s << _T("\n");
 412         for (int n = first; n <= last; ++n)
 413         {
 414             s << n << _T(" ") <<
 415                 wxPLURAL("file deleted", "files deleted", n) <<
 416                 _T("\n");
 417         }
 418         wxMessageBox(s);
 419     }
 420 }
 421
 422 void MyFrame::OnTest3(wxCommandEvent& WXUNUSED(event))
 423 {
 424     const wxChar* lines[] =
 425     {
 426         wxTRANSLATE("line 1"),
 427         wxTRANSLATE("line 2"),
 428         wxTRANSLATE("line 3"),
 429     };
 430     wxString s(_("Testing wxTRANSLATE() (gettext_noop)"));
 431     s << _T("\n");
 432     for (size_t i = 0; i < WXSIZEOF(lines); ++i)
 433     {
 434         s << lines[i] << _T(" -> ") << wxGetTranslation(lines[i]) << _T("\n");
 435     }
 436     wxMessageBox(s);
 437 }
 438
 439