1*9e97eaf3Sdaniel/* $OpenBSD: fixunsdfsi.S,v 1.7 2014/11/14 07:31:13 daniel Exp $ */ 2df930be7Sderaadt/*- 3df930be7Sderaadt * Copyright (c) 1990 The Regents of the University of California. 4df930be7Sderaadt * All rights reserved. 5df930be7Sderaadt * 6df930be7Sderaadt * This code is derived from software contributed to Berkeley by 7df930be7Sderaadt * William Jolitz. 8df930be7Sderaadt * 9df930be7Sderaadt * Redistribution and use in source and binary forms, with or without 10df930be7Sderaadt * modification, are permitted provided that the following conditions 11df930be7Sderaadt * are met: 12df930be7Sderaadt * 1. Redistributions of source code must retain the above copyright 13df930be7Sderaadt * notice, this list of conditions and the following disclaimer. 14df930be7Sderaadt * 2. Redistributions in binary form must reproduce the above copyright 15df930be7Sderaadt * notice, this list of conditions and the following disclaimer in the 16df930be7Sderaadt * documentation and/or other materials provided with the distribution. 176580fee3Smillert * 3. Neither the name of the University nor the names of its contributors 18df930be7Sderaadt * may be used to endorse or promote products derived from this software 19df930be7Sderaadt * without specific prior written permission. 20df930be7Sderaadt * 21df930be7Sderaadt * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 22df930be7Sderaadt * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23df930be7Sderaadt * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24df930be7Sderaadt * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 25df930be7Sderaadt * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26df930be7Sderaadt * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27df930be7Sderaadt * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28df930be7Sderaadt * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29df930be7Sderaadt * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30df930be7Sderaadt * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31df930be7Sderaadt * SUCH DAMAGE. 32df930be7Sderaadt */ 33df930be7Sderaadt 343d4fda0cSderaadt#include <machine/asm.h> 353d4fda0cSderaadt 36df930be7SderaadtENTRY(__fixunsdfsi) 37df930be7Sderaadt fldl 4(%esp) /* argument double to accum stack */ 38df930be7Sderaadt frndint /* create integer */ 3932b97dedSpascal#ifdef __PIC__ 40df930be7Sderaadt PIC_PROLOGUE 41df930be7Sderaadt leal PIC_GOTOFF(fbiggestsigned),%eax 42df930be7Sderaadt PIC_EPILOGUE 43df930be7Sderaadt fcoml (%eax) 44df930be7Sderaadt#else 45df930be7Sderaadt fcoml fbiggestsigned /* bigger than biggest signed? */ 46df930be7Sderaadt#endif 47df930be7Sderaadt fstsw %ax 48df930be7Sderaadt sahf 49df930be7Sderaadt jnb 1f 50df930be7Sderaadt 51df930be7Sderaadt fistpl 4(%esp) 52df930be7Sderaadt movl 4(%esp),%eax 53df930be7Sderaadt ret 54df930be7Sderaadt 55df930be7Sderaadt1: 5632b97dedSpascal#ifdef __PIC__ 57df930be7Sderaadt PIC_PROLOGUE 58df930be7Sderaadt leal PIC_GOTOFF(fbiggestsigned),%eax 59df930be7Sderaadt PIC_EPILOGUE 60df930be7Sderaadt fsubl (%eax) 61df930be7Sderaadt#else 62df930be7Sderaadt fsubl fbiggestsigned /* reduce for proper conversion */ 63df930be7Sderaadt#endif 64df930be7Sderaadt fistpl 4(%esp) /* convert */ 65df930be7Sderaadt movl 4(%esp),%eax 66df930be7Sderaadt orl $0x80000000,%eax /* restore bias */ 67df930be7Sderaadt ret 68df930be7Sderaadt 69*9e97eaf3Sdanielfbiggestsigned: .double 2147483648.0 70