strcend.c
上传用户:tsgydb
上传日期:2007-04-14
资源大小:10674k
文件大小:2k
源码类别:

MySQL数据库

开发平台:

Visual C++

  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. /*  File   : strcend.c
  18.     Author : Michael Widenius: ifdef MC68000
  19.     Updated: 20 April 1984
  20.     Defines: strcend()
  21.     strcend(s, c) returns a pointer to the  first  place  in  s where  c
  22.     occurs,  or a pointer to the end-null of s if c does not occur in s.
  23. */
  24. #include <global.h>
  25. #include "m_string.h"
  26. #if defined(MC68000) && defined(DS90)
  27. char *strcend(const char *s, pchar c)
  28. {
  29. asm(" movl 4(a7),a0 ");
  30. asm(" movl 8(a7),d1 ");
  31. asm(".L2: movb (a0)+,d0 ");
  32. asm(" cmpb d0,d1 ");
  33. asm(" beq .L1 ");
  34. asm(" tstb d0 ");
  35. asm(" bne .L2 ");
  36. asm(".L1: movl a0,d0 ");
  37. asm(" subql #1,d0 ");
  38. }
  39. #else
  40. char *strcend(register const char *s, register pchar c)
  41. {
  42.   for (;;)
  43.   {
  44.      if (*s == (char) c) return (char*) s;
  45.      if (!*s++) return (char*) s-1;
  46.   }
  47. }
  48. #endif