svn merge ^/branches/released .

2 files changed, 2965 insertions, 2961 deletions

diff --git a/xorg-server/xkb/XKBMisc.c b/xorg-server/xkb/XKBMisc.c
index f983466ea..96688be18 100644
--- a/xorg-server/xkb/XKBMisc.c
+++ b/xorg-server/xkb/XKBMisc.c
@@ -1,839 +1,840 @@
-/************************************************************

-Copyright (c) 1993 by Silicon Graphics Computer Systems, Inc.

-

-Permission to use, copy, modify, and distribute this

-software and its documentation for any purpose and without

-fee is hereby granted, provided that the above copyright

-notice appear in all copies and that both that copyright

-notice and this permission notice appear in supporting

-documentation, and that the name of Silicon Graphics not be 

-used in advertising or publicity pertaining to distribution 

-of the software without specific prior written permission.

-Silicon Graphics makes no representation about the suitability 

-of this software for any purpose. It is provided "as is"

-without any express or implied warranty.

-

-SILICON GRAPHICS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS 

-SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY 

-AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL SILICON

-GRAPHICS BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL 

-DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, 

-DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE 

-OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION  WITH

-THE USE OR PERFORMANCE OF THIS SOFTWARE.

-

-********************************************************/

-

-#ifdef HAVE_DIX_CONFIG_H

-#include <dix-config.h>

-#elif defined(HAVE_CONFIG_H)

-#include <config.h>

-#endif

-

-#include <stdio.h>

-#include <X11/X.h>

-#include <X11/Xproto.h>

-#include "misc.h"

-#include "inputstr.h"

-#include <X11/keysym.h>

-#define	XKBSRV_NEED_FILE_FUNCS

-#include <xkbsrv.h>

-

-/***====================================================================***/

-

-#define	CORE_SYM(i)	(i<map_width?core_syms[i]:NoSymbol)

-#define	XKB_OFFSET(g,l)	(((g)*groupsWidth)+(l))

-

-int

-XkbKeyTypesForCoreSymbols(	XkbDescPtr	xkb,

-				int		map_width,

-				KeySym *	core_syms,

-				unsigned int 	protected,

-    				int *		types_inout,

-				KeySym *	xkb_syms_rtrn)

-{

-register int	i;

-unsigned int	empty;

-int		nSyms[XkbNumKbdGroups];

-int		nGroups,tmp,groupsWidth;

-BOOL		replicated = FALSE;

-

-    /* Section 12.2 of the protocol describes this process in more detail */

-    /* Step 1:  find the # of symbols in the core mapping per group */

-    groupsWidth= 2;

-    for (i=0;i<XkbNumKbdGroups;i++) {

-	if ((protected&(1<<i))&&(types_inout[i]<xkb->map->num_types)) {

-	    nSyms[i]= xkb->map->types[types_inout[i]].num_levels;

-	    if (nSyms[i]>groupsWidth)

-		groupsWidth= nSyms[i];

-	}

-	else {

-	    types_inout[i]= XkbTwoLevelIndex;	/* don't really know, yet */

-	    nSyms[i]= 2;

-	}

-    }

-    if (nSyms[XkbGroup1Index]<2)

-	nSyms[XkbGroup1Index]= 2;

-    if (nSyms[XkbGroup2Index]<2)

-	nSyms[XkbGroup2Index]= 2;

-    /* Step 2:	Copy the symbols from the core ordering to XKB ordering	*/

-    /*		symbols in the core are in the order:			*/

-    /*		G1L1 G1L2 G2L1 G2L2 [G1L[3-n]] [G2L[3-n]] [G3L*] [G3L*]	*/

-    xkb_syms_rtrn[XKB_OFFSET(XkbGroup1Index,0)]= CORE_SYM(0);

-    xkb_syms_rtrn[XKB_OFFSET(XkbGroup1Index,1)]= CORE_SYM(1);

-    for (i=2;i<nSyms[XkbGroup1Index];i++) {

-	xkb_syms_rtrn[XKB_OFFSET(XkbGroup1Index,i)]= CORE_SYM(2+i);

-    }

-    xkb_syms_rtrn[XKB_OFFSET(XkbGroup2Index,0)]= CORE_SYM(2);

-    xkb_syms_rtrn[XKB_OFFSET(XkbGroup2Index,1)]= CORE_SYM(3);

-    tmp= 2+(nSyms[XkbGroup1Index]-2); /* offset to extra group2 syms */

-    for (i=2;i<nSyms[XkbGroup2Index];i++) {

-	xkb_syms_rtrn[XKB_OFFSET(XkbGroup2Index,i)]= CORE_SYM(tmp+i);

-    }

-

-    /* Special case: if only the first group is explicit, and the symbols

-     * replicate across all groups, then we have a Section 12.4 replication */

-    if ((protected & ~XkbExplicitKeyType1Mask) == 0)

-    {

-        int j, width = nSyms[XkbGroup1Index];

-

-        replicated = TRUE;

-

-        /* Check ABAB in ABABCDECDEABCDE */

-        if ((width > 0 && CORE_SYM(0) != CORE_SYM(2)) ||

-            (width > 1 && CORE_SYM(1) != CORE_SYM(3)))

-            replicated = FALSE;

-

-        /* Check CDECDE in ABABCDECDEABCDE */

-        for (i = 2; i < width && replicated; i++)

-        {

-            if (CORE_SYM(2 + i) != CORE_SYM(i + width))

-                replicated = FALSE;

-        }

-

-        /* Check ABCDE in ABABCDECDEABCDE */

-        for (j = 2; replicated &&

-                    j < XkbNumKbdGroups &&

-                    map_width >= width * (j + 1); j++)

-        {

-            for (i = 0; i < width && replicated; i++)

-            {

-                if (CORE_SYM(((i < 2) ? i : 2 + i)) != CORE_SYM(i + width * j))

-                    replicated = FALSE;

-            }

-        }

-    }

-

-    if (replicated)

-    {

-	nSyms[XkbGroup2Index]= 0;

-	nSyms[XkbGroup3Index]= 0;

-	nSyms[XkbGroup4Index]= 0;

-	nGroups= 1;

-    } else

-    {

-        tmp= nSyms[XkbGroup1Index]+nSyms[XkbGroup2Index];

-        if ((tmp>=map_width)&&

-                ((protected&(XkbExplicitKeyType3Mask|XkbExplicitKeyType4Mask))==0)) {

-            nSyms[XkbGroup3Index]= 0;

-            nSyms[XkbGroup4Index]= 0;

-            nGroups= 2;

-        } else

-        {

-            nGroups= 3;

-            for (i=0;i<nSyms[XkbGroup3Index];i++,tmp++) {

-                xkb_syms_rtrn[XKB_OFFSET(XkbGroup3Index,i)]= CORE_SYM(tmp);

-            }

-            if ((tmp<map_width)||(protected&XkbExplicitKeyType4Mask)) {

-                nGroups= 4;

-                for (i=0;i<nSyms[XkbGroup4Index];i++,tmp++) {

-                    xkb_syms_rtrn[XKB_OFFSET(XkbGroup4Index,i)]= CORE_SYM(tmp);

-                }

-            }

-            else {

-                nSyms[XkbGroup4Index]= 0;

-            }

-        }

-    }

-    /* steps 3&4: alphanumeric expansion,  assign canonical types */

-    empty= 0;

-    for (i=0;i<nGroups;i++) {

-	KeySym *syms;

-	syms= &xkb_syms_rtrn[XKB_OFFSET(i,0)];

-	if ((nSyms[i]>1)&&(syms[1]==NoSymbol)&&(syms[0]!=NoSymbol)) {

-	    KeySym upper,lower;

-	    XkbConvertCase(syms[0],&lower,&upper);

-	    if (upper!=lower) {

-		xkb_syms_rtrn[XKB_OFFSET(i,0)]= lower;

-		xkb_syms_rtrn[XKB_OFFSET(i,1)]= upper;

-		if ((protected&(1<<i))==0)

-		    types_inout[i]= XkbAlphabeticIndex;

-	    }

-	    else if ((protected&(1<<i))==0) {

-		types_inout[i]= XkbOneLevelIndex;

-	/*	nSyms[i]=	1;*/

-	    }

-	}

-	if (((protected&(1<<i))==0)&&(types_inout[i]==XkbTwoLevelIndex)) {

-	    if (XkbKSIsKeypad(syms[0])||XkbKSIsKeypad(syms[1]))

-		types_inout[i]= XkbKeypadIndex;

-	    else {

-		KeySym upper,lower;

-		XkbConvertCase(syms[0],&lower,&upper);

-		if ((syms[0]==lower)&&(syms[1]==upper))

-		    types_inout[i]= XkbAlphabeticIndex;

-	    }

-	}

-	if (syms[0]==NoSymbol) {

-	    register int n;

-	    Bool	found;

-	    for (n=1,found=FALSE;(!found)&&(n<nSyms[i]);n++) {

-		found= (syms[n]!=NoSymbol);

-	    }

-	    if (!found)

-		empty|= (1<<i);

-	}

-    }

-    /* step 5: squoosh out empty groups */

-    if (empty) {

-	for (i=nGroups-1;i>=0;i--) {

-	    if (((empty&(1<<i))==0)||(protected&(1<<i)))

-		break;

-	    nGroups--;

-	}

-    }

-    if (nGroups<1)

-	return 0;

-

-    /* step 6: replicate group 1 into group two, if necessary */

-    if ((nGroups>1)&&((empty&(XkbGroup1Mask|XkbGroup2Mask))==XkbGroup2Mask)) {

-	if ((protected&(XkbExplicitKeyType1Mask|XkbExplicitKeyType2Mask))==0) {

-	    nSyms[XkbGroup2Index]= nSyms[XkbGroup1Index];

-	    types_inout[XkbGroup2Index]= types_inout[XkbGroup1Index];

-	    memcpy((char *)&xkb_syms_rtrn[2],(char *)xkb_syms_rtrn,

-							2*sizeof(KeySym));

-	}

-	else if (types_inout[XkbGroup1Index]==types_inout[XkbGroup2Index]) {

-	    memcpy((char *)&xkb_syms_rtrn[nSyms[XkbGroup1Index]],

-	    				(char *)xkb_syms_rtrn,

-					nSyms[XkbGroup1Index]*sizeof(KeySym));

-	}

-    }

-

-    /* step 7: check for all groups identical or all width 1

-     *

-     * Special feature: if group 1 has an explicit type and all other groups

-     * have canonical types with same symbols, we assume it's info lost from

-     * the core replication.

-     */

-    if (nGroups>1) {

-	Bool sameType,allOneLevel, canonical = TRUE;

-	allOneLevel= (xkb->map->types[types_inout[0]].num_levels==1);

-	for (i=1,sameType=TRUE;(allOneLevel||sameType)&&(i<nGroups);i++) {

-	    sameType=(sameType&&(types_inout[i]==types_inout[XkbGroup1Index]));

-	    if (allOneLevel)

-		allOneLevel= (xkb->map->types[types_inout[i]].num_levels==1);

-	    if (types_inout[i] > XkbLastRequiredType)

-		canonical = FALSE;

-	}

-	if (((sameType) || canonical)&&

-	    (!(protected&(XkbExplicitKeyTypesMask&~XkbExplicitKeyType1Mask)))){

-	    register int s;

-	    Bool	identical;

-	    for (i=1,identical=TRUE;identical&&(i<nGroups);i++) {

-		KeySym *syms;

-                if (nSyms[i] != nSyms[XkbGroup1Index])

-                    identical = FALSE;

-		syms= &xkb_syms_rtrn[XKB_OFFSET(i,0)];

-		for (s=0;identical&&(s<nSyms[i]);s++) {

-		    if (syms[s]!=xkb_syms_rtrn[s])

-			identical= FALSE;

-		}

-	    }

-	    if (identical)

-		nGroups= 1;

-	}

-	if (allOneLevel && (nGroups>1)) {

-	    KeySym *syms;

-	    syms= &xkb_syms_rtrn[nSyms[XkbGroup1Index]];

-	    nSyms[XkbGroup1Index]= 1;

-	    for (i=1;i<nGroups;i++) {

-		xkb_syms_rtrn[i]= syms[0];

-		syms+= nSyms[i];

-		nSyms[i]= 1;

-	    }

-	}

-    }

-    return nGroups;

-}

-

-static XkbSymInterpretPtr

-_XkbFindMatchingInterp(	XkbDescPtr	xkb,

-			KeySym 		sym,

-			unsigned int	real_mods,

-			unsigned int	level)

-{

-register unsigned	 i;

-XkbSymInterpretPtr	 interp,rtrn;

-CARD8			 mods;

-

-    rtrn= NULL;

-    interp= xkb->compat->sym_interpret;

-    for (i=0;i<xkb->compat->num_si;i++,interp++) {

-	if ((interp->sym==NoSymbol)||(sym==interp->sym)) {

-	    int match;

-	    if ((level==0)||((interp->match&XkbSI_LevelOneOnly)==0))

-		 mods= real_mods;

-	    else mods= 0;

-	    switch (interp->match&XkbSI_OpMask) {

-		case XkbSI_NoneOf:

-		    match= ((interp->mods&mods)==0);

-		    break;

-		case XkbSI_AnyOfOrNone:

-		    match= ((mods==0)||((interp->mods&mods)!=0));

-		    break;

-		case XkbSI_AnyOf:

-		    match= ((interp->mods&mods)!=0);

-		    break;

-		case XkbSI_AllOf:

-		    match= ((interp->mods&mods)==interp->mods);

-		    break;

-		case XkbSI_Exactly:

-		    match= (interp->mods==mods);

-		    break;

-		default:

-		    match= 0;

-		    break;

-	    }

-	    if (match) {

-		if (interp->sym!=NoSymbol) {

-		    return interp;

-		}

-		else if (rtrn==NULL) {

-		    rtrn= interp;

-		}

-	    }

-	}

-    }

-    return rtrn;

-}

-

-static void

-_XkbAddKeyChange(KeyCode *pFirst,unsigned char *pNum,KeyCode newKey)

-{

-KeyCode	last;

-

-    last= (*pFirst)+(*pNum);

-    if (newKey<*pFirst) {

-	*pFirst= newKey;

-	*pNum= (last-newKey)+1;

-    }

-    else if (newKey>last) {

-	*pNum= (last-*pFirst)+1;

-    }

-    return;

-}

-

-static void

-_XkbSetActionKeyMods(XkbDescPtr xkb,XkbAction *act,unsigned mods)

-{

-unsigned	tmp;

-

-    switch (act->type) {

-	case XkbSA_SetMods: case XkbSA_LatchMods: case XkbSA_LockMods:

-	    if (act->mods.flags&XkbSA_UseModMapMods)

-		act->mods.real_mods= act->mods.mask= mods;

-	    if ((tmp= XkbModActionVMods(&act->mods))!=0) {

-		XkbVirtualModsToReal(xkb,tmp,&tmp);

-		act->mods.mask|= tmp;

-	    }

-	    break;

-	case XkbSA_ISOLock:

-	    if (act->iso.flags&XkbSA_UseModMapMods)

-		act->iso.real_mods= act->iso.mask= mods;

-	    if ((tmp= XkbModActionVMods(&act->iso))!=0) {

-		XkbVirtualModsToReal(xkb,tmp,&tmp);

-		act->iso.mask|= tmp;

-	    }

-	    break;

-    }

-    return;

-}

-

-#define	IBUF_SIZE	8

-

-Bool

-XkbApplyCompatMapToKey(XkbDescPtr xkb,KeyCode key,XkbChangesPtr changes)

-{

-KeySym *		syms;

-unsigned char 		explicit,mods;

-XkbSymInterpretPtr	*interps,ibuf[IBUF_SIZE]; 

-int			n,nSyms,found;

-unsigned		changed,tmp;

-

-    if ((!xkb)||(!xkb->map)||(!xkb->map->key_sym_map)||

-    			(!xkb->compat)||(!xkb->compat->sym_interpret)||

-			(key<xkb->min_key_code)||(key>xkb->max_key_code)) {

-	return FALSE;

-    }

-    if (((!xkb->server)||(!xkb->server->key_acts))&&

-		(XkbAllocServerMap(xkb,XkbAllServerInfoMask,0)!=Success)) {

-	return FALSE;

-    }

-    changed= 0;	/* keeps track of what has changed in _this_ call */

-    explicit= xkb->server->explicit[key];

-    if (explicit&XkbExplicitInterpretMask) /* nothing to do */

-	return TRUE;

-    mods= (xkb->map->modmap?xkb->map->modmap[key]:0);

-    nSyms= XkbKeyNumSyms(xkb,key);

-    syms= XkbKeySymsPtr(xkb,key);

-    if (nSyms>IBUF_SIZE) {

-	interps= calloc(nSyms, sizeof(XkbSymInterpretPtr));

-	if (interps==NULL) {

-	    interps= ibuf;

-	    nSyms= IBUF_SIZE;

-	}

-    }

-    else {

-	interps= ibuf;

-    }

-    found= 0;

-    for (n=0;n<nSyms;n++) {

-	unsigned level= (n%XkbKeyGroupsWidth(xkb,key));

-	interps[n]= NULL;

-	if (syms[n]!=NoSymbol) {

-	    interps[n]= _XkbFindMatchingInterp(xkb,syms[n],mods,level);

-	    if (interps[n]&&interps[n]->act.type!=XkbSA_NoAction)

-		found++;

-	    else interps[n]= NULL;

-	}

-    }

-    /* 1/28/96 (ef) -- XXX! WORKING HERE */

-    if (!found) {

-	if (xkb->server->key_acts[key]!=0) {

-	    xkb->server->key_acts[key]= 0;

-	    changed|= XkbKeyActionsMask;

-	}

-    }

-    else {

-	XkbAction *pActs;

-	unsigned int	new_vmodmask;

-	changed|= XkbKeyActionsMask;

-	pActs= XkbResizeKeyActions(xkb,key,nSyms);

-	if (!pActs) {

-            if (nSyms > IBUF_SIZE)

-                free(interps);

-	    return FALSE;

-        }

-	new_vmodmask= 0;

-	for (n=0;n<nSyms;n++) {

-	    if (interps[n]) {

-		unsigned effMods;

-

-		pActs[n]= *((XkbAction *)&interps[n]->act);

-		if ((n==0)||((interps[n]->match&XkbSI_LevelOneOnly)==0)) {

-		     effMods= mods;

-		     if (interps[n]->virtual_mod!=XkbNoModifier)

-			new_vmodmask|= (1<<interps[n]->virtual_mod);

-		}

-		else effMods= 0;

-		_XkbSetActionKeyMods(xkb,&pActs[n],effMods);

-	    }

-	    else pActs[n].type= XkbSA_NoAction;

-	}

-	if (((explicit&XkbExplicitVModMapMask)==0)&&

-				(xkb->server->vmodmap[key]!=new_vmodmask)) {

-	    changed|= XkbVirtualModMapMask;

-	    xkb->server->vmodmap[key]= new_vmodmask;

-	}

-	if (interps[0]) {

-	    if ((interps[0]->flags&XkbSI_LockingKey)&&

-				((explicit&XkbExplicitBehaviorMask)==0)) {

-		xkb->server->behaviors[key].type= XkbKB_Lock;

-		changed|= XkbKeyBehaviorsMask;

-	    }

-	    if (((explicit&XkbExplicitAutoRepeatMask)==0)&&(xkb->ctrls)) {

-		CARD8 old;

-		old= xkb->ctrls->per_key_repeat[key/8];

-		if (interps[0]->flags&XkbSI_AutoRepeat)

-		     xkb->ctrls->per_key_repeat[key/8]|= (1<<(key%8));

-		else xkb->ctrls->per_key_repeat[key/8]&= ~(1<<(key%8));

-		if (changes && (old!=xkb->ctrls->per_key_repeat[key/8]))

-		    changes->ctrls.changed_ctrls|= XkbPerKeyRepeatMask;

-	    }

-	}

-    }

-    if ((!found)||(interps[0]==NULL)) {

-	if (((explicit&XkbExplicitAutoRepeatMask)==0)&&(xkb->ctrls)) {

-	    CARD8 old;

-	    old= xkb->ctrls->per_key_repeat[key/8];

-            xkb->ctrls->per_key_repeat[key/8]|= (1<<(key%8));

-	    if (changes && (old!=xkb->ctrls->per_key_repeat[key/8]))

-		changes->ctrls.changed_ctrls|= XkbPerKeyRepeatMask;

-	}

-	if (((explicit&XkbExplicitBehaviorMask)==0)&&

-		(xkb->server->behaviors[key].type==XkbKB_Lock)) {

-		xkb->server->behaviors[key].type= XkbKB_Default;

-		changed|= XkbKeyBehaviorsMask;

-	}

-    }

-    if (changes) {

-	XkbMapChangesPtr	mc;

-	mc= &changes->map;

-	tmp= (changed&mc->changed);

-	if (tmp&XkbKeyActionsMask)

-	    _XkbAddKeyChange(&mc->first_key_act,&mc->num_key_acts,key);

-	else if (changed&XkbKeyActionsMask) {

-	    mc->changed|= XkbKeyActionsMask;

-	    mc->first_key_act= key;

-	    mc->num_key_acts= 1;

-	}

-	if (tmp&XkbKeyBehaviorsMask) {

-	    _XkbAddKeyChange(&mc->first_key_behavior,&mc->num_key_behaviors,

-	    								key);

-	}

-	else if (changed&XkbKeyBehaviorsMask) {

-	    mc->changed|= XkbKeyBehaviorsMask;

-	    mc->first_key_behavior= key;

-	    mc->num_key_behaviors= 1;

-	}

-	if (tmp&XkbVirtualModMapMask)

-	    _XkbAddKeyChange(&mc->first_vmodmap_key,&mc->num_vmodmap_keys,key);

-	else if (changed&XkbVirtualModMapMask) {

-	    mc->changed|= XkbVirtualModMapMask;

-	    mc->first_vmodmap_key= key;

-	    mc->num_vmodmap_keys= 1;

-	}

-	mc->changed|= changed;

-    }

-    if (interps!=ibuf)

-	free(interps);

-    return TRUE;

-}

-

-Status

-XkbChangeTypesOfKey(	XkbDescPtr		 xkb,

-			int		 	 key,

-			int			 nGroups,

-			unsigned	 	 groups,

-			int	* 	 	 newTypesIn,

-			XkbMapChangesPtr	 changes)

-{

-XkbKeyTypePtr	pOldType,pNewType;

-register int	i;

-int		width,nOldGroups,oldWidth,newTypes[XkbNumKbdGroups];

-

-    if ((!xkb) || (!XkbKeycodeInRange(xkb,key)) || (!xkb->map) ||

-	(!xkb->map->types)||(!newTypesIn)||((groups&XkbAllGroupsMask)==0)||

-	(nGroups>XkbNumKbdGroups)) {

-	return BadMatch;

-    }

-    if (nGroups==0) {

-	for (i=0;i<XkbNumKbdGroups;i++) {

-	    xkb->map->key_sym_map[key].kt_index[i]= XkbOneLevelIndex;

-	}

-	i= xkb->map->key_sym_map[key].group_info;

-	i= XkbSetNumGroups(i,0);

-	xkb->map->key_sym_map[key].group_info= i;

-	XkbResizeKeySyms(xkb,key,0);

-	return Success;

-    }

-

-    nOldGroups= XkbKeyNumGroups(xkb,key);

-    oldWidth= XkbKeyGroupsWidth(xkb,key);

-    for (width=i=0;i<nGroups;i++) {

-	if (groups&(1<<i))

-	     newTypes[i]=  newTypesIn[i];

-	else if (i<nOldGroups)

-	     newTypes[i]= XkbKeyKeyTypeIndex(xkb,key,i);

-	else if (nOldGroups>0)

-	     newTypes[i]= XkbKeyKeyTypeIndex(xkb,key,XkbGroup1Index);

-	else newTypes[i]= XkbTwoLevelIndex;

-	if (newTypes[i]>xkb->map->num_types)

-	    return BadMatch;

-	pNewType= &xkb->map->types[newTypes[i]];

-	if (pNewType->num_levels>width)

-	    width= pNewType->num_levels;

-    }

-    if ((xkb->ctrls)&&(nGroups>xkb->ctrls->num_groups))

-	xkb->ctrls->num_groups= nGroups;

-    if ((width!=oldWidth)||(nGroups!=nOldGroups)) {

-	KeySym		oldSyms[XkbMaxSymsPerKey],*pSyms;

-	int		nCopy;

-

-	if (nOldGroups==0) {

-	    pSyms= XkbResizeKeySyms(xkb,key,width*nGroups);

-	    if (pSyms!=NULL) {

-		i= xkb->map->key_sym_map[key].group_info;

-		i= XkbSetNumGroups(i,nGroups);

-		xkb->map->key_sym_map[key].group_info= i;

-		xkb->map->key_sym_map[key].width= width;

-		for (i=0;i<nGroups;i++) {

-		    xkb->map->key_sym_map[key].kt_index[i]= newTypes[i];

-		}

-		return Success;

-	    }

-	    return BadAlloc;

-	}

-	pSyms= XkbKeySymsPtr(xkb,key);

-	memcpy(oldSyms,pSyms,XkbKeyNumSyms(xkb,key)*sizeof(KeySym));

-	pSyms= XkbResizeKeySyms(xkb,key,width*nGroups);

-	if (pSyms==NULL)

-	    return BadAlloc;

-	memset(pSyms, 0, width*nGroups*sizeof(KeySym));

-	for (i=0;(i<nGroups)&&(i<nOldGroups);i++) {

-	    pOldType= XkbKeyKeyType(xkb,key,i);

-	    pNewType= &xkb->map->types[newTypes[i]];

-	    if (pNewType->num_levels>pOldType->num_levels)

-		 nCopy= pOldType->num_levels;

-	    else nCopy= pNewType->num_levels;

-	    memcpy(&pSyms[i*width],&oldSyms[i*oldWidth],nCopy*sizeof(KeySym));

-	}

-	if (XkbKeyHasActions(xkb,key)) {

-	    XkbAction	oldActs[XkbMaxSymsPerKey],*pActs;

-	    pActs= XkbKeyActionsPtr(xkb,key);

-	    memcpy(oldActs,pActs,XkbKeyNumSyms(xkb,key)*sizeof(XkbAction));

-	    pActs= XkbResizeKeyActions(xkb,key,width*nGroups);

-	    if (pActs==NULL)

-		return BadAlloc;

-	    memset(pActs, 0, width*nGroups*sizeof(XkbAction));

-	    for (i=0;(i<nGroups)&&(i<nOldGroups);i++) {

-		pOldType= XkbKeyKeyType(xkb,key,i);

-		pNewType= &xkb->map->types[newTypes[i]];

-		if (pNewType->num_levels>pOldType->num_levels)

-		     nCopy= pOldType->num_levels;

-		else nCopy= pNewType->num_levels;

-		memcpy(&pActs[i*width],&oldActs[i*oldWidth],

-						nCopy*sizeof(XkbAction));

-	    }

-	}

-	i= xkb->map->key_sym_map[key].group_info;

-	i= XkbSetNumGroups(i,nGroups);

-	xkb->map->key_sym_map[key].group_info= i;

-	xkb->map->key_sym_map[key].width= width;

-    }

-    width= 0;

-    for (i=0;i<nGroups;i++) {

-	xkb->map->key_sym_map[key].kt_index[i]= newTypes[i];

-	if (xkb->map->types[newTypes[i]].num_levels>width)

-	    width= xkb->map->types[newTypes[i]].num_levels;

-    }

-    xkb->map->key_sym_map[key].width= width;

-    if (changes!=NULL) {

-	if (changes->changed&XkbKeySymsMask) {

-	    _XkbAddKeyChange(&changes->first_key_sym,&changes->num_key_syms,

-	    								key);

-	}

-	else {

-	    changes->changed|= XkbKeySymsMask;

-	    changes->first_key_sym= key;

-	    changes->num_key_syms= 1;

-	}

-    }

-    return Success;

-}

-

-/***====================================================================***/

-

-Bool

-XkbVirtualModsToReal(XkbDescPtr xkb,unsigned virtual_mask,unsigned *mask_rtrn)

-{

-register int i,bit;

-register unsigned mask;

-

-    if (xkb==NULL)

-	return FALSE;

-    if (virtual_mask==0) {

-	*mask_rtrn= 0;

-	return TRUE;

-    }

-    if (xkb->server==NULL)

-	return FALSE;

-    for (i=mask=0,bit=1;i<XkbNumVirtualMods;i++,bit<<=1) {

-	if (virtual_mask&bit)

-	    mask|= xkb->server->vmods[i];

-    }

-    *mask_rtrn= mask;

-    return TRUE;

-}

-

-/***====================================================================***/

-

-static Bool

-XkbUpdateActionVirtualMods(XkbDescPtr xkb,XkbAction *act,unsigned changed)

