xref: /csrg-svn/lib/libc/mips/sys/setlogin.s (revision 52731)
1*52731Sbostic/*-
2*52731Sbostic * Copyright (c) 1991 The Regents of the University of California.
3*52731Sbostic * All rights reserved.
4*52731Sbostic *
5*52731Sbostic * This code is derived from software contributed to Berkeley by
6*52731Sbostic * Ralph Campbell.
7*52731Sbostic *
8*52731Sbostic * %sccs.include.redist.c%
9*52731Sbostic */
10*52731Sbostic
11*52731Sbostic#include "SYS.h"
12*52731Sbostic
13*52731Sbostic#if defined(LIBC_SCCS) && !defined(lint)
14*52731Sbostic	ASMSTR("@(#)setlogin.s	5.1 (Berkeley) 02/29/92")
15*52731Sbostic#endif /* LIBC_SCCS and not lint */
16*52731Sbostic
17*52731SbosticLEAF(setlogin)
18*52731Sbostic	li	v0, SYS_setlogin	# setlogin(name)
19*52731Sbostic	syscall
20*52731Sbostic	bne	a3, zero, 1f
21*52731Sbostic	sw	zero, _logname_valid	# in getlogin()
22*52731Sbostic	j	ra
23*52731Sbostic1:
24*52731Sbostic	j	_cerror
25*52731SbosticEND(setlogin)
26