]> git.saurik.com Git - wxWidgets.git/blobdiff - samples/internat/internat.cpp
remove streams tests: they're very basic and already-existing CppUnit stream tests...
[wxWidgets.git] / samples / internat / internat.cpp
index c7fc1feb08cfbb844149acf0a1b4432b05bf94e6..c2fa8fcb3605d024a7aac1a45f303a3f43143e89 100644 (file)
@@ -5,14 +5,21 @@
 // Modified by:
 // Created:     04/01/98
 // RCS-ID:      $Id$
-// Copyright:   (c) Julian Smart and Markus Holzem
+// Copyright:   (c) Julian Smart
 // Licence:     wxWindows license
 /////////////////////////////////////////////////////////////////////////////
 
-#ifdef __GNUG__
-#pragma implementation
-#pragma interface
-#endif
+// NOTE: don't miss the "readme.txt" file which comes with this sample!
+
+
+
+// ============================================================================
+// declarations
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// headers
+// ----------------------------------------------------------------------------
 
 // For compilers that support precompilation, includes "wx/wx.h".
 #include "wx/wxprec.h"
 #endif
 
 #ifndef WX_PRECOMP
-#include "wx/wx.h"
+    #include "wx/wx.h"
 #endif
 
 #include "wx/intl.h"
 #include "wx/file.h"
 #include "wx/log.h"
+#include "wx/cmdline.h"
 
 #if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__) || defined(__WXMGL__)
 #include "mondrian.xpm"
 #endif
 
+// ----------------------------------------------------------------------------
+// private classes
+// ----------------------------------------------------------------------------
+
 // Define a new application type
 class MyApp: public wxApp
 {
 public:
+    MyApp() { m_lang = wxLANGUAGE_UNKNOWN; }
+
+    virtual void OnInitCmdLine(wxCmdLineParser& parser);
+    virtual bool OnCmdLineParsed(wxCmdLineParser& parser);
     virtual bool OnInit();
 
 protected:
-    wxLocale m_locale; // locale we'll be using
+    wxLanguage m_lang;  // language specified by user
+    wxLocale m_locale;  // locale we'll be using
 };
 
 // Define a new frame type
 class MyFrame: public wxFrame
 {
 public:
-    MyFrame(wxFrame *frame, const wxChar *title,
-        const wxPoint& pos, const wxSize& size, wxLocale& m_locale);
+    MyFrame(wxLocale& m_locale);
 
 public:
-    void OnQuit(wxCommandEvent& event);
+    void OnTestLocaleAvail(wxCommandEvent& event);
     void OnAbout(wxCommandEvent& event);
+    void OnQuit(wxCommandEvent& event);
+
     void OnPlay(wxCommandEvent& event);
     void OnOpen(wxCommandEvent& event);
+    void OnTest1(wxCommandEvent& event);
+    void OnTest2(wxCommandEvent& event);
+    void OnTest3(wxCommandEvent& event);
+    void OnTestMsgBox(wxCommandEvent& event);
 
     DECLARE_EVENT_TABLE()
 
     wxLocale& m_locale;
 };
 
+// ----------------------------------------------------------------------------
+// constants
+// ----------------------------------------------------------------------------
+
 // ID for the menu commands
 enum
 {
-    MINIMAL_QUIT = 1,
-    MINIMAL_TEXT,
-    MINIMAL_TEST,
-    MINIMAL_OPEN
+    INTERNAT_TEST = wxID_HIGHEST + 1,
+    INTERNAT_PLAY,
+    INTERNAT_TEST_1,
+    INTERNAT_TEST_2,
+    INTERNAT_TEST_3,
+    INTERNAT_TEST_MSGBOX
 };
 
