Formerly i386/memset.c.~5~
[kopensolaris-gnu/glibc.git] / sysdeps / i386 / memset.c
1 /* memset -- set a block of memory to some byte value.
2    For Intel 80x86, x>=3.
3    Copyright (C) 1991, 1992 Free Software Foundation, Inc.
4    Contributed by Torbjorn Granlund (tege@sics.se).
5
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Library General Public License as
8 published by the Free Software Foundation; either version 2 of the
9 License, or (at your option) any later version.
10
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14 Library General Public License for more details.
15
16 You should have received a copy of the GNU Library General Public
17 License along with the GNU C Library; see the file COPYING.LIB.  If
18 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
19 Cambridge, MA 02139, USA.  */
20
21 #include <ansidecl.h>
22 #include <string.h>
23 #include <memcopy.h>
24
25 #ifdef  __GNUC__
26
27 PTR
28 DEFUN(memset, (dstpp, c, len),
29       PTR dstpp AND int c AND size_t len)
30 {
31   unsigned long int dstp = (unsigned long int) dstpp;
32
33   /* This explicit register allocation
34      improves code very much indeed.  */
35   register op_t x asm("ax");
36
37   /* Fill X with four copies of the char we want to fill with.  */
38   x = (unsigned char) c;
39   x |= (x << 8);
40   x |= (x << 16);
41
42   /* Clear the direction flag, so filling will move forward.  */
43   asm volatile("cld");
44
45   /* This threshold value is optimal.  */
46   if (len >= 12)
47     {
48       /* There are at least some bytes to set.
49          No need to test for LEN == 0 in this alignment loop.  */
50
51       /* Fill bytes until DSTP is aligned on a longword boundary.  */
52       asm volatile("rep\n"
53                    "stosb" /* %0, %2, %3 */ :
54                    "=D" (dstp) :
55                    "0" (dstp), "c" ((-dstp) % OPSIZ), "a" (x) :
56                    "cx");
57       len -= (-dstp) % OPSIZ;
58
59       /* Fill longwords.  */
60       asm volatile("rep\n"
61                    "stosl" /* %0, %2, %3 */ :
62                    "=D" (dstp) :
63                    "0" (dstp), "c" (len / OPSIZ), "a" (x) :
64                    "cx");
65       len %= OPSIZ;
66     }
67
68   /* Write the last few bytes.  */
69   asm volatile("rep\n"
70                "stosb" /* %0, %2, %3 */ :
71                "=D" (dstp) :
72                "0" (dstp), "c" (len), "a" (x) :
73                "cx");
74
75   return dstpp;
76 }
77
78 #else
79 #include <sysdeps/generic/bzero.c>
80 #endif