2N/A/*
2N/A * CDDL HEADER START
2N/A *
2N/A * The contents of this file are subject to the terms of the
2N/A * Common Development and Distribution License (the "License").
2N/A * You may not use this file except in compliance with the License.
2N/A *
2N/A * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
2N/A * or http://www.opensolaris.org/os/licensing.
2N/A * See the License for the specific language governing permissions
2N/A * and limitations under the License.
2N/A *
2N/A * When distributing Covered Code, include this CDDL HEADER in each
2N/A * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
2N/A * If applicable, add the following below this CDDL HEADER, with the
2N/A * fields enclosed by brackets "[]" replaced with your own identifying
2N/A * information: Portions Copyright [yyyy] [name of copyright owner]
2N/A *
2N/A * CDDL HEADER END
2N/A */
2N/A
2N/A/*
2N/A * Copyright 2008 Sun Microsystems, Inc. All rights reserved.
2N/A * Use is subject to license terms.
2N/A */
2N/A
2N/A .file "wsncmp.s"
2N/A
2N/A/
2N/A/ Wide character wcsncpy() implementation
2N/A/
2N/A/ Algorithm based on Solaris 2.6 gen/strncpy.s implementation
2N/A/
2N/A
2N/A#include "SYS.h"
2N/A
2N/A ANSI_PRAGMA_WEAK(wcsncmp,function)
2N/A ANSI_PRAGMA_WEAK(wsncmp,function)
2N/A
2N/A ENTRY(wcsncmp)
2N/A pushl %esi / save register variables
2N/A movl 8(%esp),%esi / %esi = first string
2N/A movl %edi,%edx
2N/A movl 12(%esp),%edi / %edi = second string
2N/A cmpl %esi,%edi / same string?
2N/A je .equal
2N/A movl 16(%esp),%ecx / %ecx = length
2N/A incl %ecx / will later predecrement this uint
2N/A.loop:
2N/A decl %ecx
2N/A je .equal / Used all n chars?
2N/A movl (%esi),%eax / slodb ; scab
2N/A cmpl (%edi),%eax
2N/A jne .notequal_0 / Are the bytes equal?
2N/A testl %eax,%eax
2N/A je .equal / End of string?
2N/A
2N/A decl %ecx
2N/A je .equal / Used all n chars?
2N/A movl 4(%esi),%eax / slodb ; scab
2N/A cmpl 4(%edi),%eax
2N/A jne .notequal_1 / Are the bytes equal?
2N/A testl %eax,%eax
2N/A je .equal / End of string?
2N/A
2N/A decl %ecx
2N/A je .equal / Used all n chars?
2N/A movl 8(%esi),%eax / slodb ; scab
2N/A cmpl 8(%edi),%eax
2N/A jne .notequal_2 / Are the bytes equal?
2N/A testl %eax,%eax
2N/A je .equal / End of string?
2N/A
2N/A decl %ecx
2N/A je .equal / Used all n chars?
2N/A movl 12(%esi),%eax / slodb ; scab
2N/A cmpl 12(%edi),%eax
2N/A jne .notequal_3 / Are the bytes equal?
2N/A addl $16,%esi
2N/A addl $16,%edi
2N/A testl %eax,%eax
2N/A jne .loop / End of string?
2N/A
2N/A.equal:
2N/A popl %esi / restore registers
2N/A xorl %eax,%eax / return 0
2N/A movl %edx,%edi
2N/A ret
2N/A
2N/A .align 4
2N/A.notequal_3:
2N/A addl $4,%edi
2N/A.notequal_2:
2N/A addl $4,%edi
2N/A.notequal_1:
2N/A addl $4,%edi
2N/A.notequal_0:
2N/A popl %esi / restore registers
2N/A subl (%edi),%eax / return value is (*s1 - *--s2)
2N/A movl %edx,%edi
2N/A ret
2N/A SET_SIZE(wcsncmp)
2N/A
2N/A ENTRY(wsncmp)
2N/A _prologue_
2N/A movl _esp_(12),%ecx
2N/A movl _esp_(8),%eax
2N/A movl _esp_(4),%edx
2N/A pushl %ecx
2N/A pushl %eax
2N/A pushl %edx
2N/A call _fref_(wcsncmp)
2N/A addl $12,%esp
2N/A _epilogue_
2N/A ret
2N/A SET_SIZE(wsncmp)