+// language data
+static const wxLanguage langIds[] =
+{
+    wxLANGUAGE_DEFAULT,
+    wxLANGUAGE_FRENCH,
+    wxLANGUAGE_ITALIAN,
+    wxLANGUAGE_GERMAN,
+    wxLANGUAGE_RUSSIAN,
+    wxLANGUAGE_BULGARIAN,
+    wxLANGUAGE_CZECH,
+    wxLANGUAGE_POLISH,
+    wxLANGUAGE_SWEDISH,
+#if wxUSE_UNICODE || defined(__WXMOTIF__)
+    wxLANGUAGE_JAPANESE,
+#endif
+#if wxUSE_UNICODE
+    wxLANGUAGE_GEORGIAN,
+    wxLANGUAGE_ENGLISH,
+    wxLANGUAGE_ENGLISH_US,
+    wxLANGUAGE_ARABIC,
+    wxLANGUAGE_ARABIC_EGYPT
+#endif
+};
+
+// note that it makes no sense to translate these strings, they are
+// shown before we set the locale anyhow
+const wxString langNames[] =
+{
+    "System default",
+    "French",
+    "Italian",
+    "German",
+    "Russian",
+    "Bulgarian",
+    "Czech",
+    "Polish",
+    "Swedish",
+#if wxUSE_UNICODE || defined(__WXMOTIF__)
+    "Japanese",
+#endif
+#if wxUSE_UNICODE
+    "Georgian",
+    "English",
+    "English (U.S.)",
+    "Arabic",
+    "Arabic (Egypt)"
+#endif
+};
+
+// the arrays must be in sync
+wxCOMPILE_TIME_ASSERT( WXSIZEOF(langNames) == WXSIZEOF(langIds),
+                       LangArraysMismatch );
+
+// ----------------------------------------------------------------------------
+// wxWidgets macros
+// ----------------------------------------------------------------------------
+
 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
-    EVT_MENU(MINIMAL_QUIT, MyFrame::OnQuit)
+    EVT_MENU(INTERNAT_TEST, MyFrame::OnTestLocaleAvail)
     EVT_MENU(wxID_ABOUT, MyFrame::OnAbout)
-    EVT_MENU(MINIMAL_TEST, MyFrame::OnPlay)
-    EVT_MENU(MINIMAL_OPEN, MyFrame::OnOpen)
+    EVT_MENU(wxID_EXIT, MyFrame::OnQuit)
+
+    EVT_MENU(INTERNAT_PLAY, MyFrame::OnPlay)
+    EVT_MENU(wxID_OPEN, MyFrame::OnOpen)
+    EVT_MENU(INTERNAT_TEST_1, MyFrame::OnTest1)
+    EVT_MENU(INTERNAT_TEST_2, MyFrame::OnTest2)
+    EVT_MENU(INTERNAT_TEST_3, MyFrame::OnTest3)
+    EVT_MENU(INTERNAT_TEST_MSGBOX, MyFrame::OnTestMsgBox)
 END_EVENT_TABLE()
 
 IMPLEMENT_APP(MyApp)
 
