Initial revision
[kopensolaris-gnu/glibc.git] / sysdeps / i386 / memset.c
1 /* bzero -- set a block of memory to zero.
2    For Intel 80x86, x>=3.
3    Copyright (C) 1991 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
24 typedef unsigned long int op_t;
25 typedef unsigned char byte;
26 #define OPSIZ   (sizeof(op_t))
27
28 PTR
29 DEFUN(memset, (dstpp, c, len),
30       PTR dstpp AND int c AND size_t len)
31 {
32   unsigned long int dstp = (unsigned long int) dstpp;
33
34   /* This explicit register allocation
35      improves code very much indeed.  */
36   register op_t x asm("ax");
37
38   /* Fill X with four copies of the char we want to fill with.  */
39   x = (unsigned char) c;
40   x |= (x << 8);
41   x |= (x << 16);
42
43   /* Clear the direction flag, so filling will move forward.  */
44   asm volatile("cld");
45
46   /* This threshold value is optimal.  */
47   if (len >= 12)
48     {
49       /* There are at least some bytes to set.
50          No need to test for LEN == 0 in this alignment loop.  */
51
52       /* Fill bytes until DSTP is aligned on a longword boundary.  */
53       asm volatile("rep\n"
54                    "stosb" /* %0, %2, %3 */ :
55                    "=D" (dstp) :
56                    "0" (dstp), "c" ((-dstp) % OPSIZ), "a" (x) :
57                    "cx");
58       len -= (-dstp) % OPSIZ;
59
60       /* Fill longwords.  */
61       asm volatile("rep\n"
62                    "stosl" /* %0, %2, %3 */ :
63                    "=D" (dstp) :
64                    "0" (dstp), "c" (len / OPSIZ), "a" (x) :
65                    "cx");
66       len %= OPSIZ;
67     }
68
69   /* Write the last few bytes.  */
70   asm volatile("rep\n"
71                "stosb" /* %0, %2, %3 */ :
72                "=D" (dstp) :
73                "0" (dstp), "c" (len), "a" (x) :
74                "cx");
75
76   return dstpp;
77 }