-{

-unsigned int	tmp;

-

-    switch (act->type) {

-	case XkbSA_SetMods: case XkbSA_LatchMods: case XkbSA_LockMods:

-	    if (((tmp= XkbModActionVMods(&act->mods))&changed)!=0) {

-		XkbVirtualModsToReal(xkb,tmp,&tmp);

-		act->mods.mask= act->mods.real_mods;

-		act->mods.mask|= tmp;

-		return TRUE;

-	    }

-	    break;

-	case XkbSA_ISOLock:

-	    if ((((tmp= XkbModActionVMods(&act->iso))!=0)&changed)!=0) {

-		XkbVirtualModsToReal(xkb,tmp,&tmp);

-		act->iso.mask= act->iso.real_mods;

-		act->iso.mask|= tmp;

-		return TRUE;

-	    }

-	    break;

-    }

-    return FALSE;

-}

-

-static void

-XkbUpdateKeyTypeVirtualMods(	XkbDescPtr	xkb,

-				XkbKeyTypePtr	type,

-				unsigned int	changed,

-				XkbChangesPtr 	changes)

-{

-register unsigned int	i;

-unsigned int		mask;

-

-    XkbVirtualModsToReal(xkb,type->mods.vmods,&mask);

-    type->mods.mask= type->mods.real_mods|mask;

-    if ((type->map_count>0)&&(type->mods.vmods!=0)) {

-	XkbKTMapEntryPtr entry;

-	for (i=0,entry=type->map;i<type->map_count;i++,entry++) {

-	    if (entry->mods.vmods!=0) {

-		XkbVirtualModsToReal(xkb,entry->mods.vmods,&mask);

-		entry->mods.mask=entry->mods.real_mods|mask;

-		/* entry is active if vmods are bound*/

-	    	entry->active= (mask!=0);

-	    }

-	    else entry->active= 1;

-	}

-    }

-    if (changes) {

-	int	type_ndx;

-	type_ndx= type-xkb->map->types;

-	if ((type_ndx<0)||(type_ndx>xkb->map->num_types))

-	    return;

-	if (changes->map.changed&XkbKeyTypesMask) {

-	    int last;

-	    last= changes->map.first_type+changes->map.num_types-1;

-	    if (type_ndx<changes->map.first_type) {

-		changes->map.first_type= type_ndx;

-		changes->map.num_types= (last-type_ndx)+1;

-	    }

-	    else if (type_ndx>last) {

-		changes->map.num_types= (type_ndx-changes->map.first_type)+1;

-	    }

-	}

-	else {

-	    changes->map.changed|= XkbKeyTypesMask;

-	    changes->map.first_type= type_ndx;

-	    changes->map.num_types= 1;

-	}

-    }

-    return;

-}

-

-Bool

-XkbApplyVirtualModChanges(XkbDescPtr xkb,unsigned changed,XkbChangesPtr changes)

-{

-register int	i;

-unsigned int	checkState = 0;

-

-    if ((!xkb) || (!xkb->map) || (changed==0))

-	return FALSE;

-    for (i=0;i<xkb->map->num_types;i++) {

-	if (xkb->map->types[i].mods.vmods & changed)

-	XkbUpdateKeyTypeVirtualMods(xkb,&xkb->map->types[i],changed,changes);

-    }

-    if (changed&xkb->ctrls->internal.vmods) {

-	unsigned int	newMask;

-	XkbVirtualModsToReal(xkb,xkb->ctrls->internal.vmods,&newMask);

-	newMask|= xkb->ctrls->internal.real_mods;

-	if (xkb->ctrls->internal.mask!=newMask) {

-	    xkb->ctrls->internal.mask= newMask;

-	    if (changes) {

-		changes->ctrls.changed_ctrls|= XkbInternalModsMask;

-		checkState= TRUE;

-	    }

-	}

-    }

-    if (changed&xkb->ctrls->ignore_lock.vmods) {

-	unsigned int	newMask;

-	XkbVirtualModsToReal(xkb,xkb->ctrls->ignore_lock.vmods,&newMask);

-	newMask|= xkb->ctrls->ignore_lock.real_mods;

-	if (xkb->ctrls->ignore_lock.mask!=newMask) {

-	    xkb->ctrls->ignore_lock.mask= newMask;

-	    if (changes) {

-		changes->ctrls.changed_ctrls|= XkbIgnoreLockModsMask;

-		checkState= TRUE;

-	    }

-	}

-    }

-    if (xkb->indicators!=NULL) {

-	XkbIndicatorMapPtr map;

-	map= &xkb->indicators->maps[0];

-	for (i=0;i<XkbNumIndicators;i++,map++) {

-	    if (map->mods.vmods&changed) {

-		unsigned int newMask;

-		XkbVirtualModsToReal(xkb,map->mods.vmods,&newMask);

-		newMask|= map->mods.real_mods;

-		if (newMask!=map->mods.mask) {

-		    map->mods.mask= newMask;

-		    if (changes) {

-			changes->indicators.map_changes|= (1<<i);

-			checkState= TRUE;

-		    }

-		}

-	    }

-	}

-    }

-    if (xkb->compat!=NULL) {

-	XkbCompatMapPtr	compat;

-	compat= xkb->compat;

-	for (i=0;i<XkbNumKbdGroups;i++) {

-	    unsigned int newMask;

-	    XkbVirtualModsToReal(xkb,compat->groups[i].vmods,&newMask);

-	    newMask|= compat->groups[i].real_mods;

-	    if (compat->groups[i].mask!=newMask) {

-		compat->groups[i].mask= newMask;

-		if (changes) {

-		    changes->compat.changed_groups|= (1<<i);

-		    checkState= TRUE;

-		}

-	    }

-	}

-    }

-    if (xkb->map && xkb->server) {

-	int highChange = 0, lowChange = -1;

-	for (i=xkb->min_key_code;i<=xkb->max_key_code;i++) {

-	    if (XkbKeyHasActions(xkb,i)) {

-		register XkbAction *pAct;

-		register int n;

-

-		pAct= XkbKeyActionsPtr(xkb,i);

-		for (n=XkbKeyNumActions(xkb,i);n>0;n--,pAct++) {

-		    if ((pAct->type!=XkbSA_NoAction)&&

-			XkbUpdateActionVirtualMods(xkb,pAct,changed)) {

-			if (lowChange<0)

-			    lowChange= i;

-			highChange= i;

-		    }

-		}

-	    }

-	}

-	if (changes && (lowChange>0)) { /* something changed */

-	    if (changes->map.changed&XkbKeyActionsMask) {

-		int last;

-		if (changes->map.first_key_act<lowChange)

-		    lowChange= changes->map.first_key_act;

-		last= changes->map.first_key_act+changes->map.num_key_acts-1;

-		if (last>highChange)

-		    highChange= last;

-	    }

-	    changes->map.changed|= 	XkbKeyActionsMask;

-	    changes->map.first_key_act=	lowChange;

-	    changes->map.num_key_acts=	(highChange-lowChange)+1;

-	}

-    }

-    return checkState;

-}

+/************************************************************
+Copyright (c) 1993 by Silicon Graphics Computer Systems, Inc.
+
+Permission to use, copy, modify, and distribute this
+software and its documentation for any purpose and without
+fee is hereby granted, provided that the above copyright
+notice appear in all copies and that both that copyright
+notice and this permission notice appear in supporting
+documentation, and that the name of Silicon Graphics not be 
+used in advertising or publicity pertaining to distribution 
+of the software without specific prior written permission.
+Silicon Graphics makes no representation about the suitability 
+of this software for any purpose. It is provided "as is"
+without any express or implied warranty.
+
+SILICON GRAPHICS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS 
+SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY 
+AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL SILICON
+GRAPHICS BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL 
+DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, 
+DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE 
+OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION  WITH
+THE USE OR PERFORMANCE OF THIS SOFTWARE.
+
+********************************************************/
+
+#ifdef HAVE_DIX_CONFIG_H
+#include <dix-config.h>
+#elif defined(HAVE_CONFIG_H)
+#include <config.h>
+#endif
+
+#include <stdio.h>
+#include <X11/X.h>
+#include <X11/Xproto.h>
+#include "misc.h"
+#include "inputstr.h"
+#include <X11/keysym.h>
+#define	XKBSRV_NEED_FILE_FUNCS
+#include <xkbsrv.h>
+
+/***====================================================================***/
+
+#define	CORE_SYM(i)	(i<map_width?core_syms[i]:NoSymbol)
+#define	XKB_OFFSET(g,l)	(((g)*groupsWidth)+(l))
+
+int
+XkbKeyTypesForCoreSymbols(	XkbDescPtr	xkb,
+				int		map_width,
+				KeySym *	core_syms,
+				unsigned int 	protected,
+    				int *		types_inout,
+				KeySym *	xkb_syms_rtrn)
+{
+register int	i;
+unsigned int	empty;
+int		nSyms[XkbNumKbdGroups];
+int		nGroups,tmp,groupsWidth;
+BOOL		replicated = FALSE;
+
+    /* Section 12.2 of the protocol describes this process in more detail */
+    /* Step 1:  find the # of symbols in the core mapping per group */
+    groupsWidth= 2;
+    for (i=0;i<XkbNumKbdGroups;i++) {
+	if ((protected&(1<<i))&&(types_inout[i]<xkb->map->num_types)) {
+	    nSyms[i]= xkb->map->types[types_inout[i]].num_levels;
+	    if (nSyms[i]>groupsWidth)
+		groupsWidth= nSyms[i];
+	}
+	else {
+	    types_inout[i]= XkbTwoLevelIndex;	/* don't really know, yet */
+	    nSyms[i]= 2;
+	}
+    }
+    if (nSyms[XkbGroup1Index]<2)
+	nSyms[XkbGroup1Index]= 2;
+    if (nSyms[XkbGroup2Index]<2)
+	nSyms[XkbGroup2Index]= 2;
+    /* Step 2:	Copy the symbols from the core ordering to XKB ordering	*/
+    /*		symbols in the core are in the order:			*/
+    /*		G1L1 G1L2 G2L1 G2L2 [G1L[3-n]] [G2L[3-n]] [G3L*] [G3L*]	*/
+    xkb_syms_rtrn[XKB_OFFSET(XkbGroup1Index,0)]= CORE_SYM(0);
+    xkb_syms_rtrn[XKB_OFFSET(XkbGroup1Index,1)]= CORE_SYM(1);
+    for (i=2;i<nSyms[XkbGroup1Index];i++) {
+	xkb_syms_rtrn[XKB_OFFSET(XkbGroup1Index,i)]= CORE_SYM(2+i);
+    }
+    xkb_syms_rtrn[XKB_OFFSET(XkbGroup2Index,0)]= CORE_SYM(2);
+    xkb_syms_rtrn[XKB_OFFSET(XkbGroup2Index,1)]= CORE_SYM(3);
+    tmp= 2+(nSyms[XkbGroup1Index]-2); /* offset to extra group2 syms */
+    for (i=2;i<nSyms[XkbGroup2Index];i++) {
+	xkb_syms_rtrn[XKB_OFFSET(XkbGroup2Index,i)]= CORE_SYM(tmp+i);
+    }
+
+    /* Special case: if only the first group is explicit, and the symbols
+     * replicate across all groups, then we have a Section 12.4 replication */
+    if ((protected & ~XkbExplicitKeyType1Mask) == 0)
+    {
+        int j, width = nSyms[XkbGroup1Index];
+
+        replicated = TRUE;
+
+        /* Check ABAB in ABABCDECDEABCDE */
+        if ((width > 0 && CORE_SYM(0) != CORE_SYM(2)) ||
+            (width > 1 && CORE_SYM(1) != CORE_SYM(3)))
+            replicated = FALSE;
+
+        /* Check CDECDE in ABABCDECDEABCDE */
+        for (i = 2; i < width && replicated; i++)
+        {
+            if (CORE_SYM(2 + i) != CORE_SYM(i + width))
+                replicated = FALSE;
+        }
+
+        /* Check ABCDE in ABABCDECDEABCDE */
+        for (j = 2; replicated &&
+                    j < XkbNumKbdGroups &&
+                    map_width >= width * (j + 1); j++)
+        {
+            for (i = 0; i < width && replicated; i++)
+            {
+                if (CORE_SYM(((i < 2) ? i : 2 + i)) != CORE_SYM(i + width * j))
+                    replicated = FALSE;
+            }
+        }
+    }
+
+    if (replicated)
+    {
+	nSyms[XkbGroup2Index]= 0;
+	nSyms[XkbGroup3Index]= 0;
+	nSyms[XkbGroup4Index]= 0;
+	nGroups= 1;
+    } else
+    {
+        tmp= nSyms[XkbGroup1Index]+nSyms[XkbGroup2Index];
+        if ((tmp>=map_width)&&
+                ((protected&(XkbExplicitKeyType3Mask|XkbExplicitKeyType4Mask))==0)) {
+            nSyms[XkbGroup3Index]= 0;
+            nSyms[XkbGroup4Index]= 0;
+            nGroups= 2;
+        } else
+        {
+            nGroups= 3;
+            for (i=0;i<nSyms[XkbGroup3Index];i++,tmp++) {
+                xkb_syms_rtrn[XKB_OFFSET(XkbGroup3Index,i)]= CORE_SYM(tmp);
+            }
+            if ((tmp<map_width)||(protected&XkbExplicitKeyType4Mask)) {
+                nGroups= 4;
+                for (i=0;i<nSyms[XkbGroup4Index];i++,tmp++) {
+                    xkb_syms_rtrn[XKB_OFFSET(XkbGroup4Index,i)]= CORE_SYM(tmp);
+                }
+            }
+            else {
+                nSyms[XkbGroup4Index]= 0;
+            }
+        }
+    }
+    /* steps 3&4: alphanumeric expansion,  assign canonical types */
+    empty= 0;
+    for (i=0;i<nGroups;i++) {
+	KeySym *syms;
+	syms= &xkb_syms_rtrn[XKB_OFFSET(i,0)];
+	if ((nSyms[i]>1)&&(syms[1]==NoSymbol)&&(syms[0]!=NoSymbol)) {
+	    KeySym upper,lower;
+	    XkbConvertCase(syms[0],&lower,&upper);
+	    if (upper!=lower) {
+		xkb_syms_rtrn[XKB_OFFSET(i,0)]= lower;
+		xkb_syms_rtrn[XKB_OFFSET(i,1)]= upper;
+		if ((protected&(1<<i))==0)
+		    types_inout[i]= XkbAlphabeticIndex;
+	    }
+	    else if ((protected&(1<<i))==0) {
+		types_inout[i]= XkbOneLevelIndex;
+	/*	nSyms[i]=	1;*/
+	    }
+	}
+	if (((protected&(1<<i))==0)&&(types_inout[i]==XkbTwoLevelIndex)) {
+	    if (XkbKSIsKeypad(syms[0])||XkbKSIsKeypad(syms[1]))
+		types_inout[i]= XkbKeypadIndex;
+	    else {
+		KeySym upper,lower;
+		XkbConvertCase(syms[0],&lower,&upper);
+		if ((syms[0]==lower)&&(syms[1]==upper))
+		    types_inout[i]= XkbAlphabeticIndex;
+	    }
+	}
+	if (syms[0]==NoSymbol) {
+	    register int n;
+	    Bool	found;
+	    for (n=1,found=FALSE;(!found)&&(n<nSyms[i]);n++) {
+		found= (syms[n]!=NoSymbol);
+	    }
+	    if (!found)
+		empty|= (1<<i);
+	}
+    }
+    /* step 5: squoosh out empty groups */
+    if (empty) {
+	for (i=nGroups-1;i>=0;i--) {
+	    if (((empty&(1<<i))==0)||(protected&(1<<i)))
+		break;
+	    nGroups--;
+	}
+    }
+    if (nGroups<1)
+	return 0;
+
+    /* step 6: replicate group 1 into group two, if necessary */
+    if ((nGroups>1)&&((empty&(XkbGroup1Mask|XkbGroup2Mask))==XkbGroup2Mask)) {
+	if ((protected&(XkbExplicitKeyType1Mask|XkbExplicitKeyType2Mask))==0) {
+	    nSyms[XkbGroup2Index]= nSyms[XkbGroup1Index];
+	    types_inout[XkbGroup2Index]= types_inout[XkbGroup1Index];
+	    memcpy((char *)&xkb_syms_rtrn[2],(char *)xkb_syms_rtrn,
+							2*sizeof(KeySym));
+	}
+	else if (types_inout[XkbGroup1Index]==types_inout[XkbGroup2Index]) {
+	    memcpy((char *)&xkb_syms_rtrn[nSyms[XkbGroup1Index]],
+	    				(char *)xkb_syms_rtrn,
+					nSyms[XkbGroup1Index]*sizeof(KeySym));
+	}
+    }
+
+    /* step 7: check for all groups identical or all width 1
+     *
+     * Special feature: if group 1 has an explicit type and all other groups
+     * have canonical types with same symbols, we assume it's info lost from
+     * the core replication.
+     */
+    if (nGroups>1) {
+	Bool sameType,allOneLevel, canonical = TRUE;
+	allOneLevel= (xkb->map->types[types_inout[0]].num_levels==1);
+	for (i=1,sameType=TRUE;(allOneLevel||sameType)&&(i<nGroups);i++) {
+	    sameType=(sameType&&(types_inout[i]==types_inout[XkbGroup1Index]));
+	    if (allOneLevel)
+		allOneLevel= (xkb->map->types[types_inout[i]].num_levels==1);
+	    if (types_inout[i] > XkbLastRequiredType)
+		canonical = FALSE;
+	}
+	if (((sameType) || canonical)&&
+	    (!(protected&(XkbExplicitKeyTypesMask&~XkbExplicitKeyType1Mask)))){
+	    register int s;
+	    Bool	identical;
+	    for (i=1,identical=TRUE;identical&&(i<nGroups);i++) {
+		KeySym *syms;
+                if (nSyms[i] != nSyms[XkbGroup1Index])
+                    identical = FALSE;
+		syms= &xkb_syms_rtrn[XKB_OFFSET(i,0)];
+		for (s=0;identical&&(s<nSyms[i]);s++) {
+		    if (syms[s]!=xkb_syms_rtrn[s])
+			identical= FALSE;
+		}
+	    }
+	    if (identical)
+		nGroups= 1;
+	}
+	if (allOneLevel && (nGroups>1)) {
+	    KeySym *syms;
+	    syms= &xkb_syms_rtrn[nSyms[XkbGroup1Index]];
+	    nSyms[XkbGroup1Index]= 1;
+	    for (i=1;i<nGroups;i++) {
+		xkb_syms_rtrn[i]= syms[0];
+		syms+= nSyms[i];
+		nSyms[i]= 1;
+	    }
+	}
+    }
+    return nGroups;
+}
+
+static XkbSymInterpretPtr
+_XkbFindMatchingInterp(	XkbDescPtr	xkb,
+			KeySym 		sym,
+			unsigned int	real_mods,
+			unsigned int	level)
+{
+register unsigned	 i;
+XkbSymInterpretPtr	 interp,rtrn;
+CARD8			 mods;
+
+    rtrn= NULL;
+    interp= xkb->compat->sym_interpret;
+    for (i=0;i<xkb->compat->num_si;i++,interp++) {
+	if ((interp->sym==NoSymbol)||(sym==interp->sym)) {
+	    int match;
+	    if ((level==0)||((interp->match&XkbSI_LevelOneOnly)==0))
+		 mods= real_mods;
+	    else mods= 0;
+	    switch (interp->match&XkbSI_OpMask) {
+		case XkbSI_NoneOf:
+		    match= ((interp->mods&mods)==0);
+		    break;
+		case XkbSI_AnyOfOrNone:
+		    match= ((mods==0)||((interp->mods&mods)!=0));
+		    break;
+		case XkbSI_AnyOf:
+		    match= ((interp->mods&mods)!=0);
+		    break;
+		case XkbSI_AllOf:
+		    match= ((interp->mods&mods)==interp->mods);
+		    break;
+		case XkbSI_Exactly:
+		    match= (interp->mods==mods);
+		    break;
+		default:
+		    match= 0;
+		    break;
+	    }
+	    if (match) {
+		if (interp->sym!=NoSymbol) {
+		    return interp;
+		}
+		else if (rtrn==NULL) {
+		    rtrn= interp;
+		}
+	    }
+	}
+    }
+    return rtrn;
+}
+
+static void
+_XkbAddKeyChange(KeyCode *pFirst,unsigned char *pNum,KeyCode newKey)
+{
+KeyCode	last;
+
+    last= (*pFirst)+(*pNum);
+    if (newKey<*pFirst) {
+	*pFirst= newKey;
+	*pNum= (last-newKey)+1;
+    }
+    else if (newKey>last) {
+	*pNum= (last-*pFirst)+1;
+    }
+    return;
+}
+
+static void
+_XkbSetActionKeyMods(XkbDescPtr xkb,XkbAction *act,unsigned mods)
+{
+unsigned	tmp;
+
+    switch (act->type) {
+	case XkbSA_SetMods: case XkbSA_LatchMods: case XkbSA_LockMods:
+	    if (act->mods.flags&XkbSA_UseModMapMods)
+		act->mods.real_mods= act->mods.mask= mods;
+	    if ((tmp= XkbModActionVMods(&act->mods))!=0) {
+		XkbVirtualModsToReal(xkb,tmp,&tmp);
+		act->mods.mask|= tmp;
+	    }
+	    break;
+	case XkbSA_ISOLock:
+	    if (act->iso.flags&XkbSA_UseModMapMods)
+		act->iso.real_mods= act->iso.mask= mods;
+	    if ((tmp= XkbModActionVMods(&act->iso))!=0) {
+		XkbVirtualModsToReal(xkb,tmp,&tmp);
+		act->iso.mask|= tmp;
+	    }
+	    break;
+    }
+    return;
+}
+
+#define	IBUF_SIZE	8
+
+Bool
+XkbApplyCompatMapToKey(XkbDescPtr xkb,KeyCode key,XkbChangesPtr changes)
+{
+KeySym *		syms;
+unsigned char 		explicit,mods;
+XkbSymInterpretPtr	*interps,ibuf[IBUF_SIZE]; 
+int			n,nSyms,found;
+unsigned		changed,tmp;
+
+    if ((!xkb)||(!xkb->map)||(!xkb->map->key_sym_map)||
+    			(!xkb->compat)||(!xkb->compat->sym_interpret)||
+			(key<xkb->min_key_code)||(key>xkb->max_key_code)) {
+	return FALSE;
+    }
+    if (((!xkb->server)||(!xkb->server->key_acts))&&
+		(XkbAllocServerMap(xkb,XkbAllServerInfoMask,0)!=Success)) {
+	return FALSE;
+    }
+    changed= 0;	/* keeps track of what has changed in _this_ call */
+    explicit= xkb->server->explicit[key];
+    if (explicit&XkbExplicitInterpretMask) /* nothing to do */
+	return TRUE;
+    mods= (xkb->map->modmap?xkb->map->modmap[key]:0);
+    nSyms= XkbKeyNumSyms(xkb,key);
+    syms= XkbKeySymsPtr(xkb,key);
+    if (nSyms>IBUF_SIZE) {
+	interps= calloc(nSyms, sizeof(XkbSymInterpretPtr));
+	if (interps==NULL) {
+	    interps= ibuf;
+	    nSyms= IBUF_SIZE;
+	}
+    }
+    else {
+	interps= ibuf;
+    }
+    found= 0;
+    for (n=0;n<nSyms;n++) {
+	unsigned level= (n%XkbKeyGroupsWidth(xkb,key));
+	interps[n]= NULL;
+	if (syms[n]!=NoSymbol) {
+	    interps[n]= _XkbFindMatchingInterp(xkb,syms[n],mods,level);
+	    if (interps[n]&&interps[n]->act.type!=XkbSA_NoAction)
+		found++;
+	    else interps[n]= NULL;
+	}
+    }
+    /* 1/28/96 (ef) -- XXX! WORKING HERE */
+    if (!found) {
+	if (xkb->server->key_acts[key]!=0) {
+	    xkb->server->key_acts[key]= 0;
+	    changed|= XkbKeyActionsMask;
+	}
+    }
+    else {
+	XkbAction *pActs;
+	unsigned int	new_vmodmask;
+	changed|= XkbKeyActionsMask;
+	pActs= XkbResizeKeyActions(xkb,key,nSyms);
+	if (!pActs) {
+            if (nSyms > IBUF_SIZE)
+                free(interps);
+	    return FALSE;
+        }
+	new_vmodmask= 0;
+	for (n=0;n<nSyms;n++) {
+	    if (interps[n]) {
+		unsigned effMods;
+
+		pActs[n]= *((XkbAction *)&interps[n]->act);
+		if ((n==0)||((interps[n]->match&XkbSI_LevelOneOnly)==0)) {
+		     effMods= mods;
+		     if (interps[n]->virtual_mod!=XkbNoModifier)
+			new_vmodmask|= (1<<interps[n]->virtual_mod);
+		}
+		else effMods= 0;
+		_XkbSetActionKeyMods(xkb,&pActs[n],effMods);
+	    }
+	    else pActs[n].type= XkbSA_NoAction;
+	}
+	if (((explicit&XkbExplicitVModMapMask)==0)&&
+				(xkb->server->vmodmap[key]!=new_vmodmask)) {
+	    changed|= XkbVirtualModMapMask;
+	    xkb->server->vmodmap[key]= new_vmodmask;
+	}
+	if (interps[0]) {
+	    if ((interps[0]->flags&XkbSI_LockingKey)&&
+				((explicit&XkbExplicitBehaviorMask)==0)) {
+		xkb->server->behaviors[key].type= XkbKB_Lock;
+		changed|= XkbKeyBehaviorsMask;
+	    }
+	    if (((explicit&XkbExplicitAutoRepeatMask)==0)&&(xkb->ctrls)) {
+		CARD8 old;
+		old= BitIsOn(xkb->ctrls->per_key_repeat, key);
+		if (interps[0]->flags&XkbSI_AutoRepeat)
+		    SetBit(xkb->ctrls->per_key_repeat, key);
+		else
+		    ClearBit(xkb->ctrls->per_key_repeat, key);
+		if (changes && old != BitIsOn(xkb->ctrls->per_key_repeat, key))
+		    changes->ctrls.changed_ctrls|= XkbPerKeyRepeatMask;
+	    }
+	}
+    }
+    if ((!found)||(interps[0]==NULL)) {
+	if (((explicit&XkbExplicitAutoRepeatMask)==0)&&(xkb->ctrls)) {
+	    CARD8 old;
+	    old = BitIsOn(xkb->ctrls->per_key_repeat, key);
+	    SetBit(xkb->ctrls->per_key_repeat, key);
+	    if (changes && (old != BitIsOn(xkb->ctrls->per_key_repeat, key)))
+		changes->ctrls.changed_ctrls|= XkbPerKeyRepeatMask;
+	}
+	if (((explicit&XkbExplicitBehaviorMask)==0)&&
+		(xkb->server->behaviors[key].type==XkbKB_Lock)) {
+		xkb->server->behaviors[key].type= XkbKB_Default;
+		changed|= XkbKeyBehaviorsMask;
+	}
+    }
+    if (changes) {
+	XkbMapChangesPtr	mc;
+	mc= &changes->map;
+	tmp= (changed&mc->changed);
+	if (tmp&XkbKeyActionsMask)
+	    _XkbAddKeyChange(&mc->first_key_act,&mc->num_key_acts,key);
+	else if (changed&XkbKeyActionsMask) {
+	    mc->changed|= XkbKeyActionsMask;
+	    mc->first_key_act= key;
+	    mc->num_key_acts= 1;
+	}
+	if (tmp&XkbKeyBehaviorsMask) {
+	    _XkbAddKeyChange(&mc->first_key_behavior,&mc->num_key_behaviors,
+	    								key);
+	}
+	else if (changed&XkbKeyBehaviorsMask) {
+	    mc->changed|= XkbKeyBehaviorsMask;
+	    mc->first_key_behavior= key;
+	    mc->num_key_behaviors= 1;
+	}
+	if (tmp&XkbVirtualModMapMask)
+	    _XkbAddKeyChange(&mc->first_vmodmap_key,&mc->num_vmodmap_keys,key);
+	else if (changed&XkbVirtualModMapMask) {
+	    mc->changed|= XkbVirtualModMapMask;
+	    mc->first_vmodmap_key= key;
+	    mc->num_vmodmap_keys= 1;
+	}
+	mc->changed|= changed;
+    }
+    if (interps!=ibuf)
+	free(interps);
+    return TRUE;
+}
+
+Status
+XkbChangeTypesOfKey(	XkbDescPtr		 xkb,
+			int		 	 key,
+			int			 nGroups,
+			unsigned	 	 groups,
+			int	* 	 	 newTypesIn,
+			XkbMapChangesPtr	 changes)
+{
+XkbKeyTypePtr	pOldType,pNewType;
+register int	i;
+int		width,nOldGroups,oldWidth,newTypes[XkbNumKbdGroups];
+
+    if ((!xkb) || (!XkbKeycodeInRange(xkb,key)) || (!xkb->map) ||
+	(!xkb->map->types)||(!newTypesIn)||((groups&XkbAllGroupsMask)==0)||
+	(nGroups>XkbNumKbdGroups)) {
+	return BadMatch;
+    }
+    if (nGroups==0) {
+	for (i=0;i<XkbNumKbdGroups;i++) {
+	    xkb->map->key_sym_map[key].kt_index[i]= XkbOneLevelIndex;
+	}
+	i= xkb->map->key_sym_map[key].group_info;
+	i= XkbSetNumGroups(i,0);
+	xkb->map->key_sym_map[key].group_info= i;
+	XkbResizeKeySyms(xkb,key,0);
+	return Success;
+    }
+
+    nOldGroups= XkbKeyNumGroups(xkb,key);
+    oldWidth= XkbKeyGroupsWidth(xkb,key);
+    for (width=i=0;i<nGroups;i++) {
+	if (groups&(1<<i))
+	     newTypes[i]=  newTypesIn[i];
+	else if (i<nOldGroups)
+	     newTypes[i]= XkbKeyKeyTypeIndex(xkb,key,i);
+	else if (nOldGroups>0)
+	     newTypes[i]= XkbKeyKeyTypeIndex(xkb,key,XkbGroup1Index);
+	else newTypes[i]= XkbTwoLevelIndex;
+	if (newTypes[i]>xkb->map->num_types)
+	    return BadMatch;
+	pNewType= &xkb->map->types[newTypes[i]];
+	if (pNewType->num_levels>width)
+	    width= pNewType->num_levels;
+    }
+    if ((xkb->ctrls)&&(nGroups>xkb->ctrls->num_groups))
+	xkb->ctrls->num_groups= nGroups;
+    if ((width!=oldWidth)||(nGroups!=nOldGroups)) {
+	KeySym		oldSyms[XkbMaxSymsPerKey],*pSyms;
+	int		nCopy;
+
+	if (nOldGroups==0) {
+	    pSyms= XkbResizeKeySyms(xkb,key,width*nGroups);
+	    if (pSyms!=NULL) {
+		i= xkb->map->key_sym_map[key].group_info;
+		i= XkbSetNumGroups(i,nGroups);
+		xkb->map->key_sym_map[key].group_info= i;
+		xkb->map->key_sym_map[key].width= width;
+		for (i=0;i<nGroups;i++) {
+		    xkb->map->key_sym_map[key].kt_index[i]= newTypes[i];
+		}
+		return Success;
+	    }
+	    return BadAlloc;
+	}
+	pSyms= XkbKeySymsPtr(xkb,key);
+	memcpy(oldSyms,pSyms,XkbKeyNumSyms(xkb,key)*sizeof(KeySym));
+	pSyms= XkbResizeKeySyms(xkb,key,width*nGroups);
+	if (pSyms==NULL)
+	    return BadAlloc;
+	memset(pSyms, 0, width*nGroups*sizeof(KeySym));
+	for (i=0;(i<nGroups)&&(i<nOldGroups);i++) {
+	    pOldType= XkbKeyKeyType(xkb,key,i);
+	    pNewType= &xkb->map->types[newTypes[i]];
+	    if (pNewType->num_levels>pOldType->num_levels)
+		 nCopy= pOldType->num_levels;
+	    else nCopy= pNewType->num_levels;
+	    memcpy(&pSyms[i*width],&oldSyms[i*oldWidth],nCopy*sizeof(KeySym));
+	}
+	if (XkbKeyHasActions(xkb,key)) {
+	    XkbAction	oldActs[XkbMaxSymsPerKey],*pActs;
+	    pActs= XkbKeyActionsPtr(xkb,key);
+	    memcpy(oldActs,pActs,XkbKeyNumSyms(xkb,key)*sizeof(XkbAction));
+	    pActs= XkbResizeKeyActions(xkb,key,width*nGroups);
+	    if (pActs==NULL)
+		return BadAlloc;
+	    memset(pActs, 0, width*nGroups*sizeof(XkbAction));
+	    for (i=0;(i<nGroups)&&(i<nOldGroups);i++) {
+		pOldType= XkbKeyKeyType(xkb,key,i);
+		pNewType= &xkb->map->types[newTypes[i]];
+		if (pNewType->num_levels>pOldType->num_levels)
+		     nCopy= pOldType->num_levels;
+		else nCopy= pNewType->num_levels;
+		memcpy(&pActs[i*width],&oldActs[i*oldWidth],
+						nCopy*sizeof(XkbAction));
+	    }
+	}
+	i= xkb->map->key_sym_map[key].group_info;
+	i= XkbSetNumGroups(i,nGroups);
+	xkb->map->key_sym_map[key].group_info= i;
+	xkb->map->key_sym_map[key].width= width;
+    }
+    width= 0;
+    for (i=0;i<nGroups;i++) {
+	xkb->map->key_sym_map[key].kt_index[i]= newTypes[i];
+	if (xkb->map->types[newTypes[i]].num_levels>width)
+	    width= xkb->map->types[newTypes[i]].num_levels;
+    }
+    xkb->map->key_sym_map[key].width= width;
+    if (changes!=NULL) {
+	if (changes->changed&XkbKeySymsMask) {
+	    _XkbAddKeyChange(&changes->first_key_sym,&changes->num_key_syms,
+	    								key);
+	}
+	else {
+	    changes->changed|= XkbKeySymsMask;
+	    changes->first_key_sym= key;
+	    changes->num_key_syms= 1;
+	}
+    }
+    return Success;
+}
+
+/***====================================================================***/
+
+Bool
+XkbVirtualModsToReal(XkbDescPtr xkb,unsigned virtual_mask,unsigned *mask_rtrn)
+{
+register int i,bit;
+register unsigned mask;
+
+    if (xkb==NULL)
+	return FALSE;
+    if (virtual_mask==0) {
+	*mask_rtrn= 0;
+	return TRUE;
+    }
+    if (xkb->server==NULL)
+	return FALSE;
+    for (i=mask=0,bit=1;i<XkbNumVirtualMods;i++,bit<<=1) {
+	if (virtual_mask&bit)
+	    mask|= xkb->server->vmods[i];
+    }
+    *mask_rtrn= mask;
+    return TRUE;
+}
+
+/***====================================================================***/
+
+static Bool
+XkbUpdateActionVirtualMods(XkbDescPtr xkb,XkbAction *act,unsigned changed)
+{
+unsigned int	tmp;
+
+    switch (act->type) {
+	case XkbSA_SetMods: case XkbSA_LatchMods: case XkbSA_LockMods:
+	    if (((tmp= XkbModActionVMods(&act->mods))&changed)!=0) {
+		XkbVirtualModsToReal(xkb,tmp,&tmp);
+		act->mods.mask= act->mods.real_mods;
+		act->mods.mask|= tmp;
+		return TRUE;
+	    }
+	    break;
+	case XkbSA_ISOLock:
+	    if ((((tmp= XkbModActionVMods(&act->iso))!=0)&changed)!=0) {
+		XkbVirtualModsToReal(xkb,tmp,&tmp);
+		act->iso.mask= act->iso.real_mods;
+		act->iso.mask|= tmp;
+		return TRUE;
+	    }
+	    break;
+    }
+    return FALSE;
+}
+
+static void
+XkbUpdateKeyTypeVirtualMods(	XkbDescPtr	xkb,
+				XkbKeyTypePtr	type,
+				unsigned int	changed,
+				XkbChangesPtr 	changes)
+{
+register unsigned int	i;
+unsigned int		mask;
+
+    XkbVirtualModsToReal(xkb,type->mods.vmods,&mask);
+    type->mods.mask= type->mods.real_mods|mask;
+    if ((type->map_count>0)&&(type->mods.vmods!=0)) {
+	XkbKTMapEntryPtr entry;
+	for (i=0,entry=type->map;i<type->map_count;i++,entry++) {
+	    if (entry->mods.vmods!=0) {
+		XkbVirtualModsToReal(xkb,entry->mods.vmods,&mask);
+		entry->mods.mask=entry->mods.real_mods|mask;
+		/* entry is active if vmods are bound*/
+	    	entry->active= (mask!=0);
+	    }
+	    else entry->active= 1;
+	}
+    }
+    if (changes) {
+	int	type_ndx;
+	type_ndx= type-xkb->map->types;
+	if ((type_ndx<0)||(type_ndx>xkb->map->num_types))
+	    return;
+	if (changes->map.changed&XkbKeyTypesMask) {
+	    int last;
+	    last= changes->map.first_type+changes->map.num_types-1;
+	    if (type_ndx<changes->map.first_type) {
+		changes->map.first_type= type_ndx;
+		changes->map.num_types= (last-type_ndx)+1;
+	    }
+	    else if (type_ndx>last) {
+		changes->map.num_types= (type_ndx-changes->map.first_type)+1;
+	    }
+	}
+	else {
+	    changes->map.changed|= XkbKeyTypesMask;
+	    changes->map.first_type= type_ndx;
+	    changes->map.num_types= 1;
+	}
+    }
+    return;
+}
+
+Bool
+XkbApplyVirtualModChanges(XkbDescPtr xkb,unsigned changed,XkbChangesPtr changes)
+{
+register int	i;
+unsigned int	checkState = 0;
+
+    if ((!xkb) || (!xkb->map) || (changed==0))
+	return FALSE;
+    for (i=0;i<xkb->map->num_types;i++) {
+	if (xkb->map->types[i].mods.vmods & changed)
+	XkbUpdateKeyTypeVirtualMods(xkb,&xkb->map->types[i],changed,changes);
+    }
+    if (changed&xkb->ctrls->internal.vmods) {
+	unsigned int	newMask;
+	XkbVirtualModsToReal(xkb,xkb->ctrls->internal.vmods,&newMask);
+	newMask|= xkb->ctrls->internal.real_mods;
+	if (xkb->ctrls->internal.mask!=newMask) {
+	    xkb->ctrls->internal.mask= newMask;
+	    if (changes) {
+		changes->ctrls.changed_ctrls|= XkbInternalModsMask;
+		checkState= TRUE;
+	    }
+	}
+    }
+    if (changed&xkb->ctrls->ignore_lock.vmods) {
+	unsigned int	newMask;
+	XkbVirtualModsToReal(xkb,xkb->ctrls->ignore_lock.vmods,&newMask);
+	newMask|= xkb->ctrls->ignore_lock.real_mods;
+	if (xkb->ctrls->ignore_lock.mask!=newMask) {
+	    xkb->ctrls->ignore_lock.mask= newMask;
+	    if (changes) {
+		changes->ctrls.changed_ctrls|= XkbIgnoreLockModsMask;
+		checkState= TRUE;
+	    }
+	}
+    }
+    if (xkb->indicators!=NULL) {
+	XkbIndicatorMapPtr map;
+	map= &xkb->indicators->maps[0];
+	for (i=0;i<XkbNumIndicators;i++,map++) {
+	    if (map->mods.vmods&changed) {
+		unsigned int newMask;
+		XkbVirtualModsToReal(xkb,map->mods.vmods,&newMask);
+		newMask|= map->mods.real_mods;
+		if (newMask!=map->mods.mask) {
+		    map->mods.mask= newMask;
+		    if (changes) {
+			changes->indicators.map_changes|= (1<<i);
+			checkState= TRUE;
+		    }
+		}
+	    }
+	}
+    }
+    if (xkb->compat!=NULL) {
+	XkbCompatMapPtr	compat;
+	compat= xkb->compat;
+	for (i=0;i<XkbNumKbdGroups;i++) {
+	    unsigned int newMask;
+	    XkbVirtualModsToReal(xkb,compat->groups[i].vmods,&newMask);
+	    newMask|= compat->groups[i].real_mods;
+	    if (compat->groups[i].mask!=newMask) {
+		compat->groups[i].mask= newMask;
+		if (changes) {
+		    changes->compat.changed_groups|= (1<<i);
+		    checkState= TRUE;
+		}
+	    }
+	}
+    }
+    if (xkb->map && xkb->server) {
+	int highChange = 0, lowChange = -1;
+	for (i=xkb->min_key_code;i<=xkb->max_key_code;i++) {
+	    if (XkbKeyHasActions(xkb,i)) {
+		register XkbAction *pAct;
+		register int n;
+
+		pAct= XkbKeyActionsPtr(xkb,i);
+		for (n=XkbKeyNumActions(xkb,i);n>0;n--,pAct++) {
+		    if ((pAct->type!=XkbSA_NoAction)&&
+			XkbUpdateActionVirtualMods(xkb,pAct,changed)) {
+			if (lowChange<0)
+			    lowChange= i;
+			highChange= i;
+		    }
+		}
+	    }
+	}
+	if (changes && (lowChange>0)) { /* something changed */
+	    if (changes->map.changed&XkbKeyActionsMask) {
+		int last;
+		if (changes->map.first_key_act<lowChange)
+		    lowChange= changes->map.first_key_act;
+		last= changes->map.first_key_act+changes->map.num_key_acts-1;
+		if (last>highChange)
+		    highChange= last;
+	    }
+	    changes->map.changed|= 	XkbKeyActionsMask;
+	    changes->map.first_key_act=	lowChange;
+	    changes->map.num_key_acts=	(highChange-lowChange)+1;
+	}
+    }
+    return checkState;
+}
diff --git a/xorg-server/xkb/xkbUtils.c b/xorg-server/xkb/xkbUtils.c
index 9db94773f..3a56bea4c 100644
--- a/xorg-server/xkb/xkbUtils.c
+++ b/xorg-server/xkb/xkbUtils.c
@@ -1,2122 +1,2125 @@
-/************************************************************

-Copyright (c) 1993 by Silicon Graphics Computer Systems, Inc.

-

-Permission to use, copy, modify, and distribute this

-software and its documentation for any purpose and without

-fee is hereby granted, provided that the above copyright

-notice appear in all copies and that both that copyright

-notice and this permission notice appear in supporting

-documentation, and that the name of Silicon Graphics not be 

-used in advertising or publicity pertaining to distribution 

-of the software without specific prior written permission.

-Silicon Graphics makes no representation about the suitability 

-of this software for any purpose. It is provided "as is"

-without any express or implied warranty.

-

-SILICON GRAPHICS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS 

-SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY 

-AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL SILICON

-GRAPHICS BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL 

-DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, 

-DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE 

-OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION  WITH

-THE USE OR PERFORMANCE OF THIS SOFTWARE.

-

-********************************************************/

