/*      $OpenBSD: fpsetsticky.S,v 1.4 2018/07/03 23:14:05 mortimer Exp $        */
/*      $NetBSD: fpsetsticky.S,v 1.5 2004/03/09 17:16:13 drochner Exp $ */

/*
 * Written by Frank van der Linden at Wasabi Systems for NetBSD
 * Public domain.
 */

#include <machine/asm.h>

/*
 * XXX set both the x87 status word and the SSE mxcsr register.
 * Applications should only set exception and round flags
 * via the fp*() interface, otherwise the status words
 * will get our of sync.
 */ 


#ifdef WEAK_ALIAS
WEAK_ALIAS(fpsetsticky, _fpsetsticky)
ENTRY(_fpsetsticky)
#else
ENTRY(fpsetsticky)
#endif
        RETGUARD_SETUP(fpsetsticky, r11)
        fnstenv -28(%rsp)
        stmxcsr -32(%rsp)

        andl    $63,%edi

        movl    -24(%rsp),%eax
        movl    %eax,%edx
        andb    $0xc0,%dl

        orl     %edi,%edx
        movl    %edx,-24(%rsp)

        movl    -32(%rsp),%edx
        orl     %edx,%eax
        andl    $63,%eax
        andb    $0xc0,%dl
        orl     %edi,%edx
        movl    %edx,-32(%rsp)

        ldmxcsr -32(%rsp)
        fldenv  -28(%rsp)
        RETGUARD_CHECK(fpsetsticky, r11)
        ret
#ifdef WEAK_ALIAS
END(_fpsetsticky)
#else
END(fpsetsticky)
#endif