mariadb/strings/strstr-sparc.s
unknown c7d2c59ceb merge
configure.in:
  Auto merged
include/my_sys.h:
  Auto merged
libmysql/libmysql.c:
  Auto merged
sql/ha_berkeley.cc:
  Auto merged
sql/handler.h:
  Auto merged
sql/item_strfunc.cc:
  Auto merged
sql/lex.h:
  Auto merged
sql/mysqld.cc:
  Auto merged
sql/sql_class.cc:
  Auto merged
sql/sql_insert.cc:
  Auto merged
sql/sql_lex.h:
  Auto merged
sql/sql_select.cc:
  Auto merged
sql/sql_string.h:
  Auto merged
BitKeeper/etc/logging_ok:
  Auto merged
2000-11-16 00:24:11 +02:00

72 lines
1.7 KiB
ArmAsm

! Copyright (C) 2000 MySQL AB & MySQL Finland AB & TCX DataKonsult AB
!
! This library is free software; you can redistribute it and/or
! modify it under the terms of the GNU Library General Public
! License as published by the Free Software Foundation; either
! version 2 of the License, or (at your option) any later version.
!
! This 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
! Library General Public License for more details.
!
! You should have received a copy of the GNU Library General Public
! License along with this library; if not, write to the Free
! Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
! MA 02111-1307, USA
.file "strstr-sparc.s"
.section ".text"
.align 4
.global strstr
.type strstr,#function
.proc 0102
strstr:
!char *strstr(register const char *str,const char *search)
!{
! register char *i,*j;
!skipp:
! while (*str != '\0') {
! if (*str++ == *search) {
! i=(char*) str; j=(char*) search+1;
ldsb [%o1],%o2 ! o2= First char of search
.top:
ldsb [%o0],%g3 ! g3= First char of rest of str
cmp %g3,0
be .abort ! Found end null ;
cmp %g3,%o2
bne .top
add %o0,1,%o0
.outloop1:
! while (*j)
! if (*i++ != *j++) goto skipp;
or %g0,%o0,%g2
add %o1,1,%g3 ! g3= search+1
ldsb [%o0],%o5 ! o5= [current_str+1]
.loop2:
ldsb [%g3],%g4
add %g3,1,%g3
cmp %g4,0
be .end
cmp %o5,%g4
bne .top
add %g2,1,%g2
ba .loop2
ldsb [%g2],%o5
.end:
retl
sub %o0,1,%o0
.abort:
retl
or %g0,0,%o0
.strstr_end:
.size strstr,.strstr_end-strstr
.ident "Matt Wagner & Monty"