-/*

-

-Copyright © 2008 Red Hat Inc.

-

-Permission is hereby granted, free of charge, to any person obtaining a

-copy of this software and associated documentation files (the "Software"),

-to deal in the Software without restriction, including without limitation

-the rights to use, copy, modify, merge, publish, distribute, sublicense,

-and/or sell copies of the Software, and to permit persons to whom the

-Software is furnished to do so, subject to the following conditions:

-

-The above copyright notice and this permission notice (including the next

-paragraph) shall be included in all copies or substantial portions of the

-Software.

-

-THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR

-IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,

-FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL

-THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER

-LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING

-FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER

-DEALINGS IN THE SOFTWARE.

-

-*/

-

-#ifdef HAVE_DIX_CONFIG_H

-#include <dix-config.h>

-#endif

-

-#include "os.h"

-#include <stdio.h>

-#include <ctype.h>

-#include <math.h>

-#include <X11/X.h>

-#include <X11/Xproto.h>

-#define	XK_CYRILLIC

-#include <X11/keysym.h>

-#include "misc.h"

-#include "inputstr.h"

-#include "eventstr.h"

-

-#define	XKBSRV_NEED_FILE_FUNCS

-#include <xkbsrv.h>

-#include "xkbgeom.h"

-#include "xkb.h"

-

-/***====================================================================***/

-

-int

-_XkbLookupAnyDevice(DeviceIntPtr *pDev, int id, ClientPtr client,

-		    Mask access_mode, int *xkb_err)

-{

-    int rc = XkbKeyboardErrorCode;

-

-    if (id == XkbUseCoreKbd)

-        id = PickKeyboard(client)->id;

-    else if (id == XkbUseCorePtr)

-        id = PickPointer(client)->id;

-

-    rc = dixLookupDevice(pDev, id, client, access_mode);

-    if (rc != Success)

-	*xkb_err = XkbErr_BadDevice;

-

-    return rc;

-}

-

-int

-_XkbLookupKeyboard(DeviceIntPtr *pDev, int id, ClientPtr client,

-		   Mask access_mode, int *xkb_err)

-{

-    DeviceIntPtr dev;

-    int rc;

-

-    if (id == XkbDfltXIId)

-        id = XkbUseCoreKbd;

-

-    rc = _XkbLookupAnyDevice(pDev, id, client, access_mode, xkb_err);

-    if (rc != Success)

-	return rc;

-

-    dev = *pDev;

-    if (!dev->key || !dev->key->xkbInfo) {

-	*pDev = NULL;

-	*xkb_err= XkbErr_BadClass;

-	return XkbKeyboardErrorCode;

-    }

-    return Success;

-}

-

-int

-_XkbLookupBellDevice(DeviceIntPtr *pDev, int id, ClientPtr client,

-		     Mask access_mode, int *xkb_err)

-{

-    DeviceIntPtr dev;

-    int rc;

-

-    rc = _XkbLookupAnyDevice(pDev, id, client, access_mode, xkb_err);

-    if (rc != Success)

-	return rc;

-

-    dev = *pDev;

-    if (!dev->kbdfeed && !dev->bell) {

-	*pDev = NULL;

-	*xkb_err= XkbErr_BadClass;

-	return XkbKeyboardErrorCode;

-    }

-    return Success;

-}

-

-int

-_XkbLookupLedDevice(DeviceIntPtr *pDev, int id, ClientPtr client,

-		    Mask access_mode, int *xkb_err)

-{

-    DeviceIntPtr dev;

-    int rc;

-

-    if (id == XkbDfltXIId)

-        id = XkbUseCorePtr;

-

-    rc = _XkbLookupAnyDevice(pDev, id, client, access_mode, xkb_err);

-    if (rc != Success)

-	return rc;

-

-    dev = *pDev;

-    if (!dev->kbdfeed && !dev->leds) {

-	*pDev = NULL;

-	*xkb_err= XkbErr_BadClass;

-	return XkbKeyboardErrorCode;

-    }

-    return Success;

-}

-

-int

-_XkbLookupButtonDevice(DeviceIntPtr *pDev, int id, ClientPtr client,

-		       Mask access_mode, int *xkb_err)

-{

-    DeviceIntPtr dev;

-    int rc;

-

-    rc = _XkbLookupAnyDevice(pDev, id, client, access_mode, xkb_err);

-    if (rc != Success)

-	return rc;

-

-    dev = *pDev;

-    if (!dev->button) {

-	*pDev = NULL;

-	*xkb_err= XkbErr_BadClass;

-	return XkbKeyboardErrorCode;

-    }

-    return Success;

-}

-

-void

-XkbSetActionKeyMods(XkbDescPtr xkb,XkbAction *act,unsigned mods)

-{

-register unsigned	tmp;

-

-    switch (act->type) {

-	case XkbSA_SetMods: case XkbSA_LatchMods: case XkbSA_LockMods:

-	    if (act->mods.flags&XkbSA_UseModMapMods)

-		act->mods.real_mods= act->mods.mask= mods;

-	    if ((tmp= XkbModActionVMods(&act->mods))!=0)

-		act->mods.mask|= XkbMaskForVMask(xkb,tmp);

-	    break;

-	case XkbSA_ISOLock:

-	    if (act->iso.flags&XkbSA_UseModMapMods)

-		act->iso.real_mods= act->iso.mask= mods;

-	    if ((tmp= XkbModActionVMods(&act->iso))!=0)

-		act->iso.mask|= XkbMaskForVMask(xkb,tmp);

-	    break;

-    }

-    return;

-}

-

-unsigned

-XkbMaskForVMask(XkbDescPtr xkb,unsigned vmask)

-{

-register int i,bit;

-register unsigned mask;

-    

-    for (mask=i=0,bit=1;i<XkbNumVirtualMods;i++,bit<<=1) {

-	if (vmask&bit)

-	    mask|= xkb->server->vmods[i];

-    }

-    return mask;

-}

-

-/***====================================================================***/

-

-void

-XkbUpdateKeyTypesFromCore(	DeviceIntPtr	pXDev,

-                                KeySymsPtr      pCore,

-				KeyCode	 	first,

-				CARD8	 	num,

-				XkbChangesPtr	changes)

-{

-XkbDescPtr		xkb;

-unsigned		key,nG,explicit;

-int			types[XkbNumKbdGroups];

-KeySym			tsyms[XkbMaxSymsPerKey],*syms;

-XkbMapChangesPtr	mc;

-

-    xkb= pXDev->key->xkbInfo->desc;

-    if (first+num-1>xkb->max_key_code) {

-	/* 1/12/95 (ef) -- XXX! should allow XKB structures to grow */

-	num= xkb->max_key_code-first+1;

-    }

-

-    mc= (changes?(&changes->map):NULL);

-

-    syms= &pCore->map[(first - pCore->minKeyCode) * pCore->mapWidth];

-    for (key=first; key<(first+num); key++,syms+= pCore->mapWidth) {

-        explicit= xkb->server->explicit[key]&XkbExplicitKeyTypesMask;

-        types[XkbGroup1Index]= XkbKeyKeyTypeIndex(xkb,key,XkbGroup1Index);

-        types[XkbGroup2Index]= XkbKeyKeyTypeIndex(xkb,key,XkbGroup2Index);

-        types[XkbGroup3Index]= XkbKeyKeyTypeIndex(xkb,key,XkbGroup3Index);

-        types[XkbGroup4Index]= XkbKeyKeyTypeIndex(xkb,key,XkbGroup4Index);

-        nG= XkbKeyTypesForCoreSymbols(xkb,pCore->mapWidth,syms,explicit,types,

-									tsyms);

-	XkbChangeTypesOfKey(xkb,key,nG,XkbAllGroupsMask,types,mc);

-	memcpy((char *)XkbKeySymsPtr(xkb,key),(char *)tsyms,

-					XkbKeyNumSyms(xkb,key)*sizeof(KeySym));

-    }

-    if (changes->map.changed&XkbKeySymsMask) {

-	CARD8 oldLast,newLast;

-	oldLast = changes->map.first_key_sym+changes->map.num_key_syms-1;

-	newLast = first+num-1;

-

-	if (first<changes->map.first_key_sym)

-	    changes->map.first_key_sym = first;

-	if (oldLast>newLast)

-	    newLast= oldLast;

-	changes->map.num_key_syms = newLast-changes->map.first_key_sym+1;

-    }

-    else {

-	changes->map.changed|= XkbKeySymsMask;

-	changes->map.first_key_sym = first;

-	changes->map.num_key_syms = num;

-    }

-    return;

-}

-

-void

-XkbUpdateDescActions(	XkbDescPtr		xkb,

-			KeyCode		 	first,

-			CARD8		 	num,

-			XkbChangesPtr	 	changes)

-{

-register unsigned	key;

-

-    for (key=first;key<(first+num);key++) {

-	XkbApplyCompatMapToKey(xkb,key,changes);

-    }

-

-    if (changes->map.changed&(XkbVirtualModMapMask|XkbModifierMapMask)) {

-        unsigned char           newVMods[XkbNumVirtualMods];

-        register  unsigned      bit,i;

-        unsigned                present;

-

-        memset(newVMods, 0, XkbNumVirtualMods);

-        present= 0;

-        for (key=xkb->min_key_code;key<=xkb->max_key_code;key++) {

-            if (xkb->server->vmodmap[key]==0)

-                continue;

-            for (i=0,bit=1;i<XkbNumVirtualMods;i++,bit<<=1) {

-                if (bit&xkb->server->vmodmap[key]) {

-                    present|= bit;

-                    newVMods[i]|= xkb->map->modmap[key];

-                }

-            }

-        }

-        for (i=0,bit=1;i<XkbNumVirtualMods;i++,bit<<=1) {

-            if ((bit&present)&&(newVMods[i]!=xkb->server->vmods[i])) {

-                changes->map.changed|= XkbVirtualModsMask;

-                changes->map.vmods|= bit;

-                xkb->server->vmods[i]= newVMods[i];

-            }

-        }

-    }

-    if (changes->map.changed&XkbVirtualModsMask)

-        XkbApplyVirtualModChanges(xkb,changes->map.vmods,changes);

-

-    if (changes->map.changed&XkbKeyActionsMask) {

-	CARD8 oldLast,newLast;

-	oldLast= changes->map.first_key_act+changes->map.num_key_acts-1;

-	newLast = first+num-1;

-

-	if (first<changes->map.first_key_act)

-	    changes->map.first_key_act = first;

-	if (newLast>oldLast)

-	    newLast= oldLast;

-	changes->map.num_key_acts= newLast-changes->map.first_key_act+1;

-    }

-    else {

-	changes->map.changed|= XkbKeyActionsMask;

-	changes->map.first_key_act = first;

-	changes->map.num_key_acts = num;

-    }

-    return;

-}

-

-void

-XkbUpdateActions(	DeviceIntPtr	 	pXDev,

-			KeyCode		 	first,

-			CARD8		 	num,

-			XkbChangesPtr	 	changes,

-			unsigned *	 	needChecksRtrn,

-			XkbEventCausePtr	cause)

-{

-XkbSrvInfoPtr		xkbi;

-XkbDescPtr		xkb;

-CARD8 *			repeat;

-

-    if (needChecksRtrn)

-	*needChecksRtrn= 0;

-    xkbi= pXDev->key->xkbInfo;

-    xkb= xkbi->desc;

-    repeat= xkb->ctrls->per_key_repeat;

-

-    if (pXDev->kbdfeed)

-	memcpy(repeat,pXDev->kbdfeed->ctrl.autoRepeats,XkbPerKeyBitArraySize);

-

-    XkbUpdateDescActions(xkb,first,num,changes);

-

-    if ((pXDev->kbdfeed)&&

-	(changes->ctrls.enabled_ctrls_changes&XkbPerKeyRepeatMask)) {

-        memcpy(pXDev->kbdfeed->ctrl.autoRepeats,repeat, XkbPerKeyBitArraySize);

-	(*pXDev->kbdfeed->CtrlProc)(pXDev, &pXDev->kbdfeed->ctrl);

-    }

-    return;

-}

-

-KeySymsPtr

-XkbGetCoreMap(DeviceIntPtr keybd)

