Home | History | Annotate | Line # | Download | only in ia64
math.c revision 1.1.1.1.10.2
      1  1.1.1.1.10.2  tls /*	$NetBSD: math.c,v 1.1.1.1.10.2 2014/08/20 00:04:24 tls Exp $	*/
      2  1.1.1.1.10.2  tls 
      3  1.1.1.1.10.2  tls /*++
      4  1.1.1.1.10.2  tls 
      5  1.1.1.1.10.2  tls Copyright (c) 1998  Intel Corporation
      6  1.1.1.1.10.2  tls 
      7  1.1.1.1.10.2  tls Module Name:
      8  1.1.1.1.10.2  tls 
      9  1.1.1.1.10.2  tls     math.c
     10  1.1.1.1.10.2  tls 
     11  1.1.1.1.10.2  tls Abstract:
     12  1.1.1.1.10.2  tls 
     13  1.1.1.1.10.2  tls 
     14  1.1.1.1.10.2  tls 
     15  1.1.1.1.10.2  tls 
     16  1.1.1.1.10.2  tls Revision History
     17  1.1.1.1.10.2  tls 
     18  1.1.1.1.10.2  tls --*/
     19  1.1.1.1.10.2  tls 
     20  1.1.1.1.10.2  tls #include "lib.h"
     21  1.1.1.1.10.2  tls 
     22  1.1.1.1.10.2  tls 
     23  1.1.1.1.10.2  tls //
     24  1.1.1.1.10.2  tls // Declare runtime functions
     25  1.1.1.1.10.2  tls //
     26  1.1.1.1.10.2  tls 
     27  1.1.1.1.10.2  tls #ifdef RUNTIME_CODE
     28  1.1.1.1.10.2  tls #ifndef __GNUC__
     29  1.1.1.1.10.2  tls #pragma RUNTIME_CODE(LShiftU64)
     30  1.1.1.1.10.2  tls #pragma RUNTIME_CODE(RShiftU64)
     31  1.1.1.1.10.2  tls #pragma RUNTIME_CODE(MultU64x32)
     32  1.1.1.1.10.2  tls #pragma RUNTIME_CODE(DivU64x32)
     33  1.1.1.1.10.2  tls #endif
     34  1.1.1.1.10.2  tls #endif
     35  1.1.1.1.10.2  tls 
     36  1.1.1.1.10.2  tls //
     37  1.1.1.1.10.2  tls //
     38  1.1.1.1.10.2  tls //
     39  1.1.1.1.10.2  tls 
     40  1.1.1.1.10.2  tls 
     41  1.1.1.1.10.2  tls 
     42  1.1.1.1.10.2  tls 
     43  1.1.1.1.10.2  tls UINT64
     44  1.1.1.1.10.2  tls LShiftU64 (
     45  1.1.1.1.10.2  tls     IN UINT64   Operand,
     46  1.1.1.1.10.2  tls     IN UINTN    Count
     47  1.1.1.1.10.2  tls     )
     48  1.1.1.1.10.2  tls // Left shift 64bit by 32bit and get a 64bit result
     49  1.1.1.1.10.2  tls {
     50  1.1.1.1.10.2  tls     return Operand << Count;
     51  1.1.1.1.10.2  tls }
     52  1.1.1.1.10.2  tls 
     53  1.1.1.1.10.2  tls UINT64
     54  1.1.1.1.10.2  tls RShiftU64 (
     55  1.1.1.1.10.2  tls     IN UINT64   Operand,
     56  1.1.1.1.10.2  tls     IN UINTN    Count
     57  1.1.1.1.10.2  tls     )
     58  1.1.1.1.10.2  tls // Right shift 64bit by 32bit and get a 64bit result
     59  1.1.1.1.10.2  tls {
     60  1.1.1.1.10.2  tls     return Operand >> Count;
     61  1.1.1.1.10.2  tls }
     62  1.1.1.1.10.2  tls 
     63  1.1.1.1.10.2  tls 
     64  1.1.1.1.10.2  tls UINT64
     65  1.1.1.1.10.2  tls MultU64x32 (
     66  1.1.1.1.10.2  tls     IN UINT64   Multiplicand,
     67  1.1.1.1.10.2  tls     IN UINTN    Multiplier
     68  1.1.1.1.10.2  tls     )
     69  1.1.1.1.10.2  tls // Multiple 64bit by 32bit and get a 64bit result
     70  1.1.1.1.10.2  tls {
     71  1.1.1.1.10.2  tls     return Multiplicand * Multiplier;
     72  1.1.1.1.10.2  tls }
     73  1.1.1.1.10.2  tls 
     74  1.1.1.1.10.2  tls UINT64
     75  1.1.1.1.10.2  tls DivU64x32 (
     76  1.1.1.1.10.2  tls     IN UINT64   Dividend,
     77  1.1.1.1.10.2  tls     IN UINTN    Divisor,
     78  1.1.1.1.10.2  tls     OUT UINTN   *Remainder OPTIONAL
     79  1.1.1.1.10.2  tls     )
     80  1.1.1.1.10.2  tls // divide 64bit by 32bit and get a 64bit result
     81  1.1.1.1.10.2  tls // N.B. only works for 31bit divisors!!
     82  1.1.1.1.10.2  tls {
     83  1.1.1.1.10.2  tls     ASSERT (Divisor != 0);
     84  1.1.1.1.10.2  tls 
     85  1.1.1.1.10.2  tls     if (Remainder) {
     86  1.1.1.1.10.2  tls         *Remainder = Dividend % Divisor;
     87  1.1.1.1.10.2  tls     }
     88  1.1.1.1.10.2  tls 
     89  1.1.1.1.10.2  tls     return Dividend / Divisor;
     90  1.1.1.1.10.2  tls }
     91