← Back to branch summary

~ubuntu-branches/ubuntu/precise/eglibc/precise

« back to all changes in this revision

Viewing changes to ports/sysdeps/unix/bsd/vax/vfork.S

  • Committer: Package Import Robot
  • Author(s): Matthias Klose
  • Date: 2011-10-04 17:48:26 UTC
  • mfrom: (216.1.23 oneiric)
  • Revision ID: package-import@ubuntu.com-20111004174826-2cyb9ewn3ucymlsx
Tags: 2.13-20ubuntu5
https://launchpad.net/bugs/853688
libc6-dev: Don't break the current {gnat,gcj}-4.4-base versons. LP: #853688.

Show diffs side-by-side

added added

removed removed

Lines of Context:
ports/sysdeps/unix/bsd/vax/vfork.S
 
1
/* Copyright (C) 1991, 1992, 1995, 1997, 2002 Free Software Foundation, Inc.
 
2
   This file is part of the GNU C Library.
 
3
 
 
4
   The GNU C Library is free software; you can redistribute it and/or
 
5
   modify it under the terms of the GNU Lesser General Public
 
6
   License as published by the Free Software Foundation; either
 
7
   version 2.1 of the License, or (at your option) any later version.
 
8
 
 
9
   The GNU C Library is distributed in the hope that it will be useful,
 
10
   but WITHOUT ANY WARRANTY; without even the implied warranty of
 
11
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 
12
   Lesser General Public License for more details.
 
13
 
 
14
   You should have received a copy of the GNU Lesser General Public
 
15
   License along with the GNU C Library; if not, write to the Free
 
16
   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
 
17
   02111-1307 USA.  */
 
18
 
 
19
#include <sysdep.h>
 
20
 
 
21
#ifndef SYS_vfork
 
22
#define SYS_vfork       66
 
23
#endif
 
24
 
 
25
/* Clone the calling process, but without copying the whole address space.
 
26
   The calling process is suspended until the new process exits or is
 
27
   replaced by a call to `execve'.  Return -1 for errors, 0 to the new process,
 
28
   and the process ID of the new process to the old process.  */
 
29
.globl ___vfork
 
30
___vfork:
 
31
        .word 0
 
32
        /* Save our return address in R2, and return to code below.  */
 
33
        movl 16(fp), r2
 
34
        movab unwind, 16(fp)
 
35
        ret
 
36
unwind:
 
37
        /* Do the system call.  */
 
38
        chmk $SYS_vfork
 
39
        bcs error
 
40
 
 
41
        tstl r1
 
42
        beq parent
 
43
 
 
44
        /* We are the child.  Return zero.  */
 
45
        clrl r0
 
46
 
 
47
        /* Return to the saved address.  */
 
48
parent: jmp (r2)
 
49
 
 
50
.globl  _errno
 
51
error:
 
52
        movl r0, _errno
 
53
        mnegl $1, r0
 
54
        jmp (r2)
 
55
libc_hidden_def (__vfork)
 
56
 
 
57
weak_alias (__vfork, vfork)