strcend.c
上传用户:romrleung
上传日期:2022-05-23
资源大小:18897k
文件大小:1k
源码类别:

MySQL数据库

开发平台:

Visual C++

  1. /* Copyright (C) 2000 MySQL AB
  2.    This program is free software; you can redistribute it and/or modify
  3.    it under the terms of the GNU General Public License as published by
  4.    the Free Software Foundation; either version 2 of the License, or
  5.    (at your option) any later version.
  6.    This program is distributed in the hope that it will be useful,
  7.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  8.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  9.    GNU General Public License for more details.
  10.    You should have received a copy of the GNU General Public License
  11.    along with this program; if not, write to the Free Software
  12.    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
  13. /*  File   : strcend.c
  14.     Author : Michael Widenius: ifdef MC68000
  15.     Updated: 20 April 1984
  16.     Defines: strcend()
  17.     strcend(s, c) returns a pointer to the  first  place  in  s where  c
  18.     occurs,  or a pointer to the end-null of s if c does not occur in s.
  19. */
  20. #include <my_global.h>
  21. #include "m_string.h"
  22. #if defined(MC68000) && defined(DS90)
  23. char *strcend(const char *s, pchar c)
  24. {
  25. asm(" movl 4(a7),a0 ");
  26. asm(" movl 8(a7),d1 ");
  27. asm(".L2: movb (a0)+,d0 ");
  28. asm(" cmpb d0,d1 ");
  29. asm(" beq .L1 ");
  30. asm(" tstb d0 ");
  31. asm(" bne .L2 ");
  32. asm(".L1: movl a0,d0 ");
  33. asm(" subql #1,d0 ");
  34. }
  35. #else
  36. char *strcend(register const char *s, register pchar c)
  37. {
  38.   for (;;)
  39.   {
  40.      if (*s == (char) c) return (char*) s;
  41.      if (!*s++) return (char*) s-1;
  42.   }
  43. }
  44. #endif