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