+// ============================================================================
+// implementation
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// MyApp
+// ----------------------------------------------------------------------------
+
+// command line arguments handling
+void MyApp::OnInitCmdLine(wxCmdLineParser& parser)
+{
+    parser.AddParam(_("locale"),
+                    wxCMD_LINE_VAL_STRING,
+                    wxCMD_LINE_PARAM_OPTIONAL);
+
+    wxApp::OnInitCmdLine(parser);
+}
+
+bool MyApp::OnCmdLineParsed(wxCmdLineParser& parser)
+{
+    if ( !wxApp::OnCmdLineParsed(parser) )
+        return false;
+
+    if ( parser.GetParamCount() )
+    {
+        const wxString loc = parser.GetParam();
+        const wxLanguageInfo * const lang = wxLocale::FindLanguageInfo(loc);
+        if ( !lang )
+        {
+            wxLogError(_("Locale \"%s\" is unknown."), loc);
+            return false;
+        }
+
+        m_lang = static_cast<wxLanguage>(lang->Language);
+    }
+
+    return true;
+}
 
 // `Main program' equivalent, creating windows and returning main app frame
 bool MyApp::OnInit()
 {
-    const wxString langs[] =
-    {
-        _T("(System default)"),
-        _T("French"),
-        _T("German"),
-        _T("Russian"),
-        _T("English"),
-        _T("English (U.S.)")
-    };
+    if ( !wxApp::OnInit() )
+        return false;
 
-    SetExitOnFrameDelete(FALSE);
-    int lng = wxGetSingleChoiceIndex(_T("Please choose language:"), _T("Language"), 
-                                   WXSIZEOF(langs), langs);
-    SetExitOnFrameDelete(TRUE);
+    if ( m_lang == wxLANGUAGE_UNKNOWN )
+    {
+        int lng = wxGetSingleChoiceIndex
+                  (
+                    _("Please choose language:"),
+                    _("Language"),
+                    WXSIZEOF(langNames),
+                    langNames
+                  );
+        m_lang = lng == -1 ? wxLANGUAGE_DEFAULT : langIds[lng];
+    }
 
-    switch (lng)
+    // don't use wxLOCALE_LOAD_DEFAULT flag so that Init() doesn't return
+    // false just because it failed to load wxstd catalog
+    if ( !m_locale.Init(m_lang, wxLOCALE_DONT_LOAD_DEFAULT) )
     {
-        case 0 : m_locale.Init(wxLANGUAGE_DEFAULT); break;
-        case 1 : m_locale.Init(wxLANGUAGE_FRENCH); break;
-        case 2 : m_locale.Init(wxLANGUAGE_GERMAN); break;
-        case 3 : m_locale.Init(wxLANGUAGE_RUSSIAN); break;
-        case 4 : m_locale.Init(wxLANGUAGE_ENGLISH); break;
-        case -1:
-        case 5 : m_locale.Init(wxLANGUAGE_ENGLISH_US); break;
+        wxLogWarning(_("This language is not supported by the system."));
+
+        // continue nevertheless
     }
 
+    // normally this wouldn't be necessary as the catalog files would be found
+    // in the default locations, but when the program is not installed the
+    // catalogs are in the build directory where we wouldn't find them by
+    // default
+    wxLocale::AddCatalogLookupPathPrefix(".");
+
     // Initialize the catalogs we'll be using
-    /* not needed any more, done in wxLocale ctor
-    m_locale.AddCatalog("wxstd");      // 1) for library messages
-    */
-    m_locale.AddCatalog(wxT("internat"));      // 2) our private one
-    /* this catalog is installed in standard location on Linux systems,
-     it might not be installed on yours - just ignore the errrors
-     or comment out this line then */
+    const wxLanguageInfo* pInfo = wxLocale::GetLanguageInfo(m_lang);
+    if (!m_locale.AddCatalog("internat"))
+    {
+        wxLogError(_("Couldn't find/load the 'internat' catalog for locale '%s'."),
+                   pInfo ? pInfo->GetLocaleName() : _("unknown"));
+    }
+
+    // Now try to add wxstd.mo so that loading "NOTEXIST.ING" file will produce
+    // a localized error message:
+    m_locale.AddCatalog("wxstd");
+        // NOTE: it's not an error if we couldn't find it!
+
+    // this catalog is installed in standard location on Linux systems and
+    // shows that you may make use of the standard message catalogs as well
+    //
+    // if it's not installed on your system, it is just silently ignored
 #ifdef __LINUX__
     {
-    wxLogNull noLog;
-    m_locale.AddCatalog("fileutils");  // 3) and another just for testing
+        wxLogNull noLog;
+        m_locale.AddCatalog("fileutils");
     }
 #endif
 
     // Create the main frame window
-    MyFrame *frame = new MyFrame( (wxFrame *) NULL,
-        _("International wxWindows App"), wxPoint(50, 50), wxSize(350, 60),
-        m_locale);
+    MyFrame *frame = new MyFrame(m_locale);
 
-    // Give it an icon
-    frame->SetIcon(wxICON(mondrian));
+    // Show the frame
+    frame->Show(true);
+    SetTopWindow(frame);
+
+    return true;
+}
+
+// ----------------------------------------------------------------------------
+// MyFrame
+// ----------------------------------------------------------------------------
+
+// main frame constructor
+MyFrame::MyFrame(wxLocale& locale)
+       : wxFrame(NULL,
+                 wxID_ANY,
+                 _("International wxWidgets App")),
+         m_locale(locale)
+{
+    SetIcon(wxICON(mondrian));
 
     // Make a menubar
     wxMenu *file_menu = new wxMenu;
+    file_menu->Append(INTERNAT_TEST, _("&Test locale availability...\tCtrl-T"));
+    file_menu->AppendSeparator();
+
+    // since wxID_ABOUT and wxID_EXIT are stock IDs they will automatically get
+    // translated help strings; nice isn't it?
     file_menu->Append(wxID_ABOUT, _("&About..."));
     file_menu->AppendSeparator();
-    file_menu->Append(MINIMAL_QUIT, _("E&xit"));
+    file_menu->Append(wxID_EXIT, _("E&xit"));
 
     wxMenu *test_menu = new wxMenu;
-    test_menu->Append(MINIMAL_OPEN, _("&Open bogus file"));
-    test_menu->Append(MINIMAL_TEST, _("&Play a game"));
+    test_menu->Append(wxID_OPEN, _("&Open bogus file"), _("Shows a wxWidgets localized error message"));
+    test_menu->Append(INTERNAT_PLAY, _("&Play a game"), _("A little game; hint: 17 is a lucky number for many"));
+    test_menu->AppendSeparator();
+    test_menu->Append(INTERNAT_TEST_1, _("&1 _() (gettext)"), _("Tests the _() macro"));
+    test_menu->Append(INTERNAT_TEST_2, _("&2 _N() (ngettext)"), _("Tests the _N() macro"));
+    test_menu->Append(INTERNAT_TEST_3, _("&3 wxTRANSLATE() (gettext_noop)"), _("Tests the wxTRANSLATE() macro"));
+    test_menu->Append(INTERNAT_TEST_MSGBOX, _("&Message box test"),
+                      _("Tests message box buttons labels translation"));
 
     wxMenuBar *menu_bar = new wxMenuBar;
     menu_bar->Append(file_menu, _("&File"));
     menu_bar->Append(test_menu, _("&Test"));
-    frame->SetMenuBar(menu_bar);
-
-    // Show the frame
-    frame->Show(TRUE);
-    SetTopWindow(frame);
-
-    return TRUE;
-}
-
-// My frame constructor
-MyFrame::MyFrame(wxFrame *frame, const wxChar *title,
-    const wxPoint& pos, const wxSize& size, wxLocale& l)
-       : wxFrame(frame, -1, title, pos, size),
-         m_locale(l)
-{
-    // Empty
+    SetMenuBar(menu_bar);
+
+    // this demonstrates RTL support in wxStatusBar:
+    CreateStatusBar(1);
+
+    // this demonstrates RTL layout mirroring for Arabic locales
+    wxSizer *sizer = new wxBoxSizer(wxHORIZONTAL);
+    sizer->Add(new wxStaticText(this, wxID_ANY, _("First")),
+                wxSizerFlags().Border());
+    sizer->Add(new wxStaticText(this, wxID_ANY, _("Second")),
+                wxSizerFlags().Border());
+    SetSizer(sizer);
 }
 
 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event) )
 {
-    Close(TRUE);
+    Close(true);
 }
 
 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 {
     wxString localeInfo;
-    localeInfo.Printf( _("Language: %s\nSystem locale name: %s\nCanonical locale name: %s\n"),
-        m_locale.GetLocale(),
-        m_locale.GetSysName().c_str(),
-        m_locale.GetCanonicalName().c_str() );
-
-    wxMessageDialog(this, wxString(_("I18n sample\n(c) 1998, 1999 Vadim Zeitlin and Julian Smart"))
-        + wxT("\n\n") + localeInfo,
-        _("About Internat"), wxOK | wxICON_INFORMATION).ShowModal();
+    wxString locale = m_locale.GetLocale();
+    wxString sysname = m_locale.GetSysName();
+    wxString canname = m_locale.GetCanonicalName();
+
+    localeInfo.Printf(_("Language: %s\nSystem locale name: %s\nCanonical locale name: %s\n"),
+                      locale.c_str(), sysname.c_str(), canname.c_str() );
+
+    wxMessageDialog dlg(
+                        this,
+                        wxString(_("I18n sample\n(c) 1998, 1999 Vadim Zeitlin and Julian Smart"))
+                                 + "\n\n"
+                                 + localeInfo,
+                                 _("About Internat"),
+                        wxOK | wxICON_INFORMATION
+                       );
+    dlg.ShowModal();
 }
 
 void MyFrame::OnPlay(wxCommandEvent& WXUNUSED(event))
 {
-    wxString str = wxGetTextFromUser(_("Enter your number:"),
-        _("Try to guess my number!"), wxEmptyString, this);
-
-    if ( str.IsEmpty() ) return;
+    wxString str = wxGetTextFromUser
+                   (
+                    _("Enter your number:"),
+                    _("Try to guess my number!"),
+                    wxEmptyString,
+                    this
+                   );
+
+    if ( str.empty() )
+    {
+        // cancelled
+        return;
+    }
 
-    int num;
-    wxSscanf(str, wxT("%d"), &num);
-    if ( num == 0 )
+    long num;
+    if ( !str.ToLong(&num) || num < 0 )
+    {
         str = _("You've probably entered an invalid number.");
-    else if ( num == 9 )  // this message is not translated (not in catalog)
-        str = "You've found a bug in this program!";
-    else if ( num != 17 ) // a more implicit way to write _()
-        str = wxGetTranslation(wxT("Bad luck! try again..."));
-    else
+    }
+    else if ( num == 9 )
     {
-        str.Empty();
-        // string must be split in two -- otherwise the translation won't be found
+        // this message is not translated (not in catalog) because we used wxT()
+        // and not _() around it
+        str = wxT("You've found a bug in this program!");
+    }
+    else if ( num == 17 )
+    {
+        str.clear();
+
+        // string must be split in two -- otherwise the translation would't be
+        // found
         str << _("Congratulations! you've won. Here is the magic phrase:")
             << _("cannot create fifo `%s'");
     }
+    else
+    {
+        // this is a more implicit way to write _() but note that if you use it
+        // you must ensure that the strings get extracted in the message
+        // catalog as by default xgettext won't do it; it only knows of _(),
+        // not of wxTRANSLATE(). As internat's readme.txt says you should thus
+        // call xgettext with -kwxTRANSLATE.
+        str = wxGetTranslation(wxTRANSLATE("Bad luck! try again..."));
+
+        // note also that if we want 'str' to contain a localized string
+        // we need to use wxGetTranslation explicitely as wxTRANSLATE just
+        // tells xgettext to extract the string but has no effect on the
+        // runtime of the program!
+    }
 
     wxMessageBox(str, _("Result"), wxOK | wxICON_INFORMATION);
 }
 
