// Copyright (c) 1997-2009 Nokia Corporation and/or its subsidiary(-ies).

 // All rights reserved.

 // This component and the accompanying materials are made available

 // under the terms of the License "Eclipse Public License v1.0"

 // which accompanies this distribution, and is available

 // at the URL "http://www.eclipse.org/legal/epl-v10.html".

 //

 // Initial Contributors:

 // Nokia Corporation - initial contribution.

 //

 // Contributors:

 //

 // Description:

 // e32\common\arm\cdes16.cia

 // 

 //

 #include <e32cia.h>

 #include "../common.h"

 #if defined(__DES16_MACHINE_CODED__) || defined(__EABI__)

 GLREF_C void Des16PanicBadDesType();

 GLREF_C void Des16PanicPosOutOfRange();

 #endif

 #ifdef __DES16_MACHINE_CODED__

 GLREF_C void Des16PanicLengthNegative();

 GLREF_C void Des16PanicMaxLengthNegative();

 GLREF_C void Des16PanicLengthOutOfRange();

 GLREF_C void Des16PanicDesOverflow();

 GLREF_C void Des16PanicDesIndexOutOfRange();

 __NAKED__ EXPORT_C const TUint16 *TDesC16::Ptr() const

 //

 // Return a pointer to the buffer.

 //

 	{

 	asm("ldr r1, [r0], #4 ");

 	asm("cmp r1, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("eor r1, r1, r1, lsr #1 ");

 	asm("msr cpsr_flg, r1 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("addeq r0, r0, #4 ");

 	__JUMP(,lr);

 	}

 #ifndef __EABI_CTORS__

 __NAKED__ EXPORT_C TPtrC16::TPtrC16()

 //

 // Default constructor

 //

 	{

 	asm("mov r1, #0x10000000 ");	// type=EPtrC, length=0

 	asm("mov r2, #0 ");				// ptr=NULL

 	asm("stmia r0, {r1,r2} ");

 	__JUMP(,lr);

 	}

 __NAKED__ EXPORT_C TPtrC16::TPtrC16(const TDesC16& /*aDes*/)

 //

 // Constructor

 //

 	{

 	asm("ldr r2, [r1], #4 ");		// r2 = type/length

 	asm("bic r3, r2, #0xF0000000");	// r3 = length

 	asm("orr r3, r3, #0x10000000");	// r3 = EPtrC + length

 	asm("cmp r2, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("eor r2, r2, r2, lsr #1 ");

 	asm("msr cpsr_flg, r2 ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("addeq r1, r1, #4 ");		// r1 = aDes.Ptr()

 	asm("str r3, [r0] ");

 	asm("str r1, [r0, #4] ");

 	__JUMP(,lr);

 	}

 #ifdef __DES16_MACHINE_CODED_HWORD__

 __NAKED__ EXPORT_C TPtrC16::TPtrC16(const TUint16* /*aString*/)

 //

 // Constructor

 //

 	{

 	asm("mov r2, r1 ");				// save aString address

 	asm("1: ");

 	asm("ldrh r3, [r1], #2 ");

 	asm("cmp r3, #0 ");

 	asm("bne 1b ");					// loop until we reach zero terminator

 	asm("rsb r1, r2, r1 ");			// r1 = 2*length + 2

 	asm("sub r1, r1, #2 ");			// r1 = 2*length

 	asm("mov r1, r1, lsr #1 ");		// r1 = length

 	asm("orr r1, r1, #0x10000000 ");	// r1=EPtrC + length

 	asm("stmia r0, {r1, r2} ");		// store type/length and ptr fields

 	__JUMP(,lr);

 	}

 #endif

 __NAKED__ EXPORT_C TPtrC16::TPtrC16(const TUint16* /*aBuf*/,TInt /*aLength*/)

 //

 // Constructor

 //

 	{

 	asm("orrs r2, r2, #0x10000000 ");

 	asm("strpl r2, [r0] ");

 	asm("strpl r1, [r0, #4] ");

 	__JUMP(pl,lr);

 	asm("b  " CSM_Z24Des16PanicLengthNegativev);

 	}

 __NAKED__ EXPORT_C TPtr16::TPtr16(TUint16* /*aBuf*/,TInt /*aMaxLength*/)

 //

 // Constructor

 //

 	{

 	asm("cmp r2, #0 ");

 	asm("movpl r3, r1 ");

 	asm("movpl r1, #0x20000000 ");	// length=0, EPtr

 	asm("stmplia r0, {r1,r2,r3} ");

 	__JUMP(pl,lr);

 	asm("b  " CSM_Z27Des16PanicMaxLengthNegativev);

 	}

 __NAKED__ EXPORT_C TPtr16::TPtr16(TUint16* /*aBuf*/,TInt /*aLength*/,TInt /*aMaxLength*/)

 //

 // Constructor

 //

 	{

 	asm("cmp r2, #0 ");				// check length>=0

 	asm("cmpge r3, r2 ");			// if so, check maxlength>=length

 	asm("movge r12, r1 ");

 	asm("orrge r2, r2, #0x20000000 ");	// r2 = length + EPtr

 	asm("stmgeia r0, {r2,r3,r12} ");

 	__JUMP(ge,lr);

 	asm("cmp r2, #0 ");

 	asm("bmi  " CSM_Z24Des16PanicLengthNegativev);

 	asm("cmp r3, #0 ");

 	asm("bmi  " CSM_Z27Des16PanicMaxLengthNegativev);

 	asm("b  " CSM_Z26Des16PanicLengthOutOfRangev);

 	}

 __NAKED__ EXPORT_C TPtr16::TPtr16(TBufCBase16& /*aLcb*/,TInt /*aMaxLength*/)

 //

 // Constructor

 //

 	{

 	asm("mov r3, r1 ");

 	asm("ldr r1, [r3] ");

 	asm("bic r1, r1, #0xF0000000 ");		// r1=aLcb.Length()

 	asm("cmp r1, r2 ");						// check against maxlength

 	asm("orrle r1, r1, #0x40000000 ");		// r1=aLcb.Length() + EBufCPtr

 	asm("stmleia r0, {r1,r2,r3} ");

 	__JUMP(le,lr);

 	asm("b  " CSM_Z26Des16PanicLengthOutOfRangev);

 	}

 __NAKED__ EXPORT_C TBufCBase16::TBufCBase16()

 //

 // Constructor

 //

 	{

 	asm("mov r1, #0 ");

 	asm("str r1, [r0] ");

 	__JUMP(,lr);

 	}

 #ifdef __DES16_MACHINE_CODED_HWORD__

 __NAKED__ EXPORT_C TBufCBase16::TBufCBase16(const TUint16* /*aString*/,TInt /*aMaxLength*/)

 //

 // Constructor

 //

 	{

 	asm("sub r3, r1, #2 ");				// r3=aString address-2

 	asm("1: ");

 	asm("ldrh r12, [r3, #2]! ");

 	asm("cmp r12, #0 ");

 	asm("bne 1b ");						// loop until we reach zero terminator

 	asm("sub r3, r3, r1 ");				// r3 = 2*length

 	asm("mov r3, r3, lsr #1 ");			// r3 = length (+EBufC)

 	asm("cmp r3, r2 ");					// check against max length

 	asm("bgt Des16PanicLengthOutOfRange__Fv ");

 	asm("stmfd sp!, {r0,lr} ");			// save registers for function call

 	asm("str r3, [r0], #4 ");			// save length/type field, r0->buffer

 	asm("add r2, r3, r3 ");				// size=2*length into r2 for function call

 	asm("bl memmove ");					// call memmove

 	__POPRET("r0,");

 	}

 #endif

 __NAKED__ EXPORT_C TBufCBase16::TBufCBase16(const TDesC16& /*aDes*/,TInt /*aMaxLength*/)

 //

 // Constructor

 //

 	{

 	asm("ldr r3, [r1], #4 ");			// r3 = type/length

 	asm("bic r12, r3, #0xF0000000");	// r12 = length

 	asm("cmp r12, r2 ");				// compare with maxlength

 	asm("bgt  " CSM_Z26Des16PanicLengthOutOfRangev);

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("addeq r1, r1, #4 ");			// r1 = aDes.Ptr()

 	asm("stmfd sp!, {r0,lr} ");			// save registers for function call

 	asm("str r12, [r0], #4 ");			// store length/type, r0->buffer

 	asm("add r2, r12, r12 ");			// size=2*length into r2 for function call

 	asm("bl memmove ");					// call memmove

 	__POPRET("r0,");

 	}

 #endif

 #ifdef __DES16_MACHINE_CODED_HWORD__

 __NAKED__ EXPORT_C void TBufCBase16::Copy(const TUint16* /*aString*/,TInt /*aMaxLength*/)

 //

 // Copy from a string.

 //

 	{

 	asm("sub r3, r1, #2 ");				// r3=aString address-2

 	asm("1: ");

 	asm("ldrh r12, [r3, #2]! ");

 	asm("cmp r12, #0 ");

 	asm("bne 1b ");						// loop until we reach zero terminator

 	asm("sub r3, r3, r1 ");				// r3 = 2*length

 	asm("mov r3, r3, lsr #1 ");			// r3 = length (+EBufC)

 	asm("cmp r3, r2 ");					// check against max length

 	asm("bgt Des16PanicLengthOutOfRange__Fv ");

 	asm("str r3, [r0], #4 ");			// save length/type field, r0->buffer

 	asm("add r2, r3, r3 ");				// size=2*length into r2 for function call

 	asm("b memmove ");					// call memmove

 	}

 #endif

 __NAKED__ EXPORT_C void TBufCBase16::Copy(const TDesC16& /*aDes*/,TInt /*aMaxLength*/)

 //

 // Copy from a descriptor.

 //

 	{

 	asm("ldr r3, [r1], #4 ");			// r3 = type/length

 	asm("bic r12, r3, #0xF0000000");	// r12 = length

 	asm("cmp r12, r2 ");				// compare with maxlength

 	asm("bgt  " CSM_Z21Des16PanicDesOverflowv);

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("addeq r1, r1, #4 ");			// r1 = aDes.Ptr()

 	asm("str r12, [r0], #4 ");			// store length/type, r0->buffer

 	asm("add r2, r12, r12 ");			// size=2*length into r2 for function call

 	asm("b memmove ");					// call memmove

 	}

 #ifndef __EABI_CTORS__

 __NAKED__ EXPORT_C TBufBase16::TBufBase16(TInt /*aMaxLength*/)

 	{

 	asm("mov r2, #0x30000000 ");		// EBuf + zero length

 	asm("str r2, [r0] ");

 	asm("str r1, [r0, #4] ");

 	__JUMP(,lr);

 	}

 __NAKED__ EXPORT_C TBufBase16::TBufBase16(TInt /*aLength*/, TInt /*aMaxLength*/)

 	{

 	asm("cmp r1, #0 ");					// check length>=0

 	asm("cmpge r2, r1 ");				// if so, check maxlength>=length

 	asm("orrge r1, r1, #0x30000000 ");	// r1=length + EBuf

 	asm("stmgeia r0, {r1,r2} ");		// store length/type and maxlength fields

 	__JUMP(ge,lr);

 	asm("cmp r2, #0 ");

 	asm("bmi  " CSM_Z27Des16PanicMaxLengthNegativev);

 	asm("b  " CSM_Z26Des16PanicLengthOutOfRangev);

 	}

 #ifdef __DES16_MACHINE_CODED_HWORD__

 __NAKED__ EXPORT_C TBufBase16::TBufBase16(const TUint16* /*aString*/, TInt /*aMaxLength*/)

 	{

 	asm("mov r12, r1, lsr #1 ");		// save aString pointer (lose bottom bit which should be 0)

 	asm("1: ");

 	asm("ldrh r3, [r1], #2 ");

 	asm("cmp r3, #0 ");

 	asm("bne 1b ");						// loop until we reach zero terminator

 	asm("rsb r3, r12, r1, lsr #1 ");	// r3 = length + 1

 	asm("sub r3, r3, #1 ");				// r3 = length

 	asm("cmp r3, r2 ");					// compare to max length

 	asm("bgt Des16PanicLengthOutOfRange__Fv ");	// length too big, so panic

 	asm("orr r1, r3, #0x30000000 ");	// if length<=max, r1=EBuf + length

 	asm("stmfd sp!, {r0, lr} ");		// save registers for function call

 	asm("stmia r0!, {r1, r2} ");		// store type/length and max length fields, r0->buffer

 	asm("mov r2, r3, lsl #1 ");			// r2=Size()

 	asm("mov r1, r12, lsl #1 ");		// r1=aString

 	asm("bl memmove ");					// call memmove

 	__POPRET("r0,");

 	}

 #endif

 __NAKED__ EXPORT_C TBufBase16::TBufBase16(const TDesC16& /*aDes*/, TInt /*aMaxLength*/)

 	{

 	asm("ldr r3, [r1], #4 ");			// r3 = type/length

 	asm("bic r12, r3, #0xF0000000");	// r12 = length

 	asm("cmp r12, r2 ");				// compare with maxlength

 	asm("bgt  " CSM_Z26Des16PanicLengthOutOfRangev);

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("addeq r1, r1, #4 ");			// r1 = aDes.Ptr()

 	asm("stmfd sp!, {r0,lr} ");			// save registers for function call

 	asm("orr r3, r12, #0x30000000 ");	// add EBuf type field

 	asm("str r3, [r0], #4 ");			// store length/type, r0->max length

 	asm("str r2, [r0], #4 ");			// store max length, r0->buffer

 	asm("mov r2, r12, lsl #1 ");		// Size() into r2 for function call

 	asm("bl memmove ");					// call memmove

 	__POPRET("r0,");

 	}

 #endif

 __NAKED__ EXPORT_C void TDes16::SetLength(TInt /*aLength*/)

 //

 // Set the length of the descriptor, checking the length is O.K.

 //

 	{

 	asm("ldmia r0, {r2,r3} ");			// r2=length/type, r3=maxlength

 	asm("cmp r1, r3 ");					// check aLength against maxlength and for -ve values

 	asm("bhi  " CSM_Z21Des16PanicDesOverflowv);

 	asm("and r2, r2, #0xF0000000 ");	// r2=type field

 	asm("cmp r2, #0x40000000 ");		// check for EBufCPtr

 	asm("orr r2, r2, r1 ");				// r2=type + new length

 	asm("str r2, [r0] ");				// store new length

 	__JUMP(ne,lr);

 	asm("ldr r2, [r0, #8] ");			// r2=pointer to TBufCBase

 	asm("str r1, [r2] ");				// update length of TBufCBase

 	__JUMP(,lr);

   	}

 __NAKED__ EXPORT_C void TDes16::SetMax()

 //

 // Set the length to MaxLength().

 //

 	{

 	asm("ldmia r0, {r1,r2} ");			// r1=length/type, r2=maxlength

 	asm("and r1, r1, #0xF0000000 ");	// r1=type field

 	asm("cmp r1, #0x40000000 ");		// check for EBufCPtr

 	asm("orr r1, r1, r2 ");				// r1=type field + maxlength

 	asm("str r1, [r0] ");				// store new length

 	__JUMP(ne,lr);

 	asm("ldr r1, [r0, #8] ");			// r1 = pointer to TBufCBase

 	asm("str r2, [r1] ");				// update length of TBufCBase

 	__JUMP(,lr);

 	}

 #ifdef __DES16_MACHINE_CODED_HWORD__

 __NAKED__ EXPORT_C void TDes16::Copy(const TUint16* /*aString*/)

 //

 // Copy a string to this descriptor.

 //

 	{

 	asm("sub r2, r1, #2 ");				// r2=aString-2

 	asm("1: ");

 	asm("ldrh r3, [r2, #2]! ");

 	asm("cmp r3, #0 ");

 	asm("bne 1b ");						// loop until zero terminator reached

 	asm("sub r2, r2, r1 ");				// r2=2*length of string

 	asm("mov r2, r2, lsr #1 ");			// r2=length of string

 	asm("ldmia r0, {r3,r12} ");			// r3=type/length of this, r12=maxlength

 	asm("cmp r2, r12 ");				// compare new length against maxlength

 	asm("bgt Des16PanicDesOverflow__Fv ");

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("and r3, r3, #0xF0000000 ");	// r3=type of this

 	asm("orr r3, r3, r2 ");				// r3=new type/length

 	asm("str r3, [r0], #4 ");			// store it

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("streq r2, [r0], #4 ");			// if EBufCPtr, update length of TBufCBase, r0=Ptr()

 	asm("add r2, r2, r2 ");				// r2=size=2*length

 	asm("b memmove ");					// call memmove

 	}

 #endif

 __NAKED__ EXPORT_C void TDes16::Copy(const TUint16* /*aBuf*/,TInt /*aLength*/)

 //

 // Copy the aLength characters to the descriptor.

 //

 	{

 	asm("ldmia r0, {r3,r12} ");			// r3=type/length of this, r12=maxlength

 	asm("cmp r2, r12 ");				// compare new length against maxlength

 	asm("bhi  " CSM_Z21Des16PanicDesOverflowv);	// Des16Panic if >MaxLength or -ve

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("and r3, r3, #0xF0000000 ");	// r3=type of this

 	asm("orr r3, r3, r2 ");				// r3=new type/length

 	asm("str r3, [r0], #4 ");			// store it

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("streq r2, [r0], #4 ");			// if EBufCPtr, update length of TBufCBase, r0=Ptr()

 	asm("add r2, r2, r2 ");				// r2=size=2*length

 	asm("b memmove ");					// call memmove

 	}

 __NAKED__ EXPORT_C void TDes16::Copy(const TDesC16& /*aDes*/)

 //

 // Copy a descriptor to this descriptor.

 //

 	{

 	asm("ldr r3, [r1], #4 ");			// r3 = type/length of aDes

 	asm("bic r12, r3, #0xF0000000");	// r12 = aDes.length

 	asm("ldr r2, [r0, #4] ");			// r2=this.maxlength

 	asm("cmp r12, r2 ");				// compare with maxlength

 	asm("bgt  " CSM_Z21Des16PanicDesOverflowv);

 	asm("ldr r2, [r0] ");				// get type of this

 	asm("cmp r2, #0x50000000 ");		// check both descriptor types

 	asm("cmpcc r3, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("and r2, r2, #0xF0000000 ");

 	asm("orr r2, r12, r2 ");			// r2=new type/length of this

 	asm("str r2, [r0], #4 ");			// store it

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("addeq r1, r1, #4 ");			// r1 = aDes.Ptr()

 	asm("eor r2, r2, r2, lsr #1 ");

 	asm("msr cpsr_flg, r2 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("streq r12, [r0], #4 ");		// if EBufCPtr, update length of TBufCBase, r0=Ptr()

 	asm("add r2, r12, r12 ");			// size=2*length into r2 for function call

 	asm("b memmove ");					// call memmove

 	}

 __NAKED__ EXPORT_C TPtr16 TDes16::LeftTPtr(TInt /*aLength*/) const

 //

 // Extract the left portion of the descriptor.

 //

 	{

 	// On entry r0=return store ptr, r1=this, r2=aLength

 	// Return TPtr8 ([r0]=length/type,[r0,#4]=maxLength,[r0,#8]=Ptr)

 	asm("ldr r3, [r1], #4 ");				// r3=this.length/type

 	asm("cmp r2, #0 ");						// check aLength>=0

 	asm("blt Des16PanicPosOutOfRange__Fv ");	// if not, panic

 	asm("bic r12, r3, #0xF0000000 ");		// r12=this.Length()

 	asm("cmp r2, r12 ");					// else limit aLength to Length()

 	asm("movgt r2, r12 ");

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("addeq r1, r1, #4 ");				// r1=this.Ptr()

 	asm("mov r3, r1 ");						// r3=this.Ptr()

 	asm("orr r1, r2, #0x20000000 ");		// r1=aLength + EPtr

 	asm("stmia r0, {r1-r3} ");				

 	__JUMP(,lr);

 	}

 __NAKED__ EXPORT_C TPtr16 TDes16::RightTPtr(TInt /*aLength*/) const

 //

 // Extract the right portion of the descriptor.

 //

 	{

 	// On entry r0=return store ptr, r1=this, r2=aLength

 	// Return TPtr8 ([r0]=length/type,[r0,#4]=maxLength,[r0,#8]=Ptr)

 	asm("ldr r3, [r1], #4 ");				// r3=this.length/type

 	asm("cmp r2, #0 ");						// check aLength>=0

 	asm("blt Des16PanicPosOutOfRange__Fv ");	// if not, panic

 	asm("bic r12, r3, #0xF0000000 ");		// r12=this.Length()

 	asm("cmp r2, r12 ");					// else limit aLength to Length()

 	asm("movgt r2, r12 ");

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("addeq r1, r1, #4 ");				// r0=this.Ptr()

 	asm("add r3, r1, r12, lsl #1 ");		// r3=this.Ptr()+len*2

 	asm("orr r1, r2, #0x20000000 ");		// r1=aLength + EPtr

 	asm("sub r3, r3, r2, lsl #1 ");			// r2=Ptr()+len*2-aLength*2

 	asm("stmia r0, {r1-r3} ");

 	__JUMP(,lr);

 	}

 __NAKED__ EXPORT_C TPtr16 TDes16::MidTPtr(TInt /*aPos*/) const

 //

 // Extract the middle portion of the descriptor.

 //

 	{

 	// On entry r0=return store ptr, r1=this, r2=aPos

 	// Return TPtr8 ([r0]=length/type,[r0,#4]=maxLength,[r0,#8]=Ptr)

 	asm("ldr r3, [r1], #4 ");				// r3=this.length/type

 	asm("bic r12, r3, #0xF0000000 ");		// r12=this.Length()

 	asm("cmp r2, #0 ");						// check aPos>=0

 	asm("cmpge r12, r2 ");					// if so check Length()>=aPos

 	asm("blt Des16PanicPosOutOfRange__Fv ");

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("addeq r1, r1, #4 ");				// r0=this.Ptr()

 	asm("add r3, r1, r2, lsl #1 ");			// r3=this.Ptr()+aPos*2

 	asm("sub r2, r12, r2 ");				// r2=len-aPos (=newMaxLen)

 	asm("orr r1, r2, #0x20000000 ");		// r1=len-aPos + EPtr (=newLen/Type)

 	asm("stmia r0, {r1-r3} ");

 	__JUMP(,lr);

 	}

 __NAKED__ EXPORT_C TPtr16 TDes16::MidTPtr(TInt /*aPos*/,TInt /*aLength*/) const

 //

 // Extract the middle portion of the descriptor.

 //

 	{

 	// On entry r0=return store ptr, r1=this, r2=aPos, r3=aLength

 	// Return TPtr8 ([r0]=length/type,[r0,#4]=maxLength,[r0,#8]=Ptr)

 	asm("str r4, [sp, #-4]! ");				// save r4

 	asm("ldr r12, [r1], #4 ");				// r12=this.length/type

 	asm("mov r4, r1 ");

 	asm("cmp r12, #0x50000000 ");			// check valid descriptor type

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("eor r12, r12, r12, lsr #1 ");

 	asm("msr cpsr_flg, r12 ");

 	asm("ldr r12, [r1, #-4] ");

 	asm("addcs r4, r4, #4 ");

 	asm("ldrle r4, [r4] ");

 	asm("bic r12, r12, #0xF0000000 ");		// r12=Length()

 	asm("addeq r4, r4, #4 ");				// r4=this.Ptr()

 	asm("cmp r2, #0 ");						// check aPos>=0

 	asm("subge r12, r12, r2 ");				// if so, r12=Length()-aPos

 	asm("cmpge r12, r3 ");					// and check Length()-aPos>=aLength

 	asm("orrge r1, r3, #0x20000000 ");		// if so, r0 = aLength + EPtr

 	asm("addge r3, r4, r2, lsl #1 ");		// and r2=this.Ptr()+aPos*2 

 	asm("bicge r2, r1, #0xF0000000 ");		// and r1=aLength

 	asm("stmgeia r0, {r1-r3} ");

 	asm("ldrge r4, [sp], #4 ");

 	__JUMP(ge,lr);

 	asm("b Des16PanicPosOutOfRange__Fv ");

 	}

 __NAKED__ EXPORT_C const TUint16& TDesC16::AtC(TInt /*anIndex*/) const

 //

 // Return a reference to the character in the buffer.

 //

 	{

 	asm("ldr r2, [r0], #4 ");			// r2=length/type

 	asm("bic r3, r2, #0xF0000000 ");	// r3=length

 	asm("cmp r2, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("eor r2, r2, r2, lsr #1 ");

 	asm("msr cpsr_flg, r2 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("addeq r0, r0, #4 ");			// r0=this.Ptr()

 	asm("cmp r1, #0 ");					// check index>=0

 	asm("cmpge r3, r1 ");				// if so, check Length()>index

 	asm("addgt r0, r0, r1, lsl #1 ");		// return value = this.Ptr()+index*2

 	__JUMP(gt,lr);

 	asm("b  " CSM_Z28Des16PanicDesIndexOutOfRangev);

 	}

 #ifdef __DES16_MACHINE_CODED_HWORD__

 __NAKED__ EXPORT_C TInt TDesC16::Locate(TChar /*aChar*/) const

 //

 // Locate character aChar in the descriptor.

 //

 	{

 	asm("ldr r2, [r0], #4 ");			// r2=length/type

 	asm("cmp r2, #0x50000000 ");

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("bics r3, r2, #0xF0000000 ");	// r3=length

 	asm("mvneq r0, #0 ");				// if length=0, not found

 	__JUMP(eq,lr);

 	asm("eor r2, r2, r2, lsr #1 ");

 	asm("msr cpsr_flg, r2 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("addeq r0, r0, #4 ");			// r0=this.Ptr()

 	asm("add r3, r0, r3, lsl #1 ");		// r3=ptr+length*2 (end of string pointer)

 	asm("add r12, r0, #2 ");			// r12=ptr+2

 	asm("1: ");

 	asm("ldrh r2, [r0], #2 ");			// r2=*r0++

 	asm("cmp r1, r2 ");					// is r1=match char?

 	asm("cmpne r0, r3 ");				// if not, is r0=r3 (end pointer)

 	asm("bne 1b ");

 	asm("cmp r1, r2 ");					// did we find char?

 	asm("subeq r0, r0, r12 ");			// if we did, return value = r0-ptr-2

 	asm("moveq r0, r0, lsr #1 ");		// divide by 2 to get index

 	asm("mvnne r0, #0 ");				// else return value =-1

 	__JUMP(,lr);

 	}

 __NAKED__ EXPORT_C TInt TDesC16::LocateReverse(TChar /*aChar*/) const

 //

 // Locate character aChar in the descriptor in reverse.

 //

 	{

 	asm("ldr r2, [r0], #4 ");			// r2=length/type

 	asm("cmp r2, #0x50000000 ");

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("bics r3, r2, #0xF0000000 ");	// r3=length

 	asm("mvneq r0, #0 ");				// if length=0, not found

 	__JUMP(eq,lr);

 	asm("eor r2, r2, r2, lsr #1 ");

 	asm("msr cpsr_flg, r2 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("addeq r0, r0, #4 ");			// r0=this.Ptr()

 	asm("add r3, r0, r3, lsl #1 ");		// r3=Ptr()+Length()

 	asm("1: ");

 	asm("ldrh r2, [r3, #-2]! ");		// r2=*--r3

 	asm("cmp r1, r2 ");					// is r1=match char?

 	asm("cmpne r3, r0 ");				// if not, have we reached beginning of string?

 	asm("bne 1b ");						// loop if neither

 	asm("cmp r1, r2 ");					// did we find match char?

 	asm("subeq r0, r3, r0 ");			// if we did, return value = (r3-r0)/2

 	asm("moveq r0, r0, lsr #1 ");

 	asm("mvnne r0, #0 ");				// else return value =-1

 	__JUMP(,lr);

 	}

 #endif

 #ifndef __KERNEL_MODE__

 __NAKED__ EXPORT_C TInt TDesC16::CompareF(const TDesC16& /*aDes*/) const

 //

 // Compare a descriptor to this descriptor folded.

 //

 	{

 	asm("ldr r12, 1f ");

 	asm("b comparebody ");

 	asm("1: ");

 	asm(".word  " CSM_ZN3Mem8CompareFEPKtiS0_i);

 	}

 __NAKED__ EXPORT_C TInt TDesC16::CompareC(const TDesC16& /*aDes*/) const

 //

 // Compare a descriptor to this descriptor collated.

 //

 	{

 	asm("ldr r12, 1f ");

 	asm("b comparebody ");

 	asm("1: ");

 	asm(".word  " CSM_ZN3Mem8CompareCEPKtiS0_i);

 	}

 #endif

 __NAKED__ EXPORT_C TInt TDesC16::Compare(const TDesC16& /*aDes*/) const

 //

 // Compare a descriptor to this descriptor.

 //

 	{

 	asm("ldr r12, 1f ");

 	asm("comparebody: ");

 	asm("mov r2, r1 ");						// r2=&aDes

 	asm("ldr r3, [r0], #4 ");				// r3=this.length/type

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("bic r1, r3, #0xF0000000 ");		// r1=this.Length()

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("addeq r0, r0, #4 ");				// r0=this.Ptr()

 	asm("ldr r3, [r2], #4 ");				// r3=aDes.length/type

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("ldr r3, [r2, #-4] ");

 	asm("bic r3, r3, #0xF0000000 ");		// r3=aDes.Length()

 	asm("addcs r2, r2, #4 ");

 	asm("ldrle r2, [r2] ");

 	asm("addeq r2, r2, #4 ");				// r2=aDes.Ptr()

 #ifdef __KERNEL_MODE__

 	asm("add r1, r1, r1 ");

 	asm("add r3, r3, r3 ");

 #endif

 	__JUMP(,r12);

 	asm("1: ");

 #ifdef __KERNEL_MODE__

 	asm(".word memcompare ");

 #else

 	asm(".word  " CSM_ZN3Mem7CompareEPKtiS0_i);

 #endif

 	}

 #endif // __DES16_MACHINE_CODED__

 #if defined(__DES16_MACHINE_CODED__) && !defined(__EABI__)

 __NAKED__ EXPORT_C TPtrC16 TDesC16::Left(TInt /*aLength*/) const

 //

 // Extract the left portion of the descriptor.

 //

 	{

 	// On entry r0=this, r1=aLength

 	// Return TPtrC16 in r0,r1

 	asm("ldr r3, [r0], #4 ");				// r3=this.length/type

 	asm("bic r12, r3, #0xF0000000 ");		// r12=this.Length()

 	asm("cmp r1, #0 ");						// check aLength>=0

 	asm("blt  " CSM_Z23Des16PanicPosOutOfRangev);	// if not, panic

 	asm("cmp r1, r12 ");					// else limit aLength to Length()

 	asm("movgt r1, r12 ");

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("addeq r0, r0, #4 ");				// r0=this.Ptr()

 	asm("orr r2, r1, #0x10000000 ");		// r2=aLength + EPtrC

 	asm("mov r1, r0 ");						// r1=result ptr

 	asm("mov r0, r2 ");						// r0=result type/length

 	__JUMP(,lr);

 	}

 __NAKED__ EXPORT_C TPtrC16 TDesC16::Right(TInt /*aLength*/) const

 //

 // Extract the right portion of the descriptor.

 //

 	{

 	// On entry r0=this, r1=aLength

 	// Return TPtrC16 in r0,r1

 	asm("ldr r3, [r0], #4 ");				// r3=this.length/type

 	asm("bic r12, r3, #0xF0000000 ");		// r12=this.Length()

 	asm("cmp r1, #0 ");						// check aLength>=0

 	asm("blt  " CSM_Z23Des16PanicPosOutOfRangev);	// if not, panic

 	asm("cmp r1, r12 ");					// else limit aLength to Length()

 	asm("movgt r1, r12 ");

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("addeq r0, r0, #4 ");				// r0=this.Ptr()

 	asm("add r3, r0, r12, lsl #1 ");		// r3=this.Ptr()+len*2

 	asm("orr r0, r1, #0x10000000 ");		// r0=aLength + EPtrC

 	asm("sub r1, r3, r1, lsl #1 ");			// r1=Ptr()+len*2-aLength*2

 	__JUMP(,lr);

 	}

 __NAKED__ EXPORT_C TPtrC16 TDesC16::Mid(TInt /*aPos*/) const

 //

 // Extract the middle portion of the descriptor.

 //

 	{

 	// On entry r0=this, r1=aPos

 	// Return TPtrC16 in r0,r1

 	asm("ldr r3, [r0], #4 ");				// r3=this.length/type

 	asm("bic r12, r3, #0xF0000000 ");		// r12=this.Length()

 	asm("cmp r1, #0 ");						// check aPos>=0

 	asm("cmpge r12, r1 ");					// if so check Length()>=aPos

 	asm("blt  " CSM_Z23Des16PanicPosOutOfRangev);

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("addeq r0, r0, #4 ");				// r0=this.Ptr()

 	asm("sub r2, r12, r1 ");				// r2=len-aPos

 	asm("add r1, r0, r1, lsl #1 ");			// r1=this.Ptr()+aPos*2

 	asm("orr r0, r2, #0x10000000 ");		// r0=result length + EPtrC

 	__JUMP(,lr);

 	}

 __NAKED__ EXPORT_C TPtrC16 TDesC16::Mid(TInt /*aPos*/,TInt /*aLength*/) const

 //

 // Extract the middle portion of the descriptor.

 //

 	{

 	// On entry r0=this, r1=aPos, r2=aLength

 	// Return TPtrC16 in r0,r1

 	asm("ldr r12, [r0], #4 ");				// r12=this.length/type

 	asm("cmp r12, #0x50000000 ");			// check valid descriptor type

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("eor r12, r12, r12, lsr #1 ");

 	asm("msr cpsr_flg, r12 ");

 	asm("ldr r12, [r0, #-4] ");

 	asm("bic r12, r12, #0xF0000000 ");		// r12=Length()

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("addeq r0, r0, #4 ");				// r0=this.Ptr()

 	asm("cmp r1, #0 ");						// check aPos>=0

 	asm("subge r12, r12, r1 ");				// if so, r12=Length()-aPos

 	asm("cmpge r12, r2 ");					// and check Length()-aPos>=aLength

 	asm("addge r1, r0, r1, lsl #1 ");		// if so, r1=Ptr()+aPos*2

 	asm("orrge r0, r2, #0x10000000 ");		// and r0 = aLength + EPtrC

 	__JUMP(ge,lr);

 	asm("b  " CSM_Z23Des16PanicPosOutOfRangev);

 	}

 #endif // defined(__DES16_MACHINE_CODED__) && !defined(__EABI__)

 #ifdef __DES16_MACHINE_CODED__

 // Here are the __EABI__ compliant versions of the above

 #ifdef __EABI__

 __NAKED__ EXPORT_C TPtrC16 TDesC16::Left(TInt /*aLength*/) const

 //

 // Extract the left portion of the descriptor.

 //

 	{

 	// On entry r0=return store ptr, r1=this, r2=aLength

 	// Return TPtr16 ([r0]=length/type,[r0,#4]=Ptr)

 	asm("ldr r3, [r1], #4 ");				// r3=this.length/type

 	asm("cmp r2, #0 ");					// check aLength>=0

 	asm("blt Des16PanicPosOutOfRange__Fv ");		// if not, panic

 	asm("bic r12, r3, #0xF0000000 ");			// r12=this.Length()

 	asm("cmp r2, r12 ");					// else limit aLength to Length()

 	asm("movgt r2, r12 ");

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("addeq r1, r1, #4 ");				// r1=this.Ptr()

 	asm("mov r3, r1");					// r3=this.Ptr()

 	asm("orr r1, r2, #0x10000000 ");			// r1=aLength + EPtrC

 	asm("stmia r0, {r1,r3} ");				

 	__JUMP(,lr);

 	}

 __NAKED__ EXPORT_C TPtrC16 TDesC16::Right(TInt /*aLength*/) const

 //

 // Extract the right portion of the descriptor.

 //

 	{

 	// On entry r0=return store ptr, r1=this, r2=aLength

 	// Return TPtr16 ([r0]=length/type,[r0,#4]=Ptr)

 	asm("ldr r3, [r1], #4 ");				// r3=this.length/type

 	asm("cmp r2, #0 ");					// check aLength>=0

 	asm("blt Des16PanicPosOutOfRange__Fv ");		// if not, panic

 	asm("bic r12, r3, #0xF0000000 ");			// r12=this.Length()

 	asm("cmp r2, r12 ");					// else limit aLength to Length()

 	asm("movgt r2, r12 ");

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("addeq r1, r1, #4 ");				// r1=this.Ptr()

 	asm("add r3, r1, r12, lsl #1 ");			// r3=this.Ptr()+len*2

 	asm("orr r1, r2, #0x10000000 ");			// r1=aLength + EPtrC

 	asm("sub r3, r3, r2, lsl #1 ");				// r2=Ptr()+len*2-aLength*2

 	asm("stmia r0, {r1,r3} ");

 	__JUMP(,lr);

 	}

 __NAKED__ EXPORT_C TPtrC16 TDesC16::Mid(TInt /*aPos*/) const

 //

 // Extract the middle portion of the descriptor.

 //

 	{

 	// On entry r0=return store ptr, r1=this, r2=aPos

 	// Return TPtr16 ([r0]=length/type,[r0,#4]=Ptr)

 	asm("ldr r3, [r1], #4 ");				// r3=this.length/type

 	asm("bic r12, r3, #0xF0000000 ");			// r12=this.Length()

 	asm("cmp r2, #0 ");					// check aPos>=0

 	asm("cmpge r12, r2 ");					// if so check Length()>=aPos

 	asm("blt Des16PanicPosOutOfRange__Fv ");

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("addeq r1, r1, #4 ");				// r3=this.Ptr()

 	asm("add r3, r1, r2, lsl #1 ");				// r3=this.Ptr()+aPos*2

 	asm("sub r2, r12, r2 ");				// r2=len-aPos (=newMaxLen)

 	asm("orr r1, r2, #0x10000000 ");			// r1=len-aPos + EPtrC (=newLen/Type)

 	asm("stmia r0, {r1,r3} ");

 	__JUMP(,lr);

 	}

 __NAKED__ EXPORT_C TPtrC16 TDesC16::Mid(TInt /*aPos*/,TInt /*aLength*/) const

 //

 // Extract the middle portion of the descriptor.

 //

 	{

 	// On entry r0=return store ptr, r1=this, r2=aPos, r3=aLength

 	// Return TPtr16 ([r0]=length/type,[r0,#4]=Ptr)

 	asm("ldr r12, [r1], #4 ");				// r12=this.length/type

 	asm("cmp r12, #0x50000000 ");				// check valid descriptor type

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("eor r12, r12, r12, lsr #1 ");

 	asm("msr cpsr_flg, r12 ");

 	asm("ldr r12, [r1, #-4] ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("bic r12, r12, #0xF0000000 ");			// r12=Length()

 	asm("addeq r1, r1, #4 ");				// r1=this.Ptr()

 	asm("cmp r2, #0 ");					// check aPos>=0

 	asm("subge r12, r12, r2 ");				// if so, r12=Length()-aPos

 	asm("cmpge r12, r3 ");					// and check Length()-aPos>=aLength

 	asm("addge r2, r1, r2, lsl #1 ");			// if so r2=this.Ptr()+aPos*2 

 	asm("orrge r1, r3, #0x10000000 ");			// and r1 = aLength + EPtrC

 	asm("stmgeia r0, {r1,r2} ");

 	__JUMP(ge,lr);

 	asm("b Des16PanicPosOutOfRange__Fv ");

 	}

 #endif // __EABI__

 __NAKED__ EXPORT_C void TDes16::Zero()

 //

 // Zero the buffer.

 //

 	{

 	asm("ldr r1, [r0] ");				// r1=length/type

 	asm("and r1, r1, #0xF0000000 ");	// r1=type field, zero length

 	asm("cmp r1, #0x40000000 ");		// check for EBufCPtr

 	asm("str r1, [r0] ");				// store zero length

 	__JUMP(ne,lr);

 	asm("ldr r2, [r0, #8] ");			// r2 = pointer to TBufCBase

 	asm("mov r1, #0 ");

 	asm("str r1, [r2] ");				// update length of TBufCBase

 	__JUMP(,lr);

 	}

 #ifdef __DES16_MACHINE_CODED_HWORD__

 #ifndef __KERNEL_MODE__

 __NAKED__ EXPORT_C void TDes16::ZeroTerminate()

 //

 // Zero terminate at Length().

 //

 	{

 	// Fall though to PtrZ below...

 	}

 __NAKED__ EXPORT_C const TUint16* TDes16::PtrZ()

 //

 // Return a pointer to a 0 terminated string.

 //

 	{

 	asm("ldmia r0, {r1,r2} ");			// r1=length/type, r2=maxlength

 	asm("bic r3, r1, #0xF0000000 ");	// r3=Length();

 	asm("cmp r3, r2 ");					// check Length()<MaxLength()

 	asm("bge Des16PanicDesOverflow__Fv ");

 	asm("cmp r1, #0x50000000 ");

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("eor r1, r1, r1, lsr #1 ");

 	asm("msr cpsr_flg, r1 ");

 	asm("add r0, r0, #4 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("addeq r0, r0, #4 ");			// r0=Ptr()

 	asm("add r1, r0, r3, lsl #1 ");		// r1=Ptr()+Length()

 	asm("mov r2, #0 ");

 	asm("strh r2, [r1] ");				// Ptr()[Length()]=0;

 	__JUMP(,lr);

 	}

 #endif	// __KERNEL_MODE__

 __NAKED__ EXPORT_C void TDes16::Append(TChar /*aChar*/)

 //

 // Add a character at the end of the string.

 //

 	{

 	asm("ldmia r0, {r2,r3} ");			// r2=length/type, r3=maxlength

 	asm("bic r12, r2, #0xF0000000 ");	// r12=Length();

 	asm("cmp r12, r3 ");				// check Length()<MaxLength()

 	asm("bge Des16PanicDesOverflow__Fv ");

 	asm("cmp r2, #0x50000000 ");

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("add r2, r2, #1 ");				// increment length by 1

 	asm("str r2, [r0] ");				// store new length

 	asm("eor r2, r2, r2, lsr #1 ");

 	asm("msr cpsr_flg, r2 ");

 	asm("add r2, r0, #4 ");				// r2=this+4

 	asm("addcs r2, r2, #4 ");

 	asm("ldrle r2, [r2] ");

 	asm("addeq r3, r12, #1 ");			// if EBufCPtr, r3=Length()+1

 	asm("streq r3, [r2], #4 ");			// and update length of TBufCBase, r2=Ptr()

 	asm("add r2, r2, r12, lsl #1 ");	// r2=Ptr()+Length()

 	asm("strh r1, [r2] ");				// Ptr()[Length()]=aChar;

 	__JUMP(,lr);

 	}

 #endif

 __NAKED__ EXPORT_C void TDes16::Append(const TDesC16& /*aDes*/)

 //

 // Append a descriptor to this descriptor.

 //

 	{

 	asm("ldr r3, [r1], #4 ");			// r3=aDes.length/type

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("bics r2, r3, #0xF0000000 ");	// r2=aDes.Length()

 	__JUMP(eq,lr);

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("addcs r1, r1, #4 ");

 	asm("ldrle r1, [r1] ");

 	asm("addeq r1, r1, #4 ");			// r1=aDes.Ptr()

 	asm("b appendbody ");				// use following routine for rest of job

 	}

 __NAKED__ EXPORT_C void TDes16::Append(const TUint16* /*aBuf*/,TInt /*aLength*/)

 //

 // Append aLength from aBuf characters to the descriptor.

 //

 	{

 	asm("cmp r2, #0 ");					// check aLength>=0

 	__JUMP(eq,lr);

 	asm("blt  " CSM_Z24Des16PanicLengthNegativev);

 	asm("appendbody: ");

 	asm("ldmia r0, {r3,r12} ");			// r3=type/length, r12=maxlength

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("bic r3, r3, #0xF0000000 ");	// r3=Length()

 	asm("sub r12, r12, r3 ");			// r12=MaxLength-Length

 	asm("cmp r2, r12 ");				// check aLength<=(MaxLength-Length)

 	asm("bgt  " CSM_Z21Des16PanicDesOverflowv);

 	asm("ldr r12, [r0] ");

 	asm("add r12, r12, r2 ");			// new length/type field

 	asm("str r12, [r0], #4 ");			// store it

 	asm("eor r12, r12, r12, lsr #1 ");

 	asm("msr cpsr_flg, r12 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("ldreq r12, [r0] ");			// fetch length from TBufCBase

 	asm("addeq r12, r12, r2 ");			// add aLength

 	asm("streq r12, [r0], #4 ");		// update length of TBufCBase, r0=Ptr()

 	asm("add r0, r0, r3, lsl #1 ");		// r0=Ptr()+Length()*2

 	asm("add r2, r2, r2 ");				// r2=aLength*2

 	asm("b memmove ");					// call memmove

 	}

 __NAKED__ EXPORT_C void TDes16::FillZ()

 //

 // Fill the descriptor with 0.

 //

 	{

 	asm("ldr r2, [r0] ");				// r2=length/type

 	asm("cmp r2, #0x50000000 ");

 	asm("bcs  " CSM_Z20Des16PanicBadDesTypev);

 	asm("bic r1, r2, #0xF0000000 ");	// r1=Length()

 	asm("eor r2, r2, r2, lsr #1 ");

 	asm("msr cpsr_flg, r2 ");

 	asm("add r0, r0, #4 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("addeq r0, r0, #4 ");			// r0=Ptr()

 	asm("add r1, r1, r1 ");				// r1=2*Length()

 	asm("b memclr ");					// call memclr

 	}

 #ifdef __DES16_MACHINE_CODED_HWORD__

 __NAKED__ EXPORT_C void TDes16::Fill(TChar /*aChar*/)

 //

 // Fill the descriptor with aChar.

 //

 	{

 	// on entry r0=this, r1=fill char

 	asm("ldr r3, [r0] ");				// r3=length/type

 	asm("cmp r3, #0x50000000 ");

 	asm("bcs Des16PanicBadDesType__Fv ");

 	asm("bics r2, r3, #0xF0000000 ");	// r2=Length()

 	__JUMP(eq,lr);						// if length is zero, finished

 	asm("stmfd sp!, {r0,lr} ");			// save registers for function call

 	asm("eor r3, r3, r3, lsr #1 ");

 	asm("msr cpsr_flg, r3 ");

 	asm("add r0, r0, #4 ");

 	asm("addcs r0, r0, #4 ");

 	asm("ldrle r0, [r0] ");

 	asm("addeq r0, r0, #4 ");			// r0=Ptr()

 	asm("tst r0, #2 ");					// check alignment of Ptr()

 	asm("strneh r1, [r0], #2 ");		// if not aligned, fill first location

 	asm("subne r2, r2, #1 ");			// and decrement length

 	asm("mov r1, r1, lsl #16 ");

 	asm("orr r1, r1, r1, lsr #16 ");	// r1=fill char repeated

 	asm("mov r3, r1 ");

 	asm("mov r12, r1 ");

 	asm("mov r14, r1 ");				// r1=r3=r12=r14=fill char repeated

 	asm("b 2f ");						// branch to check for 16-char blocks

 	asm("1: ");

 	asm("stmia r0!, {r1,r3,r12,r14} ");	// fill a block of 16 bytes

 	asm("stmia r0!, {r1,r3,r12,r14} ");	// fill a block of 16 bytes

 	asm("2: ");

 	asm("subs r2, r2, #16 ");			// check for more blocks of 16

 	asm("bge 1b ");						// loop if more

 	asm("add r2, r2, #16 ");			// now r1=number of chars remaining, 0<=r1<16

 	asm("mov r2, r2, lsl #28 ");		// move into bits 28-31

 	asm("msr cpsr_flg, r2 ");			// and into NZCV flags

 	asm("stmmiia r0!, {r1,r3,r12,r14} ");	// fill a block of 16 bytes if needed

 	asm("stmeqia r0!, {r1,r3} ");		// fill a block of 8 bytes if needed

 	asm("stmcsia r0!, {r1} ");			// fill a block of 4 bytes if needed

 	asm("strvsh r1, [r0], #2 ");		// fill last char if needed

 	__POPRET("r0,");

 	}

 #endif

 #endif // __DES16_MACHINE_CODED__