-{

-register int		key,tmp;

-int			maxSymsPerKey, maxGroup1Width;

-XkbDescPtr		xkb;

-KeySymsPtr              syms;

-int			maxNumberOfGroups;

-

-    if (!keybd || !keybd->key || !keybd->key->xkbInfo)

-	return NULL;

-

-    xkb= keybd->key->xkbInfo->desc;

-    maxSymsPerKey= maxGroup1Width= 0;

-    maxNumberOfGroups = 0;

-

-    /* determine sizes */

-    for (key=xkb->min_key_code;key<=xkb->max_key_code;key++) {

-	if (XkbKeycodeInRange(xkb,key)) {

-	    int	nGroups;

-	    int	w;

-	    nGroups= XkbKeyNumGroups(xkb,key);

-	    tmp= 0;

-	    if (nGroups>0) {

-		if ((w=XkbKeyGroupWidth(xkb,key,XkbGroup1Index))<=2)

-		     tmp+= 2;

-		else tmp+= w + 2;

-                /* remember highest G1 width */

-                if (w > maxGroup1Width)

-                    maxGroup1Width = w;

-	    }

-	    if (nGroups>1) {

-                if (tmp <= 2) {

-		     if ((w=XkbKeyGroupWidth(xkb,key,XkbGroup2Index))<2)

-		          tmp+= 2;

-		     else tmp+= w;

-                } else {

-                     if ((w=XkbKeyGroupWidth(xkb,key,XkbGroup2Index))>2)

-                          tmp+= w - 2;

-                }

-	    }

-	    if (nGroups>2)

-		tmp+= XkbKeyGroupWidth(xkb,key,XkbGroup3Index);

-	    if (nGroups>3)

-		tmp+= XkbKeyGroupWidth(xkb,key,XkbGroup4Index);

-	    if (tmp>maxSymsPerKey)

-		maxSymsPerKey= tmp;

-            if (nGroups > maxNumberOfGroups)

-		maxNumberOfGroups = nGroups;

-	}

-    }

-

-    if (maxSymsPerKey <= 0)

-        return NULL;

-

-    syms = calloc(1, sizeof(*syms));

-    if (!syms)

-        return NULL;

-

-    /* See Section 12.4 of the XKB Protocol spec. Because of the

-     * single-group distribution for multi-group keyboards, we have to

-     * have enough symbols for the largest group 1 to replicate across the

-     * number of groups on the keyboard. e.g. a single-group key with 4

-     * symbols on a keyboard that has 3 groups -> 12 syms per key */

-    if (maxSymsPerKey < maxNumberOfGroups * maxGroup1Width)

-        maxSymsPerKey = maxNumberOfGroups * maxGroup1Width;

-

-    syms->mapWidth = maxSymsPerKey;

-    syms->minKeyCode = xkb->min_key_code;

-    syms->maxKeyCode = xkb->max_key_code;

-

-    tmp = syms->mapWidth * (xkb->max_key_code - xkb->min_key_code + 1);

-    syms->map = calloc(tmp, sizeof(*syms->map));

-    if (!syms->map) {

-        free(syms);

-        return NULL;

-    }

-

-    for (key=xkb->min_key_code;key<=xkb->max_key_code;key++) {

-        KeySym *pCore,*pXKB;

-        unsigned nGroups,groupWidth,n,nOut;

-

-        nGroups= XkbKeyNumGroups(xkb,key);

-        n= (key-xkb->min_key_code)*syms->mapWidth;

-        pCore= &syms->map[n];

-        pXKB= XkbKeySymsPtr(xkb,key);

-        nOut= 2;

-        if (nGroups>0) {

-            groupWidth= XkbKeyGroupWidth(xkb,key,XkbGroup1Index);

-            if (groupWidth>0)   pCore[0]= pXKB[0];

-            if (groupWidth>1)   pCore[1]= pXKB[1];

-            for (n=2;n<groupWidth;n++)

-                pCore[2+n]= pXKB[n];

-            if (groupWidth>2)

-                nOut= groupWidth;

-        }

-

-	/* See XKB Protocol Sec, Section 12.4.

-           A 1-group key with ABCDE on a 2 group keyboard must be

-	   duplicated across all groups as ABABCDECDE.

-	 */

-	if (nGroups == 1)

-	{

-	    int idx, j;

-

-	    groupWidth = XkbKeyGroupWidth(xkb, key, XkbGroup1Index);

-

-	    /* AB..CDE... -> ABABCDE... */

-	    if (groupWidth > 0 && syms->mapWidth >= 3)

-	        pCore[2] = pCore[0];

-	    if (groupWidth > 1 && syms->mapWidth >= 4)

-	        pCore[3] = pCore[1];

-

-	    /* ABABCDE... -> ABABCDECDE */

-	    idx = 2 + groupWidth;

-	    while (groupWidth > 2 && idx < syms->mapWidth &&

-		   idx < groupWidth * 2)

-	    {

-		pCore[idx] = pCore[idx - groupWidth + 2];

-		idx++;

-	    }

-	    idx = 2 * groupWidth;

-	    if (idx < 4)

-		idx = 4;

-	    /* 3 or more groups: ABABCDECDEABCDEABCDE */

-	    for (j = 3; j <= maxNumberOfGroups; j++)

-		for (n = 0; n < groupWidth && idx < maxSymsPerKey; n++)

-		    pCore[idx++] = pXKB[n];

-	}

-

-	pXKB+= XkbKeyGroupsWidth(xkb,key);

-	nOut+= 2;

-	if (nGroups>1) {

-	    groupWidth= XkbKeyGroupWidth(xkb,key,XkbGroup2Index);

-	    if (groupWidth>0)	pCore[2]= pXKB[0];

-	    if (groupWidth>1)	pCore[3]= pXKB[1];

-	    for (n=2;n<groupWidth;n++) {

-		pCore[nOut+(n-2)]= pXKB[n];

-	    }

-	    if (groupWidth>2)

-		nOut+= (groupWidth-2);

-	}

-	pXKB+= XkbKeyGroupsWidth(xkb,key);

-	for (n=XkbGroup3Index;n<nGroups;n++) {

-	    register int s;

-	    groupWidth= XkbKeyGroupWidth(xkb,key,n);

-	    for (s=0;s<groupWidth;s++) {

-		pCore[nOut++]= pXKB[s];

-	    }

-	    pXKB+= XkbKeyGroupsWidth(xkb,key);

-	}

-    }

-

-    return syms;

-}

-

-void

-XkbSetRepeatKeys(DeviceIntPtr pXDev,int key,int onoff)

-{

-    if (pXDev && pXDev->key && pXDev->key->xkbInfo) {

-	xkbControlsNotify	cn;

-	XkbControlsPtr		ctrls = pXDev->key->xkbInfo->desc->ctrls;

-	XkbControlsRec 		old;

-	old = *ctrls;

-

-	if (key== -1) {	/* global autorepeat setting changed */

-	    if (onoff)	ctrls->enabled_ctrls |= XkbRepeatKeysMask;

-	    else	ctrls->enabled_ctrls &= ~XkbRepeatKeysMask;

-	}

-	else if (pXDev->kbdfeed) {

-	    ctrls->per_key_repeat[key/8] = 

-		pXDev->kbdfeed->ctrl.autoRepeats[key/8];

-	}

-	

-	if (XkbComputeControlsNotify(pXDev,&old,ctrls,&cn,TRUE))

-	    XkbSendControlsNotify(pXDev,&cn);

-    }

-    return;

-}

-

-/* Applies a change to a single device, does not traverse the device tree. */

-void

-XkbApplyMappingChange(DeviceIntPtr kbd, KeySymsPtr map, KeyCode first_key,

-                      CARD8 num_keys, CARD8 *modmap, ClientPtr client)

-{

-    XkbDescPtr xkb = kbd->key->xkbInfo->desc;

-    XkbEventCauseRec cause;

-    XkbChangesRec changes;

-    unsigned int check;

-

-    memset(&changes, 0, sizeof(changes));

-    memset(&cause, 0, sizeof(cause));

-

-    if (map && first_key && num_keys) {

-        check = 0;

-        XkbSetCauseCoreReq(&cause, X_ChangeKeyboardMapping, client);

-

-        XkbUpdateKeyTypesFromCore(kbd, map, first_key, num_keys, &changes);

-        XkbUpdateActions(kbd, first_key, num_keys, &changes, &check, &cause);

-

-        if (check)

-            XkbCheckSecondaryEffects(kbd->key->xkbInfo, 1, &changes, &cause);

-    }

-

-    if (modmap) {

-        /* A keymap change can imply a modmap change, se we prefer the

-         * former. */

-        if (!cause.mjr)

-            XkbSetCauseCoreReq(&cause,X_SetModifierMapping,client);

-

-        check = 0;

-        num_keys = xkb->max_key_code - xkb->min_key_code + 1;

-        changes.map.changed |= XkbModifierMapMask;

-        changes.map.first_modmap_key = xkb->min_key_code;

-        changes.map.num_modmap_keys = num_keys;

-        memcpy(kbd->key->xkbInfo->desc->map->modmap, modmap, MAP_LENGTH);

-        XkbUpdateActions(kbd, xkb->min_key_code, num_keys, &changes, &check,

-                         &cause);

-

-        if (check)

-            XkbCheckSecondaryEffects(kbd->key->xkbInfo, 1, &changes, &cause);

-    }

-

-    XkbSendNotification(kbd, &changes, &cause);

-}

-

-void

-XkbDisableComputedAutoRepeats(DeviceIntPtr dev,unsigned key)

-{

-XkbSrvInfoPtr	xkbi = dev->key->xkbInfo;

-xkbMapNotify	mn;

-

-    xkbi->desc->server->explicit[key]|= XkbExplicitAutoRepeatMask;

-    memset(&mn, 0, sizeof(mn));

-    mn.changed= XkbExplicitComponentsMask;

-    mn.firstKeyExplicit= key;

-    mn.nKeyExplicit= 1;

-    XkbSendMapNotify(dev,&mn);

-    return;

-}

-

-unsigned

-XkbStateChangedFlags(XkbStatePtr old,XkbStatePtr new)

-{

-int		changed;

-

-    changed=(old->group!=new->group?XkbGroupStateMask:0);

-    changed|=(old->base_group!=new->base_group?XkbGroupBaseMask:0);

-    changed|=(old->latched_group!=new->latched_group?XkbGroupLatchMask:0);

-    changed|=(old->locked_group!=new->locked_group?XkbGroupLockMask:0);

-    changed|=(old->mods!=new->mods?XkbModifierStateMask:0);

-    changed|=(old->base_mods!=new->base_mods?XkbModifierBaseMask:0);

-    changed|=(old->latched_mods!=new->latched_mods?XkbModifierLatchMask:0);

-    changed|=(old->locked_mods!=new->locked_mods?XkbModifierLockMask:0);

-    changed|=(old->compat_state!=new->compat_state?XkbCompatStateMask:0);

-    changed|=(old->grab_mods!=new->grab_mods?XkbGrabModsMask:0);

-    if (old->compat_grab_mods!=new->compat_grab_mods)

-	changed|= XkbCompatGrabModsMask;

-    changed|=(old->lookup_mods!=new->lookup_mods?XkbLookupModsMask:0);

-    if (old->compat_lookup_mods!=new->compat_lookup_mods)

-	changed|= XkbCompatLookupModsMask;

-    changed|=(old->ptr_buttons!=new->ptr_buttons?XkbPointerButtonMask:0);

-    return changed;

-}

-

-static void

-XkbComputeCompatState(XkbSrvInfoPtr xkbi)

-{

-CARD16 		grp_mask;

-XkbStatePtr	state= &xkbi->state;

-XkbCompatMapPtr	map;

-

-    if (!state || !xkbi->desc || !xkbi->desc->ctrls || !xkbi->desc->compat)

-        return;

-

-    map= xkbi->desc->compat;

-    grp_mask= map->groups[state->group].mask;

-    state->compat_state = state->mods|grp_mask;

-    state->compat_lookup_mods= state->lookup_mods|grp_mask;

-

-    if (xkbi->desc->ctrls->enabled_ctrls&XkbIgnoreGroupLockMask)

-	 grp_mask= map->groups[state->base_group].mask;

-    state->compat_grab_mods= state->grab_mods|grp_mask;

-    return;

-}

-

-unsigned

-XkbAdjustGroup(int group,XkbControlsPtr ctrls)

-{

-unsigned	act;

-

-    act= XkbOutOfRangeGroupAction(ctrls->groups_wrap);

-    if (group<0) {

-	while ( group < 0 )  {

-	    if (act==XkbClampIntoRange) {

-		group= XkbGroup1Index;

-	    }

-	    else if (act==XkbRedirectIntoRange) {

-		int newGroup;

-		newGroup= XkbOutOfRangeGroupNumber(ctrls->groups_wrap);

-		if (newGroup>=ctrls->num_groups)

-		     group= XkbGroup1Index;

-		else group= newGroup;

-	    }

-	    else {

-		group+= ctrls->num_groups;

-	    }

-	}

-    }

-    else if (group>=ctrls->num_groups) {

-	if (act==XkbClampIntoRange) {

-	    group= ctrls->num_groups-1;

-	}

-	else if (act==XkbRedirectIntoRange) {

-	    int newGroup;

-	    newGroup= XkbOutOfRangeGroupNumber(ctrls->groups_wrap);

-	    if (newGroup>=ctrls->num_groups)

-		 group= XkbGroup1Index;

-	    else group= newGroup;

-	}

-	else {

-	    group%= ctrls->num_groups;

-	}

-    }

-    return group;

-}

-

-void

-XkbComputeDerivedState(XkbSrvInfoPtr xkbi)

-{

-XkbStatePtr	state= &xkbi->state;

-XkbControlsPtr	ctrls= xkbi->desc->ctrls;

-unsigned char	grp;

-

-    if (!state || !ctrls)

-        return;

-

-    state->mods= (state->base_mods|state->latched_mods|state->locked_mods);

-    state->lookup_mods= state->mods&(~ctrls->internal.mask);

-    state->grab_mods= state->lookup_mods&(~ctrls->ignore_lock.mask);

-    state->grab_mods|= 

-	((state->base_mods|state->latched_mods)&ctrls->ignore_lock.mask);

-

-

-    grp= state->locked_group;

-    if (grp>=ctrls->num_groups)

-	state->locked_group= XkbAdjustGroup(XkbCharToInt(grp),ctrls);

-

-    grp= state->locked_group+state->base_group+state->latched_group;

-    if (grp>=ctrls->num_groups)

-	 state->group= XkbAdjustGroup(XkbCharToInt(grp),ctrls);

-    else state->group= grp;

-    XkbComputeCompatState(xkbi);

-    return;

-}

-

-/***====================================================================***/

-

-void

-XkbCheckSecondaryEffects(	XkbSrvInfoPtr		xkbi,

-				unsigned		which,

-				XkbChangesPtr 		changes,

-				XkbEventCausePtr	cause)

-{

-    if (which&XkbStateNotifyMask) {

-	XkbStateRec old;

-	old= xkbi->state;

-	changes->state_changes|= XkbStateChangedFlags(&old,&xkbi->state);

-	XkbComputeDerivedState(xkbi);

-    }

-    if (which&XkbIndicatorStateNotifyMask)

-	XkbUpdateIndicators(xkbi->device,XkbAllIndicatorsMask,TRUE,changes,

-									cause);

-    return;

-}

-

-/***====================================================================***/

-

-Bool

-XkbEnableDisableControls(	XkbSrvInfoPtr		xkbi,

-				unsigned long		change,

-				unsigned long		newValues,

-				XkbChangesPtr		changes,

-				XkbEventCausePtr	cause)

-{

-XkbControlsPtr		ctrls;

-unsigned 		old;

-XkbSrvLedInfoPtr	sli;

-

-    ctrls= xkbi->desc->ctrls;

-    old= ctrls->enabled_ctrls;

-    ctrls->enabled_ctrls&= ~change;

-    ctrls->enabled_ctrls|= (change&newValues);

-    if (old==ctrls->enabled_ctrls)

-	return FALSE;

-    if (cause!=NULL) {

-	xkbControlsNotify cn;

-	cn.numGroups= ctrls->num_groups;

-	cn.changedControls= XkbControlsEnabledMask;

-	cn.enabledControls= ctrls->enabled_ctrls;

-	cn.enabledControlChanges= (ctrls->enabled_ctrls^old);

-	cn.keycode= cause->kc;

-	cn.eventType= cause->event;

-	cn.requestMajor= cause->mjr;

-	cn.requestMinor= cause->mnr;

-	XkbSendControlsNotify(xkbi->device,&cn);

-    }

-    else {

-	/* Yes, this really should be an XOR.  If ctrls->enabled_ctrls_changes*/

-	/* is non-zero, the controls in question changed already in "this" */

-	/* request and this change merely undoes the previous one.  By the */

-	/* same token, we have to figure out whether or not ControlsEnabled */

-	/* should be set or not in the changes structure */

-	changes->ctrls.enabled_ctrls_changes^= (ctrls->enabled_ctrls^old);

-	if (changes->ctrls.enabled_ctrls_changes)

-	     changes->ctrls.changed_ctrls|= XkbControlsEnabledMask;

-	else changes->ctrls.changed_ctrls&= ~XkbControlsEnabledMask;

-    }

-    sli= XkbFindSrvLedInfo(xkbi->device,XkbDfltXIClass,XkbDfltXIId,0);

-    XkbUpdateIndicators(xkbi->device,sli->usesControls,TRUE,changes,cause);

-    return TRUE;

-}

-

-/***====================================================================***/

-

-#define	MAX_TOC	16

-

-XkbGeometryPtr

-XkbLookupNamedGeometry(DeviceIntPtr dev,Atom name,Bool *shouldFree)

-{

-XkbSrvInfoPtr	xkbi=	dev->key->xkbInfo;

-XkbDescPtr	xkb=	xkbi->desc;

-

-    *shouldFree= 0;

-    if (name==None) {

-	if (xkb->geom!=NULL)

-	    return xkb->geom;

-	name= xkb->names->geometry;

-    }

-    if ((xkb->geom!=NULL)&&(xkb->geom->name==name))

-	return xkb->geom;

-    *shouldFree= 1;

-    return NULL;

-}

-

-void

-XkbConvertCase(register KeySym sym, KeySym *lower, KeySym *upper)

-{

-    *lower = sym;

-    *upper = sym;

-    switch(sym >> 8) {

-    case 0: /* Latin 1 */

-	if ((sym >= XK_A) && (sym <= XK_Z))

-	    *lower += (XK_a - XK_A);

-	else if ((sym >= XK_a) && (sym <= XK_z))

-	    *upper -= (XK_a - XK_A);

-	else if ((sym >= XK_Agrave) && (sym <= XK_Odiaeresis))

-	    *lower += (XK_agrave - XK_Agrave);

-	else if ((sym >= XK_agrave) && (sym <= XK_odiaeresis))

-	    *upper -= (XK_agrave - XK_Agrave);

-	else if ((sym >= XK_Ooblique) && (sym <= XK_Thorn))

-	    *lower += (XK_oslash - XK_Ooblique);

-	else if ((sym >= XK_oslash) && (sym <= XK_thorn))

-	    *upper -= (XK_oslash - XK_Ooblique);

-	break;

-    case 1: /* Latin 2 */

-	/* Assume the KeySym is a legal value (ignore discontinuities) */

-	if (sym == XK_Aogonek)

-	    *lower = XK_aogonek;

-	else if (sym >= XK_Lstroke && sym <= XK_Sacute)

-	    *lower += (XK_lstroke - XK_Lstroke);

-	else if (sym >= XK_Scaron && sym <= XK_Zacute)

-	    *lower += (XK_scaron - XK_Scaron);

-	else if (sym >= XK_Zcaron && sym <= XK_Zabovedot)

-	    *lower += (XK_zcaron - XK_Zcaron);

-	else if (sym == XK_aogonek)

-	    *upper = XK_Aogonek;

-	else if (sym >= XK_lstroke && sym <= XK_sacute)

-	    *upper -= (XK_lstroke - XK_Lstroke);

-	else if (sym >= XK_scaron && sym <= XK_zacute)

-	    *upper -= (XK_scaron - XK_Scaron);

-	else if (sym >= XK_zcaron && sym <= XK_zabovedot)

-	    *upper -= (XK_zcaron - XK_Zcaron);

-	else if (sym >= XK_Racute && sym <= XK_Tcedilla)

-	    *lower += (XK_racute - XK_Racute);

-	else if (sym >= XK_racute && sym <= XK_tcedilla)

-	    *upper -= (XK_racute - XK_Racute);

-	break;

-    case 2: /* Latin 3 */

-	/* Assume the KeySym is a legal value (ignore discontinuities) */

-	if (sym >= XK_Hstroke && sym <= XK_Hcircumflex)

-	    *lower += (XK_hstroke - XK_Hstroke);

-	else if (sym >= XK_Gbreve && sym <= XK_Jcircumflex)

-	    *lower += (XK_gbreve - XK_Gbreve);

-	else if (sym >= XK_hstroke && sym <= XK_hcircumflex)

-	    *upper -= (XK_hstroke - XK_Hstroke);

-	else if (sym >= XK_gbreve && sym <= XK_jcircumflex)

-	    *upper -= (XK_gbreve - XK_Gbreve);

-	else if (sym >= XK_Cabovedot && sym <= XK_Scircumflex)

-	    *lower += (XK_cabovedot - XK_Cabovedot);

-	else if (sym >= XK_cabovedot && sym <= XK_scircumflex)

-	    *upper -= (XK_cabovedot - XK_Cabovedot);

-	break;

-    case 3: /* Latin 4 */

-	/* Assume the KeySym is a legal value (ignore discontinuities) */

-	if (sym >= XK_Rcedilla && sym <= XK_Tslash)

-	    *lower += (XK_rcedilla - XK_Rcedilla);

-	else if (sym >= XK_rcedilla && sym <= XK_tslash)

-	    *upper -= (XK_rcedilla - XK_Rcedilla);

-	else if (sym == XK_ENG)

-	    *lower = XK_eng;

-	else if (sym == XK_eng)

-	    *upper = XK_ENG;

-	else if (sym >= XK_Amacron && sym <= XK_Umacron)

-	    *lower += (XK_amacron - XK_Amacron);

-	else if (sym >= XK_amacron && sym <= XK_umacron)

-	    *upper -= (XK_amacron - XK_Amacron);

-	break;

-    case 6: /* Cyrillic */

-	/* Assume the KeySym is a legal value (ignore discontinuities) */

-	if (sym >= XK_Serbian_DJE && sym <= XK_Serbian_DZE)

-	    *lower -= (XK_Serbian_DJE - XK_Serbian_dje);

-	else if (sym >= XK_Serbian_dje && sym <= XK_Serbian_dze)

-	    *upper += (XK_Serbian_DJE - XK_Serbian_dje);

-	else if (sym >= XK_Cyrillic_YU && sym <= XK_Cyrillic_HARDSIGN)

-	    *lower -= (XK_Cyrillic_YU - XK_Cyrillic_yu);

-	else if (sym >= XK_Cyrillic_yu && sym <= XK_Cyrillic_hardsign)

-	    *upper += (XK_Cyrillic_YU - XK_Cyrillic_yu);

-        break;

-    case 7: /* Greek */

-	/* Assume the KeySym is a legal value (ignore discontinuities) */

-	if (sym >= XK_Greek_ALPHAaccent && sym <= XK_Greek_OMEGAaccent)

-	    *lower += (XK_Greek_alphaaccent - XK_Greek_ALPHAaccent);

-	else if (sym >= XK_Greek_alphaaccent && sym <= XK_Greek_omegaaccent &&

-		 sym != XK_Greek_iotaaccentdieresis &&

-		 sym != XK_Greek_upsilonaccentdieresis)

-	    *upper -= (XK_Greek_alphaaccent - XK_Greek_ALPHAaccent);

-	else if (sym >= XK_Greek_ALPHA && sym <= XK_Greek_OMEGA)

-	    *lower += (XK_Greek_alpha - XK_Greek_ALPHA);

-	else if (sym >= XK_Greek_alpha && sym <= XK_Greek_omega &&

-		 sym != XK_Greek_finalsmallsigma)

-	    *upper -= (XK_Greek_alpha - XK_Greek_ALPHA);

-        break;

-    }

-}

-

-static Bool

-_XkbCopyClientMap(XkbDescPtr src, XkbDescPtr dst)

-{

-    void *tmp = NULL;

-    int i;

-    XkbKeyTypePtr stype = NULL, dtype = NULL;

-

-    /* client map */

-    if (src->map) {

-        if (!dst->map) {

-            tmp = calloc(1, sizeof(XkbClientMapRec));

-            if (!tmp)

-                return FALSE;

-            dst->map = tmp;

-        }

-

-        if (src->map->syms) {

-            if (src->map->size_syms != dst->map->size_syms) {

-                tmp = realloc(dst->map->syms,

-                              src->map->size_syms * sizeof(KeySym));

-                if (!tmp)

-                    return FALSE;

-                dst->map->syms = tmp;

-

-            }

-            memcpy(dst->map->syms, src->map->syms,

-                   src->map->size_syms * sizeof(KeySym));

-        }

-        else {

-            free(dst->map->syms);

-            dst->map->syms = NULL;

-        }

-        dst->map->num_syms = src->map->num_syms;

-        dst->map->size_syms = src->map->size_syms;

-

-        if (src->map->key_sym_map) {

-            if (src->max_key_code != dst->max_key_code) {

-                tmp = realloc(dst->map->key_sym_map,

-                              (src->max_key_code + 1) * sizeof(XkbSymMapRec));

-                if (!tmp)

-                    return FALSE;

-                dst->map->key_sym_map = tmp;

-            }

-            memcpy(dst->map->key_sym_map, src->map->key_sym_map,

-                   (src->max_key_code + 1) * sizeof(XkbSymMapRec));

-        }

-        else {

-            free(dst->map->key_sym_map);

-            dst->map->key_sym_map = NULL;

-        }

-

-        if (src->map->types && src->map->num_types) {

-            if (src->map->num_types > dst->map->size_types ||

-                !dst->map->types || !dst->map->size_types) {

-                if (dst->map->types && dst->map->size_types) {

-                    tmp = realloc(dst->map->types,

-                                   src->map->num_types * sizeof(XkbKeyTypeRec));

-                    if (!tmp)

-                        return FALSE;

-                    dst->map->types = tmp;

-                    memset(dst->map->types + dst->map->num_types, 0,

-                          (src->map->num_types - dst->map->num_types) *

-                            sizeof(XkbKeyTypeRec));

-                }

-                else {

-                    tmp = calloc(src->map->num_types, sizeof(XkbKeyTypeRec));

-                    if (!tmp)

-                        return FALSE;

-                    dst->map->types = tmp;

-                }

-            }

-            else if (src->map->num_types < dst->map->num_types &&

-                     dst->map->types) {

-                for (i = src->map->num_types, dtype = (dst->map->types + i);

-                     i < dst->map->num_types; i++, dtype++) {

-                    free(dtype->level_names);

-                    dtype->level_names = NULL;

-                    dtype->num_levels = 0;

-                    if (dtype->map_count) {

-                        free(dtype->map);

-                        free(dtype->preserve);

-                    }

-                }

-            }

-

-            stype = src->map->types;

-            dtype = dst->map->types;

-            for (i = 0; i < src->map->num_types; i++, dtype++, stype++) {

-                if (stype->num_levels && stype->level_names) {

-                    if (stype->num_levels != dtype->num_levels &&

-                        dtype->num_levels && dtype->level_names &&

-                        i < dst->map->num_types) {

-                        tmp = realloc(dtype->level_names,

-                                       stype->num_levels * sizeof(Atom));

-                        if (!tmp)

-                            continue;

-                        dtype->level_names = tmp;

-                    }

-                    else if (!dtype->num_levels || !dtype->level_names ||

-                             i >= dst->map->num_types) {

-                        tmp = malloc(stype->num_levels * sizeof(Atom));

-                        if (!tmp)

-                            continue;

-                        dtype->level_names = tmp;

-                    }

-                    dtype->num_levels = stype->num_levels;

-                    memcpy(dtype->level_names, stype->level_names,

-                           stype->num_levels * sizeof(Atom));

-                }

-                else {

-                    if (dtype->num_levels && dtype->level_names &&

-                        i < dst->map->num_types)

-                        free(dtype->level_names);

-                    dtype->num_levels = 0;

-                    dtype->level_names = NULL;

-                }

-

-                dtype->name = stype->name;

-                memcpy(&dtype->mods, &stype->mods, sizeof(XkbModsRec));

-

-                if (stype->map_count) {

-                    if (stype->map) {

-                        if (stype->map_count != dtype->map_count &&

-                            dtype->map_count && dtype->map &&

-                            i < dst->map->num_types) {

-                            tmp = realloc(dtype->map,

-                                           stype->map_count *

-                                             sizeof(XkbKTMapEntryRec));

-                            if (!tmp)

-                                return FALSE;

-                            dtype->map = tmp;

-                        }

-                        else if (!dtype->map_count || !dtype->map ||

-                                 i >= dst->map->num_types) {

-                            tmp = malloc(stype->map_count *

-                                           sizeof(XkbKTMapEntryRec));

-                            if (!tmp)

-                                return FALSE;

-                            dtype->map = tmp;

-                        }

-

-                        memcpy(dtype->map, stype->map,

-                               stype->map_count * sizeof(XkbKTMapEntryRec));

-                    }

-                    else {

-                        if (dtype->map && i < dst->map->num_types)

-                            free(dtype->map);

-                        dtype->map = NULL;

-                    }

-

-                    if (stype->preserve) {

-                        if (stype->map_count != dtype->map_count &&

-                            dtype->map_count && dtype->preserve &&

-                            i < dst->map->num_types) {

-                            tmp = realloc(dtype->preserve,

-                                           stype->map_count *

-                                             sizeof(XkbModsRec));

-                            if (!tmp)

-                                return FALSE;

-                            dtype->preserve = tmp;

-                        }

-                        else if (!dtype->preserve || !dtype->map_count ||

-                                 i >= dst->map->num_types) {

-                            tmp = malloc(stype->map_count *

-                                         sizeof(XkbModsRec));

-                            if (!tmp)

-                                return FALSE;

-                            dtype->preserve = tmp;

-                        }

-

-                        memcpy(dtype->preserve, stype->preserve,

-                               stype->map_count * sizeof(XkbModsRec));

-                    }

-                    else {

-                        if (dtype->preserve && i < dst->map->num_types)

-                            free(dtype->preserve);

-                        dtype->preserve = NULL;

-                    }

-

-                    dtype->map_count = stype->map_count;

-                }

-                else {

-                    if (dtype->map_count && i < dst->map->num_types) {

-                        free(dtype->map);

-                        free(dtype->preserve);

-                    }

-                    dtype->map_count = 0;

-                    dtype->map = NULL;

-                    dtype->preserve = NULL;

-                }

-            }

-

-            dst->map->size_types = src->map->num_types;

-            dst->map->num_types = src->map->num_types;

-        }

-        else {

-            if (dst->map->types) {

-                for (i = 0, dtype = dst->map->types; i < dst->map->num_types;

-                     i++, dtype++) {

-                    free(dtype->level_names);

-                    if (dtype->map && dtype->map_count)

-                        free(dtype->map);

-                    if (dtype->preserve && dtype->map_count)

-                        free(dtype->preserve);

-                }

-            }

-            free(dst->map->types);

-            dst->map->types = NULL;

-            dst->map->num_types = 0;

-            dst->map->size_types = 0;

-        }

-

-        if (src->map->modmap) {

-            if (src->max_key_code != dst->max_key_code) {

-                tmp = realloc(dst->map->modmap, src->max_key_code + 1);

-                if (!tmp)

-                    return FALSE;

-                dst->map->modmap = tmp;

-            }

-            memcpy(dst->map->modmap, src->map->modmap, src->max_key_code + 1);

-        }

-        else {

-            free(dst->map->modmap);

-            dst->map->modmap = NULL;

-        }

-    }

-    else {

-        if (dst->map)

-            XkbFreeClientMap(dst, XkbAllClientInfoMask, TRUE);

-    }

-

-    return TRUE;

-}

