fold i18npaper into i18nutil

It's too small to justify standalone existence.

We can accumulate i18n things we link to directly into
i18nutil and rework i18npool uno implementions in terms
of thin wrappers over i18nutil and prefer linking to
i18nutil internally and leave the uno forwarders for
use by external components and scripting

5 files changed, 683 insertions, 0 deletions

diff --git a/i18nutil/Library_i18nutil.mk b/i18nutil/Library_i18nutil.mk
index a05c3d017f89..990b1cafe314 100644
--- a/i18nutil/Library_i18nutil.mk
+++ b/i18nutil/Library_i18nutil.mk
@@ -48,6 +48,7 @@ $(eval $(call gb_Library_add_linked_libs,i18nutil,\
 $(eval $(call gb_Library_add_exception_objects,i18nutil,\
 	i18nutil/source/utility/casefolding \
 	i18nutil/source/utility/oneToOneMapping \
+	i18nutil/source/utility/paper \
 	i18nutil/source/utility/scripttypedetector \
 	i18nutil/source/utility/unicode \
 	i18nutil/source/utility/widthfolding \
diff --git a/i18nutil/Package_inc.mk b/i18nutil/Package_inc.mk
index 3ea2b55d46be..f72180e36bdc 100644
--- a/i18nutil/Package_inc.mk
+++ b/i18nutil/Package_inc.mk
@@ -30,6 +30,7 @@ $(eval $(call gb_Package_Package,i18nutil_inc,$(SRCDIR)/i18nutil/inc))
 $(eval $(call gb_Package_add_file,i18nutil_inc,inc/i18nutil/i18nutildllapi.h,i18nutil/i18nutildllapi.h))
 $(eval $(call gb_Package_add_file,i18nutil_inc,inc/i18nutil/casefolding.hxx,i18nutil/casefolding.hxx))
 $(eval $(call gb_Package_add_file,i18nutil_inc,inc/i18nutil/oneToOneMapping.hxx,i18nutil/oneToOneMapping.hxx))
+$(eval $(call gb_Package_add_file,i18nutil_inc,inc/i18nutil/paper.hxx,i18nutil/paper.hxx))
 $(eval $(call gb_Package_add_file,i18nutil_inc,inc/i18nutil/scripttypedetector.hxx,i18nutil/scripttypedetector.hxx))
 $(eval $(call gb_Package_add_file,i18nutil_inc,inc/i18nutil/unicode.hxx,i18nutil/unicode.hxx))
 $(eval $(call gb_Package_add_file,i18nutil_inc,inc/i18nutil/widthfolding.hxx,i18nutil/widthfolding.hxx))
diff --git a/i18nutil/README b/i18nutil/README
new file mode 100644
index 000000000000..6839c5d85be7
--- /dev/null
+++ b/i18nutil/README
@@ -0,0 +1,4 @@
+i18nutil is internalization related utilties
+
+It comprises of honest c++ code which you just link to directly, while i18npool
+tends to consist of code you interact with via uno.
diff --git a/i18nutil/inc/i18nutil/paper.hxx b/i18nutil/inc/i18nutil/paper.hxx
new file mode 100644
index 000000000000..d5be9ec0bca4
--- /dev/null
+++ b/i18nutil/inc/i18nutil/paper.hxx
@@ -0,0 +1,155 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/*************************************************************************
+ *
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * Copyright 2000, 2010 Oracle and/or its affiliates.
+ *
+ * OpenOffice.org - a multi-platform office productivity suite
+ *
+ * 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.
+ *
+ ************************************************************************/
+
+#ifndef INCLUDED_I18NUTIL_PAPER_HXX
+#define INCLUDED_I18NUTIL_PAPER_HXX
+
+#include "i18nutildllapi.h"
+#include <rtl/string.hxx>
+#include <com/sun/star/lang/Locale.hpp>
+
+//!! WARNING: be aware of cui/source/tabpages/page.h where someone had the broken idea
+//!! of duplicating the values of this enum in order to use those defines within
+//!! src files.
+//!! Thus don't reorder the enum values here without changing the code there as well.
+enum Paper
+{
+    PAPER_A0,
+    PAPER_A1,
+    PAPER_A2,
+    PAPER_A3,
+    PAPER_A4,
+    PAPER_A5,
+    PAPER_B4_ISO,
+    PAPER_B5_ISO,
+    PAPER_LETTER,
+    PAPER_LEGAL,
+    PAPER_TABLOID,
+    PAPER_USER,
+    PAPER_B6_ISO,
+    PAPER_ENV_C4,
+    PAPER_ENV_C5,
+    PAPER_ENV_C6,
+    PAPER_ENV_C65,
+    PAPER_ENV_DL,
+    PAPER_SLIDE_DIA,
+    PAPER_SCREEN,
+    PAPER_C,
+    PAPER_D,
+    PAPER_E,
+    PAPER_EXECUTIVE,
+    PAPER_FANFOLD_LEGAL_DE,
+    PAPER_ENV_MONARCH,
+    PAPER_ENV_PERSONAL,
+    PAPER_ENV_9,
+    PAPER_ENV_10,
+    PAPER_ENV_11,
+    PAPER_ENV_12,
+    PAPER_KAI16,
+    PAPER_KAI32,
+    PAPER_KAI32BIG,
+    PAPER_B4_JIS,
+    PAPER_B5_JIS,
+    PAPER_B6_JIS,
+    PAPER_LEDGER,
+    PAPER_STATEMENT,
+    PAPER_QUARTO,
+    PAPER_10x14,
+    PAPER_ENV_14,
+    PAPER_ENV_C3,
+    PAPER_ENV_ITALY,
+    PAPER_FANFOLD_US,
+    PAPER_FANFOLD_DE,
+    PAPER_POSTCARD_JP,
+    PAPER_9x11,
+    PAPER_10x11,
+    PAPER_15x11,
+    PAPER_ENV_INVITE,
+    PAPER_A_PLUS,
+    PAPER_B_PLUS,
+    PAPER_LETTER_PLUS,
+    PAPER_A4_PLUS,
+    PAPER_DOUBLEPOSTCARD_JP,
+    PAPER_A6,
+    PAPER_12x11,
+    PAPER_A7,
+    PAPER_A8,
+    PAPER_A9,
+    PAPER_A10,
+    PAPER_B0_ISO,
+    PAPER_B1_ISO,
+    PAPER_B2_ISO,
+    PAPER_B3_ISO,
+    PAPER_B7_ISO,
+    PAPER_B8_ISO,
+    PAPER_B9_ISO,
+    PAPER_B10_ISO,
+    PAPER_ENV_C2,
+    PAPER_ENV_C7,
+    PAPER_ENV_C8,
+    PAPER_ARCHA,
+    PAPER_ARCHB,
+    PAPER_ARCHC,
+    PAPER_ARCHD,
+    PAPER_ARCHE
+};
+
+// defined for 'equal size' test with the implementation array
+#define NUM_PAPER_ENTRIES   (PAPER_ARCHE - PAPER_A0 + 1)
+
+// ---------
+// - Paper -
+// ---------
+
+class I18NUTIL_DLLPUBLIC PaperInfo
+{
+    Paper m_eType;
+    long m_nPaperWidth;     // width in 100thMM
+    long m_nPaperHeight;    // height in 100thMM
+public:
+    PaperInfo(Paper eType);
+    PaperInfo(long nPaperWidth, long nPaperHeight);
+
+    Paper getPaper() const { return m_eType; }
+    long getWidth() const { return m_nPaperWidth; }
+    long getHeight() const { return m_nPaperHeight; }
+    bool sloppyEqual(const PaperInfo &rOther) const;
+    bool doSloppyFit();
+
+    static PaperInfo getSystemDefaultPaper();
+    static PaperInfo getDefaultPaperForLocale(const ::com::sun::star::lang::Locale & rLocale);
+
+    static Paper fromPSName(const rtl::OString &rName);
+    static rtl::OString toPSName(Paper eType);
+
+    static long sloppyFitPageDimension(long nDimension);
+};
+
+#endif // INCLUDED_I18NUTIL_PAPER_HXX
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/i18nutil/source/utility/paper.cxx b/i18nutil/source/utility/paper.cxx
new file mode 100644
index 000000000000..63b5cff2a93d
--- /dev/null
+++ b/i18nutil/source/utility/paper.cxx
@@ -0,0 +1,522 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/*************************************************************************
+ *
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * Copyright 2000, 2010 Oracle and/or its affiliates.
+ *
+ * OpenOffice.org - a multi-platform office productivity suite
+ *
+ * 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.
+ *
+ ************************************************************************/
+
+
+#include <osl/diagnose.h>
+#include <sal/config.h>
+#include <sal/macros.h>
+#include <rtl/ustring.hxx>
+#include <rtl/string.hxx>
+#include <comphelper/processfactory.hxx>
+#include <com/sun/star/i18n/ScriptType.hpp>
+#include <com/sun/star/lang/XMultiServiceFactory.hpp>
+#include <com/sun/star/container/XNameAccess.hpp>
+
+#include "i18nutil/paper.hxx"
+
+#include <utility>
+#include <cstdlib>
+
+#ifdef UNX
+#include <stdio.h>
+#include <string.h>
+#include <locale.h>
+#if defined(LC_PAPER) && defined(_GNU_SOURCE)
+#include <langinfo.h>
+#endif
+#endif
+
+struct PageDesc
+{
+    long m_nWidth;
+    long m_nHeight;
+    const char *m_pPSName;
+    const char *m_pAltPSName;
+};
+
+#define PT2MM100( v ) \
+    (long)(((v) * 35.27777778) + 0.5)
+
+#define IN2MM100( v ) \
+    ((long)(((v) * 2540) + 0.5))
+
+#define MM2MM100( v ) \
+    ((long)((v) * 100))
+
+//PostScript Printer Description File Format Specification
+//http://partners.adobe.com/public/developer/en/ps/5003.PPD_Spec_v4.3.pdf
+//http://www.y-adagio.com/public/committees/docsii/doc_00-49/symp_ulaan/china_ppr.pdf (Kai)
+//http://www.sls.psi.ch/controls/help/howto/Howto_Print_a_A0_Poster_at_WSLA_012_2.pdf (Dia)
+static PageDesc aDinTab[] =
+{
+    { MM2MM100( 841 ),   MM2MM100( 1189 ),   "A0",  NULL },
+    { MM2MM100( 594 ),   MM2MM100( 841 ),    "A1",  NULL },
+    { MM2MM100( 420 ),   MM2MM100( 594 ),    "A2",  NULL },
+    { MM2MM100( 297 ),   MM2MM100( 420 ),    "A3",  NULL },
+    { MM2MM100( 210 ),   MM2MM100( 297 ),    "A4",  NULL },
+    { MM2MM100( 148 ),   MM2MM100( 210 ),    "A5",  NULL },
+    { MM2MM100( 250 ),   MM2MM100( 353 ),    "ISOB4",  NULL },
+    { MM2MM100( 176 ),   MM2MM100( 250 ),    "ISOB5",  NULL },
+    { IN2MM100( 8.5 ),   IN2MM100( 11 ),     "Letter",  "Note" },
+    { IN2MM100( 8.5 ),   IN2MM100( 14 ),     "Legal",  NULL },
+    { IN2MM100( 11 ),    IN2MM100( 17 ),     "Tabloid",  "11x17" },
+    { 0,                 0,                  NULL, NULL }, //User
+    { MM2MM100( 125 ),   MM2MM100( 176 ),    "ISOB6",  NULL },
+    { MM2MM100( 229 ),   MM2MM100( 324 ),    "EnvC4",  "C4" },
+    { MM2MM100( 162 ),   MM2MM100( 229 ),    "EnvC5",  "C5" },
+    { MM2MM100( 114 ),   MM2MM100( 162 ),    "EnvC6",  "C6" },
+    { MM2MM100( 114 ),   MM2MM100( 229 ),    "EnvC65", NULL },
+    { MM2MM100( 110 ),   MM2MM100( 220 ),    "EnvDL",  "DL" },
+    { MM2MM100( 180),    MM2MM100( 270 ),    NULL,  NULL }, //Dia
+    { MM2MM100( 210),    MM2MM100( 280 ),    NULL,  NULL }, //Screen
+    { IN2MM100( 17 ),    IN2MM100( 22 ),     "AnsiC",  "CSheet" },
+    { IN2MM100( 22 ),    IN2MM100( 34 ),     "AnsiD",  "DSheet" },
+    { IN2MM100( 34 ),    IN2MM100( 44 ),     "AnsiE",  "ESheet" },
+    { IN2MM100( 7.25 ),  IN2MM100( 10.5 ),   "Executive",  NULL },
+    //"Folio" is a different size in the PPD documentation than 8.5x11
+    //This "FanFoldGermanLegal" is known in the Philippines as
+    //"Legal" paper or "Long Bond Paper".  The "Legal" name causing untold
+    //misery, given the differently sized US "Legal" paper
+    { IN2MM100( 8.5 ),   IN2MM100( 13 ),     "FanFoldGermanLegal",  NULL },
+    { IN2MM100( 3.875 ), IN2MM100( 7.5 ),    "EnvMonarch", "Monarch" },
+    { IN2MM100( 3.625 ), IN2MM100( 6.5 ),    "EnvPersonal",  "Personal" },
+    { IN2MM100( 3.875 ), IN2MM100( 8.875 ),  "Env9",  NULL },
+    { IN2MM100( 4.125 ), IN2MM100( 9.5 ),    "Env10",  "Comm10" },
+    { IN2MM100( 4.5 ),   IN2MM100( 10.375 ), "Env11",  NULL },
+    { IN2MM100( 4.75 ),  IN2MM100( 11 ),     "Env12",  NULL },
+    { MM2MM100( 184 ),   MM2MM100( 260 ),    NULL,  NULL }, //Kai16
+    { MM2MM100( 130 ),   MM2MM100( 184 ),    NULL,  NULL }, //Kai32
+    { MM2MM100( 140 ),   MM2MM100( 203 ),    NULL,  NULL }, //BigKai32
+    { MM2MM100( 257 ),   MM2MM100( 364 ),    "B4",  NULL }, //JIS
+    { MM2MM100( 182 ),   MM2MM100( 257 ),    "B5",  NULL }, //JIS
+    { MM2MM100( 128 ),   MM2MM100( 182 ),    "B6",  NULL }, //JIS
+    { IN2MM100( 17 ),    IN2MM100( 11 ),     "Ledger",  NULL },
+    { IN2MM100( 5.5 ),   IN2MM100( 8.5 ),    "Statement",  NULL },
+    { PT2MM100( 610 ),   PT2MM100( 780 ),    "Quarto",  NULL },
+    { IN2MM100( 10 ),    IN2MM100( 14 ),     "10x14",  NULL },
+    { IN2MM100( 5.5 ),   IN2MM100( 11.5 ),   "Env14",  NULL },
+    { MM2MM100( 324 ),   MM2MM100( 458 ),    "EnvC3",  "C3" },
+    { MM2MM100( 110 ),   MM2MM100( 230 ),    "EnvItalian",  NULL },
+    { IN2MM100( 14.875 ),IN2MM100( 11 ),     "FanFoldUS",  NULL },
+    { IN2MM100( 8.5 ),   IN2MM100( 13 ),     "FanFoldGerman",  NULL },
+    { MM2MM100( 100 ),   MM2MM100( 148 ),    "Postcard",  NULL },
+    { IN2MM100( 9 ),     IN2MM100( 11 ),     "9x11",  NULL },
+    { IN2MM100( 10 ),    IN2MM100( 11 ),     "10x11",  NULL },
+    { IN2MM100( 15 ),    IN2MM100( 11 ),     "15x11",  NULL },
+    { MM2MM100( 220 ),   MM2MM100( 220 ),    "EnvInvite",  NULL },
+    { MM2MM100( 227 ),   MM2MM100( 356 ),    "SuperA",  NULL },
+    { MM2MM100( 305 ),   MM2MM100( 487 ),    "SuperB",  NULL },
+    { IN2MM100( 8.5 ),   IN2MM100( 12.69 ),  "LetterPlus",  NULL },
+    { MM2MM100( 210 ),   MM2MM100( 330 ),    "A4Plus",  NULL },
+    { MM2MM100( 200 ),   MM2MM100( 148 ),    "DoublePostcard",  NULL },
+    { MM2MM100( 105 ),   MM2MM100( 148 ),    "A6",  NULL },
+    { IN2MM100( 12 ),    IN2MM100( 11 ),     "12x11",  NULL },
+    { MM2MM100( 74 ),    MM2MM100( 105 ),    "A7",  NULL },
+    { MM2MM100( 52 ),    MM2MM100( 74 ),     "A8",  NULL },
+    { MM2MM100( 37 ),    MM2MM100( 52 ),     "A9",  NULL },
+    { MM2MM100( 26 ),    MM2MM100( 37 ),     "A10",  NULL },
+    { MM2MM100( 1000 ),  MM2MM100( 1414 ),   "ISOB0",  NULL },
+    { MM2MM100( 707 ),   MM2MM100( 1000 ),   "ISOB1",  NULL },
+    { MM2MM100( 500 ),   MM2MM100( 707 ),    "ISOB2",  NULL },
+    { MM2MM100( 353 ),   MM2MM100( 500 ),    "ISOB3",  NULL },
+    { MM2MM100( 88 ),    MM2MM100( 125 ),    "ISOB7",  NULL },
+    { MM2MM100( 62 ),    MM2MM100( 88 ),     "ISOB8",  NULL },
+    { MM2MM100( 44 ),    MM2MM100( 62 ),     "ISOB9",  NULL },
+    { MM2MM100( 31 ),    MM2MM100( 44 ),     "ISOB10", NULL },
+    { MM2MM100( 458 ),   MM2MM100( 648 ),    "EnvC2",  "C2" },
+    { MM2MM100( 81 ),    MM2MM100( 114 ),    "EnvC7",  "C7" },
+    { MM2MM100( 57 ),    MM2MM100( 81 ),     "EnvC8",  "C8" },
+    { IN2MM100( 9 ),     IN2MM100( 12 ),     "ARCHA",  NULL },
+    { IN2MM100( 12 ),    IN2MM100( 18 ),     "ARCHB",  NULL },
+    { IN2MM100( 18 ),    IN2MM100( 24 ),     "ARCHC",  NULL },
+    { IN2MM100( 24 ),    IN2MM100( 36 ),     "ARCHD",  NULL },
+    { IN2MM100( 36 ),    IN2MM100( 48 ),     "ARCHE",  NULL }
+};
+
+static const size_t nTabSize = SAL_N_ELEMENTS(aDinTab);
+
+#define MAXSLOPPY 21
+
+bool PaperInfo::doSloppyFit()
+{
+    if (m_eType != PAPER_USER)
+        return true;
+
+    for ( size_t i = 0; i < nTabSize; ++i )
+    {
+        if (i == PAPER_USER) continue;
+
+        long lDiffW = labs(aDinTab[i].m_nWidth - m_nPaperWidth);
+        long lDiffH = labs(aDinTab[i].m_nHeight - m_nPaperHeight);
+
+        if ( lDiffW < MAXSLOPPY && lDiffH < MAXSLOPPY )
+        {
+            m_nPaperWidth = aDinTab[i].m_nWidth;
+            m_nPaperHeight = aDinTab[i].m_nHeight;
+            m_eType = (Paper)i;
+            return true;
+        }
+    }
+
+    return false;
+}
+
+bool PaperInfo::sloppyEqual(const PaperInfo &rOther) const
+{
+    return
+    (
+      (labs(m_nPaperWidth - rOther.m_nPaperWidth) < MAXSLOPPY) &&
+      (labs(m_nPaperHeight - rOther.m_nPaperHeight) < MAXSLOPPY)
+    );
+}
+
+long PaperInfo::sloppyFitPageDimension(long nDimension)
+{
+    for ( size_t i = 0; i < nTabSize; ++i )
+    {
+        if (i == PAPER_USER) continue;
+        long lDiff;
+
+        lDiff = labs(aDinTab[i].m_nWidth - nDimension);
+        if ( lDiff < MAXSLOPPY )
+            return aDinTab[i].m_nWidth;
+
+        lDiff = labs(aDinTab[i].m_nHeight - nDimension);
+        if ( lDiff < MAXSLOPPY )
+            return aDinTab[i].m_nHeight;
+    }
+    return nDimension;
+}
+
+PaperInfo PaperInfo::getSystemDefaultPaper()
+{
+    using ::com::sun::star::uno::Reference;
+    using ::com::sun::star::lang::XMultiServiceFactory;
+    using ::com::sun::star::uno::UNO_QUERY_THROW;
+    using ::com::sun::star::uno::Sequence;
+    using ::com::sun::star::uno::Any;
+    using ::com::sun::star::container::XNameAccess;
+    using ::com::sun::star::uno::Exception;
+#   define CREATE_OUSTRING( ascii ) \
+        rtl::OUString::intern( RTL_CONSTASCII_USTRINGPARAM( ascii ) )
+
+    rtl::OUString aLocaleStr;
+
+    Reference< XMultiServiceFactory > xConfigProv;
+    Reference< XNameAccess > xConfigNA;
+    Sequence< Any > aArgs( 1 );
+    try
+    {
+        Reference< XMultiServiceFactory > xFactory = ::comphelper::getProcessServiceFactory();
+        xConfigProv = Reference< XMultiServiceFactory >(
+            xFactory->createInstance( CREATE_OUSTRING( "com.sun.star.configuration.ConfigurationProvider" ) ),
+            UNO_QUERY_THROW);
+
+        aArgs[ 0 ] <<= CREATE_OUSTRING( "org.openoffice.Setup/L10N/" );
+        xConfigNA = Reference< XNameAccess >(xConfigProv->createInstanceWithArguments(
+            CREATE_OUSTRING( "com.sun.star.configuration.ConfigurationAccess" ), aArgs ), UNO_QUERY_THROW);
+
+        // try user-defined locale setting
+        xConfigNA->getByName( CREATE_OUSTRING( "ooSetupSystemLocale" ) ) >>= aLocaleStr;
+    }
+    catch(const Exception&)
+    {
+    }
+
+#ifdef UNX
+    // if set to "use system", get papersize from system
+    if (aLocaleStr.isEmpty())
+    {
+        static bool bInitialized = false;
+        static PaperInfo aInstance(PAPER_A4);
+
+        if (bInitialized)
+            return aInstance;
+
+        // try libpaper
+        // #i78617# workaround missing paperconf command
+        FILE* pPipe = popen( "sh -c paperconf 2>/dev/null", "r" );
+        if( pPipe )
+        {
+            Paper ePaper = PAPER_USER;
+
+            char aBuffer[ 1024 ];
+            aBuffer[0] = 0;
+            char *pBuffer = fgets( aBuffer, sizeof(aBuffer), pPipe );
+            pclose( pPipe );
+
+            if (pBuffer && *pBuffer != 0)
+            {
+                rtl::OString aPaper(pBuffer);
+                aPaper = aPaper.trim();
+                static struct { const char *pName; Paper ePaper; } aCustoms [] =
+                {
+                    { "B0",   PAPER_B0_ISO },
+                    { "B1",   PAPER_B1_ISO },
+                    { "B2",   PAPER_B2_ISO },
+                    { "B3",   PAPER_B3_ISO },
+                    { "B4",   PAPER_B4_ISO },
+                    { "B5",   PAPER_B5_ISO },
+                    { "B6",   PAPER_B6_ISO },
+                    { "B7",   PAPER_B7_ISO },
+                    { "B8",   PAPER_B8_ISO },
+                    { "B9",   PAPER_B9_ISO },
+                    { "B10",  PAPER_B10_ISO },
+                    { "folio", PAPER_FANFOLD_LEGAL_DE },
+                    { "flsa",  PAPER_FANFOLD_LEGAL_DE },
+                    { "flse",  PAPER_FANFOLD_LEGAL_DE }
+                };
+
+                bool bHalve = false;
+
+                size_t nExtraTabSize = SAL_N_ELEMENTS(aCustoms);
+                for (size_t i = 0; i < nExtraTabSize; ++i)
+                {
+                    if (rtl_str_compareIgnoreAsciiCase(aCustoms[i].pName, aPaper.getStr()) == 0)
+                    {
+                        ePaper = aCustoms[i].ePaper;
+                        break;
+                    }
+                }
+
+                if (ePaper == PAPER_USER)
+                {
+                    bHalve = !rtl_str_shortenedCompareIgnoreAsciiCase_WithLength(
+                        aPaper.getStr(), aPaper.getLength(),  "half", 4, 4);
+                    if (bHalve)
+                        aPaper = aPaper.copy(4);
+                    ePaper = PaperInfo::fromPSName(aPaper);
+                }
+
+                if (ePaper != PAPER_USER)
+                {
+                    aInstance = PaperInfo(ePaper);
+                    if (bHalve)
+                        aInstance = PaperInfo(aInstance.getHeight()/2, aInstance.getWidth());
+                    bInitialized = true;
+                    return aInstance;
+                }
+            }
+        }
+
+#if defined(LC_PAPER) && defined(_GNU_SOURCE)
+
+        union paperword { char *string; int word; };
+
+        // try LC_PAPER
+        paperword w, h;
+        w.string = nl_langinfo(_NL_PAPER_WIDTH);
+        h.string = nl_langinfo(_NL_PAPER_HEIGHT);
+
+        //glibc stores sizes as integer mm units
+        w.word *= 100;
+        h.word *= 100;
+
+        for ( size_t i = 0; i < nTabSize; ++i )
+        {
+            if (i == PAPER_USER) continue;
+
+            //glibc stores sizes as integer mm units, and so is inaccurate. To
+            //find a standard paper size we calculate the standard paper sizes
+            //into equally inaccurate mm and compare
+            long width = (aDinTab[i].m_nWidth + 50) / 100;
+            long height = (aDinTab[i].m_nHeight + 50) / 100;
+
+            if (width == w.word/100 && height == h.word/100)
+            {
+                w.word = aDinTab[i].m_nWidth;
+                h.word = aDinTab[i].m_nHeight;
+                break;
+            }
+        }
+
+        aInstance = PaperInfo(w.word, h.word);
+        bInitialized = true;
+        return aInstance;
+#endif
+    }
+#endif
+
+    try
+    {
+        // if set to "use system", try to get locale from system
+        if (aLocaleStr.isEmpty() && xConfigProv.is())
+        {
+            aArgs[ 0 ] <<= CREATE_OUSTRING( "org.openoffice.System/L10N/" );
+            xConfigNA.set( xConfigProv->createInstanceWithArguments(
+                CREATE_OUSTRING( "com.sun.star.configuration.ConfigurationAccess" ), aArgs ),
+                UNO_QUERY_THROW );
+            xConfigNA->getByName( CREATE_OUSTRING( "Locale" ) ) >>= aLocaleStr;
+        }
+    }
+    catch(const Exception&)
+    {
+    }
+
+    if (aLocaleStr.isEmpty())
+        aLocaleStr = CREATE_OUSTRING("en-US");
+
+    // convert locale string to locale struct
+    ::com::sun::star::lang::Locale aSysLocale;
+    sal_Int32 nDashPos = aLocaleStr.indexOf( '-' );
+    if( nDashPos < 0 ) nDashPos = aLocaleStr.getLength();
+    aSysLocale.Language = aLocaleStr.copy( 0, nDashPos );
+    if( nDashPos + 1 < aLocaleStr.getLength() )
+        aSysLocale.Country = aLocaleStr.copy( nDashPos + 1 );
+
+    return PaperInfo::getDefaultPaperForLocale(aSysLocale);
+}
+
+PaperInfo::PaperInfo(Paper eType) : m_eType(eType)
+{
+    OSL_ENSURE( sizeof(aDinTab) / sizeof(aDinTab[0]) == NUM_PAPER_ENTRIES,
+            "mismatch between array entries and enum values" );
+
+    m_nPaperWidth = aDinTab[m_eType].m_nWidth;
+    m_nPaperHeight = aDinTab[m_eType].m_nHeight;
+}
+
+PaperInfo::PaperInfo(long nPaperWidth, long nPaperHeight)
+    : m_eType(PAPER_USER),
+      m_nPaperWidth(nPaperWidth),
+      m_nPaperHeight(nPaperHeight)
+{
+    for ( size_t i = 0; i < nTabSize; ++i )
+    {
+        if (
+             (nPaperWidth == aDinTab[i].m_nWidth) &&
+             (nPaperHeight == aDinTab[i].m_nHeight)
+           )
+        {
+            m_eType = static_cast<Paper>(i);
+            break;
+        }
+    }
+}
+
+rtl::OString PaperInfo::toPSName(Paper ePaper)
+{
+    return static_cast<size_t>(ePaper) < nTabSize ?
+        rtl::OString(aDinTab[ePaper].m_pPSName) : rtl::OString();
+}
+
+Paper PaperInfo::fromPSName(const rtl::OString &rName)
+{
+    if (rName.isEmpty())
+        return PAPER_USER;
+
+    for ( size_t i = 0; i < nTabSize; ++i )
+    {
+        if (aDinTab[i].m_pPSName &&
+          !rtl_str_compareIgnoreAsciiCase(aDinTab[i].m_pPSName, rName.getStr()))
+        {
+            return static_cast<Paper>(i);
+        }
+        else if (aDinTab[i].m_pAltPSName &&
+          !rtl_str_compareIgnoreAsciiCase(aDinTab[i].m_pAltPSName, rName.getStr()))
+        {
+            return static_cast<Paper>(i);
+        }
+    }
+
+    return PAPER_USER;
+}
+
+//http://wiki.services.openoffice.org/wiki/DefaultPaperSize
+//http://www.unicode.org/cldr/data/charts/supplemental/territory_language_information.html
+//http://sourceware.org/git/?p=glibc.git;a=tree;f=localedata/locales
+//http://en.wikipedia.org/wiki/Paper_size
+//http://msdn.microsoft.com/en-us/library/cc195164.aspx
+PaperInfo PaperInfo::getDefaultPaperForLocale(
+    const ::com::sun::star::lang::Locale & rLocale)
+{
+    Paper eType = PAPER_A4;
+
+    if (
+        //United States, Letter
+        !rLocale.Country.compareToAscii("US") ||
+        //Puerto Rico:
+        //    http://unicode.org/cldr/trac/ticket/1710
+        //    http://sources.redhat.com/ml/libc-hacker/2001-07/msg00046.html
+        !rLocale.Country.compareToAscii("PR") ||
+        //Canada:
+        //    http://sources.redhat.com/ml/libc-hacker/2001-07/msg00053.html
+        !rLocale.Country.compareToAscii("CA") ||
+        //Venuzuela:
+        //    http://unicode.org/cldr/trac/ticket/1710
+        //    https://www.redhat.com/archives/fedora-devel-list/2008-August/msg00019.html
+        !rLocale.Country.compareToAscii("VE") ||
+        //Chile:
+        //    http://unicode.org/cldr/trac/ticket/1710
+        //    https://www.redhat.com/archives/fedora-devel-list/2008-August/msg00240.html
+        !rLocale.Country.compareToAscii("CL") ||
+        //Mexico:
+        //    http://unicode.org/cldr/trac/ticket/1710
+        //    http://qa.openoffice.org/issues/show_bug.cgi?id=49739
+        !rLocale.Country.compareToAscii("MX") ||
+        //Colombia:
+        //    http://unicode.org/cldr/trac/ticket/1710
+        //    http://qa.openoffice.org/issues/show_bug.cgi?id=69703
+        !rLocale.Country.compareToAscii("CO") ||
+        //Philippines:
+        //    http://unicode.org/cldr/trac/ticket/1710
+        //    http://ubuntuliving.blogspot.com/2008/07/default-paper-size-in-evince.html
+        //    http://www.gov.ph/faqs/driverslicense.asp
+        !rLocale.Country.compareToAscii("PH") ||
+        //Belize:
+        //    http://unicode.org/cldr/trac/ticket/2585
+        //    http://www.belize.gov.bz/ct.asp?xItem=1666&ctNode=486&mp=27
+        !rLocale.Country.compareToAscii("BZ") ||
+        //Costa Rica:
+        //    http://unicode.org/cldr/trac/ticket/2585
+        //    http://sources.redhat.com/bugzilla/show_bug.cgi?id=11258
+        !rLocale.Country.compareToAscii("CR") ||
+        //Guatemala:
+        //    http://unicode.org/cldr/trac/ticket/2585
+        //    http://sources.redhat.com/bugzilla/show_bug.cgi?id=10936
+        !rLocale.Country.compareToAscii("GT") ||
+        //Nicaragua:
+        //    http://unicode.org/cldr/trac/ticket/2585
+        !rLocale.Country.compareToAscii("NI") ||
+        //Panama:
+        //    http://unicode.org/cldr/trac/ticket/2585
+        //    http://www.minsa.gob.pa/minsa/tl_files/documents/baner_informativo/INSTRUMENTO%20DE%20INVESTIGACION%20DE%20RAAV%202009.pdf
+        !rLocale.Country.compareToAscii("PA") ||
+        //El Salvador:
+        //    http://unicode.org/cldr/trac/ticket/2585
+        //    http://www.tse.gob.sv
+        !rLocale.Country.compareToAscii("SV")
+       )
+    {
+        eType = PAPER_LETTER;
+    }
+
+    return eType;
+}
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */