177ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao/* ===-- fixunsdfdi.c - Implement __fixunsdfdi -----------------------------===
277ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao *
377ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao *                     The LLVM Compiler Infrastructure
477ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao *
577ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao * This file is distributed under the University of Illinois Open Source
677ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao * License. See LICENSE.TXT for details.
777ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao *
877ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao * ===----------------------------------------------------------------------===
977ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao *
1077ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao * This file implements __fixunsdfdi for the compiler_rt library.
1177ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao *
1277ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao * ===----------------------------------------------------------------------===
1377ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao */
1477ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao
1577ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao#include "int_lib.h"
1677ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao
1777ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao/* Returns: convert a to a unsigned long long, rounding toward zero.
1877ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao *          Negative values all become zero.
1977ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao */
2077ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao
2177ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao/* Assumption: double is a IEEE 64 bit floating point type
2277ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao *             du_int is a 64 bit integral type
2377ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao *             value in double is representable in du_int or is negative
2477ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao *                 (no range checking performed)
2577ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao */
2677ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao
2777ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao/* seee eeee eeee mmmm mmmm mmmm mmmm mmmm | mmmm mmmm mmmm mmmm mmmm mmmm mmmm mmmm */
2877ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao
2977ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liaodu_int
3077ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao__fixunsdfdi(double a)
3177ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao{
3277ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao    double_bits fb;
3377ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao    fb.f = a;
3477ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao    int e = ((fb.u.s.high & 0x7FF00000) >> 20) - 1023;
3577ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao    if (e < 0 || (fb.u.s.high & 0x80000000))
3677ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao        return 0;
3777ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao    udwords r;
3877ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao    r.s.high = (fb.u.s.high & 0x000FFFFF) | 0x00100000;
3977ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao    r.s.low = fb.u.s.low;
4077ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao    if (e > 52)
4177ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao        r.all <<= (e - 52);
4277ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao    else
4377ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao        r.all >>= (52 - e);
4477ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao    return r.all;
4577ed6142daed1e068fbda64405d0de9845e40e1Shih-wei Liao}
46