-

-static Bool

-_XkbCopyServerMap(XkbDescPtr src, XkbDescPtr dst)

-{

-    void *tmp = NULL;

-

-    /* server map */

-    if (src->server) {

-        if (!dst->server) {

-            tmp = calloc(1, sizeof(XkbServerMapRec));

-            if (!tmp)

-                return FALSE;

-            dst->server = tmp;

-        }

-

-        if (src->server->explicit) {

-            if (src->max_key_code != dst->max_key_code) {

-                tmp = realloc(dst->server->explicit, src->max_key_code + 1);

-                if (!tmp)

-                    return FALSE;

-                dst->server->explicit = tmp;

-            }

-            memcpy(dst->server->explicit, src->server->explicit,

-                   src->max_key_code + 1);

-        }

-        else {

-            free(dst->server->explicit);

-            dst->server->explicit = NULL;

-        }

-

-        if (src->server->acts) {

-            if (src->server->size_acts != dst->server->size_acts) {

-                tmp = realloc(dst->server->acts,

-                              src->server->size_acts * sizeof(XkbAction));

-                if (!tmp)

-                    return FALSE;

-                dst->server->acts = tmp;

-            }

-            memcpy(dst->server->acts, src->server->acts,

-                   src->server->size_acts * sizeof(XkbAction));

-        }

-        else {

-            free(dst->server->acts);

-            dst->server->acts = NULL;

-        }

-       dst->server->size_acts = src->server->size_acts;

-       dst->server->num_acts = src->server->num_acts;

-

-        if (src->server->key_acts) {

-            if (src->max_key_code != dst->max_key_code) {

-                tmp = realloc(dst->server->key_acts,

-                              (src->max_key_code + 1) * sizeof(unsigned short));

-                if (!tmp)

-                    return FALSE;

-                dst->server->key_acts = tmp;

-            }

-            memcpy(dst->server->key_acts, src->server->key_acts,

-                   (src->max_key_code + 1) * sizeof(unsigned short));

-        }

-        else {

-            free(dst->server->key_acts);

-            dst->server->key_acts = NULL;

-        }

-

-        if (src->server->behaviors) {

-            if (src->max_key_code != dst->max_key_code) {

-                tmp = realloc(dst->server->behaviors,

-                              (src->max_key_code + 1) * sizeof(XkbBehavior));

-                if (!tmp)

-                    return FALSE;

-                dst->server->behaviors = tmp;

-            }

-            memcpy(dst->server->behaviors, src->server->behaviors,

-                   (src->max_key_code + 1) * sizeof(XkbBehavior));

-        }

-        else {

-            free(dst->server->behaviors);

-            dst->server->behaviors = NULL;

-        }

-

-        memcpy(dst->server->vmods, src->server->vmods, XkbNumVirtualMods);

-

-        if (src->server->vmodmap) {

-            if (src->max_key_code != dst->max_key_code) {

-                tmp = realloc(dst->server->vmodmap,

-                              (src->max_key_code + 1) * sizeof(unsigned short));

-                if (!tmp)

-                    return FALSE;

-                dst->server->vmodmap = tmp;

-            }

-            memcpy(dst->server->vmodmap, src->server->vmodmap,

-                   (src->max_key_code + 1) * sizeof(unsigned short));

-        }

-        else {

-            free(dst->server->vmodmap);

-            dst->server->vmodmap = NULL;

-        }

-    }

-    else {

-        if (dst->server)

-            XkbFreeServerMap(dst, XkbAllServerInfoMask, TRUE);

-    }

-

-    return TRUE;

-}

-

-static Bool

-_XkbCopyNames(XkbDescPtr src, XkbDescPtr dst)

-{

-    void *tmp = NULL;

-

-    /* names */

-    if (src->names) {

-        if (!dst->names) {

-            dst->names = calloc(1, sizeof(XkbNamesRec));

-            if (!dst->names)

-                return FALSE;

-        }

-

-        if (src->names->keys) {

-            if (src->max_key_code != dst->max_key_code) {

-                tmp = realloc(dst->names->keys,

-                              (src->max_key_code + 1) * sizeof(XkbKeyNameRec));

-                if (!tmp)

-                    return FALSE;

-                dst->names->keys = tmp;

-            }

-            memcpy(dst->names->keys, src->names->keys,

-                   (src->max_key_code + 1) * sizeof(XkbKeyNameRec));

-        }

-        else {

-            free(dst->names->keys);

-            dst->names->keys = NULL;

-        }

-

-        if (src->names->num_key_aliases) {

-            if (src->names->num_key_aliases != dst->names->num_key_aliases) {

-                tmp = realloc(dst->names->key_aliases,

-                              src->names->num_key_aliases *

-                              sizeof(XkbKeyAliasRec));

-                if (!tmp)

-                    return FALSE;

-                dst->names->key_aliases = tmp;

-            }

-            memcpy(dst->names->key_aliases, src->names->key_aliases,

-                   src->names->num_key_aliases * sizeof(XkbKeyAliasRec));

-        }

-        else {

-            free(dst->names->key_aliases);

-            dst->names->key_aliases = NULL;

-        }

-        dst->names->num_key_aliases = src->names->num_key_aliases;

-

-        if (src->names->num_rg) {

-            if (src->names->num_rg != dst->names->num_rg) {

-                tmp = realloc(dst->names->radio_groups,

-                              src->names->num_rg * sizeof(Atom));

-                if (!tmp)

-                    return FALSE;

-                dst->names->radio_groups = tmp;

-            }

-            memcpy(dst->names->radio_groups, src->names->radio_groups,

-                   src->names->num_rg * sizeof(Atom));

-        }

-        else {

-            free(dst->names->radio_groups);

-        }

-        dst->names->num_rg = src->names->num_rg;

-

-        dst->names->keycodes = src->names->keycodes;

-        dst->names->geometry = src->names->geometry;

-        dst->names->symbols = src->names->symbols;

-        dst->names->types = src->names->types;

-        dst->names->compat = src->names->compat;

-        dst->names->phys_symbols = src->names->phys_symbols;

-

-        memcpy(dst->names->vmods, src->names->vmods,

-               XkbNumVirtualMods * sizeof(Atom));

-        memcpy(dst->names->indicators, src->names->indicators,

-               XkbNumIndicators * sizeof(Atom));

-        memcpy(dst->names->groups, src->names->groups,

-               XkbNumKbdGroups * sizeof(Atom));

-    }

-    else {

-        if (dst->names)

-            XkbFreeNames(dst, XkbAllNamesMask, TRUE);

-    }

-

-    return TRUE;

-}

-

-static Bool

-_XkbCopyCompat(XkbDescPtr src, XkbDescPtr dst)

-{

-    void *tmp = NULL;

-

-    /* compat */

-    if (src->compat) {

-        if (!dst->compat) {

-            dst->compat = calloc(1, sizeof(XkbCompatMapRec));

-            if (!dst->compat)

-                return FALSE;

-        }

-

-        if (src->compat->sym_interpret && src->compat->num_si) {

-            if (src->compat->num_si != dst->compat->size_si) {

-                tmp = realloc(dst->compat->sym_interpret,

-                              src->compat->num_si * sizeof(XkbSymInterpretRec));

-                if (!tmp)

-                    return FALSE;

-                dst->compat->sym_interpret = tmp;

-            }

-            memcpy(dst->compat->sym_interpret, src->compat->sym_interpret,

-                   src->compat->num_si * sizeof(XkbSymInterpretRec));

-

-            dst->compat->num_si = src->compat->num_si;

-            dst->compat->size_si = src->compat->num_si;

-        }

-        else {

-            if (dst->compat->sym_interpret && dst->compat->size_si)

-                free(dst->compat->sym_interpret);

-

-            dst->compat->sym_interpret = NULL;

-            dst->compat->num_si = 0;

-            dst->compat->size_si = 0;

-        }

-

-        memcpy(dst->compat->groups, src->compat->groups,

-               XkbNumKbdGroups * sizeof(XkbModsRec));

-    }

-    else {

-        if (dst->compat)

-            XkbFreeCompatMap(dst, XkbAllCompatMask, TRUE);

-    }

-

-    return TRUE;

-}

-

-static Bool

-_XkbCopyGeom(XkbDescPtr src, XkbDescPtr dst)

-{

-    void *tmp = NULL;

-    int i = 0, j = 0, k = 0;

-    XkbColorPtr scolor = NULL, dcolor = NULL;

-    XkbDoodadPtr sdoodad = NULL, ddoodad = NULL;

-    XkbOutlinePtr soutline = NULL, doutline = NULL;

-    XkbPropertyPtr sprop = NULL, dprop = NULL;

-    XkbRowPtr srow = NULL, drow = NULL;

-    XkbSectionPtr ssection = NULL, dsection = NULL;

-    XkbShapePtr sshape = NULL, dshape = NULL;

-

-    /* geometry */

-    if (src->geom) {

-        if (!dst->geom) {

-            dst->geom = calloc(sizeof(XkbGeometryRec), 1);

-            if (!dst->geom)

-                return FALSE;

-        }

-

-        /* properties */

-        if (src->geom->num_properties) {

-            if (src->geom->num_properties != dst->geom->sz_properties) {

-                /* If we've got more properties in the destination than

-                 * the source, run through and free all the excess ones

-                 * first. */

-                if (src->geom->num_properties < dst->geom->sz_properties) {

-                    for (i = src->geom->num_properties,

-                         dprop = dst->geom->properties + i;

-                         i < dst->geom->num_properties;

-                         i++, dprop++) {

-                        free(dprop->name);

-                        free(dprop->value);

-                    }

-                }

-

-                if (dst->geom->sz_properties)

-                    tmp = realloc(dst->geom->properties,

-                                   src->geom->num_properties *

-                                    sizeof(XkbPropertyRec));

-                else

-                    tmp = malloc(src->geom->num_properties *

-                                  sizeof(XkbPropertyRec));

-                if (!tmp)

-                    return FALSE;

-                dst->geom->properties = tmp;

-            }

-

-            /* We don't set num_properties as we need it to try and avoid

-             * too much reallocing. */

-            dst->geom->sz_properties = src->geom->num_properties;

-

-            if (dst->geom->sz_properties > dst->geom->num_properties) {

-                memset(dst->geom->properties + dst->geom->num_properties, 0,

-                      (dst->geom->sz_properties - dst->geom->num_properties) *

-                      sizeof(XkbPropertyRec));

-            }

-

-            for (i = 0,

-                  sprop = src->geom->properties,

-                  dprop = dst->geom->properties;

-                 i < src->geom->num_properties;

-                 i++, sprop++, dprop++) {

-                if (i < dst->geom->num_properties) {

-                    if (strlen(sprop->name) != strlen(dprop->name)) {

-                        tmp = realloc(dprop->name, strlen(sprop->name) + 1);

-                        if (!tmp)

-                            return FALSE;

-                        dprop->name = tmp;

-                    }

-                    if (strlen(sprop->value) != strlen(dprop->value)) {

-                        tmp = realloc(dprop->value, strlen(sprop->value) + 1);

-                        if (!tmp)

-                            return FALSE;

-                        dprop->value = tmp;

-                    }

-                    strcpy(dprop->name, sprop->name);

-                    strcpy(dprop->value, sprop->value);

-                }

-                else {

-                    dprop->name = xstrdup(sprop->name);

-                    dprop->value = xstrdup(sprop->value);

-                }

-            }

-

-            /* ... which is already src->geom->num_properties. */

-            dst->geom->num_properties = dst->geom->sz_properties;

-        }

-        else {

-            if (dst->geom->sz_properties) {

-                for (i = 0, dprop = dst->geom->properties;

-                     i < dst->geom->num_properties;

-                     i++, dprop++) {

-                    free(dprop->name);

-                    free(dprop->value);

-                }

-                free(dst->geom->properties);

-                dst->geom->properties = NULL;

-            }

-

-            dst->geom->num_properties = 0;

-            dst->geom->sz_properties = 0;

-        }

-

-        /* colors */

-        if (src->geom->num_colors) {

-            if (src->geom->num_colors != dst->geom->sz_colors) {

-                if (src->geom->num_colors < dst->geom->sz_colors) {

-                    for (i = src->geom->num_colors,

-                         dcolor = dst->geom->colors + i;

-                         i < dst->geom->num_colors;

-                         i++, dcolor++) {

-                        free(dcolor->spec);

-                    }

-                }

-

-                if (dst->geom->sz_colors)

-                    tmp = realloc(dst->geom->colors,

-                                   src->geom->num_colors *

-                                    sizeof(XkbColorRec));

-                else

-                    tmp = malloc(src->geom->num_colors *

-                                  sizeof(XkbColorRec));

-                if (!tmp)

-                    return FALSE;

-                dst->geom->colors = tmp;

-            }

-

-            dst->geom->sz_colors = src->geom->num_colors;

-

-            if (dst->geom->sz_colors > dst->geom->num_colors) {

-                memset(dst->geom->colors + dst->geom->num_colors, 0,

-                      (dst->geom->sz_colors - dst->geom->num_colors) *

-                      sizeof(XkbColorRec));

-            }

-

-            for (i = 0,

-                  scolor = src->geom->colors,

-                  dcolor = dst->geom->colors;

-                 i < src->geom->num_colors;

-                 i++, scolor++, dcolor++) {

-                if (i < dst->geom->num_colors) {

-                    if (strlen(scolor->spec) != strlen(dcolor->spec)) {

-                        tmp = realloc(dcolor->spec, strlen(scolor->spec) + 1);

-                        if (!tmp)

-                            return FALSE;

-                        dcolor->spec = tmp;

-                    }

-                    strcpy(dcolor->spec, scolor->spec);

-                }

-                else {

-                    dcolor->spec = xstrdup(scolor->spec);

-                }

-                dcolor->pixel = scolor->pixel;

-            }

-

-            dst->geom->num_colors = dst->geom->sz_colors;

-        }

-        else {

-            if (dst->geom->sz_colors) {

-                for (i = 0, dcolor = dst->geom->colors;

-                     i < dst->geom->num_colors;

-                     i++, dcolor++) {

-                    free(dcolor->spec);

-                }

-                free(dst->geom->colors);

-                dst->geom->colors = NULL;

-            }

-

-            dst->geom->num_colors = 0;

-            dst->geom->sz_colors = 0;

-        }

-

-        /* shapes */

-        /* shapes break down into outlines, which break down into points. */

-        if (dst->geom->num_shapes) {

-            for (i = 0, dshape = dst->geom->shapes;

-                 i < dst->geom->num_shapes;

-                 i++, dshape++) {

-                for (j = 0, doutline = dshape->outlines;

-                     j < dshape->num_outlines;

-                     j++, doutline++) {

-                    if (doutline->sz_points)

-                        free(doutline->points);

-                }

-

-                if (dshape->sz_outlines) {

-                    free(dshape->outlines);

-                    dshape->outlines = NULL;

-                }

-

-                dshape->num_outlines = 0;

-                dshape->sz_outlines = 0;

-            }

-        }

-

-        if (src->geom->num_shapes) {

-            tmp = calloc(src->geom->num_shapes, sizeof(XkbShapeRec));

-            if (!tmp)

-                return FALSE;

-            dst->geom->shapes = tmp;

-

-            for (i = 0, sshape = src->geom->shapes, dshape = dst->geom->shapes;

-                 i < src->geom->num_shapes;

-                 i++, sshape++, dshape++) {

-                if (sshape->num_outlines) {

-                    tmp = calloc(sshape->num_outlines, sizeof(XkbOutlineRec));

-                    if (!tmp)

-                        return FALSE;

-                    dshape->outlines = tmp;

-                    

-                    for (j = 0,

-                          soutline = sshape->outlines,

-                          doutline = dshape->outlines;

-                         j < sshape->num_outlines;

-                         j++, soutline++, doutline++) {

-                        if (soutline->num_points) {

-                            tmp = malloc(soutline->num_points *

-                                          sizeof(XkbPointRec));

-                            if (!tmp)

-                                return FALSE;

-                            doutline->points = tmp;

-

-                            memcpy(doutline->points, soutline->points,

-                                   soutline->num_points * sizeof(XkbPointRec));

-

-                            doutline->corner_radius = soutline->corner_radius;

-                        }

-

-                        doutline->num_points = soutline->num_points;

-                        doutline->sz_points = soutline->num_points;

-                    }

-                }

-

-                dshape->num_outlines = sshape->num_outlines;

-                dshape->sz_outlines = sshape->num_outlines;

-                dshape->name = sshape->name;

-                dshape->bounds = sshape->bounds;

-

-                dshape->approx = NULL;

-                if (sshape->approx && sshape->num_outlines > 0) {

-

-                    const ptrdiff_t approx_idx =

-                            sshape->approx - sshape->outlines;

-

-                    if (approx_idx < dshape->num_outlines) {

-                            dshape->approx = dshape->outlines + approx_idx;

-                    } else {

-                            LogMessage(X_WARNING, "XKB: approx outline "

-                                            "index is out of range\n");

-                    }

-                }

-

-                dshape->primary = NULL;

-                if (sshape->primary && sshape->num_outlines > 0) {

-

-                    const ptrdiff_t primary_idx =

-                            sshape->primary - sshape->outlines;

-

-                    if (primary_idx < dshape->num_outlines) {

-                            dshape->primary = dshape->outlines + primary_idx;

-                    } else {

-                            LogMessage(X_WARNING, "XKB: primary outline "

-                                            "index is out of range\n");

-                    }

-                }

-            }

-

-            dst->geom->num_shapes = src->geom->num_shapes;

-            dst->geom->sz_shapes = src->geom->num_shapes;

-        }

-        else {

-            if (dst->geom->sz_shapes) {

-                free(dst->geom->shapes);

-            }

-            dst->geom->shapes = NULL;

-            dst->geom->num_shapes = 0;

-            dst->geom->sz_shapes = 0;

-        }

-

-        /* sections */

-        /* sections break down into doodads, and also into rows, which break

-         * down into keys. */

-        if (dst->geom->num_sections) {

-            for (i = 0, dsection = dst->geom->sections;

-                 i < dst->geom->num_sections;

-                 i++, dsection++) {

-                for (j = 0, drow = dsection->rows;

-                     j < dsection->num_rows;

-                     j++, drow++) {

-                    if (drow->num_keys)

-                        free(drow->keys);

-                }

-

-                if (dsection->num_rows)

-                    free(dsection->rows);

-

-                /* cut and waste from geom/doodad below. */

-                for (j = 0, ddoodad = dsection->doodads;

-                     j < dsection->num_doodads;

-                     j++, ddoodad++) {

-                    if (ddoodad->any.type == XkbTextDoodad) {

-                        free(ddoodad->text.text);

-                        ddoodad->text.text = NULL;

-                        free(ddoodad->text.font);

-                        ddoodad->text.font = NULL;

-                     }

-                     else if (ddoodad->any.type == XkbLogoDoodad) {

-                         free(ddoodad->logo.logo_name);

-                         ddoodad->logo.logo_name = NULL;

-                    }

-                }

-

-                free(dsection->doodads);

-            }

-

-            dst->geom->num_sections = 0;

-            dst->geom->sections = NULL;

-        }

-

-        if (src->geom->num_sections) {

-            if (dst->geom->sz_sections)

-                tmp = realloc(dst->geom->sections,

-                               src->geom->num_sections *

-                                sizeof(XkbSectionRec));

-            else

-                tmp = malloc(src->geom->num_sections * sizeof(XkbSectionRec));

-            if (!tmp)

-                return FALSE;

-            memset(tmp, 0, src->geom->num_sections * sizeof(XkbSectionRec));

-            dst->geom->sections = tmp;

-            dst->geom->num_sections = src->geom->num_sections;

-            dst->geom->sz_sections = src->geom->num_sections;

-

-            for (i = 0,

-                  ssection = src->geom->sections,

-                  dsection = dst->geom->sections;

-                 i < src->geom->num_sections;

-                 i++, ssection++, dsection++) {

-                *dsection = *ssection;

-                if (ssection->num_rows) {

-                    tmp = calloc(ssection->num_rows, sizeof(XkbRowRec));

-                    if (!tmp)

-                        return FALSE;

-                    dsection->rows = tmp;

-                }

-                dsection->num_rows = ssection->num_rows;

-                dsection->sz_rows = ssection->num_rows;

-

-                for (j = 0, srow = ssection->rows, drow = dsection->rows;

-                     j < ssection->num_rows;

-                     j++, srow++, drow++) {

-                    if (srow->num_keys) {

-                        tmp = malloc(srow->num_keys * sizeof(XkbKeyRec));

-                        if (!tmp)

-                            return FALSE;

-                        drow->keys = tmp;

-                        memcpy(drow->keys, srow->keys,

-                               srow->num_keys * sizeof(XkbKeyRec));

-                    }

-                    drow->num_keys = srow->num_keys;

-                    drow->sz_keys = srow->num_keys;

-                    drow->top = srow->top;

-                    drow->left = srow->left;

-                    drow->vertical = srow->vertical;

-                    drow->bounds = srow->bounds;

-                }

-

-                if (ssection->num_doodads) {

-                    tmp = calloc(ssection->num_doodads, sizeof(XkbDoodadRec));

-                    if (!tmp)

-                        return FALSE;

-                    dsection->doodads = tmp;

-                }

-                else {

-                    dsection->doodads = NULL;

-                }

-

-                dsection->sz_doodads = ssection->num_doodads;

-                for (k = 0,

-                      sdoodad = ssection->doodads,

-                      ddoodad = dsection->doodads;

-                     k < ssection->num_doodads;

-                     k++, sdoodad++, ddoodad++) {

-                    memcpy(ddoodad , sdoodad, sizeof(XkbDoodadRec));

-                    if (sdoodad->any.type == XkbTextDoodad) {

-                        if (sdoodad->text.text)

-                            ddoodad->text.text =

-                             strdup(sdoodad->text.text);

-                        if (sdoodad->text.font)

-                            ddoodad->text.font =

-                             strdup(sdoodad->text.font);

-                    }

-                    else if (sdoodad->any.type == XkbLogoDoodad) {

-                        if (sdoodad->logo.logo_name)

-                            ddoodad->logo.logo_name =

-                             strdup(sdoodad->logo.logo_name);

-                    }

-                }

-                dsection->overlays = NULL;

-                dsection->sz_overlays = 0;

-                dsection->num_overlays = 0;

-            }

-        }

-        else {

-            if (dst->geom->sz_sections) {

-                free(dst->geom->sections);

-            }

-

-            dst->geom->sections = NULL;

-            dst->geom->num_sections = 0;

-            dst->geom->sz_sections = 0;

-        }

-

-        /* doodads */

-        if (dst->geom->num_doodads) {

-            for (i = src->geom->num_doodads,

-                  ddoodad = dst->geom->doodads +

-                             src->geom->num_doodads;

-                 i < dst->geom->num_doodads;

-                 i++, ddoodad++) {

-                 if (ddoodad->any.type == XkbTextDoodad) {

-                     free(ddoodad->text.text);

-                     ddoodad->text.text = NULL;

-                     free(ddoodad->text.font);

-                     ddoodad->text.font = NULL;

-                 }

-                 else if (ddoodad->any.type == XkbLogoDoodad) {

-                     free(ddoodad->logo.logo_name);

-                     ddoodad->logo.logo_name = NULL;

-                }

-            }

-            dst->geom->num_doodads = 0;

-            dst->geom->doodads = NULL;

-        }

-

-        if (src->geom->num_doodads) {

-            if (dst->geom->sz_doodads)

-                tmp = realloc(dst->geom->doodads,

-                               src->geom->num_doodads *

-                                sizeof(XkbDoodadRec));

-            else

-                tmp = malloc(src->geom->num_doodads *

-                              sizeof(XkbDoodadRec));

-            if (!tmp)

-                return FALSE;

-            memset(tmp, 0, src->geom->num_doodads * sizeof(XkbDoodadRec));

-            dst->geom->doodads = tmp;

-

-            dst->geom->sz_doodads = src->geom->num_doodads;

-

-            for (i = 0,

-                  sdoodad = src->geom->doodads,

-                  ddoodad = dst->geom->doodads;

-                 i < src->geom->num_doodads;

-                 i++, sdoodad++, ddoodad++) {

-                memcpy(ddoodad , sdoodad, sizeof(XkbDoodadRec));

-                if (sdoodad->any.type == XkbTextDoodad) {

-                    if (sdoodad->text.text)

-                        ddoodad->text.text = strdup(sdoodad->text.text);

-                    if (sdoodad->text.font)

-                        ddoodad->text.font = strdup(sdoodad->text.font);

-                }

-                else if (sdoodad->any.type == XkbLogoDoodad) {

-                    if (sdoodad->logo.logo_name)

-                        ddoodad->logo.logo_name =

-                          strdup(sdoodad->logo.logo_name);

-                }

-            }

-

-            dst->geom->num_doodads = dst->geom->sz_doodads;

-        }

-        else {

-            if (dst->geom->sz_doodads) {

-                free(dst->geom->doodads);

-            }

-

-            dst->geom->doodads = NULL;

-            dst->geom->num_doodads = 0;

-            dst->geom->sz_doodads = 0;

-        }

-

-        /* key aliases */

-        if (src->geom->num_key_aliases) {

-            if (src->geom->num_key_aliases != dst->geom->sz_key_aliases) {

-                if (dst->geom->sz_key_aliases)

-                    tmp = realloc(dst->geom->key_aliases,

-                                   src->geom->num_key_aliases *

-                                    2 * XkbKeyNameLength);

-                else

-                    tmp = malloc(src->geom->num_key_aliases *

-                                  2 * XkbKeyNameLength);

-                if (!tmp)

-                    return FALSE;

-                dst->geom->key_aliases = tmp;

-

-                dst->geom->sz_key_aliases = src->geom->num_key_aliases;

-            }

-

-            memcpy(dst->geom->key_aliases, src->geom->key_aliases,

-                   src->geom->num_key_aliases * 2 * XkbKeyNameLength);

-

-            dst->geom->num_key_aliases = dst->geom->sz_key_aliases;

-        }

-        else {

-            free(dst->geom->key_aliases);

-            dst->geom->key_aliases = NULL;

-            dst->geom->num_key_aliases = 0;

-            dst->geom->sz_key_aliases = 0;

-        }

-        

-        /* font */

-        if (src->geom->label_font) {

-            if (!dst->geom->label_font) {

-                tmp = malloc(strlen(src->geom->label_font) + 1);

-                if (!tmp)

-                    return FALSE;

-                dst->geom->label_font = tmp;

-            }

-            else if (strlen(src->geom->label_font) !=

-                strlen(dst->geom->label_font)) {

-                tmp = realloc(dst->geom->label_font,

-                               strlen(src->geom->label_font) + 1);

-                if (!tmp)

-                    return FALSE;

-                dst->geom->label_font = tmp;

-            }

-

-            strcpy(dst->geom->label_font, src->geom->label_font);

-            i = XkbGeomColorIndex(src->geom, src->geom->label_color);

-            dst->geom->label_color = &(dst->geom->colors[i]);

-            i = XkbGeomColorIndex(src->geom, src->geom->base_color);

-            dst->geom->base_color = &(dst->geom->colors[i]);

-        }

-        else {

-            free(dst->geom->label_font);

-            dst->geom->label_font = NULL;

-            dst->geom->label_color = NULL;

-            dst->geom->base_color = NULL;

-        }

-

-        dst->geom->name = src->geom->name;

-        dst->geom->width_mm = src->geom->width_mm;

-        dst->geom->height_mm = src->geom->height_mm;

-    }

-    else

-    {

-        if (dst->geom) {

-            /* I LOVE THE DIFFERENT CALL SIGNATURE.  REALLY, I DO. */

-            XkbFreeGeometry(dst->geom, XkbGeomAllMask, TRUE);

-            dst->geom = NULL;

-        }

-    }

-

-    return TRUE;

-}

-

-static Bool

