]> git.saurik.com Git - apple/xnu.git/blob - osfmk/kdp/ml/ppc/kdp_misc.s
xnu-792.tar.gz
[apple/xnu.git] / osfmk / kdp / ml / ppc / kdp_misc.s
1 /*
2 * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
3 *
4 * @APPLE_LICENSE_HEADER_START@
5 *
6 * The contents of this file constitute Original Code as defined in and
7 * are subject to the Apple Public Source License Version 1.1 (the
8 * "License"). You may not use this file except in compliance with the
9 * License. Please obtain a copy of the License at
10 * http://www.apple.com/publicsource and read it before using this file.
11 *
12 * This Original Code and all software distributed under the License are
13 * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
14 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
15 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
16 * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT. Please see the
17 * License for the specific language governing rights and limitations
18 * under the License.
19 *
20 * @APPLE_LICENSE_HEADER_END@
21 */
22 #include <debug.h>
23 #include <ppc/asm.h>
24 #include <ppc/proc_reg.h>
25 #include <mach/ppc/vm_param.h>
26 #include <assym.s>
27
28 ENTRY(kdp_sync_cache, TAG_NO_FRAME_USED)
29 sync /* data sync */
30 isync /* inst sync */
31 blr /* return nothing */
32
33
34 ;
35 ; This is a really stupid physical copy. 1 whole byte at a time...
36 ; Source and dest are long longs. We do this with 64-bit on if
37 ; supported.
38 ;
39
40 .align 5
41 .globl EXT(kdp_copy_phys)
42
43 LEXT(kdp_copy_phys)
44
45 mflr r12 ; Save return
46
47 bl EXT(ml_set_physical_disabled) ; No DR and get 64-bit
48
49 rlwinm r3,r3,0,1,0 ; Dup low to high source
50 rlwinm r5,r5,0,1,0 ; Dup low to high dest
51 rlwimi r3,r4,0,0,31 ; Copy bottom on in source
52 rlwimi r5,r6,0,0,31 ; Copy bottom on in dest
53
54 kcpagain: addic. r7,r7,-1 ; Drop count
55 blt-- kcpdone ; All done...
56 lbz r0,0(r3) ; Grab a whole one
57 stb r0,0(r5) ; Lay it gently down
58 addi r3,r3,1 ; Next source
59 addi r5,r5,1 ; Next destination
60 b kcpagain ; Once more with feeling...
61
62 kcpdone: bl EXT(ml_restore) ; Put trans, etc back
63 mtlr r12 ; Restore return
64 blr ; Come again please...
65