root/regress/libexec/ld.so/dlclose/test1/prog3/main.c
/*      $OpenBSD: main.c,v 1.1.1.1 2005/09/30 15:14:46 kurt Exp $       */

/*
 * Copyright (c) 2005 Kurt Miller <kurt@openbsd.org>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

#include <dlfcn.h>
#include <stdio.h>

int
main()
{
        int ret = 0;
        int (*bbTest2)(void);
        void *libbb;
        void *libaa;

        libaa = dlopen("libaa.so", RTLD_LAZY|RTLD_GLOBAL);
        libbb = dlopen("libbb.so", RTLD_LAZY|RTLD_GLOBAL);

        if (libaa == NULL) {
                printf("dlopen(\"libaa.so\", RTLD_LAZY|RTLD_GLOBAL) FAILED\n");
                return (1);
        }

        if (libbb == NULL) {
                printf("dlopen(\"libbb.so\", RTLD_LAZY|RTLD_GLOBAL) FAILED\n");
                return (1);
        }

        bbTest2 = dlsym(libbb, "bbTest2");

        /* call bbTest2 to force lazy binding to duplicateFun in libaa */
        (*bbTest2)();

        dlclose(libaa);

        /* call bbTest2 again to ensure libaa was not unloaded (still needed) */
        ret = (*bbTest2)();

        dlclose(libbb);

        return (ret);
}