Mercurial > pub > dyncall > dyncall
annotate test/resolve_self/main.c @ 464:bd65767c0534
doc: two more disas examples
author | Tassilo Philipp |
---|---|
date | Wed, 02 Feb 2022 11:03:06 +0100 |
parents | 7608e34098b0 |
children |
rev | line source |
---|---|
0 | 1 /* |
2 | |
3 Package: dyncall | |
4 Library: test | |
5 File: test/resolve_self/main.c | |
6 Description: | |
7 License: | |
8 | |
410
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
9 Copyright (c) 2011-2021 Daniel Adler <dadler@uni-goettingen.de>, |
0 | 10 Tassilo Philipp <tphilipp@potion-studios.com> |
11 | |
12 Permission to use, copy, modify, and distribute this software for any | |
13 purpose with or without fee is hereby granted, provided that the above | |
14 copyright notice and this permission notice appear in all copies. | |
15 | |
16 THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |
17 WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |
18 MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |
19 ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |
20 WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |
21 ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |
22 OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |
23 | |
24 */ | |
25 | |
26 #include "../../dynload/dynload.h" | |
27 #include "../../dyncall/dyncall_macros.h" | |
28 #include "../common/platformInit.h" | |
410
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
29 #include "../common/platformInit.c" /* Impl. for functions only used in this translation unit */ |
0 | 30 |
31 #ifdef DC_WINDOWS | |
32 #define DLL_EXPORT __declspec( dllexport ) | |
33 #else | |
34 #define DLL_EXPORT | |
35 #endif | |
36 | |
37 DLL_EXPORT double add_dd_d(double x, double y); | |
38 | |
39 double add_dd_d(double x, double y) | |
40 { | |
41 return x+y; | |
42 } | |
43 | |
44 int main(int argc, char* argv[]) | |
45 { | |
46 void* address; | |
47 double result; | |
48 int status; | |
227 | 49 DLSyms* pSyms; |
0 | 50 DLLib* pLib = dlLoadLibrary(NULL); |
410
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
51 |
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
52 dcTest_initPlatform(); |
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
53 |
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
54 if(!pLib) { |
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
55 printf("failed to self-load via dlLoadLibrary(NULL)\n"); |
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
56 return 1; |
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
57 } |
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
58 |
214 | 59 printf("self loaded at %p\n", pLib); |
0 | 60 |
61 address = dlFindSymbol(pLib, "add_dd_d"); | |
214 | 62 if(address) { |
63 printf("address of function add_dd_d at %p\n", address); | |
64 result = ( (double (*) (double,double) ) address ) (20.0, 3.0); | |
65 status = (result == 23); | |
66 } else { | |
67 printf("can't resolve address of add_dd_d, it doesn't seem to be a *dynamic* symbol\n"); | |
68 status = 0; | |
69 } | |
227 | 70 |
71 dlFreeLibrary(pLib); | |
72 | |
73 /*pSyms = dlSymsInit(NULL); | |
74 printf("syms handle: %p\n", pSyms); | |
75 dlSymsCleanup(pSyms);*/ | |
76 | |
0 | 77 printf("result: resolve_self: %d\n", status); |
410
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
78 |
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
79 dcTest_deInitPlatform(); |
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
80 |
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
81 return !status; |
0 | 82 } |
227 | 83 |