-_XkbCopyIndicators(XkbDescPtr src, XkbDescPtr dst)

-{

-    /* indicators */

-    if (src->indicators) {

-        if (!dst->indicators) {

-            dst->indicators = malloc(sizeof(XkbIndicatorRec));

-            if (!dst->indicators)

-                return FALSE;

-        }

-        memcpy(dst->indicators, src->indicators, sizeof(XkbIndicatorRec));

-    }

-    else {

-        free(dst->indicators);

-        dst->indicators = NULL;

-    }

-    return TRUE;

-}

-

-static Bool

-_XkbCopyControls(XkbDescPtr src, XkbDescPtr dst)

-{

-    /* controls */

-    if (src->ctrls) {

-        if (!dst->ctrls) {

-            dst->ctrls = malloc(sizeof(XkbControlsRec));

-            if (!dst->ctrls)

-                return FALSE;

-        }

-        memcpy(dst->ctrls, src->ctrls, sizeof(XkbControlsRec));

-    }

-    else {

-        free(dst->ctrls);

-        dst->ctrls = NULL;

-    }

-    return TRUE;

-}

-

-/**

- * Copy an XKB map from src to dst, reallocating when necessary: if some

- * map components are present in one, but not in the other, the destination

- * components will be allocated or freed as necessary.

- *

- * Basic map consistency is assumed on both sides, so maps with random

- * uninitialised data (e.g. names->radio_grous == NULL, names->num_rg == 19)

- * _will_ cause failures.  You've been warned.

- *

- * Returns TRUE on success, or FALSE on failure.  If this function fails,

- * dst may be in an inconsistent state: all its pointers are guaranteed

- * to remain valid, but part of the map may be from src and part from dst.

- *

- */

-

-Bool

-XkbCopyKeymap(XkbDescPtr dst, XkbDescPtr src)

-{

-

-    if (!src || !dst) {

-        DebugF("XkbCopyKeymap: src (%p) or dst (%p) is NULL\n", src, dst);

-        return FALSE;

-    }

-

-    if (src == dst)

-        return TRUE;

-

-    if (!_XkbCopyClientMap(src, dst)) {

-        DebugF("XkbCopyKeymap: failed to copy client map\n");

-        return FALSE;

-    }

-    if (!_XkbCopyServerMap(src, dst)) {

-        DebugF("XkbCopyKeymap: failed to copy server map\n");

-        return FALSE;

-    }

-    if (!_XkbCopyIndicators(src, dst)) {

-        DebugF("XkbCopyKeymap: failed to copy indicators\n");

-        return FALSE;

-    }

-    if (!_XkbCopyControls(src, dst)) {

-        DebugF("XkbCopyKeymap: failed to copy controls\n");

-        return FALSE;

-    }

-    if (!_XkbCopyNames(src, dst)) {

-        DebugF("XkbCopyKeymap: failed to copy names\n");

-        return FALSE;

-    }

-    if (!_XkbCopyCompat(src, dst)) {

-        DebugF("XkbCopyKeymap: failed to copy compat map\n");

-        return FALSE;

-    }

-    if (!_XkbCopyGeom(src, dst)) {

-        DebugF("XkbCopyKeymap: failed to copy geometry\n");

-        return FALSE;

-    }

-

-    dst->min_key_code = src->min_key_code;

-    dst->max_key_code = src->max_key_code;

-

-    return TRUE;

-}

-

-Bool

-XkbCopyDeviceKeymap(DeviceIntPtr dst, DeviceIntPtr src)

-{

-    xkbNewKeyboardNotify nkn;

-    Bool ret;

-

-    if (!dst->key || !src->key)

-        return FALSE;

-

-    memset(&nkn, 0, sizeof(xkbNewKeyboardNotify));

-    nkn.oldMinKeyCode = dst->key->xkbInfo->desc->min_key_code;

-    nkn.oldMaxKeyCode = dst->key->xkbInfo->desc->max_key_code;

-    nkn.deviceID = dst->id;

-    nkn.oldDeviceID = dst->id; /* maybe src->id? */

-    nkn.minKeyCode = src->key->xkbInfo->desc->min_key_code;

-    nkn.maxKeyCode = src->key->xkbInfo->desc->max_key_code;

-    nkn.requestMajor = XkbReqCode;

-    nkn.requestMinor = X_kbSetMap; /* Near enough's good enough. */

-    nkn.changed = XkbNKN_KeycodesMask;

-    if (src->key->xkbInfo->desc->geom)

-        nkn.changed |= XkbNKN_GeometryMask;

-

-    ret = XkbCopyKeymap(dst->key->xkbInfo->desc, src->key->xkbInfo->desc);

-    if (ret)

-        XkbSendNewKeyboardNotify(dst, &nkn);

-

-    return ret;

-}

-

-int

-XkbGetEffectiveGroup(XkbSrvInfoPtr xkbi, XkbStatePtr xkbState, CARD8 keycode)

-{

-    XkbDescPtr xkb = xkbi->desc;

-    int effectiveGroup = xkbState->group;

-

-    if (!XkbKeycodeInRange(xkb, keycode))

-        return -1;

-

-    if (effectiveGroup == XkbGroup1Index)

-        return effectiveGroup;

-

-    if (XkbKeyNumGroups(xkb,keycode) > 1U) {

-        if (effectiveGroup >= XkbKeyNumGroups(xkb,keycode)) {

-            unsigned int gi = XkbKeyGroupInfo(xkb,keycode);

-            switch (XkbOutOfRangeGroupAction(gi)) {

-                default:

-                case XkbWrapIntoRange:

-                    effectiveGroup %= XkbKeyNumGroups(xkb, keycode);

-                    break;

-                case XkbClampIntoRange:

-                    effectiveGroup = XkbKeyNumGroups(xkb, keycode) - 1;

-                    break;

-                case XkbRedirectIntoRange:

-                    effectiveGroup = XkbOutOfRangeGroupInfo(gi);

-                    if (effectiveGroup >= XkbKeyNumGroups(xkb, keycode))

-                        effectiveGroup = 0;

-                    break;

-            }

-        }

-    }

-    else effectiveGroup = XkbGroup1Index;

-

-    return effectiveGroup;

-}

-

-/* Merge the lockedPtrButtons from all attached SDs for the given master

- * device into the MD's state.

- */

-void

-XkbMergeLockedPtrBtns(DeviceIntPtr master)

-{

-    DeviceIntPtr d = inputInfo.devices;

-    XkbSrvInfoPtr xkbi = NULL;

-

-    if (!IsMaster(master))

-        return;

-

-    if (!master->key)

-        return;

-

-    xkbi = master->key->xkbInfo;

-    xkbi->lockedPtrButtons = 0;

-

-    for (; d; d = d->next) {

-        if (IsMaster(d) || GetMaster(d, MASTER_KEYBOARD) != master || !d->key)

-            continue;

-

-        xkbi->lockedPtrButtons |= d->key->xkbInfo->lockedPtrButtons;

-    }

-}

