NetBSD/lib/libc/pc532/sys/sigprocmask.s

51 lines
1.5 KiB
ArmAsm

/*
* Copyright (c) 1992 Helsinki University of Technology
* All Rights Reserved.
*
* Permission to use, copy, modify and distribute this software and its
* documentation is hereby granted, provided that both the copyright
* notice and this permission notice appear in all copies of the
* software, derivative works or modified versions, and any portions
* thereof, and that both notices appear in supporting documentation.
*
* HELSINKI UNIVERSITY OF TECHNOLOGY ALLOWS FREE USE OF THIS SOFTWARE IN
* ITS "AS IS" CONDITION. HELSINKI UNIVERSITY OF TECHNOLOGY DISCLAIMS ANY
* LIABILITY OF ANY KIND FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE
* USE OF THIS SOFTWARE.
*/
/*
* HISTORY
* 29-Apr-92 Johannes Helander (jvh) at Helsinki University of Technology
* Created.
*
* $Id: sigprocmask.s,v 1.1.1.1 1993/09/17 18:43:51 phil Exp $
*/
/*
* Note: Has never been tested. Debug before use.
*/
#include <sys/syscall.h>
#include "SYS.h"
ENTRY(sigprocmask)
movd S_ARG1, r1 /* fetch new sigset pointer */
cmpqd 0, r1 /* check new sigset pointer */
bne L1 /* if not null, indirect */
/* movqd 0, S_ARG1 /* null mask pointer: block empty set */
movqd 1, S_ARG0 /* SIG_BLOCK */
br L2
L1: movd 0(r1), r1 /* fetch indirect ... */
movd r1, S_ARG1 /* to new mask arg */
L2: movd SYS_sigprocmask, r0
SVC
bcs cerror
movd S_ARG2, r1 /* fetch old mask requested */
cmpqd 0, r1 /* test if old mask requested */
beq out
movd r0, 0(r1) /* store old mask */
out:
movqd 0, r0
ret 0