Add the DragonFly cvs id and perform general cleanups on cvs/rcs/sccs ids. Most
[dragonfly.git] / sys / libkern / alpha / byte_swap_4.S
1 /* $FreeBSD: src/sys/libkern/alpha/byte_swap_4.S,v 1.1.6.1 2000/08/03 01:03:45 peter Exp $ */
2 /* $DragonFly: src/sys/libkern/alpha/Attic/byte_swap_4.S,v 1.2 2003/06/17 04:28:42 dillon Exp $ */
3 /*      $NetBSD: byte_swap_4.S,v 1.2 1996/10/17 03:08:09 cgd Exp $      */
4
5 /*
6  * Copyright (c) 1996 Carnegie-Mellon University.
7  * All rights reserved.
8  *
9  * Author: Chris G. Demetriou
10  *
11  * Permission to use, copy, modify and distribute this software and
12  * its documentation is hereby granted, provided that both the copyright
13  * notice and this permission notice appear in all copies of the
14  * software, derivative works or modified versions, and any portions
15  * thereof, and that both notices appear in supporting documentation.
16  *
17  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
18  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
19  * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
20  *
21  * Carnegie Mellon requests users of this software to return to
22  *
23  *  Software Distribution Coordinator  or  Software.Distribution@CS.CMU.EDU
24  *  School of Computer Science
25  *  Carnegie Mellon University
26  *  Pittsburgh PA 15213-3890
27  *
28  * any improvements or extensions that they make and grant Carnegie the
29  * rights to redistribute these changes.
30  */
31
32 #include <machine/asm.h>
33
34 #ifndef NAME
35 #define NAME byte_swap_4
36 #endif
37
38 /*
39  * Byte-swap a 4-byte quantity.  (Convert 0x01234567 to 0x67452301.)
40  *
41  * Argument is an unsigned 4-byte integer (u_int32_t).
42  */
43 LEAF(NAME, 1)                   /* a0 contains 0x01234567 */
44         extbl   a0, 0, t0       /* t0 = 0x      67 */
45         extbl   a0, 1, t1       /* t1 = 0x      45 */
46         extbl   a0, 2, t2       /* t2 = 0x      23 */
47         extbl   a0, 3, t3       /* t3 = 0x      01 */
48         sll     t0, 24, t0      /* t0 = 0x67       */
49         sll     t1, 16, t1      /* t1 = 0x  45     */
50         sll     t2, 8, t2       /* t2 = 0x    23   */
51         or      t3, t0, v0      /* v0 = 0x67    01 */
52         or      t1, t2, t1      /* t1 = 0x  4523   */
53         or      t1, v0, v0      /* v0 = 0x67452301 */
54         RET
55 END(NAME)