(getsourcefilter): Free memory if socket level value cannot be retrieved.
[kopensolaris-gnu/glibc.git] / sysdeps / ia64 / strchr.S
index 474254f..63db7ff 100644 (file)
@@ -1,26 +1,38 @@
-/*
- * Optimized version of the standard strchr() function
- *
- * Contributed by Dan Pop <Dan.Pop@cern.ch>
- *
- * Return: the address of the first occurence of chr in str or NULL
- *
- * Inputs:
- *      in0:    str
- *      in1:    chr
- *
- * A modified version of memchr.S, the search ends when the character is
- * found or the terminating null character is encountered.
- *
- * This implementation assumes little endian mode.  For big endian mode,
- * the instruction czx1.r should be replaced by czx1.l.
- *
- */
+/* Optimized version of the standard strchr() function.
+   This file is part of the GNU C Library.
+   Copyright (C) 2000, 2001, 2003 Free Software Foundation, Inc.
+   Contributed by Dan Pop <Dan.Pop@cern.ch>.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
+
+/* Return: the address of the first occurence of chr in str or NULL
+
+   Inputs:
+        in0:    str
+        in1:    chr
+
+   A modified version of memchr.S, the search ends when the character is
+   found or the terminating null character is encountered.
+
+   This implementation assumes little endian mode.  For big endian mode,
+   the instruction czx1.r should be replaced by czx1.l.  */
 
 #include <sysdep.h>
 #undef ret
 
-#define        saved_pfs       r14
 #define saved_lc       r18
 #define poschr         r19
 #define pos0           r20
 #define chr            in1
 
 ENTRY(strchr)
-       alloc saved_pfs = ar.pfs, 2, 0, 0, 0
+       .prologue
+       alloc r2 = ar.pfs, 2, 0, 0, 0
+       .save ar.lc, saved_lc
         mov    saved_lc = ar.lc        // save the loop counter
+       .body
        mov     ret0 = str      
        and     tmp = 7, str            // tmp = str % 8
        mux1    chrx8 = chr, @brcst
@@ -81,12 +96,10 @@ ENTRY(strchr)
        adds    ret0 = -15, ret0 ;;     // should be -16, but we decrement
 .restore_and_exit:                     // ret0 in the next instruction
        adds    ret0 = -1, ret0         // ret0 was pointing 1 char too far
-       mov     ar.pfs = saved_pfs      // restore the PFS
        mov     ar.lc = saved_lc        // restore the loop counter
        br.ret.sptk.many b0
 .notfound:
        mov     ret0 = r0               // return NULL if null was found
-       mov     ar.pfs = saved_pfs      // first
        mov     ar.lc = saved_lc
        br.ret.sptk.many b0
 .recovery:
@@ -95,4 +108,5 @@ ENTRY(strchr)
        br.cond.sptk    .back
 END(strchr)
 
-weak_alias(strchr, index)
+weak_alias (strchr, index)
+libc_hidden_builtin_def (strchr)