office-gobmx/vcl/unx/generic/app/i18n_im.cxx
Noel Grandin dac4ca5f68 new loplugin: externalandnotdefined
Find "missing headers," where a function is declared directly in the
.cxx (as extern) and not defined, and should arguably instead be declared
in an include file.

Change-Id: I6d83ee432b2ab0cd050aec2b27c3658d32ac02a2
2014-07-11 14:12:25 +02:00

421 lines
12 KiB
C++

/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/*
* This file is part of the LibreOffice project.
*
* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
*
* This file incorporates work covered by the following license notice:
*
* Licensed to the Apache Software Foundation (ASF) under one or more
* contributor license agreements. See the NOTICE file distributed
* with this work for additional information regarding copyright
* ownership. The ASF licenses this file to you under the Apache
* License, Version 2.0 (the "License"); you may not use this file
* except in compliance with the License. You may obtain a copy of
* the License at http://www.apache.org/licenses/LICENSE-2.0 .
*/
#include <stdio.h>
#include <string.h>
#ifdef LINUX
# ifndef __USE_XOPEN
# define __USE_XOPEN
# endif
#endif
#include <poll.h>
#include <prex.h>
#include <X11/Xlocale.h>
#include <X11/Xlib.h>
#include <unx/XIM.h>
#include <postx.h>
#include "unx/salunx.h"
#include "unx/saldisp.hxx"
#include "unx/i18n_im.hxx"
#include "unx/i18n_status.hxx"
#include <osl/thread.h>
#include <osl/process.h>
#include "unx/i18n_cb.hxx"
using namespace vcl;
// kinput2 IME needs special key handling since key release events are filtered in
// preeditmode and XmbResetIC does not work
class XKeyEventOp : XKeyEvent
{
private:
void init();
public:
XKeyEventOp();
~XKeyEventOp();
XKeyEventOp& operator= (const XKeyEvent &rEvent);
void erase ();
bool match (const XKeyEvent &rEvent) const;
};
void
XKeyEventOp::init()
{
type = 0; /* serial = 0; */
send_event = 0; display = 0;
window = 0; root = 0;
subwindow = 0; /* time = 0; */
/* x = 0; y = 0; */
/* x_root = 0; y_root = 0; */
state = 0; keycode = 0;
same_screen = 0;
}
XKeyEventOp::XKeyEventOp()
{
init();
}
XKeyEventOp::~XKeyEventOp()
{
}
XKeyEventOp&
XKeyEventOp::operator= (const XKeyEvent &rEvent)
{
type = rEvent.type; /* serial = rEvent.serial; */
send_event = rEvent.send_event; display = rEvent.display;
window = rEvent.window; root = rEvent.root;
subwindow = rEvent.subwindow;/* time = rEvent.time; */
/* x = rEvent.x, y = rEvent.y; */
/* x_root = rEvent.x_root, y_root = rEvent.y_root; */
state = rEvent.state; keycode = rEvent.keycode;
same_screen = rEvent.same_screen;
return *this;
}
void
XKeyEventOp::erase ()
{
init();
}
bool
XKeyEventOp::match (const XKeyEvent &rEvent) const
{
return ( (type == XLIB_KeyPress && rEvent.type == KeyRelease)
|| (type == KeyRelease && rEvent.type == XLIB_KeyPress ))
/* && serial == rEvent.serial */
&& send_event == rEvent.send_event
&& display == rEvent.display
&& window == rEvent.window
&& root == rEvent.root
&& subwindow == rEvent.subwindow
/* && time == rEvent.time
&& x == rEvent.x
&& y == rEvent.y
&& x_root == rEvent.x_root
&& y_root == rEvent.y_root */
&& state == rEvent.state
&& keycode == rEvent.keycode
&& same_screen == rEvent.same_screen;
}
// locale handling
// Locale handling of the operating system layer
static char*
SetSystemLocale( const char* p_inlocale )
{
char *p_outlocale;
if ( (p_outlocale = setlocale(LC_ALL, p_inlocale)) == NULL )
{
fprintf( stderr, "I18N: Operating system doesn't support locale \"%s\"\n",
p_inlocale );
}
return p_outlocale;
}
#ifdef SOLARIS
static void
SetSystemEnvironment( const OUString& rLocale )
{
OUString LC_ALL_Var("LC_ALL");
osl_setEnvironment(LC_ALL_Var.pData, rLocale.pData);
OUString LANG_Var("LANG");
osl_setEnvironment(LANG_Var.pData, rLocale.pData);
}
#endif
static Bool
IsPosixLocale( const char* p_locale )
{
if ( p_locale == NULL )
return False;
if ( (p_locale[ 0 ] == 'C') && (p_locale[ 1 ] == '\0') )
return True;
if ( strncmp(p_locale, "POSIX", sizeof("POSIX")) == 0 )
return True;
return False;
}
// Locale handling of the X Window System layer
static Bool
IsXWindowCompatibleLocale( const char* p_locale )
{
if ( p_locale == NULL )
return False;
if ( !XSupportsLocale() )
{
fprintf (stderr, "I18N: X Window System doesn't support locale \"%s\"\n",
p_locale );
return False;
}
return True;
}
// Set the operating system locale prior to trying to open an
// XIM InputMethod.
// Handle the cases where the current locale is either not supported by the
// operating system (LANG=gaga) or by the XWindow system (LANG=aa_ER@saaho)
// by providing a fallback.
// Upgrade "C" or "POSIX" to "en_US" locale to allow umlauts and accents
// see i8988, i9188, i8930, i16318
// on Solaris the environment needs to be set equivalent to the locale (#i37047#)
bool
SalI18N_InputMethod::SetLocale( const char* pLocale )
{
// check whether we want an Input Method engine, if we don't we
// do not need to set the locale
if ( mbUseable )
{
char *locale = SetSystemLocale( pLocale );
if ( (!IsXWindowCompatibleLocale(locale)) || IsPosixLocale(locale) )
{
osl_setThreadTextEncoding (RTL_TEXTENCODING_ISO_8859_1);
locale = SetSystemLocale( "en_US" );
#ifdef SOLARIS
SetSystemEnvironment( "en_US" );
#endif
if (! IsXWindowCompatibleLocale(locale))
{
locale = SetSystemLocale( "C" );
#ifdef SOLARIS
SetSystemEnvironment( "C" );
#endif
if (! IsXWindowCompatibleLocale(locale))
mbUseable = False;
}
}
// must not fail if mbUseable since XSupportsLocale() asserts success
if ( mbUseable && XSetLocaleModifiers("") == NULL )
{
fprintf (stderr, "I18N: Can't set X modifiers for locale \"%s\"\n",
locale);
mbUseable = False;
}
}
return mbUseable;
}
Bool
SalI18N_InputMethod::PosixLocale()
{
if (maMethod)
return IsPosixLocale (XLocaleOfIM (maMethod));
return False;
}
// Constructor / Destructor / Initialisation
SalI18N_InputMethod::SalI18N_InputMethod( )
: mbUseable( bUseInputMethodDefault )
, maMethod( (XIM)NULL )
, mpStyles( (XIMStyles*)NULL )
{
maDestroyCallback.callback = (XIMProc)NULL;
maDestroyCallback.client_data = (XPointer)NULL;
const char *pUseInputMethod = getenv( "SAL_USEINPUTMETHOD" );
if ( pUseInputMethod != NULL )
mbUseable = pUseInputMethod[0] != '\0' ;
}
SalI18N_InputMethod::~SalI18N_InputMethod()
{
::vcl::I18NStatus::free();
if ( mpStyles != NULL )
XFree( mpStyles );
if ( maMethod != NULL )
XCloseIM ( maMethod );
}
// XXX
// debug routine: lets have a look at the provided method styles
#if OSL_DEBUG_LEVEL > 1
extern "C" char*
GetMethodName( XIMStyle nStyle, char *pBuf, int nBufSize)
{
struct StyleName {
const XIMStyle nStyle;
const char *pName;
const int nNameLen;
};
StyleName *pDescPtr;
static const StyleName pDescription[] = {
{ XIMPreeditArea, "PreeditArea ", sizeof("PreeditArea ") },
{ XIMPreeditCallbacks, "PreeditCallbacks ",sizeof("PreeditCallbacks ")},
{ XIMPreeditPosition, "PreeditPosition ", sizeof("PreeditPosition ") },
{ XIMPreeditNothing, "PreeditNothing ", sizeof("PreeditNothing ") },
{ XIMPreeditNone, "PreeditNone ", sizeof("PreeditNone ") },
{ XIMStatusArea, "StatusArea ", sizeof("StatusArea ") },
{ XIMStatusCallbacks, "StatusCallbacks ", sizeof("StatusCallbacks ") },
{ XIMStatusNothing, "StatusNothing ", sizeof("StatusNothing ") },
{ XIMStatusNone, "StatusNone ", sizeof("StatusNone ") },
{ 0, "NULL", 0 }
};
if ( nBufSize > 0 )
pBuf[0] = '\0';
char *pBufPtr = pBuf;
for ( pDescPtr = const_cast<StyleName*>(pDescription); pDescPtr->nStyle != 0; pDescPtr++ )
{
int nSize = pDescPtr->nNameLen - 1;
if ( (nStyle & pDescPtr->nStyle) && (nBufSize > nSize) )
{
strncpy( pBufPtr, pDescPtr->pName, nSize + 1);
pBufPtr += nSize;
nBufSize -= nSize;
}
}
return pBuf;
}
extern "C" void
PrintInputStyle( XIMStyles *pStyle )
{
char pBuf[ 128 ];
int nBuf = sizeof( pBuf );
if ( pStyle == NULL )
fprintf( stderr, "no input method styles\n");
else
for ( int nStyle = 0; nStyle < pStyle->count_styles; nStyle++ )
{
fprintf( stderr, "style #%i = %s\n", nStyle,
GetMethodName(pStyle->supported_styles[nStyle], pBuf, nBuf) );
}
}
#endif
// this is the real constructing routine, since locale setting has to be done
// prior to xopendisplay, the xopenim call has to be delayed
bool
SalI18N_InputMethod::CreateMethod ( Display *pDisplay )
{
if ( mbUseable )
{
maMethod = XOpenIM(pDisplay, NULL, NULL, NULL);
if ((maMethod == (XIM)NULL) && (getenv("XMODIFIERS") != NULL))
{
OUString envVar("XMODIFIERS");
osl_clearEnvironment(envVar.pData);
XSetLocaleModifiers("");
maMethod = XOpenIM(pDisplay, NULL, NULL, NULL);
}
if ( maMethod != (XIM)NULL )
{
if ( XGetIMValues(maMethod, XNQueryInputStyle, &mpStyles, NULL)
!= NULL)
mbUseable = False;
#if OSL_DEBUG_LEVEL > 1
fprintf(stderr, "Creating Mono-Lingual InputMethod\n" );
PrintInputStyle( mpStyles );
#endif
}
else
{
mbUseable = False;
}
}
#if OSL_DEBUG_LEVEL > 1
if ( !mbUseable )
fprintf(stderr, "input method creation failed\n");
#endif
maDestroyCallback.callback = (XIMProc)IM_IMDestroyCallback;
maDestroyCallback.client_data = (XPointer)this;
if (mbUseable && maMethod != NULL)
XSetIMValues(maMethod, XNDestroyCallback, &maDestroyCallback, NULL);
return mbUseable;
}
// give IM the opportunity to look at the event, and possibly hide it
bool
SalI18N_InputMethod::FilterEvent( XEvent *pEvent, XLIB_Window window )
{
if (!mbUseable)
return False;
bool bFilterEvent = XFilterEvent (pEvent, window);
if (pEvent->type != XLIB_KeyPress && pEvent->type != KeyRelease)
return bFilterEvent;
/*
* fix broken key release handling of some IMs
*/
XKeyEvent* pKeyEvent = &(pEvent->xkey);
static XKeyEventOp maLastKeyPress;
if (bFilterEvent)
{
if (pKeyEvent->type == KeyRelease)
bFilterEvent = !maLastKeyPress.match (*pKeyEvent);
maLastKeyPress.erase();
}
else /* (!bFilterEvent) */
{
if (pKeyEvent->type == XLIB_KeyPress)
maLastKeyPress = *pKeyEvent;
else
maLastKeyPress.erase();
}
return bFilterEvent;
}
void
SalI18N_InputMethod::HandleDestroyIM()
{
mbUseable = False;
maMethod = NULL;
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */