Add unique module identifier to filenames

12 files changed, 772 insertions, 0 deletions

diff --git a/testautomation/extensions/optional/e_display_name.bas b/testautomation/extensions/optional/e_display_name.bas
new file mode 100755
index 000000000000..096e24050a11
--- /dev/null
+++ b/testautomation/extensions/optional/e_display_name.bas
@@ -0,0 +1,63 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: e_display_name.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: jsk $ $Date: 2008-06-20 05:58:40 $
+'*
+'* This file is part of OpenOffice.org.
+'*
+'* OpenOffice.org is free software: you can redistribute it and/or modify
+'* it under the terms of the GNU Lesser General Public License version 3
+'* only, as published by the Free Software Foundation.
+'*
+'* OpenOffice.org is distributed in the hope that it will be useful,
+'* but WITHOUT ANY WARRANTY; without even the implied warranty of
+'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+'* GNU Lesser General Public License version 3 for more details
+'* (a copy is included in the LICENSE file that accompanied this code).
+'*
+'* You should have received a copy of the GNU Lesser General Public License
+'* version 3 along with OpenOffice.org.  If not, see
+'* <http://www.openoffice.org/license.html>
+'* for a copy of the LGPLv3 License.
+'*
+'/******************************************************************************
+'*
+'*  owner : joerg.skottke@sun.com
+'*
+'*  short description : Extension display names
+'*
+'\******************************************************************************
+
+sub main
+
+    use "extensions\optional\includes\display_name.inc"
+
+    call hStatusIn( "extensions" , "e_display_name.bas" )
+    call tExtensionDisplayName()
+    call hStatusOut()
+
+end sub
+
+'*******************************************************************************
+
+sub LoadIncludeFiles
+
+    use "global\system\includes\gvariabl.inc"
+    use "global\system\includes\master.inc"
+    
+    use "global\tools\includes\optional\extension_manager_tools.inc"
+    
+    gApplication = "WRITER"
+    call GetUseFiles()
+
+end sub
+
diff --git a/testautomation/extensions/optional/e_errors.bas b/testautomation/extensions/optional/e_errors.bas
new file mode 100755
index 000000000000..2b49e746ca38
--- /dev/null
+++ b/testautomation/extensions/optional/e_errors.bas
@@ -0,0 +1,70 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: e_errors.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: jsk $ $Date: 2008-06-20 05:58:47 $
+'*
+'* This file is part of OpenOffice.org.
+'*
+'* OpenOffice.org is free software: you can redistribute it and/or modify
+'* it under the terms of the GNU Lesser General Public License version 3
+'* only, as published by the Free Software Foundation.
+'*
+'* OpenOffice.org is distributed in the hope that it will be useful,
+'* but WITHOUT ANY WARRANTY; without even the implied warranty of
+'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+'* GNU Lesser General Public License version 3 for more details
+'* (a copy is included in the LICENSE file that accompanied this code).
+'*
+'* You should have received a copy of the GNU Lesser General Public License
+'* version 3 along with OpenOffice.org.  If not, see
+'* <http://www.openoffice.org/license.html>
+'* for a copy of the LGPLv3 License.
+'*
+'/******************************************************************************
+'*
+'*  owner : joerg.skottke@sun.com
+'*
+'*  short description : Install extensions that caused unopkg to fail
+'*
+'\******************************************************************************
+
+sub main
+
+    use "extensions\optional\includes\errors.inc"
+ 
+    call hStatusIn( "extensions" , "e_errors.bas" )
+    call tExtensionError77436()
+    call hStatusOut()
+
+end sub
+
+'-------------------------------------------------------------------------
+
+sub LoadIncludeFiles
+
+    use "global\system\includes\gvariabl.inc"
+    use "global\system\includes\master.inc"
+    
+    use "global\tools\includes\optional\extension_manager_tools.inc"
+    use "global\tools\includes\optional\stringtools.inc"
+    use "global\tools\includes\optional\accels.inc"
+    use "global\tools\includes\optional\docfuncs.inc"
+    use "global\tools\includes\optional\listfuncs.inc"
+    use "global\tools\includes\optional\macro_tools.inc"
+    use "global\tools\includes\optional\basicide_tools.inc"
+    use "global\tools\includes\optional\basicorganizer_tools.inc"
+   
+    gApplication = "WRITER"
+    call GetUseFiles()
+
+end sub
+
diff --git a/testautomation/extensions/optional/e_extensions.bas b/testautomation/extensions/optional/e_extensions.bas
new file mode 100755
index 000000000000..f3b2de0595a8
--- /dev/null
+++ b/testautomation/extensions/optional/e_extensions.bas
@@ -0,0 +1,60 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: e_extensions.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: jsk $ $Date: 2008-06-20 05:58:55 $
+'*
+'* This file is part of OpenOffice.org.
+'*
+'* OpenOffice.org is free software: you can redistribute it and/or modify
+'* it under the terms of the GNU Lesser General Public License version 3
+'* only, as published by the Free Software Foundation.
+'*
+'* OpenOffice.org is distributed in the hope that it will be useful,
+'* but WITHOUT ANY WARRANTY; without even the implied warranty of
+'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+'* GNU Lesser General Public License version 3 for more details
+'* (a copy is included in the LICENSE file that accompanied this code).
+'*
+'* You should have received a copy of the GNU Lesser General Public License
+'* version 3 along with OpenOffice.org.  If not, see
+'* <http://www.openoffice.org/license.html>
+'* for a copy of the LGPLv3 License.
+'*
+'/************************************************************************
+'*
+'* owner : thorsten.bosbach@sun.com
+'*
+'* short description : Function test of extension manager
+'*
+'\************************************************************************
+
+sub main
+   use "extensions\optional\includes\extensions.inc"
+   
+   call hStatusIn ( "extensions","e_extensions.bas" )
+
+   printlog " function test of extension manager "
+
+   call tExtensionsFunction()
+
+   call hStatusOut
+end sub
+
+'-------------------------------------------------------------------------
+sub LoadIncludeFiles
+   use "global\system\includes\master.inc"
+   use "global\system\includes\gvariabl.inc"
+   gApplication = "WRITER"
+   call GetUseFiles
+end sub
+'-------------------------------------------------------------------------
+
diff --git a/testautomation/extensions/optional/e_fileopen.bas b/testautomation/extensions/optional/e_fileopen.bas
new file mode 100755
index 000000000000..43334e0832f0
--- /dev/null
+++ b/testautomation/extensions/optional/e_fileopen.bas
@@ -0,0 +1,61 @@
+'encoding UTF-8  Do not remove or change this line!
+'*******************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'*
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: e_fileopen.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: jsk $ $Date: 2008-06-20 05:59:03 $
+'*
+'* This file is part of OpenOffice.org.
+'*
+'* OpenOffice.org is free software: you can redistribute it and/or modify
+'* it under the terms of the GNU Lesser General Public License version 3
+'* only, as published by the Free Software Foundation.
+'*
+'* OpenOffice.org is distributed in the hope that it will be useful,
+'* but WITHOUT ANY WARRANTY; without even the implied warranty of
+'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+'* GNU Lesser General Public License version 3 for more details
+'* (a copy is included in the LICENSE file that accompanied this code).
+'*
+'* You should have received a copy of the GNU Lesser General Public License
+'* version 3 along with OpenOffice.org.  If not, see
+'* <http://www.openoffice.org/license.html>
+'* for a copy of the LGPLv3 License.
+'*
+'/******************************************************************************
+'*
+'*  owner : joerg.skottke@sun.com
+'*
+'*  short description : CWS oxtsysint01 enables installing extensions via file open dialog
+'*
+'\******************************************************************************
+
+sub main
+
+    use "extensions\optional\includes\fileopen.inc"
+
+    call hStatusIn( "extensions" , "e_fileopen.bas" )
+    call tExtensionFileOpen()
+    call hStatusOut()
+
+end sub
+
+'*******************************************************************************
+
+sub LoadIncludeFiles
+
+    use "global\system\includes\gvariabl.inc"
+    use "global\system\includes\master.inc"
+    use "global\tools\includes\optional\extension_manager_tools.inc"
+    gApplication = "WRITER"
+    call GetUseFiles()
+
+end sub
+
diff --git a/testautomation/extensions/optional/e_help.bas b/testautomation/extensions/optional/e_help.bas
new file mode 100755
index 000000000000..c3de6b987ac6
--- /dev/null
+++ b/testautomation/extensions/optional/e_help.bas
@@ -0,0 +1,63 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: e_help.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: jsk $ $Date: 2008-06-20 05:59:11 $
+'*
+'* This file is part of OpenOffice.org.
+'*
+'* OpenOffice.org is free software: you can redistribute it and/or modify
+'* it under the terms of the GNU Lesser General Public License version 3
+'* only, as published by the Free Software Foundation.
+'*
+'* OpenOffice.org is distributed in the hope that it will be useful,
+'* but WITHOUT ANY WARRANTY; without even the implied warranty of
+'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+'* GNU Lesser General Public License version 3 for more details
+'* (a copy is included in the LICENSE file that accompanied this code).
+'*
+'* You should have received a copy of the GNU Lesser General Public License
+'* version 3 along with OpenOffice.org.  If not, see
+'* <http://www.openoffice.org/license.html>
+'* for a copy of the LGPLv3 License.
+'*
+'/******************************************************************************
+'*
+'*  owner : joerg.skottke@sun.com
+'*
+'*  short description : Extensible help
+'*
+'\******************************************************************************
+
+sub main
+
+    use "extensions\optional\includes\help.inc"
+
+    call hStatusIn( "extensions" , "e_help.bas" )
+    call tExtensibleHelp()
+    call hStatusOut()
+
+end sub
+
+'*******************************************************************************
+
+sub LoadIncludeFiles
+
+    use "global\system\includes\gvariabl.inc"
+    use "global\system\includes\master.inc"
+    
+    use "global\tools\includes\optional\extension_manager_tools.inc"
+    
+    gApplication = "WRITER"
+    call GetUseFiles()
+
+end sub
+
diff --git a/testautomation/extensions/optional/e_identifiers.bas b/testautomation/extensions/optional/e_identifiers.bas
new file mode 100755
index 000000000000..42dd18778443
--- /dev/null
+++ b/testautomation/extensions/optional/e_identifiers.bas
@@ -0,0 +1,65 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: e_identifiers.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: jsk $ $Date: 2008-06-20 05:59:19 $
+'*
+'* This file is part of OpenOffice.org.
+'*
+'* OpenOffice.org is free software: you can redistribute it and/or modify
+'* it under the terms of the GNU Lesser General Public License version 3
+'* only, as published by the Free Software Foundation.
+'*
+'* OpenOffice.org is distributed in the hope that it will be useful,
+'* but WITHOUT ANY WARRANTY; without even the implied warranty of
+'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+'* GNU Lesser General Public License version 3 for more details
+'* (a copy is included in the LICENSE file that accompanied this code).
+'*
+'* You should have received a copy of the GNU Lesser General Public License
+'* version 3 along with OpenOffice.org.  If not, see
+'* <http://www.openoffice.org/license.html>
+'* for a copy of the LGPLv3 License.
+'*
+'/******************************************************************************
+'*
+'*  owner : joerg.skottke@sun.com
+'*
+'*  short description : Use unique identifiers instead of filenames for extensions
+'*
+'\******************************************************************************
+
+sub main
+
+    use "extensions\optional\includes\identifiers.inc"
+
+    call hStatusIn( "extensions" , "e_identifiers.bas" )
+    call tExtensionIdentifiers()
+    call hStatusOut()
+
+end sub
+
+'-------------------------------------------------------------------------
+
+sub LoadIncludeFiles
+
+    use "global\system\includes\master.inc"
+    use "global\system\includes\gvariabl.inc"
+    
+    use "global\tools\includes\optional\extension_manager_tools.inc"
+    use "global\tools\includes\optional\treelist_tools.inc"
+    use "global\tools\includes\optional\docfuncs.inc"
+    
+    gApplication = "WRITER"
+    call GetUseFiles()
+
+end sub
+
diff --git a/testautomation/extensions/optional/e_location.bas b/testautomation/extensions/optional/e_location.bas
new file mode 100755
index 000000000000..08b1f3893b3a
--- /dev/null
+++ b/testautomation/extensions/optional/e_location.bas
@@ -0,0 +1,72 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: e_location.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: jsk $ $Date: 2008-06-20 05:59:27 $
+'*
+'* This file is part of OpenOffice.org.
+'*
+'* OpenOffice.org is free software: you can redistribute it and/or modify
+'* it under the terms of the GNU Lesser General Public License version 3
+'* only, as published by the Free Software Foundation.
+'*
+'* OpenOffice.org is distributed in the hope that it will be useful,
+'* but WITHOUT ANY WARRANTY; without even the implied warranty of
+'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+'* GNU Lesser General Public License version 3 for more details
+'* (a copy is included in the LICENSE file that accompanied this code).
+'*
+'* You should have received a copy of the GNU Lesser General Public License
+'* version 3 along with OpenOffice.org.  If not, see
+'* <http://www.openoffice.org/license.html>
+'* for a copy of the LGPLv3 License.
+'*
+'/******************************************************************************
+'*
+'*  owner : joerg.skottke@sun.com
+'*
+'*  short description : Test the extension locator service
+'*
+'\******************************************************************************
+
+sub main
+
+    use "extensions\optional\includes\location.inc"
+
+    call hStatusIn( "extensions" , "e_location.bas" )
+    
+    hSetMacroSecurityAPI( GC_MACRO_SECURITY_LEVEL_MEDIUM )
+
+    call tExtensionLocation()
+    
+    hSetMacroSecurityAPI( GC_MACRO_SECURITY_LEVEL_DEFAULT )
+
+    call hStatusOut()
+
+end sub
+
+'-------------------------------------------------------------------------
+
+sub LoadIncludeFiles
+
+    use "global\system\includes\master.inc"
+    use "global\system\includes\gvariabl.inc"
+
+    use "global\tools\includes\optional\docfuncs.inc"
+    use "global\tools\includes\optional\filetools.inc"
+    use "global\tools\includes\optional\macro_tools.inc"
+    use "global\tools\includes\optional\security_tools.inc"
+     
+    gApplication = "WRITER"
+    call GetUseFiles()
+
+end sub
+
diff --git a/testautomation/extensions/optional/e_meta-inf.bas b/testautomation/extensions/optional/e_meta-inf.bas
new file mode 100755
index 000000000000..4cf44866e152
--- /dev/null
+++ b/testautomation/extensions/optional/e_meta-inf.bas
@@ -0,0 +1,65 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: e_meta-inf.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: jsk $ $Date: 2008-06-20 05:59:35 $
+'*
+'* This file is part of OpenOffice.org.
+'*
+'* OpenOffice.org is free software: you can redistribute it and/or modify
+'* it under the terms of the GNU Lesser General Public License version 3
+'* only, as published by the Free Software Foundation.
+'*
+'* OpenOffice.org is distributed in the hope that it will be useful,
+'* but WITHOUT ANY WARRANTY; without even the implied warranty of
+'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+'* GNU Lesser General Public License version 3 for more details
+'* (a copy is included in the LICENSE file that accompanied this code).
+'*
+'* You should have received a copy of the GNU Lesser General Public License
+'* version 3 along with OpenOffice.org.  If not, see
+'* <http://www.openoffice.org/license.html>
+'* for a copy of the LGPLv3 License.
+'*
+'/******************************************************************************
+'*
+'*  owner : joerg.skottke@sun.com
+'*
+'*  short description : Case sensitive META-INF file
+'*
+'\******************************************************************************
+
+sub main
+
+    use "extensions\optional\includes\meta-inf.inc"
+    
+    call hStatusIn( "extensions" , "e_meta-inf.bas" )
+    call tLowerCaseMetaInf
+    call hStatusOut()
+
+end sub
+
+'-------------------------------------------------------------------------
+
+sub LoadIncludeFiles
+
+    use "global\system\includes\gvariabl.inc"
+    use "global\system\includes\master.inc"
+    use "global\tools\includes\optional\extension_manager_tools.inc"
+    
+    use "global\tools\includes\optional\docfuncs.inc"
+    use "global\tools\includes\optional\filetools.inc"
+
+    gApplication = "WRITER"
+    call GetUseFiles()
+
+end sub
+
diff --git a/testautomation/extensions/optional/e_online_update.bas b/testautomation/extensions/optional/e_online_update.bas
new file mode 100755
index 000000000000..5b44be504430
--- /dev/null
+++ b/testautomation/extensions/optional/e_online_update.bas
@@ -0,0 +1,63 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: e_online_update.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: jsk $ $Date: 2008-06-20 05:59:44 $
+'*
+'* This file is part of OpenOffice.org.
+'*
+'* OpenOffice.org is free software: you can redistribute it and/or modify
+'* it under the terms of the GNU Lesser General Public License version 3
+'* only, as published by the Free Software Foundation.
+'*
+'* OpenOffice.org is distributed in the hope that it will be useful,
+'* but WITHOUT ANY WARRANTY; without even the implied warranty of
+'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+'* GNU Lesser General Public License version 3 for more details
+'* (a copy is included in the LICENSE file that accompanied this code).
+'*
+'* You should have received a copy of the GNU Lesser General Public License
+'* version 3 along with OpenOffice.org.  If not, see
+'* <http://www.openoffice.org/license.html>
+'* for a copy of the LGPLv3 License.
+'*
+'/******************************************************************************
+'*
+'*  owner : joerg.skottke@sun.com
+'*
+'*  short description : Hit update button for an extension
+'*
+'\******************************************************************************
+
+sub main
+
+    use "extensions\optional\includes\online_update.inc"
+
+    call hStatusIn( "extensions" , "e_online_update.bas" )
+    call tExtensionUpdate()
+    call hStatusOut()
+
+end sub
+
+'-------------------------------------------------------------------------
+
+sub LoadIncludeFiles
+
+    use "global\system\includes\master.inc"
+    use "global\system\includes\gvariabl.inc"
+    
+    use "global\tools\includes\optional\extension_manager_tools.inc"
+    
+    gApplication = "WRITER"
+    call GetUseFiles()
+
+end sub
+
diff --git a/testautomation/extensions/optional/e_options.bas b/testautomation/extensions/optional/e_options.bas
new file mode 100755
index 000000000000..2cc20f7708f4
--- /dev/null
+++ b/testautomation/extensions/optional/e_options.bas
@@ -0,0 +1,65 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: e_options.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: jsk $ $Date: 2008-06-20 05:59:52 $
+'*
+'* This file is part of OpenOffice.org.
+'*
+'* OpenOffice.org is free software: you can redistribute it and/or modify
+'* it under the terms of the GNU Lesser General Public License version 3
+'* only, as published by the Free Software Foundation.
+'*
+'* OpenOffice.org is distributed in the hope that it will be useful,
+'* but WITHOUT ANY WARRANTY; without even the implied warranty of
+'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+'* GNU Lesser General Public License version 3 for more details
+'* (a copy is included in the LICENSE file that accompanied this code).
+'*
+'* You should have received a copy of the GNU Lesser General Public License
+'* version 3 along with OpenOffice.org.  If not, see
+'* <http://www.openoffice.org/license.html>
+'* for a copy of the LGPLv3 License.
+'*
+'/******************************************************************************
+'*
+'*  owner : joerg.skottke@sun.com
+'*
+'*  short description : Options for extensions
+'*
+'\******************************************************************************
+
+sub main
+
+    use "extensions\optional\includes\options.inc"
+
+    call hStatusIn( "extensions" , "e_options.bas" )
+    call tExtensionOptions1()
+    call hStatusOut()
+
+end sub
+
+'-------------------------------------------------------------------------
+
+sub LoadIncludeFiles
+
+    use "global\system\includes\master.inc"
+    use "global\system\includes\gvariabl.inc"
+
+    use "global\tools\includes\optional\extension_manager_tools.inc"
+    use "global\tools\includes\optional\treelist_tools.inc"
+    use "global\tools\includes\optional\control_objects.inc"
+    
+    gApplication = "WRITER"
+    call GetUseFiles()
+
+end sub
+
diff --git a/testautomation/extensions/optional/e_platforms.bas b/testautomation/extensions/optional/e_platforms.bas
new file mode 100755
index 000000000000..fa0f8e093490
--- /dev/null
+++ b/testautomation/extensions/optional/e_platforms.bas
@@ -0,0 +1,64 @@
+'encoding UTF-8  Do not remove or change this line!
+'*******************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'*
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: e_platforms.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: jsk $ $Date: 2008-06-20 05:59:59 $
+'*
+'* This file is part of OpenOffice.org.
+'*
+'* OpenOffice.org is free software: you can redistribute it and/or modify
+'* it under the terms of the GNU Lesser General Public License version 3
+'* only, as published by the Free Software Foundation.
+'*
+'* OpenOffice.org is distributed in the hope that it will be useful,
+'* but WITHOUT ANY WARRANTY; without even the implied warranty of
+'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+'* GNU Lesser General Public License version 3 for more details
+'* (a copy is included in the LICENSE file that accompanied this code).
+'*
+'* You should have received a copy of the GNU Lesser General Public License
+'* version 3 along with OpenOffice.org.  If not, see
+'* <http://www.openoffice.org/license.html>
+'* for a copy of the LGPLv3 License.
+'*
+'/******************************************************************************
+'*
+'*  owner : joerg.skottke@sun.com
+'*
+'*  short description : Supported extension platforms
+'*
+'\******************************************************************************
+
+sub main
+
+    use "extensions\optional\includes\platforms.inc"
+
+    call hStatusIn( "extensions" , "e_platforms.bas" )
+    call tExtensionPlatforms()
+    call hStatusOut()
+
+end sub
+
+'*******************************************************************************
+
+sub LoadIncludeFiles
+
+    use "global\system\includes\gvariabl.inc"
+    use "global\system\includes\master.inc"
+
+    use "global\tools\includes\optional\extension_manager_tools.inc"
+    use "global\tools\includes\optional\key_tools.inc"
+
+    gApplication = "WRITER"
+    call GetUseFiles()
+
+end sub
+
diff --git a/testautomation/extensions/optional/e_publisher.bas b/testautomation/extensions/optional/e_publisher.bas
new file mode 100755
index 000000000000..6dac0aa805f3
--- /dev/null
+++ b/testautomation/extensions/optional/e_publisher.bas
@@ -0,0 +1,61 @@
+'encoding UTF-8  Do not remove or change this line!
+'**************************************************************************
+'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+'* 
+'* Copyright 2008 by Sun Microsystems, Inc.
+'*
+'* OpenOffice.org - a multi-platform office productivity suite
+'*
+'* $RCSfile: e_publisher.bas,v $
+'*
+'* $Revision: 1.1 $
+'*
+'* last change: $Author: jsk $ $Date: 2008-06-20 06:00:09 $
+'*
+'* This file is part of OpenOffice.org.
+'*
+'* OpenOffice.org is free software: you can redistribute it and/or modify
+'* it under the terms of the GNU Lesser General Public License version 3
+'* only, as published by the Free Software Foundation.
+'*
+'* OpenOffice.org is distributed in the hope that it will be useful,
+'* but WITHOUT ANY WARRANTY; without even the implied warranty of
+'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+'* GNU Lesser General Public License version 3 for more details
+'* (a copy is included in the LICENSE file that accompanied this code).
+'*
+'* You should have received a copy of the GNU Lesser General Public License
+'* version 3 along with OpenOffice.org.  If not, see
+'* <http://www.openoffice.org/license.html>
+'* for a copy of the LGPLv3 License.
+'*
+'/******************************************************************************
+'*
+'*  owner : joerg.skottke@sun.com
+'*
+'*  short description : Extension publisher string
+'*
+'\******************************************************************************
+
+sub main
+
+    use "extensions\optional\includes\publisher.inc"
+
+    call hStatusIn( "extensions" , "e_publisher.bas" )
+    call tExtensionPublisher()
+    call hStatusOut()
+
+end sub
+
+'*******************************************************************************
+
+sub LoadIncludeFiles
+
+    use "global\system\includes\gvariabl.inc"
+    use "global\system\includes\master.inc"
+    use "global\tools\includes\optional\extension_manager_tools.inc"
+    gApplication = "WRITER"
+    call GetUseFiles()
+
+end sub
+