Mercurial > irccd

annotate extern/libcompat/tests/test-dlfcn.c @ 1004:3ea3361f0fc7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
irccd: now track modes
author David Demelier <markand@malikania.fr>
date Tue, 16 Feb 2021 18:37:22 +0100
parents 21a91311c8ea
children cf99df45cb84
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
948
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
1 /*
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
2 * test-dlfcn.c -- test dlopen/dlsym/dlclose
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
3 *
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
4 * Copyright (c) 2020 David Demelier <markand@malikania.fr>
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
5 *
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
6 * Permission to use, copy, modify, and/or distribute this software for any
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
7 * purpose with or without fee is hereby granted, provided that the above
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
8 * copyright notice and this permission notice appear in all copies.
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
9 *
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
10 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
11 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
12 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
13 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
14 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
15 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
16 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
17 */
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
18
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
19 #include <dlfcn.h>
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
20 #include <stdio.h>
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
21
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
22 #if defined(_WIN32)
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
23 # define EXPORT __declspec(dllexport)
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
24 #else
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
25 # define EXPORT
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
26 #endif
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
27
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
28 EXPORT int
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
29 hello(void)
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
30 {
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
31 return 0;
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
32 }
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
33
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
34 int
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
35 main(void)
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
36 {
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
37 void *handle;
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
38 int (*func)(void);
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
39 int ret = 1;
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
40
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
41 if (!(handle = dlopen(NULL, RTLD_NOW)) ||
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
42 !(func = dlsym(handle, "hello"))) {
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
43 fprintf(stderr, "%s\n", dlerror());
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
44 goto end;
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
45 }
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
46
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
47 ret = func();
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
48
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
49 dlclose(handle);
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
50
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
51 end:
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
52 return ret;
21a91311c8ea cmake: switch back, GNU make is painful
David Demelier <markand@malikania.fr>
parents:
diff changeset
53 }