+/************************************************************
+Copyright (c) 1993 by Silicon Graphics Computer Systems, Inc.
+
+Permission to use, copy, modify, and distribute this
+software and its documentation for any purpose and without
+fee is hereby granted, provided that the above copyright
+notice appear in all copies and that both that copyright
+notice and this permission notice appear in supporting
+documentation, and that the name of Silicon Graphics not be 
+used in advertising or publicity pertaining to distribution 
+of the software without specific prior written permission.
+Silicon Graphics makes no representation about the suitability 
+of this software for any purpose. It is provided "as is"
+without any express or implied warranty.
+
+SILICON GRAPHICS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS 
+SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY 
+AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL SILICON
+GRAPHICS BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL 
+DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, 
+DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE 
+OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION  WITH
+THE USE OR PERFORMANCE OF THIS SOFTWARE.
+
+********************************************************/
+/*
+
+Copyright © 2008 Red Hat Inc.
+
+Permission is hereby granted, free of charge, to any person obtaining a
+copy of this software and associated documentation files (the "Software"),
+to deal in the Software without restriction, including without limitation
+the rights to use, copy, modify, merge, publish, distribute, sublicense,
+and/or sell copies of the Software, and to permit persons to whom the
+Software is furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice (including the next
+paragraph) shall be included in all copies or substantial portions of the
+Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
+THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+DEALINGS IN THE SOFTWARE.
+
+*/
+
+#ifdef HAVE_DIX_CONFIG_H
+#include <dix-config.h>
+#endif
+
+#include "os.h"
+#include <stdio.h>
+#include <ctype.h>
+#include <math.h>
+#include <X11/X.h>
+#include <X11/Xproto.h>
+#define	XK_CYRILLIC
+#include <X11/keysym.h>
+#include "misc.h"
+#include "inputstr.h"
+#include "eventstr.h"
+
+#define	XKBSRV_NEED_FILE_FUNCS
+#include <xkbsrv.h>
+#include "xkbgeom.h"
+#include "xkb.h"
+
+/***====================================================================***/
+
+int
+_XkbLookupAnyDevice(DeviceIntPtr *pDev, int id, ClientPtr client,
+		    Mask access_mode, int *xkb_err)
+{
+    int rc = XkbKeyboardErrorCode;
+
+    if (id == XkbUseCoreKbd)
+        id = PickKeyboard(client)->id;
+    else if (id == XkbUseCorePtr)
+        id = PickPointer(client)->id;
+
+    rc = dixLookupDevice(pDev, id, client, access_mode);
+    if (rc != Success)
+	*xkb_err = XkbErr_BadDevice;
+
+    return rc;
+}
+
+int
+_XkbLookupKeyboard(DeviceIntPtr *pDev, int id, ClientPtr client,
+		   Mask access_mode, int *xkb_err)
+{
+    DeviceIntPtr dev;
+    int rc;
+
+    if (id == XkbDfltXIId)
+        id = XkbUseCoreKbd;
+
+    rc = _XkbLookupAnyDevice(pDev, id, client, access_mode, xkb_err);
+    if (rc != Success)
+	return rc;
+
+    dev = *pDev;
+    if (!dev->key || !dev->key->xkbInfo) {
+	*pDev = NULL;
+	*xkb_err= XkbErr_BadClass;
+	return XkbKeyboardErrorCode;
+    }
+    return Success;
+}
+
+int
+_XkbLookupBellDevice(DeviceIntPtr *pDev, int id, ClientPtr client,
+		     Mask access_mode, int *xkb_err)
+{
+    DeviceIntPtr dev;
+    int rc;
+
+    rc = _XkbLookupAnyDevice(pDev, id, client, access_mode, xkb_err);
+    if (rc != Success)
+	return rc;
+
+    dev = *pDev;
+    if (!dev->kbdfeed && !dev->bell) {
+	*pDev = NULL;
+	*xkb_err= XkbErr_BadClass;
+	return XkbKeyboardErrorCode;
+    }
+    return Success;
+}
+
+int
+_XkbLookupLedDevice(DeviceIntPtr *pDev, int id, ClientPtr client,
+		    Mask access_mode, int *xkb_err)
+{
+    DeviceIntPtr dev;
+    int rc;
+
+    if (id == XkbDfltXIId)
+        id = XkbUseCorePtr;
+
+    rc = _XkbLookupAnyDevice(pDev, id, client, access_mode, xkb_err);
+    if (rc != Success)
+	return rc;
+
+    dev = *pDev;
+    if (!dev->kbdfeed && !dev->leds) {
+	*pDev = NULL;
+	*xkb_err= XkbErr_BadClass;
+	return XkbKeyboardErrorCode;
+    }
+    return Success;
+}
+
+int
+_XkbLookupButtonDevice(DeviceIntPtr *pDev, int id, ClientPtr client,
+		       Mask access_mode, int *xkb_err)
+{
+    DeviceIntPtr dev;
+    int rc;
+
+    rc = _XkbLookupAnyDevice(pDev, id, client, access_mode, xkb_err);
+    if (rc != Success)
+	return rc;
+
+    dev = *pDev;
+    if (!dev->button) {
+	*pDev = NULL;
+	*xkb_err= XkbErr_BadClass;
+	return XkbKeyboardErrorCode;
+    }
+    return Success;
+}
+
+void
+XkbSetActionKeyMods(XkbDescPtr xkb,XkbAction *act,unsigned mods)
+{
+register unsigned	tmp;
+
+    switch (act->type) {
+	case XkbSA_SetMods: case XkbSA_LatchMods: case XkbSA_LockMods:
+	    if (act->mods.flags&XkbSA_UseModMapMods)
+		act->mods.real_mods= act->mods.mask= mods;
+	    if ((tmp= XkbModActionVMods(&act->mods))!=0)
+		act->mods.mask|= XkbMaskForVMask(xkb,tmp);
+	    break;
+	case XkbSA_ISOLock:
+	    if (act->iso.flags&XkbSA_UseModMapMods)
+		act->iso.real_mods= act->iso.mask= mods;
+	    if ((tmp= XkbModActionVMods(&act->iso))!=0)
+		act->iso.mask|= XkbMaskForVMask(xkb,tmp);
+	    break;
+    }
+    return;
+}
+
+unsigned
+XkbMaskForVMask(XkbDescPtr xkb,unsigned vmask)
+{
+register int i,bit;
+register unsigned mask;
+    
+    for (mask=i=0,bit=1;i<XkbNumVirtualMods;i++,bit<<=1) {
+	if (vmask&bit)
+	    mask|= xkb->server->vmods[i];
+    }
+    return mask;
+}
+
+/***====================================================================***/
+
+void
+XkbUpdateKeyTypesFromCore(	DeviceIntPtr	pXDev,
+                                KeySymsPtr      pCore,
+				KeyCode	 	first,
+				CARD8	 	num,
+				XkbChangesPtr	changes)
+{
+XkbDescPtr		xkb;
+unsigned		key,nG,explicit;
+int			types[XkbNumKbdGroups];
+KeySym			tsyms[XkbMaxSymsPerKey],*syms;
+XkbMapChangesPtr	mc;
+
+    xkb= pXDev->key->xkbInfo->desc;
+    if (first+num-1>xkb->max_key_code) {
+	/* 1/12/95 (ef) -- XXX! should allow XKB structures to grow */
+	num= xkb->max_key_code-first+1;
+    }
+
+    mc= (changes?(&changes->map):NULL);
+
+    syms= &pCore->map[(first - pCore->minKeyCode) * pCore->mapWidth];
+    for (key=first; key<(first+num); key++,syms+= pCore->mapWidth) {
+        explicit= xkb->server->explicit[key]&XkbExplicitKeyTypesMask;
+        types[XkbGroup1Index]= XkbKeyKeyTypeIndex(xkb,key,XkbGroup1Index);
+        types[XkbGroup2Index]= XkbKeyKeyTypeIndex(xkb,key,XkbGroup2Index);
+        types[XkbGroup3Index]= XkbKeyKeyTypeIndex(xkb,key,XkbGroup3Index);
+        types[XkbGroup4Index]= XkbKeyKeyTypeIndex(xkb,key,XkbGroup4Index);
+        nG= XkbKeyTypesForCoreSymbols(xkb,pCore->mapWidth,syms,explicit,types,
+									tsyms);
+	XkbChangeTypesOfKey(xkb,key,nG,XkbAllGroupsMask,types,mc);
+	memcpy((char *)XkbKeySymsPtr(xkb,key),(char *)tsyms,
+					XkbKeyNumSyms(xkb,key)*sizeof(KeySym));
+    }
+    if (changes->map.changed&XkbKeySymsMask) {
+	CARD8 oldLast,newLast;
+	oldLast = changes->map.first_key_sym+changes->map.num_key_syms-1;
+	newLast = first+num-1;
+
+	if (first<changes->map.first_key_sym)
+	    changes->map.first_key_sym = first;
+	if (oldLast>newLast)
+	    newLast= oldLast;
+	changes->map.num_key_syms = newLast-changes->map.first_key_sym+1;
+    }
+    else {
+	changes->map.changed|= XkbKeySymsMask;
+	changes->map.first_key_sym = first;
+	changes->map.num_key_syms = num;
+    }
+    return;
+}
+
+void
+XkbUpdateDescActions(	XkbDescPtr		xkb,
+			KeyCode		 	first,
+			CARD8		 	num,
+			XkbChangesPtr	 	changes)
+{
+register unsigned	key;
+
+    for (key=first;key<(first+num);key++) {
+	XkbApplyCompatMapToKey(xkb,key,changes);
+    }
+
+    if (changes->map.changed&(XkbVirtualModMapMask|XkbModifierMapMask)) {
+        unsigned char           newVMods[XkbNumVirtualMods];
+        register  unsigned      bit,i;
+        unsigned                present;
+
+        memset(newVMods, 0, XkbNumVirtualMods);
+        present= 0;
+        for (key=xkb->min_key_code;key<=xkb->max_key_code;key++) {
+            if (xkb->server->vmodmap[key]==0)
+                continue;
+            for (i=0,bit=1;i<XkbNumVirtualMods;i++,bit<<=1) {
+                if (bit&xkb->server->vmodmap[key]) {
+                    present|= bit;
+                    newVMods[i]|= xkb->map->modmap[key];
+                }
+            }
+        }
+        for (i=0,bit=1;i<XkbNumVirtualMods;i++,bit<<=1) {
+            if ((bit&present)&&(newVMods[i]!=xkb->server->vmods[i])) {
+                changes->map.changed|= XkbVirtualModsMask;
+                changes->map.vmods|= bit;
+                xkb->server->vmods[i]= newVMods[i];
+            }
+        }
+    }
+    if (changes->map.changed&XkbVirtualModsMask)
+        XkbApplyVirtualModChanges(xkb,changes->map.vmods,changes);
+
+    if (changes->map.changed&XkbKeyActionsMask) {
+	CARD8 oldLast,newLast;
+	oldLast= changes->map.first_key_act+changes->map.num_key_acts-1;
+	newLast = first+num-1;
+
+	if (first<changes->map.first_key_act)
+	    changes->map.first_key_act = first;
+	if (newLast>oldLast)
+	    newLast= oldLast;
+	changes->map.num_key_acts= newLast-changes->map.first_key_act+1;
+    }
+    else {
+	changes->map.changed|= XkbKeyActionsMask;
+	changes->map.first_key_act = first;
+	changes->map.num_key_acts = num;
+    }
+    return;
+}
+
+void
+XkbUpdateActions(	DeviceIntPtr	 	pXDev,
+			KeyCode		 	first,
+			CARD8		 	num,
+			XkbChangesPtr	 	changes,
+			unsigned *	 	needChecksRtrn,
+			XkbEventCausePtr	cause)
+{
+XkbSrvInfoPtr		xkbi;
+XkbDescPtr		xkb;
+CARD8 *			repeat;
+
+    if (needChecksRtrn)
+	*needChecksRtrn= 0;
+    xkbi= pXDev->key->xkbInfo;
+    xkb= xkbi->desc;
+    repeat= xkb->ctrls->per_key_repeat;
+
+    /* before letting XKB do any changes, copy the current core values */
+    if (pXDev->kbdfeed)
+	memcpy(repeat,pXDev->kbdfeed->ctrl.autoRepeats,XkbPerKeyBitArraySize);
+
+    XkbUpdateDescActions(xkb,first,num,changes);
+
+    if ((pXDev->kbdfeed)&&
+	(changes->ctrls.changed_ctrls&XkbPerKeyRepeatMask)) {
+	/* now copy the modified changes back to core */
+	memcpy(pXDev->kbdfeed->ctrl.autoRepeats,repeat, XkbPerKeyBitArraySize);
+	if (pXDev->kbdfeed->CtrlProc)
+	    (*pXDev->kbdfeed->CtrlProc)(pXDev, &pXDev->kbdfeed->ctrl);
+    }
+    return;
+}
+
+KeySymsPtr
+XkbGetCoreMap(DeviceIntPtr keybd)
+{
+register int		key,tmp;
+int			maxSymsPerKey, maxGroup1Width;
+XkbDescPtr		xkb;
+KeySymsPtr              syms;
+int			maxNumberOfGroups;
+
+    if (!keybd || !keybd->key || !keybd->key->xkbInfo)
+	return NULL;
+
+    xkb= keybd->key->xkbInfo->desc;
+    maxSymsPerKey= maxGroup1Width= 0;
+    maxNumberOfGroups = 0;
+
+    /* determine sizes */
+    for (key=xkb->min_key_code;key<=xkb->max_key_code;key++) {
+	if (XkbKeycodeInRange(xkb,key)) {
+	    int	nGroups;
+	    int	w;
+	    nGroups= XkbKeyNumGroups(xkb,key);
+	    tmp= 0;
+	    if (nGroups>0) {
+		if ((w=XkbKeyGroupWidth(xkb,key,XkbGroup1Index))<=2)
+		     tmp+= 2;
+		else tmp+= w + 2;
+                /* remember highest G1 width */
+                if (w > maxGroup1Width)
+                    maxGroup1Width = w;
+	    }
+	    if (nGroups>1) {
+                if (tmp <= 2) {
+		     if ((w=XkbKeyGroupWidth(xkb,key,XkbGroup2Index))<2)
+		          tmp+= 2;
+		     else tmp+= w;
+                } else {
+                     if ((w=XkbKeyGroupWidth(xkb,key,XkbGroup2Index))>2)
+                          tmp+= w - 2;
+                }
+	    }
+	    if (nGroups>2)
+		tmp+= XkbKeyGroupWidth(xkb,key,XkbGroup3Index);
+	    if (nGroups>3)
+		tmp+= XkbKeyGroupWidth(xkb,key,XkbGroup4Index);
+	    if (tmp>maxSymsPerKey)
+		maxSymsPerKey= tmp;
+            if (nGroups > maxNumberOfGroups)
+		maxNumberOfGroups = nGroups;
+	}
+    }
+
+    if (maxSymsPerKey <= 0)
+        return NULL;
+
+    syms = calloc(1, sizeof(*syms));
+    if (!syms)
+        return NULL;
+
+    /* See Section 12.4 of the XKB Protocol spec. Because of the
+     * single-group distribution for multi-group keyboards, we have to
+     * have enough symbols for the largest group 1 to replicate across the
+     * number of groups on the keyboard. e.g. a single-group key with 4
+     * symbols on a keyboard that has 3 groups -> 12 syms per key */
+    if (maxSymsPerKey < maxNumberOfGroups * maxGroup1Width)
+        maxSymsPerKey = maxNumberOfGroups * maxGroup1Width;
+
+    syms->mapWidth = maxSymsPerKey;
+    syms->minKeyCode = xkb->min_key_code;
+    syms->maxKeyCode = xkb->max_key_code;
+
+    tmp = syms->mapWidth * (xkb->max_key_code - xkb->min_key_code + 1);
+    syms->map = calloc(tmp, sizeof(*syms->map));
+    if (!syms->map) {
+        free(syms);
+        return NULL;
+    }
+
+    for (key=xkb->min_key_code;key<=xkb->max_key_code;key++) {
+        KeySym *pCore,*pXKB;
+        unsigned nGroups,groupWidth,n,nOut;
+
+        nGroups= XkbKeyNumGroups(xkb,key);
+        n= (key-xkb->min_key_code)*syms->mapWidth;
+        pCore= &syms->map[n];
+        pXKB= XkbKeySymsPtr(xkb,key);
+        nOut= 2;
+        if (nGroups>0) {
+            groupWidth= XkbKeyGroupWidth(xkb,key,XkbGroup1Index);
+            if (groupWidth>0)   pCore[0]= pXKB[0];
+            if (groupWidth>1)   pCore[1]= pXKB[1];
+            for (n=2;n<groupWidth;n++)
+                pCore[2+n]= pXKB[n];
+            if (groupWidth>2)
+                nOut= groupWidth;
+        }
+
+	/* See XKB Protocol Sec, Section 12.4.
+           A 1-group key with ABCDE on a 2 group keyboard must be
+	   duplicated across all groups as ABABCDECDE.
+	 */
+	if (nGroups == 1)
+	{
+	    int idx, j;
+
+	    groupWidth = XkbKeyGroupWidth(xkb, key, XkbGroup1Index);
+
+	    /* AB..CDE... -> ABABCDE... */
+	    if (groupWidth > 0 && syms->mapWidth >= 3)
+	        pCore[2] = pCore[0];
+	    if (groupWidth > 1 && syms->mapWidth >= 4)
+	        pCore[3] = pCore[1];
+
+	    /* ABABCDE... -> ABABCDECDE */
+	    idx = 2 + groupWidth;
+	    while (groupWidth > 2 && idx < syms->mapWidth &&
+		   idx < groupWidth * 2)
+	    {
+		pCore[idx] = pCore[idx - groupWidth + 2];
+		idx++;
+	    }
+	    idx = 2 * groupWidth;
+	    if (idx < 4)
+		idx = 4;
+	    /* 3 or more groups: ABABCDECDEABCDEABCDE */
+	    for (j = 3; j <= maxNumberOfGroups; j++)
+		for (n = 0; n < groupWidth && idx < maxSymsPerKey; n++)
+		    pCore[idx++] = pXKB[n];
+	}
+
+	pXKB+= XkbKeyGroupsWidth(xkb,key);
+	nOut+= 2;
+	if (nGroups>1) {
+	    groupWidth= XkbKeyGroupWidth(xkb,key,XkbGroup2Index);
+	    if (groupWidth>0)	pCore[2]= pXKB[0];
+	    if (groupWidth>1)	pCore[3]= pXKB[1];
+	    for (n=2;n<groupWidth;n++) {
+		pCore[nOut+(n-2)]= pXKB[n];
+	    }
+	    if (groupWidth>2)
+		nOut+= (groupWidth-2);
+	}
+	pXKB+= XkbKeyGroupsWidth(xkb,key);
+	for (n=XkbGroup3Index;n<nGroups;n++) {
+	    register int s;
+	    groupWidth= XkbKeyGroupWidth(xkb,key,n);
+	    for (s=0;s<groupWidth;s++) {
+		pCore[nOut++]= pXKB[s];
+	    }
+	    pXKB+= XkbKeyGroupsWidth(xkb,key);
+	}
+    }
+
+    return syms;
+}
+
+void
+XkbSetRepeatKeys(DeviceIntPtr pXDev,int key,int onoff)
+{
+    if (pXDev && pXDev->key && pXDev->key->xkbInfo) {
+	xkbControlsNotify	cn;
+	XkbControlsPtr		ctrls = pXDev->key->xkbInfo->desc->ctrls;
+	XkbControlsRec 		old;
+	old = *ctrls;
+
+	if (key== -1) {	/* global autorepeat setting changed */
+	    if (onoff)	ctrls->enabled_ctrls |= XkbRepeatKeysMask;
+	    else	ctrls->enabled_ctrls &= ~XkbRepeatKeysMask;
+	}
+	else if (pXDev->kbdfeed) {
+	    ctrls->per_key_repeat[key/8] = 
+		pXDev->kbdfeed->ctrl.autoRepeats[key/8];
+	}
+	
+	if (XkbComputeControlsNotify(pXDev,&old,ctrls,&cn,TRUE))
+	    XkbSendControlsNotify(pXDev,&cn);
+    }
+    return;
+}
+
+/* Applies a change to a single device, does not traverse the device tree. */
+void
+XkbApplyMappingChange(DeviceIntPtr kbd, KeySymsPtr map, KeyCode first_key,
+                      CARD8 num_keys, CARD8 *modmap, ClientPtr client)
+{
+    XkbDescPtr xkb = kbd->key->xkbInfo->desc;
+    XkbEventCauseRec cause;
+    XkbChangesRec changes;
+    unsigned int check;
+
+    memset(&changes, 0, sizeof(changes));
+    memset(&cause, 0, sizeof(cause));
+
+    if (map && first_key && num_keys) {
+        check = 0;
+        XkbSetCauseCoreReq(&cause, X_ChangeKeyboardMapping, client);
+
+        XkbUpdateKeyTypesFromCore(kbd, map, first_key, num_keys, &changes);
+        XkbUpdateActions(kbd, first_key, num_keys, &changes, &check, &cause);
+
+        if (check)
+            XkbCheckSecondaryEffects(kbd->key->xkbInfo, 1, &changes, &cause);
+    }
+
+    if (modmap) {
+        /* A keymap change can imply a modmap change, se we prefer the
+         * former. */
+        if (!cause.mjr)
+            XkbSetCauseCoreReq(&cause,X_SetModifierMapping,client);
+
+        check = 0;
+        num_keys = xkb->max_key_code - xkb->min_key_code + 1;
+        changes.map.changed |= XkbModifierMapMask;
+        changes.map.first_modmap_key = xkb->min_key_code;
+        changes.map.num_modmap_keys = num_keys;
+        memcpy(kbd->key->xkbInfo->desc->map->modmap, modmap, MAP_LENGTH);
+        XkbUpdateActions(kbd, xkb->min_key_code, num_keys, &changes, &check,
+                         &cause);
+
+        if (check)
+            XkbCheckSecondaryEffects(kbd->key->xkbInfo, 1, &changes, &cause);
+    }
+
+    XkbSendNotification(kbd, &changes, &cause);
+}
+
+void
+XkbDisableComputedAutoRepeats(DeviceIntPtr dev,unsigned key)
+{
+XkbSrvInfoPtr	xkbi = dev->key->xkbInfo;
+xkbMapNotify	mn;
+
+    xkbi->desc->server->explicit[key]|= XkbExplicitAutoRepeatMask;
+    memset(&mn, 0, sizeof(mn));
+    mn.changed= XkbExplicitComponentsMask;
+    mn.firstKeyExplicit= key;
+    mn.nKeyExplicit= 1;
+    XkbSendMapNotify(dev,&mn);
+    return;
+}
+
+unsigned
+XkbStateChangedFlags(XkbStatePtr old,XkbStatePtr new)
+{
+int		changed;
+
+    changed=(old->group!=new->group?XkbGroupStateMask:0);
+    changed|=(old->base_group!=new->base_group?XkbGroupBaseMask:0);
+    changed|=(old->latched_group!=new->latched_group?XkbGroupLatchMask:0);
+    changed|=(old->locked_group!=new->locked_group?XkbGroupLockMask:0);
+    changed|=(old->mods!=new->mods?XkbModifierStateMask:0);
+    changed|=(old->base_mods!=new->base_mods?XkbModifierBaseMask:0);
+    changed|=(old->latched_mods!=new->latched_mods?XkbModifierLatchMask:0);
+    changed|=(old->locked_mods!=new->locked_mods?XkbModifierLockMask:0);
+    changed|=(old->compat_state!=new->compat_state?XkbCompatStateMask:0);
+    changed|=(old->grab_mods!=new->grab_mods?XkbGrabModsMask:0);
+    if (old->compat_grab_mods!=new->compat_grab_mods)
+	changed|= XkbCompatGrabModsMask;
+    changed|=(old->lookup_mods!=new->lookup_mods?XkbLookupModsMask:0);
+    if (old->compat_lookup_mods!=new->compat_lookup_mods)
+	changed|= XkbCompatLookupModsMask;
+    changed|=(old->ptr_buttons!=new->ptr_buttons?XkbPointerButtonMask:0);
+    return changed;
+}
+
+static void
+XkbComputeCompatState(XkbSrvInfoPtr xkbi)
+{
+CARD16 		grp_mask;
+XkbStatePtr	state= &xkbi->state;
+XkbCompatMapPtr	map;
+
+    if (!state || !xkbi->desc || !xkbi->desc->ctrls || !xkbi->desc->compat)
+        return;
+
+    map= xkbi->desc->compat;
+    grp_mask= map->groups[state->group].mask;
+    state->compat_state = state->mods|grp_mask;
+    state->compat_lookup_mods= state->lookup_mods|grp_mask;
+
+    if (xkbi->desc->ctrls->enabled_ctrls&XkbIgnoreGroupLockMask)
+	 grp_mask= map->groups[state->base_group].mask;
+    state->compat_grab_mods= state->grab_mods|grp_mask;
+    return;
+}
+
+unsigned
+XkbAdjustGroup(int group,XkbControlsPtr ctrls)
+{
+unsigned	act;
+
+    act= XkbOutOfRangeGroupAction(ctrls->groups_wrap);
+    if (group<0) {
+	while ( group < 0 )  {
+	    if (act==XkbClampIntoRange) {
+		group= XkbGroup1Index;
+	    }
+	    else if (act==XkbRedirectIntoRange) {
+		int newGroup;
+		newGroup= XkbOutOfRangeGroupNumber(ctrls->groups_wrap);
+		if (newGroup>=ctrls->num_groups)
+		     group= XkbGroup1Index;
+		else group= newGroup;
+	    }
+	    else {
+		group+= ctrls->num_groups;
+	    }
+	}
+    }
+    else if (group>=ctrls->num_groups) {
+	if (act==XkbClampIntoRange) {
+	    group= ctrls->num_groups-1;
+	}
+	else if (act==XkbRedirectIntoRange) {
+	    int newGroup;
+	    newGroup= XkbOutOfRangeGroupNumber(ctrls->groups_wrap);
+	    if (newGroup>=ctrls->num_groups)
+		 group= XkbGroup1Index;
+	    else group= newGroup;
+	}
+	else {
+	    group%= ctrls->num_groups;
+	}
+    }
+    return group;
+}
+
+void
+XkbComputeDerivedState(XkbSrvInfoPtr xkbi)
+{
+XkbStatePtr	state= &xkbi->state;
+XkbControlsPtr	ctrls= xkbi->desc->ctrls;
+unsigned char	grp;
+
+    if (!state || !ctrls)
+        return;
+
+    state->mods= (state->base_mods|state->latched_mods|state->locked_mods);
+    state->lookup_mods= state->mods&(~ctrls->internal.mask);
+    state->grab_mods= state->lookup_mods&(~ctrls->ignore_lock.mask);
+    state->grab_mods|= 
+	((state->base_mods|state->latched_mods)&ctrls->ignore_lock.mask);
+
+
+    grp= state->locked_group;
+    if (grp>=ctrls->num_groups)
+	state->locked_group= XkbAdjustGroup(XkbCharToInt(grp),ctrls);
+
+    grp= state->locked_group+state->base_group+state->latched_group;
+    if (grp>=ctrls->num_groups)
+	 state->group= XkbAdjustGroup(XkbCharToInt(grp),ctrls);
+    else state->group= grp;
+    XkbComputeCompatState(xkbi);
+    return;
+}
+
+/***====================================================================***/
+
+void
+XkbCheckSecondaryEffects(	XkbSrvInfoPtr		xkbi,
+				unsigned		which,
+				XkbChangesPtr 		changes,
+				XkbEventCausePtr	cause)
+{
+    if (which&XkbStateNotifyMask) {
+	XkbStateRec old;
+	old= xkbi->state;
+	changes->state_changes|= XkbStateChangedFlags(&old,&xkbi->state);
+	XkbComputeDerivedState(xkbi);
+    }
+    if (which&XkbIndicatorStateNotifyMask)
+	XkbUpdateIndicators(xkbi->device,XkbAllIndicatorsMask,TRUE,changes,
+									cause);
+    return;
+}
+
+/***====================================================================***/
+
+Bool
+XkbEnableDisableControls(	XkbSrvInfoPtr		xkbi,
+				unsigned long		change,
+				unsigned long		newValues,
+				XkbChangesPtr		changes,
+				XkbEventCausePtr	cause)
+{
+XkbControlsPtr		ctrls;
+unsigned 		old;
+XkbSrvLedInfoPtr	sli;
+
+    ctrls= xkbi->desc->ctrls;
+    old= ctrls->enabled_ctrls;
+    ctrls->enabled_ctrls&= ~change;
+    ctrls->enabled_ctrls|= (change&newValues);
+    if (old==ctrls->enabled_ctrls)
+	return FALSE;
+    if (cause!=NULL) {
+	xkbControlsNotify cn;
+	cn.numGroups= ctrls->num_groups;
+	cn.changedControls= XkbControlsEnabledMask;
+	cn.enabledControls= ctrls->enabled_ctrls;
+	cn.enabledControlChanges= (ctrls->enabled_ctrls^old);
+	cn.keycode= cause->kc;
+	cn.eventType= cause->event;
+	cn.requestMajor= cause->mjr;
+	cn.requestMinor= cause->mnr;
+	XkbSendControlsNotify(xkbi->device,&cn);
+    }
+    else {
+	/* Yes, this really should be an XOR.  If ctrls->enabled_ctrls_changes*/
+	/* is non-zero, the controls in question changed already in "this" */
+	/* request and this change merely undoes the previous one.  By the */
+	/* same token, we have to figure out whether or not ControlsEnabled */
+	/* should be set or not in the changes structure */
+	changes->ctrls.enabled_ctrls_changes^= (ctrls->enabled_ctrls^old);
+	if (changes->ctrls.enabled_ctrls_changes)
+	     changes->ctrls.changed_ctrls|= XkbControlsEnabledMask;
+	else changes->ctrls.changed_ctrls&= ~XkbControlsEnabledMask;
+    }
+    sli= XkbFindSrvLedInfo(xkbi->device,XkbDfltXIClass,XkbDfltXIId,0);
+    XkbUpdateIndicators(xkbi->device,sli->usesControls,TRUE,changes,cause);
+    return TRUE;
+}
+
+/***====================================================================***/
+
+#define	MAX_TOC	16
+
+XkbGeometryPtr
+XkbLookupNamedGeometry(DeviceIntPtr dev,Atom name,Bool *shouldFree)
+{
+XkbSrvInfoPtr	xkbi=	dev->key->xkbInfo;
+XkbDescPtr	xkb=	xkbi->desc;
+
+    *shouldFree= 0;
+    if (name==None) {
+	if (xkb->geom!=NULL)
+	    return xkb->geom;
+	name= xkb->names->geometry;
+    }
+    if ((xkb->geom!=NULL)&&(xkb->geom->name==name))
+	return xkb->geom;
+    *shouldFree= 1;
+    return NULL;
+}
+
+void
+XkbConvertCase(register KeySym sym, KeySym *lower, KeySym *upper)
+{
+    *lower = sym;
+    *upper = sym;
+    switch(sym >> 8) {
+    case 0: /* Latin 1 */
+	if ((sym >= XK_A) && (sym <= XK_Z))
+	    *lower += (XK_a - XK_A);
+	else if ((sym >= XK_a) && (sym <= XK_z))
+	    *upper -= (XK_a - XK_A);
+	else if ((sym >= XK_Agrave) && (sym <= XK_Odiaeresis))
+	    *lower += (XK_agrave - XK_Agrave);
+	else if ((sym >= XK_agrave) && (sym <= XK_odiaeresis))
+	    *upper -= (XK_agrave - XK_Agrave);
+	else if ((sym >= XK_Ooblique) && (sym <= XK_Thorn))
+	    *lower += (XK_oslash - XK_Ooblique);
+	else if ((sym >= XK_oslash) && (sym <= XK_thorn))
+	    *upper -= (XK_oslash - XK_Ooblique);
+	break;
+    case 1: /* Latin 2 */
+	/* Assume the KeySym is a legal value (ignore discontinuities) */
+	if (sym == XK_Aogonek)
+	    *lower = XK_aogonek;
+	else if (sym >= XK_Lstroke && sym <= XK_Sacute)
+	    *lower += (XK_lstroke - XK_Lstroke);
+	else if (sym >= XK_Scaron && sym <= XK_Zacute)
+	    *lower += (XK_scaron - XK_Scaron);
+	else if (sym >= XK_Zcaron && sym <= XK_Zabovedot)
+	    *lower += (XK_zcaron - XK_Zcaron);
+	else if (sym == XK_aogonek)
+	    *upper = XK_Aogonek;
+	else if (sym >= XK_lstroke && sym <= XK_sacute)
+	    *upper -= (XK_lstroke - XK_Lstroke);
+	else if (sym >= XK_scaron && sym <= XK_zacute)
+	    *upper -= (XK_scaron - XK_Scaron);
+	else if (sym >= XK_zcaron && sym <= XK_zabovedot)
+	    *upper -= (XK_zcaron - XK_Zcaron);
+	else if (sym >= XK_Racute && sym <= XK_Tcedilla)
+	    *lower += (XK_racute - XK_Racute);
+	else if (sym >= XK_racute && sym <= XK_tcedilla)
+	    *upper -= (XK_racute - XK_Racute);
+	break;
+    case 2: /* Latin 3 */
+	/* Assume the KeySym is a legal value (ignore discontinuities) */
+	if (sym >= XK_Hstroke && sym <= XK_Hcircumflex)
+	    *lower += (XK_hstroke - XK_Hstroke);
+	else if (sym >= XK_Gbreve && sym <= XK_Jcircumflex)
+	    *lower += (XK_gbreve - XK_Gbreve);
+	else if (sym >= XK_hstroke && sym <= XK_hcircumflex)
+	    *upper -= (XK_hstroke - XK_Hstroke);
+	else if (sym >= XK_gbreve && sym <= XK_jcircumflex)
+	    *upper -= (XK_gbreve - XK_Gbreve);
+	else if (sym >= XK_Cabovedot && sym <= XK_Scircumflex)
+	    *lower += (XK_cabovedot - XK_Cabovedot);
+	else if (sym >= XK_cabovedot && sym <= XK_scircumflex)
+	    *upper -= (XK_cabovedot - XK_Cabovedot);
+	break;
+    case 3: /* Latin 4 */
+	/* Assume the KeySym is a legal value (ignore discontinuities) */
+	if (sym >= XK_Rcedilla && sym <= XK_Tslash)
+	    *lower += (XK_rcedilla - XK_Rcedilla);
+	else if (sym >= XK_rcedilla && sym <= XK_tslash)
+	    *upper -= (XK_rcedilla - XK_Rcedilla);
+	else if (sym == XK_ENG)
+	    *lower = XK_eng;
+	else if (sym == XK_eng)
+	    *upper = XK_ENG;
+	else if (sym >= XK_Amacron && sym <= XK_Umacron)
+	    *lower += (XK_amacron - XK_Amacron);
+	else if (sym >= XK_amacron && sym <= XK_umacron)
+	    *upper -= (XK_amacron - XK_Amacron);
+	break;
+    case 6: /* Cyrillic */
+	/* Assume the KeySym is a legal value (ignore discontinuities) */
+	if (sym >= XK_Serbian_DJE && sym <= XK_Serbian_DZE)
+	    *lower -= (XK_Serbian_DJE - XK_Serbian_dje);
+	else if (sym >= XK_Serbian_dje && sym <= XK_Serbian_dze)
+	    *upper += (XK_Serbian_DJE - XK_Serbian_dje);
+	else if (sym >= XK_Cyrillic_YU && sym <= XK_Cyrillic_HARDSIGN)
+	    *lower -= (XK_Cyrillic_YU - XK_Cyrillic_yu);
+	else if (sym >= XK_Cyrillic_yu && sym <= XK_Cyrillic_hardsign)
+	    *upper += (XK_Cyrillic_YU - XK_Cyrillic_yu);
+        break;
+    case 7: /* Greek */
+	/* Assume the KeySym is a legal value (ignore discontinuities) */
+	if (sym >= XK_Greek_ALPHAaccent && sym <= XK_Greek_OMEGAaccent)
+	    *lower += (XK_Greek_alphaaccent - XK_Greek_ALPHAaccent);
+	else if (sym >= XK_Greek_alphaaccent && sym <= XK_Greek_omegaaccent &&
+		 sym != XK_Greek_iotaaccentdieresis &&
+		 sym != XK_Greek_upsilonaccentdieresis)
+	    *upper -= (XK_Greek_alphaaccent - XK_Greek_ALPHAaccent);
+	else if (sym >= XK_Greek_ALPHA && sym <= XK_Greek_OMEGA)
+	    *lower += (XK_Greek_alpha - XK_Greek_ALPHA);
+	else if (sym >= XK_Greek_alpha && sym <= XK_Greek_omega &&
+		 sym != XK_Greek_finalsmallsigma)
+	    *upper -= (XK_Greek_alpha - XK_Greek_ALPHA);
+        break;
+    }
+}
+
+static Bool
+_XkbCopyClientMap(XkbDescPtr src, XkbDescPtr dst)
+{
+    void *tmp = NULL;
+    int i;
+    XkbKeyTypePtr stype = NULL, dtype = NULL;
+
+    /* client map */
+    if (src->map) {
+        if (!dst->map) {
+            tmp = calloc(1, sizeof(XkbClientMapRec));
+            if (!tmp)
+                return FALSE;
+            dst->map = tmp;
+        }
+
+        if (src->map->syms) {
+            if (src->map->size_syms != dst->map->size_syms) {
+                tmp = realloc(dst->map->syms,
+                              src->map->size_syms * sizeof(KeySym));
+                if (!tmp)
+                    return FALSE;
+                dst->map->syms = tmp;
+
+            }
+            memcpy(dst->map->syms, src->map->syms,
+                   src->map->size_syms * sizeof(KeySym));
+        }
+        else {
+            free(dst->map->syms);
+            dst->map->syms = NULL;
+        }
+        dst->map->num_syms = src->map->num_syms;
+        dst->map->size_syms = src->map->size_syms;
+
+        if (src->map->key_sym_map) {
+            if (src->max_key_code != dst->max_key_code) {
+                tmp = realloc(dst->map->key_sym_map,
+                              (src->max_key_code + 1) * sizeof(XkbSymMapRec));
+                if (!tmp)
+                    return FALSE;
+                dst->map->key_sym_map = tmp;
+            }
+            memcpy(dst->map->key_sym_map, src->map->key_sym_map,
+                   (src->max_key_code + 1) * sizeof(XkbSymMapRec));
+        }
+        else {
+            free(dst->map->key_sym_map);
+            dst->map->key_sym_map = NULL;
+        }
+
+        if (src->map->types && src->map->num_types) {
+            if (src->map->num_types > dst->map->size_types ||
+                !dst->map->types || !dst->map->size_types) {
+                if (dst->map->types && dst->map->size_types) {
+                    tmp = realloc(dst->map->types,
+                                   src->map->num_types * sizeof(XkbKeyTypeRec));
+                    if (!tmp)
+                        return FALSE;
+                    dst->map->types = tmp;
+                    memset(dst->map->types + dst->map->num_types, 0,
+                          (src->map->num_types - dst->map->num_types) *
+                            sizeof(XkbKeyTypeRec));
+                }
+                else {
+                    tmp = calloc(src->map->num_types, sizeof(XkbKeyTypeRec));
+                    if (!tmp)
+                        return FALSE;
+                    dst->map->types = tmp;
+                }
+            }
+            else if (src->map->num_types < dst->map->num_types &&
+                     dst->map->types) {
+                for (i = src->map->num_types, dtype = (dst->map->types + i);
+                     i < dst->map->num_types; i++, dtype++) {
+                    free(dtype->level_names);
+                    dtype->level_names = NULL;
+                    dtype->num_levels = 0;
+                    if (dtype->map_count) {
+                        free(dtype->map);
+                        free(dtype->preserve);
+                    }
+                }
+            }
+
+            stype = src->map->types;
+            dtype = dst->map->types;
+            for (i = 0; i < src->map->num_types; i++, dtype++, stype++) {
+                if (stype->num_levels && stype->level_names) {
+                    if (stype->num_levels != dtype->num_levels &&
+                        dtype->num_levels && dtype->level_names &&
+                        i < dst->map->num_types) {
+                        tmp = realloc(dtype->level_names,
+                                       stype->num_levels * sizeof(Atom));
+                        if (!tmp)
+                            continue;
+                        dtype->level_names = tmp;
+                    }
+                    else if (!dtype->num_levels || !dtype->level_names ||
+                             i >= dst->map->num_types) {
+                        tmp = malloc(stype->num_levels * sizeof(Atom));
+                        if (!tmp)
+                            continue;
+                        dtype->level_names = tmp;
+                    }
+                    dtype->num_levels = stype->num_levels;
+                    memcpy(dtype->level_names, stype->level_names,
+                           stype->num_levels * sizeof(Atom));
+                }
+                else {
+                    if (dtype->num_levels && dtype->level_names &&
+                        i < dst->map->num_types)
+                        free(dtype->level_names);
+                    dtype->num_levels = 0;
+                    dtype->level_names = NULL;
+                }
+
+                dtype->name = stype->name;
+                memcpy(&dtype->mods, &stype->mods, sizeof(XkbModsRec));
+
+                if (stype->map_count) {
+                    if (stype->map) {
+                        if (stype->map_count != dtype->map_count &&
+                            dtype->map_count && dtype->map &&
+                            i < dst->map->num_types) {
+                            tmp = realloc(dtype->map,
+                                           stype->map_count *
+                                             sizeof(XkbKTMapEntryRec));
+                            if (!tmp)
+                                return FALSE;
+                            dtype->map = tmp;
+                        }
+                        else if (!dtype->map_count || !dtype->map ||
+                                 i >= dst->map->num_types) {
+                            tmp = malloc(stype->map_count *
+                                           sizeof(XkbKTMapEntryRec));
+                            if (!tmp)
+                                return FALSE;
+                            dtype->map = tmp;
+                        }
+
+                        memcpy(dtype->map, stype->map,
+                               stype->map_count * sizeof(XkbKTMapEntryRec));
+                    }
+                    else {
+                        if (dtype->map && i < dst->map->num_types)
+                            free(dtype->map);
+                        dtype->map = NULL;
+                    }
+
+                    if (stype->preserve) {
+                        if (stype->map_count != dtype->map_count &&
+                            dtype->map_count && dtype->preserve &&
+                            i < dst->map->num_types) {
+                            tmp = realloc(dtype->preserve,
+                                           stype->map_count *
+                                             sizeof(XkbModsRec));
+                            if (!tmp)
+                                return FALSE;
+                            dtype->preserve = tmp;
+                        }
+                        else if (!dtype->preserve || !dtype->map_count ||
+                                 i >= dst->map->num_types) {
+                            tmp = malloc(stype->map_count *
+                                         sizeof(XkbModsRec));
+                            if (!tmp)
+                                return FALSE;
+                            dtype->preserve = tmp;
+                        }
+
+                        memcpy(dtype->preserve, stype->preserve,
+                               stype->map_count * sizeof(XkbModsRec));
+                    }
+                    else {
+                        if (dtype->preserve && i < dst->map->num_types)
+                            free(dtype->preserve);
+                        dtype->preserve = NULL;
+                    }
+
+                    dtype->map_count = stype->map_count;
+                }
+                else {
+                    if (dtype->map_count && i < dst->map->num_types) {
+                        free(dtype->map);
+                        free(dtype->preserve);
+                    }
+                    dtype->map_count = 0;
+                    dtype->map = NULL;
+                    dtype->preserve = NULL;
+                }
+            }
+
+            dst->map->size_types = src->map->num_types;
+            dst->map->num_types = src->map->num_types;
+        }
+        else {
+            if (dst->map->types) {
+                for (i = 0, dtype = dst->map->types; i < dst->map->num_types;
+                     i++, dtype++) {
+                    free(dtype->level_names);
+                    if (dtype->map && dtype->map_count)
+                        free(dtype->map);
+                    if (dtype->preserve && dtype->map_count)
+                        free(dtype->preserve);
+                }
+            }
+            free(dst->map->types);
+            dst->map->types = NULL;
+            dst->map->num_types = 0;
+            dst->map->size_types = 0;
+        }
+
+        if (src->map->modmap) {
+            if (src->max_key_code != dst->max_key_code) {
+                tmp = realloc(dst->map->modmap, src->max_key_code + 1);
+                if (!tmp)
+                    return FALSE;
+                dst->map->modmap = tmp;
+            }
+            memcpy(dst->map->modmap, src->map->modmap, src->max_key_code + 1);
+        }
+        else {
+            free(dst->map->modmap);
+            dst->map->modmap = NULL;
+        }
+    }
+    else {
+        if (dst->map)
+            XkbFreeClientMap(dst, XkbAllClientInfoMask, TRUE);
+    }
+
+    return TRUE;
+}
+
+static Bool
+_XkbCopyServerMap(XkbDescPtr src, XkbDescPtr dst)
+{
+    void *tmp = NULL;
+
+    /* server map */
+    if (src->server) {
+        if (!dst->server) {
+            tmp = calloc(1, sizeof(XkbServerMapRec));
+            if (!tmp)
+                return FALSE;
+            dst->server = tmp;
+        }
+
+        if (src->server->explicit) {
+            if (src->max_key_code != dst->max_key_code) {
+                tmp = realloc(dst->server->explicit, src->max_key_code + 1);
+                if (!tmp)
+                    return FALSE;
+                dst->server->explicit = tmp;
+            }
+            memcpy(dst->server->explicit, src->server->explicit,
+                   src->max_key_code + 1);
+        }
+        else {
+            free(dst->server->explicit);
+            dst->server->explicit = NULL;
+        }
+
+        if (src->server->acts) {
+            if (src->server->size_acts != dst->server->size_acts) {
+                tmp = realloc(dst->server->acts,
+                              src->server->size_acts * sizeof(XkbAction));
+                if (!tmp)
+                    return FALSE;
+                dst->server->acts = tmp;
+            }
+            memcpy(dst->server->acts, src->server->acts,
+                   src->server->size_acts * sizeof(XkbAction));
+        }
+        else {
+            free(dst->server->acts);
+            dst->server->acts = NULL;
+        }
+       dst->server->size_acts = src->server->size_acts;
+       dst->server->num_acts = src->server->num_acts;
+
+        if (src->server->key_acts) {
+            if (src->max_key_code != dst->max_key_code) {
+                tmp = realloc(dst->server->key_acts,
+                              (src->max_key_code + 1) * sizeof(unsigned short));
+                if (!tmp)
+                    return FALSE;
+                dst->server->key_acts = tmp;
+            }
+            memcpy(dst->server->key_acts, src->server->key_acts,
+                   (src->max_key_code + 1) * sizeof(unsigned short));
+        }
+        else {
+            free(dst->server->key_acts);
+            dst->server->key_acts = NULL;
+        }
+
+        if (src->server->behaviors) {
+            if (src->max_key_code != dst->max_key_code) {
+                tmp = realloc(dst->server->behaviors,
+                              (src->max_key_code + 1) * sizeof(XkbBehavior));
+                if (!tmp)
+                    return FALSE;
+                dst->server->behaviors = tmp;
+            }
+            memcpy(dst->server->behaviors, src->server->behaviors,
+                   (src->max_key_code + 1) * sizeof(XkbBehavior));
+        }
+        else {
+            free(dst->server->behaviors);
+            dst->server->behaviors = NULL;
+        }
+
+        memcpy(dst->server->vmods, src->server->vmods, XkbNumVirtualMods);
+
+        if (src->server->vmodmap) {
+            if (src->max_key_code != dst->max_key_code) {
+                tmp = realloc(dst->server->vmodmap,
+                              (src->max_key_code + 1) * sizeof(unsigned short));
+                if (!tmp)
+                    return FALSE;
+                dst->server->vmodmap = tmp;
+            }
+            memcpy(dst->server->vmodmap, src->server->vmodmap,
+                   (src->max_key_code + 1) * sizeof(unsigned short));
+        }
+        else {
+            free(dst->server->vmodmap);
+            dst->server->vmodmap = NULL;
+        }
+    }
+    else {
+        if (dst->server)
+            XkbFreeServerMap(dst, XkbAllServerInfoMask, TRUE);
+    }
+
+    return TRUE;
+}
+
+static Bool
+_XkbCopyNames(XkbDescPtr src, XkbDescPtr dst)
+{
+    void *tmp = NULL;
+
+    /* names */
+    if (src->names) {
+        if (!dst->names) {
+            dst->names = calloc(1, sizeof(XkbNamesRec));
+            if (!dst->names)
+                return FALSE;
+        }
+
+        if (src->names->keys) {
+            if (src->max_key_code != dst->max_key_code) {
+                tmp = realloc(dst->names->keys,
+                              (src->max_key_code + 1) * sizeof(XkbKeyNameRec));
+                if (!tmp)
+                    return FALSE;
+                dst->names->keys = tmp;
+            }
+            memcpy(dst->names->keys, src->names->keys,
+                   (src->max_key_code + 1) * sizeof(XkbKeyNameRec));
+        }
+        else {
+            free(dst->names->keys);
+            dst->names->keys = NULL;
+        }
+
+        if (src->names->num_key_aliases) {
+            if (src->names->num_key_aliases != dst->names->num_key_aliases) {
+                tmp = realloc(dst->names->key_aliases,
+                              src->names->num_key_aliases *
+                              sizeof(XkbKeyAliasRec));
+                if (!tmp)
+                    return FALSE;
+                dst->names->key_aliases = tmp;
+            }
+            memcpy(dst->names->key_aliases, src->names->key_aliases,
+                   src->names->num_key_aliases * sizeof(XkbKeyAliasRec));
+        }
+        else {
+            free(dst->names->key_aliases);
+            dst->names->key_aliases = NULL;
+        }
+        dst->names->num_key_aliases = src->names->num_key_aliases;
+
+        if (src->names->num_rg) {
+            if (src->names->num_rg != dst->names->num_rg) {
+                tmp = realloc(dst->names->radio_groups,
+                              src->names->num_rg * sizeof(Atom));
+                if (!tmp)
+                    return FALSE;
+                dst->names->radio_groups = tmp;
+            }
+            memcpy(dst->names->radio_groups, src->names->radio_groups,
+                   src->names->num_rg * sizeof(Atom));
+        }
+        else {
+            free(dst->names->radio_groups);
+        }
+        dst->names->num_rg = src->names->num_rg;
+
+        dst->names->keycodes = src->names->keycodes;
+        dst->names->geometry = src->names->geometry;
+        dst->names->symbols = src->names->symbols;
+        dst->names->types = src->names->types;
+        dst->names->compat = src->names->compat;
+        dst->names->phys_symbols = src->names->phys_symbols;
+
+        memcpy(dst->names->vmods, src->names->vmods,
+               XkbNumVirtualMods * sizeof(Atom));
+        memcpy(dst->names->indicators, src->names->indicators,
+               XkbNumIndicators * sizeof(Atom));
+        memcpy(dst->names->groups, src->names->groups,
+               XkbNumKbdGroups * sizeof(Atom));
+    }
+    else {
+        if (dst->names)
+            XkbFreeNames(dst, XkbAllNamesMask, TRUE);
+    }
+
+    return TRUE;
+}
+
+static Bool
+_XkbCopyCompat(XkbDescPtr src, XkbDescPtr dst)
+{
+    void *tmp = NULL;
+
+    /* compat */
+    if (src->compat) {
+        if (!dst->compat) {
+            dst->compat = calloc(1, sizeof(XkbCompatMapRec));
+            if (!dst->compat)
+                return FALSE;
+        }
+
+        if (src->compat->sym_interpret && src->compat->num_si) {
+            if (src->compat->num_si != dst->compat->size_si) {
+                tmp = realloc(dst->compat->sym_interpret,
+                              src->compat->num_si * sizeof(XkbSymInterpretRec));
+                if (!tmp)
+                    return FALSE;
+                dst->compat->sym_interpret = tmp;
+            }
+            memcpy(dst->compat->sym_interpret, src->compat->sym_interpret,
+                   src->compat->num_si * sizeof(XkbSymInterpretRec));
+
+            dst->compat->num_si = src->compat->num_si;
+            dst->compat->size_si = src->compat->num_si;
+        }
+        else {
+            if (dst->compat->sym_interpret && dst->compat->size_si)
+                free(dst->compat->sym_interpret);
+
+            dst->compat->sym_interpret = NULL;
+            dst->compat->num_si = 0;
+            dst->compat->size_si = 0;
+        }
+
+        memcpy(dst->compat->groups, src->compat->groups,
+               XkbNumKbdGroups * sizeof(XkbModsRec));
+    }
+    else {
+        if (dst->compat)
+            XkbFreeCompatMap(dst, XkbAllCompatMask, TRUE);
+    }
+
+    return TRUE;
+}
+
+static Bool
+_XkbCopyGeom(XkbDescPtr src, XkbDescPtr dst)
+{
+    void *tmp = NULL;
+    int i = 0, j = 0, k = 0;
+    XkbColorPtr scolor = NULL, dcolor = NULL;
+    XkbDoodadPtr sdoodad = NULL, ddoodad = NULL;
+    XkbOutlinePtr soutline = NULL, doutline = NULL;
+    XkbPropertyPtr sprop = NULL, dprop = NULL;
+    XkbRowPtr srow = NULL, drow = NULL;
+    XkbSectionPtr ssection = NULL, dsection = NULL;
+    XkbShapePtr sshape = NULL, dshape = NULL;
+
+    /* geometry */
+    if (src->geom) {
+        if (!dst->geom) {
+            dst->geom = calloc(sizeof(XkbGeometryRec), 1);
+            if (!dst->geom)
+                return FALSE;
+        }
+
+        /* properties */
+        if (src->geom->num_properties) {
+            if (src->geom->num_properties != dst->geom->sz_properties) {
+                /* If we've got more properties in the destination than
+                 * the source, run through and free all the excess ones
+                 * first. */
+                if (src->geom->num_properties < dst->geom->sz_properties) {
+                    for (i = src->geom->num_properties,
+                         dprop = dst->geom->properties + i;
+                         i < dst->geom->num_properties;
+                         i++, dprop++) {
+                        free(dprop->name);
+                        free(dprop->value);
+                    }
+                }
+
+                if (dst->geom->sz_properties)
+                    tmp = realloc(dst->geom->properties,
+                                   src->geom->num_properties *
+                                    sizeof(XkbPropertyRec));
+                else
+                    tmp = malloc(src->geom->num_properties *
+                                  sizeof(XkbPropertyRec));
+                if (!tmp)
+                    return FALSE;
+                dst->geom->properties = tmp;
+            }
+
+            /* We don't set num_properties as we need it to try and avoid
+             * too much reallocing. */
+            dst->geom->sz_properties = src->geom->num_properties;
+
+            if (dst->geom->sz_properties > dst->geom->num_properties) {
+                memset(dst->geom->properties + dst->geom->num_properties, 0,
+                      (dst->geom->sz_properties - dst->geom->num_properties) *
+                      sizeof(XkbPropertyRec));
+            }
+
+            for (i = 0,
+                  sprop = src->geom->properties,
+                  dprop = dst->geom->properties;
+                 i < src->geom->num_properties;
+                 i++, sprop++, dprop++) {
+                if (i < dst->geom->num_properties) {
+                    if (strlen(sprop->name) != strlen(dprop->name)) {
+                        tmp = realloc(dprop->name, strlen(sprop->name) + 1);
+                        if (!tmp)
+                            return FALSE;
+                        dprop->name = tmp;
+                    }
+                    if (strlen(sprop->value) != strlen(dprop->value)) {
+                        tmp = realloc(dprop->value, strlen(sprop->value) + 1);
+                        if (!tmp)
+                            return FALSE;
+                        dprop->value = tmp;
+                    }
+                    strcpy(dprop->name, sprop->name);
+                    strcpy(dprop->value, sprop->value);
+                }
+                else {
+                    dprop->name = xstrdup(sprop->name);
+                    dprop->value = xstrdup(sprop->value);
+                }
+            }
+
+            /* ... which is already src->geom->num_properties. */
+            dst->geom->num_properties = dst->geom->sz_properties;
+        }
+        else {
+            if (dst->geom->sz_properties) {
+                for (i = 0, dprop = dst->geom->properties;
+                     i < dst->geom->num_properties;
+                     i++, dprop++) {
+                    free(dprop->name);
+                    free(dprop->value);
+                }
+                free(dst->geom->properties);
+                dst->geom->properties = NULL;
+            }
+
+            dst->geom->num_properties = 0;
+            dst->geom->sz_properties = 0;
+        }
+
+        /* colors */
+        if (src->geom->num_colors) {
+            if (src->geom->num_colors != dst->geom->sz_colors) {
+                if (src->geom->num_colors < dst->geom->sz_colors) {
+                    for (i = src->geom->num_colors,
+                         dcolor = dst->geom->colors + i;
+                         i < dst->geom->num_colors;
+                         i++, dcolor++) {
+                        free(dcolor->spec);
+                    }
+                }
+
+                if (dst->geom->sz_colors)
+                    tmp = realloc(dst->geom->colors,
+                                   src->geom->num_colors *
+                                    sizeof(XkbColorRec));
+                else
+                    tmp = malloc(src->geom->num_colors *
+                                  sizeof(XkbColorRec));
+                if (!tmp)
+                    return FALSE;
+                dst->geom->colors = tmp;
+            }
+
+            dst->geom->sz_colors = src->geom->num_colors;
+
+            if (dst->geom->sz_colors > dst->geom->num_colors) {
+                memset(dst->geom->colors + dst->geom->num_colors, 0,
+                      (dst->geom->sz_colors - dst->geom->num_colors) *
+                      sizeof(XkbColorRec));
+            }
+
+            for (i = 0,
+                  scolor = src->geom->colors,
+                  dcolor = dst->geom->colors;
+                 i < src->geom->num_colors;
+                 i++, scolor++, dcolor++) {
+                if (i < dst->geom->num_colors) {
+                    if (strlen(scolor->spec) != strlen(dcolor->spec)) {
+                        tmp = realloc(dcolor->spec, strlen(scolor->spec) + 1);
+                        if (!tmp)
+                            return FALSE;
+                        dcolor->spec = tmp;
+                    }
+                    strcpy(dcolor->spec, scolor->spec);
+                }
+                else {
+                    dcolor->spec = xstrdup(scolor->spec);
+                }
+                dcolor->pixel = scolor->pixel;
+            }
+
+            dst->geom->num_colors = dst->geom->sz_colors;
+        }
+        else {
+            if (dst->geom->sz_colors) {
+                for (i = 0, dcolor = dst->geom->colors;
+                     i < dst->geom->num_colors;
+                     i++, dcolor++) {
+                    free(dcolor->spec);
+                }
+                free(dst->geom->colors);
+                dst->geom->colors = NULL;
+            }
+
+            dst->geom->num_colors = 0;
+            dst->geom->sz_colors = 0;
+        }
+
+        /* shapes */
+        /* shapes break down into outlines, which break down into points. */
+        if (dst->geom->num_shapes) {
+            for (i = 0, dshape = dst->geom->shapes;
+                 i < dst->geom->num_shapes;
+                 i++, dshape++) {
+                for (j = 0, doutline = dshape->outlines;
+                     j < dshape->num_outlines;
+                     j++, doutline++) {
+                    if (doutline->sz_points)
+                        free(doutline->points);
+                }
+
+                if (dshape->sz_outlines) {
+                    free(dshape->outlines);
+                    dshape->outlines = NULL;
+                }
+
+                dshape->num_outlines = 0;
+                dshape->sz_outlines = 0;
+            }
+        }
+
+        if (src->geom->num_shapes) {
+            tmp = calloc(src->geom->num_shapes, sizeof(XkbShapeRec));
+            if (!tmp)
+                return FALSE;
+            dst->geom->shapes = tmp;
+
+            for (i = 0, sshape = src->geom->shapes, dshape = dst->geom->shapes;
+                 i < src->geom->num_shapes;
+                 i++, sshape++, dshape++) {
+                if (sshape->num_outlines) {
+                    tmp = calloc(sshape->num_outlines, sizeof(XkbOutlineRec));
+                    if (!tmp)
+                        return FALSE;
+                    dshape->outlines = tmp;
+                    
+                    for (j = 0,
+                          soutline = sshape->outlines,
+                          doutline = dshape->outlines;
+                         j < sshape->num_outlines;
+                         j++, soutline++, doutline++) {
+                        if (soutline->num_points) {
+                            tmp = malloc(soutline->num_points *
+                                          sizeof(XkbPointRec));
+                            if (!tmp)
+                                return FALSE;
+                            doutline->points = tmp;
+
+                            memcpy(doutline->points, soutline->points,
+                                   soutline->num_points * sizeof(XkbPointRec));
+
+                            doutline->corner_radius = soutline->corner_radius;
+                        }
+
+                        doutline->num_points = soutline->num_points;
+                        doutline->sz_points = soutline->num_points;
+                    }
+                }
+
+                dshape->num_outlines = sshape->num_outlines;
+                dshape->sz_outlines = sshape->num_outlines;
+                dshape->name = sshape->name;
+                dshape->bounds = sshape->bounds;
+
+                dshape->approx = NULL;
+                if (sshape->approx && sshape->num_outlines > 0) {
+
+                    const ptrdiff_t approx_idx =
+                            sshape->approx - sshape->outlines;
+
+                    if (approx_idx < dshape->num_outlines) {
+                            dshape->approx = dshape->outlines + approx_idx;
+                    } else {
+                            LogMessage(X_WARNING, "XKB: approx outline "
+                                            "index is out of range\n");
+                    }
+                }
+
+                dshape->primary = NULL;
+                if (sshape->primary && sshape->num_outlines > 0) {
+
+                    const ptrdiff_t primary_idx =
+                            sshape->primary - sshape->outlines;
+
+                    if (primary_idx < dshape->num_outlines) {
+                            dshape->primary = dshape->outlines + primary_idx;
+                    } else {
+                            LogMessage(X_WARNING, "XKB: primary outline "
+                                            "index is out of range\n");
+                    }
+                }
+            }
+
+            dst->geom->num_shapes = src->geom->num_shapes;
+            dst->geom->sz_shapes = src->geom->num_shapes;
+        }
+        else {
+            if (dst->geom->sz_shapes) {
+                free(dst->geom->shapes);
+            }
+            dst->geom->shapes = NULL;
+            dst->geom->num_shapes = 0;
+            dst->geom->sz_shapes = 0;
+        }
+
+        /* sections */
+        /* sections break down into doodads, and also into rows, which break
+         * down into keys. */
+        if (dst->geom->num_sections) {
+            for (i = 0, dsection = dst->geom->sections;
+                 i < dst->geom->num_sections;
+                 i++, dsection++) {
+                for (j = 0, drow = dsection->rows;
+                     j < dsection->num_rows;
+                     j++, drow++) {
+                    if (drow->num_keys)
+                        free(drow->keys);
+                }
+
+                if (dsection->num_rows)
+                    free(dsection->rows);
+
+                /* cut and waste from geom/doodad below. */
+                for (j = 0, ddoodad = dsection->doodads;
+                     j < dsection->num_doodads;
+                     j++, ddoodad++) {
+                    if (ddoodad->any.type == XkbTextDoodad) {
+                        free(ddoodad->text.text);
+                        ddoodad->text.text = NULL;
+                        free(ddoodad->text.font);
+                        ddoodad->text.font = NULL;
+                     }
+                     else if (ddoodad->any.type == XkbLogoDoodad) {
+                         free(ddoodad->logo.logo_name);
+                         ddoodad->logo.logo_name = NULL;
+                    }
+                }
+
+                free(dsection->doodads);
+            }
+
+            dst->geom->num_sections = 0;
+            dst->geom->sections = NULL;
+        }
+
+        if (src->geom->num_sections) {
+            if (dst->geom->sz_sections)
+                tmp = realloc(dst->geom->sections,
+                               src->geom->num_sections *
+                                sizeof(XkbSectionRec));
+            else
+                tmp = malloc(src->geom->num_sections * sizeof(XkbSectionRec));
+            if (!tmp)
+                return FALSE;
+            memset(tmp, 0, src->geom->num_sections * sizeof(XkbSectionRec));
+            dst->geom->sections = tmp;
+            dst->geom->num_sections = src->geom->num_sections;
+            dst->geom->sz_sections = src->geom->num_sections;
+
+            for (i = 0,
+                  ssection = src->geom->sections,
+                  dsection = dst->geom->sections;
+                 i < src->geom->num_sections;
+                 i++, ssection++, dsection++) {
+                *dsection = *ssection;
+                if (ssection->num_rows) {
+                    tmp = calloc(ssection->num_rows, sizeof(XkbRowRec));
+                    if (!tmp)
+                        return FALSE;
+                    dsection->rows = tmp;
+                }
+                dsection->num_rows = ssection->num_rows;
+                dsection->sz_rows = ssection->num_rows;
+
+                for (j = 0, srow = ssection->rows, drow = dsection->rows;
+                     j < ssection->num_rows;
+                     j++, srow++, drow++) {
+                    if (srow->num_keys) {
+                        tmp = malloc(srow->num_keys * sizeof(XkbKeyRec));
+                        if (!tmp)
+                            return FALSE;
+                        drow->keys = tmp;
+                        memcpy(drow->keys, srow->keys,
+                               srow->num_keys * sizeof(XkbKeyRec));
+                    }
+                    drow->num_keys = srow->num_keys;
+                    drow->sz_keys = srow->num_keys;
+                    drow->top = srow->top;
+                    drow->left = srow->left;
+                    drow->vertical = srow->vertical;
+                    drow->bounds = srow->bounds;
+                }
+
+                if (ssection->num_doodads) {
+                    tmp = calloc(ssection->num_doodads, sizeof(XkbDoodadRec));
+                    if (!tmp)
+                        return FALSE;
+                    dsection->doodads = tmp;
+                }
+                else {
+                    dsection->doodads = NULL;
+                }
+
+                dsection->sz_doodads = ssection->num_doodads;
+                for (k = 0,
+                      sdoodad = ssection->doodads,
+                      ddoodad = dsection->doodads;
+                     k < ssection->num_doodads;
+                     k++, sdoodad++, ddoodad++) {
+                    memcpy(ddoodad , sdoodad, sizeof(XkbDoodadRec));
+                    if (sdoodad->any.type == XkbTextDoodad) {
+                        if (sdoodad->text.text)
+                            ddoodad->text.text =
+                             strdup(sdoodad->text.text);
+                        if (sdoodad->text.font)
+                            ddoodad->text.font =
+                             strdup(sdoodad->text.font);
+                    }
+                    else if (sdoodad->any.type == XkbLogoDoodad) {
+                        if (sdoodad->logo.logo_name)
+                            ddoodad->logo.logo_name =
+                             strdup(sdoodad->logo.logo_name);
+                    }
+                }
+                dsection->overlays = NULL;
+                dsection->sz_overlays = 0;
+                dsection->num_overlays = 0;
+            }
+        }
+        else {
+            if (dst->geom->sz_sections) {
+                free(dst->geom->sections);
+            }
+
+            dst->geom->sections = NULL;
+            dst->geom->num_sections = 0;
+            dst->geom->sz_sections = 0;
+        }
+
+        /* doodads */
+        if (dst->geom->num_doodads) {
+            for (i = src->geom->num_doodads,
+                  ddoodad = dst->geom->doodads +
+                             src->geom->num_doodads;
+                 i < dst->geom->num_doodads;
+                 i++, ddoodad++) {
+                 if (ddoodad->any.type == XkbTextDoodad) {
+                     free(ddoodad->text.text);
+                     ddoodad->text.text = NULL;
+                     free(ddoodad->text.font);
+                     ddoodad->text.font = NULL;
+                 }
+                 else if (ddoodad->any.type == XkbLogoDoodad) {
+                     free(ddoodad->logo.logo_name);
+                     ddoodad->logo.logo_name = NULL;
+                }
+            }
+            dst->geom->num_doodads = 0;
+            dst->geom->doodads = NULL;
+        }
+
+        if (src->geom->num_doodads) {
+            if (dst->geom->sz_doodads)
+                tmp = realloc(dst->geom->doodads,
+                               src->geom->num_doodads *
+                                sizeof(XkbDoodadRec));
+            else
+                tmp = malloc(src->geom->num_doodads *
+                              sizeof(XkbDoodadRec));
+            if (!tmp)
+                return FALSE;
+            memset(tmp, 0, src->geom->num_doodads * sizeof(XkbDoodadRec));
+            dst->geom->doodads = tmp;
+
+            dst->geom->sz_doodads = src->geom->num_doodads;
+
+            for (i = 0,
+                  sdoodad = src->geom->doodads,
+                  ddoodad = dst->geom->doodads;
+                 i < src->geom->num_doodads;
+                 i++, sdoodad++, ddoodad++) {
+                memcpy(ddoodad , sdoodad, sizeof(XkbDoodadRec));
+                if (sdoodad->any.type == XkbTextDoodad) {
+                    if (sdoodad->text.text)
+                        ddoodad->text.text = strdup(sdoodad->text.text);
+                    if (sdoodad->text.font)
+                        ddoodad->text.font = strdup(sdoodad->text.font);
+                }
+                else if (sdoodad->any.type == XkbLogoDoodad) {
+                    if (sdoodad->logo.logo_name)
+                        ddoodad->logo.logo_name =
+                          strdup(sdoodad->logo.logo_name);
+                }
+            }
+
+            dst->geom->num_doodads = dst->geom->sz_doodads;
+        }
+        else {
+            if (dst->geom->sz_doodads) {
+                free(dst->geom->doodads);
+            }
+
+            dst->geom->doodads = NULL;
+            dst->geom->num_doodads = 0;
+            dst->geom->sz_doodads = 0;
+        }
+
+        /* key aliases */
+        if (src->geom->num_key_aliases) {
+            if (src->geom->num_key_aliases != dst->geom->sz_key_aliases) {
+                if (dst->geom->sz_key_aliases)
+                    tmp = realloc(dst->geom->key_aliases,
+                                   src->geom->num_key_aliases *
+                                    2 * XkbKeyNameLength);
+                else
+                    tmp = malloc(src->geom->num_key_aliases *
+                                  2 * XkbKeyNameLength);
+                if (!tmp)
+                    return FALSE;
+                dst->geom->key_aliases = tmp;
+
+                dst->geom->sz_key_aliases = src->geom->num_key_aliases;
+            }
+
+            memcpy(dst->geom->key_aliases, src->geom->key_aliases,
+                   src->geom->num_key_aliases * 2 * XkbKeyNameLength);
+
+            dst->geom->num_key_aliases = dst->geom->sz_key_aliases;
+        }
+        else {
+            free(dst->geom->key_aliases);
+            dst->geom->key_aliases = NULL;
+            dst->geom->num_key_aliases = 0;
+            dst->geom->sz_key_aliases = 0;
+        }
+        
+        /* font */
+        if (src->geom->label_font) {
+            if (!dst->geom->label_font) {
+                tmp = malloc(strlen(src->geom->label_font) + 1);
+                if (!tmp)
+                    return FALSE;
+                dst->geom->label_font = tmp;
+            }
+            else if (strlen(src->geom->label_font) !=
+                strlen(dst->geom->label_font)) {
+                tmp = realloc(dst->geom->label_font,
+                               strlen(src->geom->label_font) + 1);
+                if (!tmp)
+                    return FALSE;
+                dst->geom->label_font = tmp;
+            }
+
+            strcpy(dst->geom->label_font, src->geom->label_font);
+            i = XkbGeomColorIndex(src->geom, src->geom->label_color);
+            dst->geom->label_color = &(dst->geom->colors[i]);
+            i = XkbGeomColorIndex(src->geom, src->geom->base_color);
+            dst->geom->base_color = &(dst->geom->colors[i]);
+        }
+        else {
+            free(dst->geom->label_font);
+            dst->geom->label_font = NULL;
+            dst->geom->label_color = NULL;
+            dst->geom->base_color = NULL;
+        }
+
+        dst->geom->name = src->geom->name;
+        dst->geom->width_mm = src->geom->width_mm;
+        dst->geom->height_mm = src->geom->height_mm;
+    }
+    else
+    {
+        if (dst->geom) {
+            /* I LOVE THE DIFFERENT CALL SIGNATURE.  REALLY, I DO. */
+            XkbFreeGeometry(dst->geom, XkbGeomAllMask, TRUE);
+            dst->geom = NULL;
+        }
+    }
+
+    return TRUE;
+}
+
+static Bool
+_XkbCopyIndicators(XkbDescPtr src, XkbDescPtr dst)
+{
+    /* indicators */
+    if (src->indicators) {
+        if (!dst->indicators) {
+            dst->indicators = malloc(sizeof(XkbIndicatorRec));
+            if (!dst->indicators)
+                return FALSE;
+        }
+        memcpy(dst->indicators, src->indicators, sizeof(XkbIndicatorRec));
+    }
+    else {
+        free(dst->indicators);
+        dst->indicators = NULL;
+    }
+    return TRUE;
+}
+
+static Bool
+_XkbCopyControls(XkbDescPtr src, XkbDescPtr dst)
+{
+    /* controls */
+    if (src->ctrls) {
+        if (!dst->ctrls) {
+            dst->ctrls = malloc(sizeof(XkbControlsRec));
+            if (!dst->ctrls)
+                return FALSE;
+        }
+        memcpy(dst->ctrls, src->ctrls, sizeof(XkbControlsRec));
+    }
+    else {
+        free(dst->ctrls);
+        dst->ctrls = NULL;
+    }
+    return TRUE;
+}
+
+/**
+ * Copy an XKB map from src to dst, reallocating when necessary: if some
+ * map components are present in one, but not in the other, the destination
+ * components will be allocated or freed as necessary.
+ *
+ * Basic map consistency is assumed on both sides, so maps with random
+ * uninitialised data (e.g. names->radio_grous == NULL, names->num_rg == 19)
+ * _will_ cause failures.  You've been warned.
+ *
+ * Returns TRUE on success, or FALSE on failure.  If this function fails,
+ * dst may be in an inconsistent state: all its pointers are guaranteed
+ * to remain valid, but part of the map may be from src and part from dst.
+ *
+ */
+
+Bool
+XkbCopyKeymap(XkbDescPtr dst, XkbDescPtr src)
+{
+
+    if (!src || !dst) {
+        DebugF("XkbCopyKeymap: src (%p) or dst (%p) is NULL\n", src, dst);
+        return FALSE;
+    }
+
+    if (src == dst)
+        return TRUE;
+
+    if (!_XkbCopyClientMap(src, dst)) {
+        DebugF("XkbCopyKeymap: failed to copy client map\n");
+        return FALSE;
+    }
+    if (!_XkbCopyServerMap(src, dst)) {
+        DebugF("XkbCopyKeymap: failed to copy server map\n");
+        return FALSE;
+    }
+    if (!_XkbCopyIndicators(src, dst)) {
+        DebugF("XkbCopyKeymap: failed to copy indicators\n");
+        return FALSE;
+    }
+    if (!_XkbCopyControls(src, dst)) {
+        DebugF("XkbCopyKeymap: failed to copy controls\n");
+        return FALSE;
+    }
+    if (!_XkbCopyNames(src, dst)) {
+        DebugF("XkbCopyKeymap: failed to copy names\n");
+        return FALSE;
+    }
+    if (!_XkbCopyCompat(src, dst)) {
+        DebugF("XkbCopyKeymap: failed to copy compat map\n");
+        return FALSE;
+    }
+    if (!_XkbCopyGeom(src, dst)) {
+        DebugF("XkbCopyKeymap: failed to copy geometry\n");
+        return FALSE;
+    }
+
+    dst->min_key_code = src->min_key_code;
+    dst->max_key_code = src->max_key_code;
+
+    return TRUE;
+}
+
+Bool
+XkbCopyDeviceKeymap(DeviceIntPtr dst, DeviceIntPtr src)
+{
+    xkbNewKeyboardNotify nkn;
+    Bool ret;
+
+    if (!dst->key || !src->key)
+        return FALSE;
+
+    memset(&nkn, 0, sizeof(xkbNewKeyboardNotify));
+    nkn.oldMinKeyCode = dst->key->xkbInfo->desc->min_key_code;
+    nkn.oldMaxKeyCode = dst->key->xkbInfo->desc->max_key_code;
+    nkn.deviceID = dst->id;
+    nkn.oldDeviceID = dst->id; /* maybe src->id? */
+    nkn.minKeyCode = src->key->xkbInfo->desc->min_key_code;
+    nkn.maxKeyCode = src->key->xkbInfo->desc->max_key_code;
+    nkn.requestMajor = XkbReqCode;
+    nkn.requestMinor = X_kbSetMap; /* Near enough's good enough. */
+    nkn.changed = XkbNKN_KeycodesMask;
+    if (src->key->xkbInfo->desc->geom)
+        nkn.changed |= XkbNKN_GeometryMask;
+
+    ret = XkbCopyKeymap(dst->key->xkbInfo->desc, src->key->xkbInfo->desc);
+    if (ret)
+        XkbSendNewKeyboardNotify(dst, &nkn);
+
+    return ret;
+}
+
+int
+XkbGetEffectiveGroup(XkbSrvInfoPtr xkbi, XkbStatePtr xkbState, CARD8 keycode)
+{
+    XkbDescPtr xkb = xkbi->desc;
+    int effectiveGroup = xkbState->group;
+
+    if (!XkbKeycodeInRange(xkb, keycode))
+        return -1;
+
+    if (effectiveGroup == XkbGroup1Index)
+        return effectiveGroup;
+
+    if (XkbKeyNumGroups(xkb,keycode) > 1U) {
+        if (effectiveGroup >= XkbKeyNumGroups(xkb,keycode)) {
+            unsigned int gi = XkbKeyGroupInfo(xkb,keycode);
+            switch (XkbOutOfRangeGroupAction(gi)) {
+                default:
+                case XkbWrapIntoRange:
+                    effectiveGroup %= XkbKeyNumGroups(xkb, keycode);
+                    break;
+                case XkbClampIntoRange:
+                    effectiveGroup = XkbKeyNumGroups(xkb, keycode) - 1;
+                    break;
+                case XkbRedirectIntoRange:
+                    effectiveGroup = XkbOutOfRangeGroupInfo(gi);
+                    if (effectiveGroup >= XkbKeyNumGroups(xkb, keycode))
+                        effectiveGroup = 0;
+                    break;
+            }
+        }
+    }
+    else effectiveGroup = XkbGroup1Index;
+
+    return effectiveGroup;
+}
+
+/* Merge the lockedPtrButtons from all attached SDs for the given master
+ * device into the MD's state.
+ */
+void
+XkbMergeLockedPtrBtns(DeviceIntPtr master)
+{
+    DeviceIntPtr d = inputInfo.devices;
+    XkbSrvInfoPtr xkbi = NULL;
+
+    if (!IsMaster(master))
+        return;
+
+    if (!master->key)
+        return;
+
+    xkbi = master->key->xkbInfo;
+    xkbi->lockedPtrButtons = 0;
+
+    for (; d; d = d->next) {
+        if (IsMaster(d) || GetMaster(d, MASTER_KEYBOARD) != master || !d->key)
+            continue;
+
+        xkbi->lockedPtrButtons |= d->key->xkbInfo->lockedPtrButtons;
+    }
+}