![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to pseudo_inst.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Apple XNU] / XNU / EXTERNAL_HEADERS / architecture / ppc|
Return to pseudo_inst.h CVS log | Up to [Apple XNU] / XNU / EXTERNAL_HEADERS / architecture / ppc |
1.1 ! root 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: /* Copyright (c) 1996 NeXT Software, Inc. All rights reserved. ! 23: * ! 24: * File: architecture/ppc/pseudo_inst.h ! 25: * Author: Mike DeMoney ! 26: * ! 27: * This header file defines assembler pseudo-instruction macros for ! 28: * for the ppc. ! 29: * ! 30: * NOTE: This is obviously only useful to include in assembly ! 31: * code source. ! 32: * ! 33: * ALSO NOTE: These macros don't attempt to be 64-bit compatable ! 34: * ! 35: * HISTORY ! 36: * 29-Dec-96 Umesh Vaishampayan ([email protected]) ! 37: * Ported from m98k. ! 38: * 05-Nov-92 Mike DeMoney ([email protected]) ! 39: * Created. ! 40: */ ! 41: ! 42: #ifndef _ARCH_PPC_PSEUDO_INST_H_ ! 43: #define _ARCH_PPC_PSEUDO_INST_H_ ! 44: ! 45: #import <architecture/ppc/reg_help.h> ! 46: #import <architecture/ppc/asm_help.h> ! 47: ! 48: #ifdef __ASSEMBLER__ ! 49: ! 50: /* ! 51: * Pseudo instruction definitions ! 52: */ ! 53: ! 54: /* ! 55: * Macro package initialization ! 56: */ ! 57: .set __no_at,0 /* allow at by default */ ! 58: ! 59: /* ! 60: * .at_off -- disable use of at by macros ! 61: * .at_on -- enable use of at by macros ! 62: */ ! 63: .macro .at_off ! 64: .set __no_at,1 ! 65: .endmacro ! 66: ! 67: .macro .at_on ! 68: .set __no_at,0 ! 69: .endmacro ! 70: ! 71: /* ! 72: * li32 rD,IMMED ! 73: * ! 74: * Load 32-bit immediate into rD ! 75: * FIXME: Need a way to undefine built-in macro for this. ! 76: */ ! 77: .macro li32 // li32 rD,immed ! 78: .if $n != 2 ! 79: .abort "invalid operands of li32" ! 80: .endif ! 81: .abs __is_abs,$1 ! 82: .if !__is_abs ! 83: addis $0,0,hi16($1) ! 84: ori $0,$0,lo16($1) ! 85: .elseif $1 == 0 ! 86: addi $0,0,0 ! 87: .elseif ($1 & 0xffff) == 0 ! 88: addis $0,0,hi16($1) ! 89: .elseif ($1 & 0xffff8000) == 0 ! 90: addi $0,0,$1 ! 91: .elseif ($1 & 0xffff8000) == 0xffff8000 ! 92: addi $0,0,$1 ! 93: .else ! 94: addis $0,0,hi16($1) ! 95: ori $0,$0,lo16($1) ! 96: .endif ! 97: .endmacro ! 98: ! 99: ! 100: /* ! 101: * andi32. rD,rS1,IMMED ! 102: * ! 103: * Perform "andi." with (possibly) 32-bit immediate ! 104: */ ! 105: .macro andi32. // andi32. rD,rS1,IMMED ! 106: .if $n != 3 ! 107: .abort "invalid operands of andi." ! 108: .endif ! 109: .set __used_at,0 ! 110: .abs __is_abs,$2 ! 111: .if !__is_abs ! 112: .set __used_at,1 ! 113: li32 at,$2 ! 114: and. $0,$1,at ! 115: .elseif ($2 & 0xffff0000) == 0 ! 116: andi. $0,$1,$2 ! 117: .elseif ($2 & 0xffff) == 0 ! 118: andis. $0,$1,hi16($2) ! 119: .else ! 120: .set __used_at,1 ! 121: li32 at,$2 ! 122: and. $0,$1,at ! 123: .endif ! 124: .if __no_at & __used_at ! 125: .abort "Macro uses at while .no_at in effect" ! 126: .endif ! 127: .endmacro ! 128: ! 129: /* ! 130: * ori32 rD,rS1,IMMED ! 131: * ! 132: * Perform "ori" with (possibly) 32-bit immediate ! 133: */ ! 134: .macro ori32 // ori32 rD,rS1,IMMED ! 135: .if $n != 3 ! 136: .abort "invalid operands of ori" ! 137: .endif ! 138: .abs __is_abs,$2 ! 139: .if !__is_abs ! 140: oris $0,$1,hi16($2) ! 141: ori $0,$1,lo16($2) ! 142: .elseif ($2 & 0xffff0000) == 0 ! 143: ori $0,$1,$2 ! 144: .elseif ($2 & 0xffff) == 0 ! 145: oris $0,$1,hi16($2) ! 146: .else ! 147: oris $0,$1,hi16($2) ! 148: ori $0,$1,lo16($2) ! 149: .endif ! 150: .endmacro ! 151: ! 152: /* ! 153: * xori32 rD,rS1,IMMED ! 154: * ! 155: * Perform "xor" with (possibly) 32-bit immediate ! 156: */ ! 157: .macro xori32 // xori32 rD,rS1,IMMED ! 158: .if $n != 3 ! 159: .abort "invalid operands of xori" ! 160: .endif ! 161: .abs __is_abs,$2 ! 162: .if !__is_abs ! 163: xoris $0,$1,hi16($2) ! 164: xori $0,$1,lo16($2) ! 165: .elseif ($2 & 0xffff0000) == 0 ! 166: xori $0,$1,$2 ! 167: .elseif ($2 & 0xffff) == 0 ! 168: xoris $0,$1,hi16($2) ! 169: .else ! 170: xoris $0,$1,hi16($2) ! 171: xori $0,$1,lo16($2) ! 172: .endif ! 173: .endmacro ! 174: ! 175: ! 176: /* ! 177: * MEMREF_INST -- macros to memory referencing instructions ! 178: * "capable" of dealing with 32 bit offsets. ! 179: * ! 180: * NOTE: Because the assembler doesn't have any mechanism for easily ! 181: * parsing the d(rS) syntax of register-displacement form instructions, ! 182: * these instructions do NOT mirror the normal memory reference ! 183: * instructions. The following "transformation" is used: ! 184: * lbz rD,d(rS) ! 185: * becomes: ! 186: * lbz32 rD,rS,d ! 187: * I.e.: "32" is appended to the instruction name and the base register ! 188: * and displacement become the 2'nd and 3'rd comma-separated operands. ! 189: * ! 190: * The forms: ! 191: * lbz32 rD,d ! 192: * and: ! 193: * lbz32 rD,rS ! 194: * are also recognized and the missing operand is assumed 0. ! 195: * ! 196: * ALSO NOTE: r0 or zt should never be used as rS in these instructions. ! 197: * Use "0" as rS in this case. ! 198: */ ! 199: #define MEMREF_INST(op) \ ! 200: .macro op ## 32 @\ ! 201: .set __used_at,0 @\ ! 202: .if $n == 3 @\ ! 203: .greg __is_greg,$1 @\ ! 204: .abs __is_abs,$2 @\ ! 205: .if __is_abs @\ ! 206: .if ($2 & 0xffff8000) == 0 @\ ! 207: op $0,$2($1) @\ ! 208: .elseif ($2 & 0xffff8000) == 0xffff8000 @\ ! 209: op $0,$2($1) @\ ! 210: .else @\ ! 211: .if !__is_greg @\ ! 212: .set __used_at,1 @\ ! 213: lis at,ha16($2) @\ ! 214: op $0,lo16($2)(at) @\ ! 215: .else @\ ! 216: .set __used_at,1 @\ ! 217: lis at,ha16($2) @\ ! 218: add at,at,$1 @\ ! 219: op $0,lo16($2)(at) @\ ! 220: .endif @\ ! 221: .endif @\ ! 222: .else @\ ! 223: .if !__is_greg @\ ! 224: .set __used_at,1 @\ ! 225: lis at,ha16($2) @\ ! 226: op $0,lo16($2)(at) @\ ! 227: .else @\ ! 228: .set __used_at,1 @\ ! 229: lis at,ha16($2) @\ ! 230: add at,at,$1 @\ ! 231: op $0,lo16($2)(at) @\ ! 232: .endif @\ ! 233: .endif @\ ! 234: .elseif $n == 2 @\ ! 235: .greg __is_greg,$1 @\ ! 236: .if !__is_greg @\ ! 237: .abs __is_abs,$1 @\ ! 238: .if __is_abs @\ ! 239: .if ($1 & 0xffff8000) == 0 @\ ! 240: op $0,$1(0) @\ ! 241: .elseif ($1 & 0xffff8000) == 0xffff8000 @\ ! 242: op $0,$1(0) @\ ! 243: .else @\ ! 244: .set __used_at,1 @\ ! 245: lis at,ha16($1) @\ ! 246: op $0,lo16($1)(at) @\ ! 247: .endif @\ ! 248: .else @\ ! 249: .set __used_at,1 @\ ! 250: lis at,ha16($1) @\ ! 251: op $0,lo16($1)(at) @\ ! 252: .endif @\ ! 253: .else @\ ! 254: op $0,0($1) @\ ! 255: .endif @\ ! 256: .else @\ ! 257: .abort "Invalid operands of " #op "32" @\ ! 258: .endif @\ ! 259: .if __no_at & __used_at @\ ! 260: .abort "Macro uses at while .no_at in effect" @\ ! 261: .endif @\ ! 262: .endmacro ! 263: ! 264: MEMREF_INST(lbz) ! 265: MEMREF_INST(lhz) ! 266: MEMREF_INST(lha) ! 267: MEMREF_INST(lwz) ! 268: MEMREF_INST(lwa) ! 269: MEMREF_INST(ld) ! 270: ! 271: MEMREF_INST(stb) ! 272: MEMREF_INST(sth) ! 273: MEMREF_INST(stw) ! 274: MEMREF_INST(std) ! 275: ! 276: MEMREF_INST(lmw) ! 277: MEMREF_INST(lmd) ! 278: MEMREF_INST(stmw) ! 279: MEMREF_INST(stmd) ! 280: ! 281: /* ! 282: * ARITH_INST -- define 32-bit immediate forms of arithmetic ! 283: * instructions ! 284: * ! 285: * E.g. addi32 rD,rS,IMMED ! 286: */ ! 287: #define ARITH_INST(op, op3, sf) \ ! 288: .macro op ## 32 ## sf @\ ! 289: .if $n != 3 @\ ! 290: .abort "invalid operands to " #op "32" @\ ! 291: .endif @\ ! 292: .abs __is_abs,$2 @\ ! 293: .if __is_abs @\ ! 294: .if ($2 & 0xffff8000) == 0 @\ ! 295: op##sf $0,$1,$2 @\ ! 296: .elseif ($2 & 0xffff8000) == 0xffff8000 @\ ! 297: op##sf $0,$1,$2 @\ ! 298: .elseif __no_at @\ ! 299: .abort "Macro uses at while .no_at in effect" @\ ! 300: .else @\ ! 301: li32 at,$2 @\ ! 302: op3##sf $0,$1,at @\ ! 303: .endif @\ ! 304: .elseif __no_at @\ ! 305: .abort "Macro uses at while .no_at in effect" @\ ! 306: .else @\ ! 307: li32 at,$2 @\ ! 308: op3##sf $0,$1,at @\ ! 309: .endif @\ ! 310: .endmacro ! 311: ! 312: ARITH_INST(addi, add, ) ! 313: ARITH_INST(subi, sub, ) ! 314: ARITH_INST(addic, addc, ) ! 315: ARITH_INST(subic, subc, ) ! 316: ARITH_INST(addic, addc, .) ! 317: ARITH_INST(subic, subc, .) ! 318: ARITH_INST(mulli, mull, ) ! 319: ! 320: /* ! 321: * CMPEX_INST -- define 32-bit immediate forms of extended compare ! 322: * instructions ! 323: * ! 324: * E.g. cmpwi32 cr3,rS,IMMED ! 325: * cmpwi32 rS,IMMED ! 326: */ ! 327: #define CMPEX_INST(op, op3) \ ! 328: .macro op ## 32 @\ ! 329: .if $n == 3 @\ ! 330: .abs __is_abs,$2 @\ ! 331: .if __is_abs @\ ! 332: .if ($2 & 0xffff8000) == 0 @\ ! 333: op $0,$1,$2 @\ ! 334: .elseif ($2 & 0xffff8000) == 0xffff8000 @\ ! 335: op $0,$1,$2 @\ ! 336: .elseif __no_at @\ ! 337: .abort "Macro uses at while .no_at in effect" @\ ! 338: .else @\ ! 339: li32 at,$2 @\ ! 340: op3 $0,$1,at @\ ! 341: .endif @\ ! 342: .elseif __no_at @\ ! 343: .abort "Macro uses at while .no_at in effect" @\ ! 344: .else @\ ! 345: li32 at,$2 @\ ! 346: op3 $0,$1,at @\ ! 347: .endif @\ ! 348: .elseif $n == 2 @\ ! 349: .abs __is_abs,$1 @\ ! 350: .if __is_abs @\ ! 351: .if ($1 & 0xffff8000) == 0 @\ ! 352: op $0,$1 @\ ! 353: .elseif ($1 & 0xffff8000) == 0xffff8000 @\ ! 354: op $0,$1 @\ ! 355: .elseif __no_at @\ ! 356: .abort "Macro uses at while .no_at in effect" @\ ! 357: .else @\ ! 358: li32 at,$1 @\ ! 359: op3 $0,at @\ ! 360: .endif @\ ! 361: .elseif __no_at @\ ! 362: .abort "Macro uses at while .no_at in effect" @\ ! 363: .else @\ ! 364: li32 at,$1 @\ ! 365: op3 $0,at @\ ! 366: .endif @\ ! 367: .else @\ ! 368: .abort "invalid operands to " #op "32" @\ ! 369: .endif @\ ! 370: .endmacro ! 371: ! 372: CMPEX_INST(cmpdi, cmpd) ! 373: CMPEX_INST(cmpwi, cmpw) ! 374: CMPEX_INST(cmpldi, cmpld) ! 375: CMPEX_INST(cmplwi, cmplw) ! 376: ! 377: /* ! 378: * CMP_INST -- define 32-bit immediate forms of standard compare ! 379: * instructions ! 380: * ! 381: * E.g. cmpi32 cr3,0,rS,IMMED ! 382: */ ! 383: #define CMP_INST(op, op3) \ ! 384: .macro op ## 32 @\ ! 385: .if $n == 4 @\ ! 386: .abs __is_abs,$3 @\ ! 387: .if __is_abs @\ ! 388: .if ($3 & 0xffff8000) == 0 @\ ! 389: op $0,$1,$2,$3 @\ ! 390: .elseif ($3 & 0xffff8000) == 0xffff8000 @\ ! 391: op $0,$1,$2,$3 @\ ! 392: .elseif __no_at @\ ! 393: .abort "Macro uses at while .no_at in effect" @\ ! 394: .else @\ ! 395: li32 at,$3 @\ ! 396: op3 $0,$1,$2,at @\ ! 397: .endif @\ ! 398: .elseif __no_at @\ ! 399: .abort "Macro uses at while .no_at in effect" @\ ! 400: .else @\ ! 401: li32 at,$3 @\ ! 402: op3 $0,$1,$2,at @\ ! 403: .endif @\ ! 404: .else @\ ! 405: .abort "invalid operands to " #op "32" @\ ! 406: .endif @\ ! 407: .endmacro ! 408: ! 409: CMP_INST(cmpi, cmp) ! 410: CMP_INST(cmpli, cmpl) ! 411: ! 412: #endif /* __ASSEMBLER__ */ ! 413: ! 414: #endif /* _ARCH_PPC_PSEUDO_INST_H_ */
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.