blob: a8bcfcd96d5c0cfc7d98f05f327ab81773e9c530 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
|
/* iX386_64.s -- assembly support. */
/*
// QuickThreads -- Threads-building toolkit.
// Copyright (c) 1993 by David Keppel
//
// Permission to use, copy, modify and distribute this software and
// its documentation for any purpose and without fee is hereby
// granted, provided that the above copyright notice and this notice
// appear in all copies. This software is provided as a
// proof-of-concept and for demonstration purposes; there is no
// representation about the suitability of this software for any
// purpose. */
/* 64-bit Intel Architecture Support
// written by Andy Goodrich, Forte Design Systms, Inc. */
/* NOTE: double-labeled `_name' and `name' for System V compatability. */
/* NOTE: Mixed C/C++-style comments used. Sorry! */
.text
.align 2
.globl _qt_abort
.globl qt_abort
.globl _qt_block
.globl qt_block
.globl _qt_blocki
.globl qt_blocki
.globl _qt_align
.globl qt_align
_qt_abort:
qt_abort:
_qt_block:
qt_block:
_qt_blocki:
qt_blocki:
/* 11 (return address.) */
pushq %rbp /* 10 (push stack frame top.) */
movq %rsp, %rbp /* set new stack frame top. */
/* save registers. */
subq $8, %rsp /* 9 (Stack alignment) */
pushq %r12 /* 8 ... */
pushq %r13 /* 7 ... */
pushq %r14 /* 6 ... */
pushq %r15 /* 5 ... */
pushq %rbx /* 4 ... */
pushq %rcx /* 3 ... (new stack address) */
pushq %rdx /* 2 ... (arg) */
pushq %rdi /* 1 ... (address of save function.) */
pushq %rsi /* 0 ... (cor) */
movq %rdi, %rax /* get address of save function. */
movq %rsp, %rdi /* set current stack as save argument. */
movq %rcx, %rsp /* swap stacks. */
movq %rcx, %rbp /* adjust stack frame pointer. */
addq $10*8, %rbp /* ... */
call *%rax /* call function to save stack pointer. */
/* restore registers. */
popq %rsi /* ... */
popq %rdi /* ... */
popq %rdx /* ... */
popq %rcx /* ... */
popq %rbx /* ... */
popq %r15 /* restore registers from new stack. */
popq %r14 /* ... */
popq %r13 /* ... */
popq %r12 /* ... */
leave /* unwind stack. */
_qt_align:
qt_align:
ret /* return. */
|
