testautomation/framework/optional/includes/basic_dialog_i18n_defaults.inc

   1 'encoding UTF-8  Do not remove or change this line!
   2 '**************************************************************************
   3 ' DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4 '
   5 ' Copyright 2000, 2010 Oracle and/or its affiliates.
   6 '
   7 ' OpenOffice.org - a multi-platform office productivity suite
   8 '
   9 ' This file is part of OpenOffice.org.
  10 '
  11 ' OpenOffice.org is free software: you can redistribute it and/or modify
  12 ' it under the terms of the GNU Lesser General Public License version 3
  13 ' only, as published by the Free Software Foundation.
  14 '
  15 ' OpenOffice.org is distributed in the hope that it will be useful,
  16 ' but WITHOUT ANY WARRANTY; without even the implied warranty of
  17 ' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18 ' GNU Lesser General Public License version 3 for more details
  19 ' (a copy is included in the LICENSE file that accompanied this code).
  20 '
  21 ' You should have received a copy of the GNU Lesser General Public License
  22 ' version 3 along with OpenOffice.org.  If not, see
  23 ' <http://www.openoffice.org/license.html>
  24 ' for a copy of the LGPLv3 License.
  25 '
  26 '/******************************************************************************
  27 '*
  28 '*  owner : gregor.hartmann@oracle.com
  29 '*
  30 '*  short description : Test correct handling of the default language
  31 '*
  32 '\******************************************************************************
  33
  34 testcase tBasicDialogI18nDefaults
  35
  36
  37     const MODULE_NAME = "defmod"
  38     const FILE_NAME   = "basic_defaults.odt"
  39
  40     dim cWorkPath as string
  41         cWorkPath = hGetWorkPath() & FILE_NAME
  42
  43     dim brc as boolean
  44     dim cMsg as string
  45
  46     dim cDefLangSelect as string   ' Default language from Select Default Language Dialog
  47     dim cDefLangDialog as string   ' Default language from Manage UI Languages dialog
  48     dim cDefLangToolbar as string  ' Default language from Translation Toolbar
  49     dim cTmpLangString as string   ' Temporary language string for comparision
  50     dim cAdditionalLanguage as string
  51
  52     dim iLangCount as integer
  53
  54     printlog( "Preparing testenvironment" )
  55     printlog( "Workfile is: " & cWorkPath )
  56
  57     brc = hCreateDocument()
  58     if ( not brc ) then
  59         warnlog( "Failed to create a new document, aborting" )
  60         goto endsub
  61     endif
  62
  63     brc = hFileSaveAsWithFilterKill( cWorkPath , "writer8" )
  64
  65     brc = hInitFormControls( MODULE_NAME )
  66     if ( not brc ) then
  67         warnlog( "Ups, bad again..." )
  68     endif
  69
  70     printlog( "Dialog Editor is open, ToolsCollectionBar is visible. Good." )
  71
  72     printlog( "" )
  73     printlog( "Starting test (check control states, add default language)" )
  74
  75     kontext "TranslationBar"
  76     if ( TranslationBar.exists( 1 ) ) then
  77         warnlog( "The TranslationBar should not be exist/visible by default" )
  78     else
  79         printlog( "The TranslationBar is hidden. Good." )
  80     endif
  81
  82     Kontext "ToolsCollectionBar"
  83     ManageLanguage.click()
  84
  85     kontext "ManageUILanguages"
  86     if ( not ManageUILanguages.exists( 2 ) ) then
  87         warnlog( "ManageUILanguages Dialog is not open, aborting test" )
  88         goto TestExit
  89     endif
  90
  91     printlog( "ManageUILanguages Dialog is open" )
  92
  93     iLangCount = PresentLanguages.getItemCount()
  94     if ( iLangCount <> 1 ) then
  95         warnlog( "There should only be one single entry in the languages listbox" )
  96         printlog( "Currently " & iLangCount & " entries are listed" )
  97     endif
  98
  99     if ( not add.isEnabled() ) then
 100         warnlog( "Add button should be enabled" )
 101     endif
 102
 103     if ( delete.isEnabled() ) then
 104         warnlog( "Delete button should be disabled" )
 105     endif
 106
 107
 108     if ( Default.isEnabled() ) then
 109         warnlog( "Default button should be disabled" )
 110     endif
 111
 112
 113     printlog( "Select the first/only entry to see whether the button states change" )
 114     PresentLanguages.select( 1 )
 115     printlog( "Entry is: " & PresentLanguages.getSelText() )
 116
 117     if ( not add.isEnabled() ) then
 118         warnlog( "Add button should be enabled" )
 119     endif
 120
 121     if ( Delete.isEnabled() ) then
 122         warnlog( "Delete button should be disabled" )
 123     endif
 124
 125     if ( Default.isEnabled() ) then
 126         warnlog( "Default button should be disabled" )
 127     endif
 128
 129     printlog( "Add default language" )
 130     kontext "ManageUILanguage"
 131     Add.click()
 132
 133     kontext "SetDefaultLanguage"
 134     if ( not SetDefaultLanguage.exists( 2 ) ) then
 135         warnlog( "Default language selection dialog did not open" )
 136         kontext "ManageUILanguages"
 137         ManageUILanguages.close()
 138         goto TestExit
 139     endif
 140
 141     kontext "SetDefaultLanguage"
 142     cDeflangSelect = DefaultLanguageListbox.getSelText()
 143     iLangCount = DefaultLanguageListbox.getItemCount()
 144     printlog( "Default language is: " & cDeflangSelect )
 145     printlog( "Total languages listed: " & iLangCount )
 146     SetDefaultLanguage.ok()
 147
 148
 149     kontext "ManageUILanguages"
 150     iLangCount = PresentLanguages.getItemCount()
 151     if ( iLangCount <> 1 ) then
 152         warnlog( "There should only be one single entry in the languages listbox" )
 153         printlog( "Currently " & iLangCount & " entries are listed" )
 154     endif
 155
 156     PresentLanguages.select( 1 )
 157     cDefLangDialog = PresentLanguages.getSelText()
 158     if ( instr( cDefLangSelect, cDefLangDialog ) <> 0 ) then
 159         warnlog( "The default language was not transported to the languages list" )
 160     else
 161         printlog( "Ok, the string was copied correctly" )
 162     endif
 163     printlog( "Select.: " & cDefLangSelect )
 164     printlog( "Dialog.: " & cDefLangDialog )
 165
 166
 167     if ( not add.isEnabled() ) then
 168         warnlog( "Add button should be enabled" )
 169     endif
 170
 171     if ( not Delete.isEnabled() ) then
 172         warnlog( "Delete button should be enabled" )
 173         Delete.click()
 174         kontext "active"
 175         if ( active.exists( 1 ) ) then
 176                 printlog( "Removal warning is displayed. Good." )
 177                 active.cancel()
 178         else
 179                 warnlog( "Removal warning not displayed" )
 180         endif
 181     endif
 182
 183     if ( Default.isEnabled() ) then
 184         warnlog( "Default button should be disabled" )
 185     endif
 186
 187     kontext "ManageUILanguages"
 188     ManageUILanguages.close()
 189
 190
 191
 192     kontext "TranslationBar"
 193     printlog( "Testing the TranslationBar ..." )
 194     if ( TranslationBar.exists() ) then
 195         printlog( "TranslationBar exists." )
 196
 197         if ( TranslationBar.isVisible() ) then
 198             printlog( "TranslationBar is visible." )
 199
 200             if ( currentLanguage.isEnabled() ) then
 201                 printlog( "Languages list is enabled." )
 202
 203                 if ( CurrentLanguage.getItemCount() = 1 ) then
 204                     printlog( "Exactly one item in listed in the listbox, good." )
 205
 206                     ' Note that we need to test for a substring as the [default] marker
 207                     ' is not copied from the Select Default languages dialog
 208                     cDefLangToolbar = CurrentLanguage.getSelText()
 209                     if ( instr( cDefLangToolbar, cDefLangSelect ) <> 0 ) then
 210                         printlog( "The correct entry is in the languages list. Good." )
 211                     else
 212                         warnlog( "The default language should be listed and selected." )
 213                     endif
 214                     printlog( "Select.: " & cDefLangSelect )
 215                     printlog( "Toolbar: " & cDefLangToolbar )
 216
 217                     if ( cDefLangToolbar <> cDefLangDialog ) then
 218                         warnlog( "The default language did not copy to the toolbar" )
 219                     else
 220                         printlog( "The default language was copied ok." )
 221                     endif
 222                     printlog( "Dialog.: " & cDefLangDialog )
 223                     printlog( "Toolbar: " & cDefLangToolbar )
 224
 225                 else
 226                     warnlog( "There are too many entries in the languages list." )
 227                 endif
 228             else
 229                 warnlog( "The languages listbox is disabled." )
 230             endif
 231         else
 232             warnlog( "The Translation Bar is not visible." )
 233         endif
 234     else
 235         warnlog( "The Translation Bar does not exist." )
 236     endif
 237
 238
 239     printlog( "Click ManageLanguages-button on the TranslationBar" )
 240     kontext "TranslationBar"
 241     wait( 100 )
 242     ManageLanguage.click()
 243
 244     kontext "ManageUILanguages"
 245     if ( not ManageUILanguages.exists( 2 ) ) then
 246         warnlog( "Failed to open Manage Languages dialog" )
 247     endif
 248
 249     iLangCount = PresentLanguages.getItemCount()
 250     if ( iLangCount <> 1 ) then
 251         warnlog( "There should only be one single entry in the languages listbox" )
 252         printlog( "Currently " & iLangCount & " entries are listed" )
 253     endif
 254
 255     PresentLanguages.select( 1 )
 256     cTmpLangString = Presentlanguages.getSeltext()
 257     if ( cTmpLangString <> cDefLangDialog ) then
 258         warnlog( "The dialog forgot the default language" )
 259     else
 260         printlog( "The dialog remembers the default language. Good." )
 261     endif
 262     printlog( "Expected: " & cDefLangDialog )
 263     printlog( "Found...: " & cTmpLangString )
 264
 265     kontext "ManageUILanguages"
 266     Add.click()
 267
 268     kontext "AddUserInterface"
 269     if ( not AddUserInterface.exists( 1 ) ) then
 270         warnlog( "Cannot add another language, the dialog is not open" )
 271         kontext "ManageUILanguages"
 272         ManageUILanguages.close()
 273         goto TestExit
 274     endif
 275
 276     AddNewControl.select( 1 )
 277     cAdditionalLanguage = AddNewControl.getSelText()
 278     printlog( "Adding language: " & cAdditionalLanguage )
 279     AddNewControl.check()
 280
 281     AddUserInterface.ok()
 282
 283     kontext "ManageUILanguages"
 284     if ( not ManageUILanguages.exists( 1 ) ) then
 285         warnlog( "Could not return to Manage UI Languages dialog" )
 286         goto TestExit
 287     endif
 288
 289     kontext "ManageUILanguages"
 290     iLangCount = PresentLanguages.getItemCount()
 291     if ( iLangCount <> 2 ) then
 292         warnlog( "There should be exactly two languages listed in the listbox" )
 293         printlog( "Currently " & iLangCount & " entries are listed" )
 294         goto TestExit
 295     else
 296         printlog( "Two languages listed in Manage UI Languages dialog. Good." )
 297     endif
 298
 299     printlog( "Verify language in Manage UI Language dialog" )
 300     PresentLanguages.select( 2 )
 301     cTmpLangString = Presentlanguages.getSelText()
 302     if ( cTmpLangString = cAdditionalLanguage ) then
 303         printlog( "Found correct language at pos 2. Good" )
 304     else
 305         warnlog( "The language is not listed at the expected position" )
 306     endif
 307     printlog( "Expected: " & cAdditionalLanguage )
 308     printlog( "Found...: " & cTmpLangString )
 309
 310     printlog( "Select second language and make it default" )
 311     PresentLanguages.select( 2 )
 312     Default.click()
 313     cAdditionalLanguage = PresentLanguages.getSelText()
 314
 315     printlog( "Close the Manage UI Languages dialog" )
 316     kontext "ManageUILanguages"
 317     ManageUILanguages.close()
 318
 319     printlog( "Verify that the new default is on pos 2 in the TranslationBar list" )
 320     kontext "TranslationBar"
 321     CurrentLanguage.select( 2 )
 322     cDefLangToolbar = CurrentLanguage.getSelText()
 323     if ( cDefLangToolbar = cAdditionalLanguage ) then
 324         printlog( "Found correct language at pos 2. Good." )
 325     else
 326         warnlog( "The language is not listed at the expected position" )
 327     endif
 328     printlog( "Expected: " & cAdditionalLanguage )
 329     printlog( "Found...: " & cDefLangToolbar )
 330
 331     printlog( "Verify that the list on the Manage UI Language is still unsorted" )
 332     printlog( "The dafault language should be at pos 2" )
 333     ManageLanguage.click()
 334     kontext "ManageUILanguages"
 335     PresentLanguages.select( 2 )
 336     cTmpLangString = Presentlanguages.getSelText()
 337     if ( cTmpLangString = cAdditionalLanguage ) then
 338         printlog( "Found correct language at pos 2. Good" )
 339     else
 340         warnlog( "The language is not listed at the expected position" )
 341     endif
 342     printlog( "Expected: " & cAdditionalLanguage )
 343     printlog( "Found...: " & cTmpLangString )
 344
 345     printlog( "Delte the current default language" )
 346     Delete.click()
 347
 348     printlog( "There should be a deletion warning" )
 349     kontext "Active"
 350     if ( Active.exists( 2 ) ) then
 351         cMsg = active.getText()
 352         cMsg = hRemoveLineBreaks( cMsg )
 353         printlog( "Message: " & cMsg )
 354         Active.ok()
 355     else
 356         warnlog( "Deletion Warning missing" )
 357     endif
 358
 359     printlog( "Verify deletion, the remaining language must be default now" )
 360     kontext "ManageUILanguages"
 361     iLangCount = PresentLanguages.getItemCount()
 362     if ( iLangCount <> 1 ) then
 363         warnlog( "Only the default language should be listed" )
 364         printlog( "Currently " & iLangCount & " entries are listed" )
 365     endif
 366
 367     PresentLanguages.select( 1 )
 368     cTmpLangString = Presentlanguages.getSeltext()
 369     if ( cTmpLangString <> cDefLangDialog ) then
 370         warnlog( "The dialog forgot the default language" )
 371     else
 372         printlog( "The dialog sets the default language. Good." )
 373     endif
 374     printlog( "Expected: " & cDefLangDialog )
 375     printlog( "Found...: " & cTmpLangString )
 376
 377     printlog( "verify button states" )
 378
 379     if ( not add.isEnabled() ) then
 380         warnlog( "Add button should be enabled" )
 381     endif
 382
 383     if ( not Delete.isEnabled() ) then
 384         warnlog( "Delete button should be enabled" )
 385     endif
 386
 387     if ( Default.isEnabled() ) then
 388         warnlog( "Default button should be disabled" )
 389     endif
 390
 391     TestExit:
 392     printlog( "" )
 393     printlog( "Test exit, cleanup" )
 394
 395     kontext "ManageUILanguages"
 396     if ( ManageUILanguages.exists() ) then
 397         ManageUILanguages.close()
 398     endif
 399
 400     hCloseBasicIde()
 401     hCloseDocument()
 402     hDeleteFile( cWorkPath )
 403
 404 endcase
 405
 406