File: link-dll-stdcall.s

package info (click to toggle)
swiftlang 6.0.3-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 2,519,992 kB
  • sloc: cpp: 9,107,863; ansic: 2,040,022; asm: 1,135,751; python: 296,500; objc: 82,456; f90: 60,502; lisp: 34,951; pascal: 19,946; sh: 18,133; perl: 7,482; ml: 4,937; javascript: 4,117; makefile: 3,840; awk: 3,535; xml: 914; fortran: 619; cs: 573; ruby: 573
file content (88 lines) | stat: -rw-r--r-- 2,546 bytes parent folder | download | duplicates (21)
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
75
76
77
78
79
80
81
82
83
84
85
86
87
88
# REQUIRES: x86

## Test creating a DLL and linking against the DLL without using an import
## library.

## Test on i386 with stdcall/fastcall/vectorcall decorated symbols.

## Check that we normally warn about these fixups. If -stdcall-fixup:no
## (--disable-stdcall-fixup on the MinGW linker level) is passed, we don't
## do these fixups. If we -stdcall-fixup (--enable-stdcall-fixup on the MinGW
## linker level) is passed, we don't warn about it at all.

# RUN: split-file %s %t.dir

# RUN: llvm-mc -filetype=obj -triple=i386-windows-gnu %t.dir/lib.s -o %t.lib.o
# RUN: lld-link -safeseh:no -noentry -dll -def:%t.dir/lib.def %t.lib.o -out:%t.lib.dll -implib:%t.implib.lib
# RUN: llvm-mc -filetype=obj -triple=i386-windows-gnu %t.dir/main.s -o %t.main.o
# RUN: lld-link -lldmingw %t.main.o -out:%t.main.exe %t.lib.dll -opt:noref 2>&1 | FileCheck --check-prefix=LOG %s
# RUN: llvm-readobj --coff-imports %t.main.exe | FileCheck %s
# RUN: not lld-link -lldmingw %t.main.o -out:%t.main.exe %t.lib.dll -opt:noref -stdcall-fixup:no 2>&1 | FileCheck --check-prefix=ERROR %s
# RUN: lld-link -lldmingw %t.main.o -out:%t.main.exe %t.lib.dll -opt:noref -stdcall-fixup 2>&1 | count 0

#--- lib.s
  .text
  .globl  _stdcall@8
  .globl  @fastcall@8
  .globl  vectorcall@@8
  .globl  __underscored
_stdcall@8:
  movl    8(%esp), %eax
  addl    4(%esp), %eax
  retl    $8
@fastcall@8:
  movl    8(%esp), %eax
  addl    4(%esp), %eax
  retl    $8
vectorcall@@8:
  movl    8(%esp), %eax
  addl    4(%esp), %eax
  retl    $8
__underscored:
  ret

#--- lib.def
EXPORTS
stdcall
fastcall
vectorcall
_underscored

#--- main.s
.text
.global _mainCRTStartup
_mainCRTStartup:
  pushl   $2
  pushl   $1
  calll   _stdcall@8
  movl    $1, %ecx
  movl    $2, %edx
  calll   @fastcall@8
  movl    $1, %ecx
  movl    $2, %edx
  calll   vectorcall@@8
  pushl   $2
  pushl   $1
  calll   __underscored
  addl    $8, %esp
  xorl    %eax, %eax
  popl    %ebp
  retl

# CHECK:      Import {
# CHECK-NEXT:   Name: link-dll-stdcall.s.tmp.lib.dll
# CHECK-NEXT:   ImportLookupTableRVA:
# CHECK-NEXT:   ImportAddressTableRVA
# CHECK-NEXT:   Symbol: _underscored
# CHECK-NEXT:   Symbol: fastcall
# CHECK-NEXT:   Symbol: stdcall
# CHECK-NEXT:   Symbol: vectorcall
# CHECK-NEXT: }

# LOG-DAG: Resolving vectorcall@@8 by linking to _vectorcall
# LOG-DAG: Resolving @fastcall@8 by linking to _fastcall
# LOG-DAG: Resolving _stdcall@8 by linking to _stdcall

# ERROR-DAG: undefined symbol: _stdcall@8
# ERROR-DAG: undefined symbol: @fastcall@8
# ERROR-DAG: undefined symbol: vectorcall@@8