home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 January / Chip_2001-01_cd1.bin / tema / mysql / mysql-3.23.28g-win-source.exe / strings / strcend.c < prev    next >
C/C++ Source or Header  |  2000-08-31  |  2KB  |  57 lines
  1. /* Copyright (C) 2000 MySQL AB & MySQL Finland AB & TCX DataKonsult AB
  2.    
  3.    This library is free software; you can redistribute it and/or
  4.    modify it under the terms of the GNU Library General Public
  5.    License as published by the Free Software Foundation; either
  6.    version 2 of the License, or (at your option) any later version.
  7.    
  8.    This library is distributed in the hope that it will be useful,
  9.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  10.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11.    Library General Public License for more details.
  12.    
  13.    You should have received a copy of the GNU Library General Public
  14.    License along with this library; if not, write to the Free
  15.    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  16.    MA 02111-1307, USA */
  17.  
  18. /*  File   : strcend.c
  19.     Author : Michael Widenius:    ifdef MC68000
  20.     Updated: 20 April 1984
  21.     Defines: strcend()
  22.  
  23.     strcend(s, c) returns a pointer to the  first  place  in  s where  c
  24.     occurs,  or a pointer to the end-null of s if c does not occur in s.
  25. */
  26.  
  27. #include <global.h>
  28. #include "m_string.h"
  29.  
  30. #if defined(MC68000) && defined(DS90)
  31.  
  32. char *strcend(const char *s, pchar c)
  33. {
  34. asm("        movl    4(a7),a0    ");
  35. asm("        movl    8(a7),d1    ");
  36. asm(".L2:    movb    (a0)+,d0    ");
  37. asm("        cmpb    d0,d1        ");
  38. asm("        beq    .L1        ");
  39. asm("        tstb    d0        ");
  40. asm("        bne    .L2        ");
  41. asm(".L1:    movl    a0,d0        ");
  42. asm("        subql    #1,d0        ");
  43. }
  44.  
  45. #else
  46.  
  47. char *strcend(register const char *s, register pchar c)
  48. {
  49.   for (;;)
  50.   {
  51.      if (*s == (char) c) return (char*) s;
  52.      if (!*s++) return (char*) s-1;
  53.   }
  54. }
  55.  
  56. #endif
  57.