-void MyFrame::OnOpen(wxCommandEvent&)
+void MyFrame::OnTestLocaleAvail(wxCommandEvent& WXUNUSED(event))
+{
+    static wxString s_locale;
+    wxString locale = wxGetTextFromUser
+                      (
+                        _("Enter the locale to test"),
+                        wxGetTextFromUserPromptStr,
+                        s_locale,
+                        this
+                      );
+    if ( locale.empty() )
+        return;
+
+    s_locale = locale;
+    const wxLanguageInfo * const info = wxLocale::FindLanguageInfo(s_locale);
+    if ( !info )
+    {
+        wxLogError(_("Locale \"%s\" is unknown."), s_locale.c_str());
+        return;
+    }
+
+    if ( wxLocale::IsAvailable(info->Language) )
+    {
+        wxLogMessage(_("Locale \"%s\" is available."), s_locale.c_str());
+    }
+    else
+    {
+        wxLogWarning(_("Locale \"%s\" is not available."), s_locale.c_str());
+    }
+}
+
+void MyFrame::OnOpen(wxCommandEvent& WXUNUSED(event))
+{
+    // open a bogus file -- the error message should be also translated if
+    // you've got wxstd.mo somewhere in the search path (see MyApp::OnInit)
+    wxFile file("NOTEXIST.ING");
+}
+
+void MyFrame::OnTest1(wxCommandEvent& WXUNUSED(event))
+{
+    const wxString& title = _("Testing _() (gettext)");
+
+    // NOTE: using the wxTRANSLATE() macro here we won't show a localized
+    //       string in the text entry dialog; we'll simply show the un-translated
+    //       string; however if the user press "ok" without altering the text,
+    //       since the "default value" string has been extracted by xgettext
+    //       the wxGetTranslation call later will manage to return a localized
+    //       string
+    wxTextEntryDialog d(this, _("Please enter text to translate"),
+                        title, wxTRANSLATE("default value"));
+
+    if (d.ShowModal() == wxID_OK)
+    {
+        wxString v = d.GetValue();
+        wxString s(title);
+        s << "\n" << v << " -> "
+            << wxGetTranslation(v.c_str()) << "\n";
+        wxMessageBox(s);
+    }
+}
+
+void MyFrame::OnTest2(wxCommandEvent& WXUNUSED(event))
 {
-    // open a bogus file -- the error message should be also translated if you've
-    // got wxstd.mo somewhere in the search path
-    wxFile file(wxT("NOTEXIST.ING"));
+    const wxString& title = _("Testing _N() (ngettext)");
+    wxTextEntryDialog d(this,
+        _("Please enter range for plural forms of \"n files deleted\" phrase"),
+        title, "0-10");
+
+    if (d.ShowModal() == wxID_OK)
+    {
+        int first, last;
+        wxSscanf(d.GetValue(), "%d-%d", &first, &last);
+        wxString s(title);
+        s << "\n";
+        for (int n = first; n <= last; ++n)
+        {
+            s << n << " " <<
+                wxPLURAL("file deleted", "files deleted", n) <<
+                "\n";
+        }
+        wxMessageBox(s);
+    }
+}
+
+void MyFrame::OnTest3(wxCommandEvent& WXUNUSED(event))
+{
+    const char* lines[] =
+    {
+        wxTRANSLATE("line 1"),
+        wxTRANSLATE("line 2"),
+        wxTRANSLATE("line 3"),
+    };
+
+    wxString s(_("Testing wxTRANSLATE() (gettext_noop)"));
+    s << "\n";
+    for (size_t i = 0; i < WXSIZEOF(lines); ++i)
+    {
+        s << lines[i] << " -> " << wxGetTranslation(lines[i]) << "\n";
+    }
+    wxMessageBox(s);
+}
+
+void MyFrame::OnTestMsgBox(wxCommandEvent& WXUNUSED(event))
+{
+    if ( wxMessageBox
+         (
+            _("Are the labels of the buttons in this message box "
+              "translated into the current locale language?"),
+            _("wxWidgets i18n sample"),
+            wxYES_NO,
+            this
+         ) != wxYES )
+    {
+        wxMessageBox(_("Please report the details of your platform to us."));
+    }
 }