Files
rocm-systems/source/lib/rocprof-sys-dl/main.c
T
David Galiffi d07bf508a9 Rename Omnitrace to ROCm Systems Profiler (#4)
The Omnitrace program is being renamed. 

Full name: "ROCm Systems Profiler"
Package name: "rocprofiler-systems"
Binary / Library names: "rocprof-sys-*"

---------
Co-authored-by: Xuan Chen <xuchen@amd.com>
Signed-off-by: David Galiffi <David.Galiffi@amd.com>
2024-10-15 11:20:40 -04:00

138 строки
4.4 KiB
C

// MIT License
//
// Copyright (c) 2022-2024 Advanced Micro Devices, Inc. All Rights Reserved.
//
// Permission is hereby granted, free of charge, to any person obtaining a copy
// of this software and associated documentation files (the "Software"), to deal
// in the Software without restriction, including without limitation the rights
// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
// copies of the Software, and to permit persons to whom the Software is
// furnished to do so, subject to the following conditions:
//
// The above copyright notice and this permission notice shall be included in all
// copies or substantial portions of the Software.
//
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
// SOFTWARE.
#define _GNU_SOURCE
#define ROCPROFSYS_PUBLIC_API __attribute__((visibility("default")));
#define ROCPROFSYS_HIDDEN_API __attribute__((visibility("hidden")));
#define ROCPROFSYS_INTERNAL_API __attribute__((visibility("internal")));
#include <dlfcn.h>
#include <stdbool.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
//
// local type definitions
//
typedef int (*main_func_t)(int, char**, char**);
typedef int (*start_main_t)(int (*)(int, char**, char**), int, char**,
int (*)(int, char**, char**), void (*)(void), void (*)(void),
void*);
//
// local function declarations
//
int
rocprofsys_libc_start_main(int (*)(int, char**, char**), int, char**,
int (*)(int, char**, char**), void (*)(void), void (*)(void),
void*) ROCPROFSYS_INTERNAL_API;
int
__libc_start_main(int (*)(int, char**, char**), int, char**, int (*)(int, char**, char**),
void (*)(void), void (*)(void), void*) ROCPROFSYS_PUBLIC_API;
//
// external function declarations
//
extern int
rocprofsys_preload_library(void);
extern void
rocprofsys_finalize(void);
extern void
rocprofsys_push_trace(const char* name);
extern void
rocprofsys_pop_trace(const char* name);
extern void
rocprofsys_init_tooling(void);
extern void
rocprofsys_init(const char*, bool, const char*);
extern char*
basename(const char*);
extern void rocprofsys_set_main(main_func_t) ROCPROFSYS_INTERNAL_API;
extern int
rocprofsys_main(int argc, char** argv, char** envp) ROCPROFSYS_INTERNAL_API;
int
rocprofsys_libc_start_main(int (*_main)(int, char**, char**), int _argc, char** _argv,
int (*_init)(int, char**, char**), void (*_fini)(void),
void (*_rtld_fini)(void), void* _stack_end)
{
int _preload = rocprofsys_preload_library();
// prevent re-entry
static int _reentry = 0;
if(_reentry > 0) return -1;
_reentry = 1;
// get the address of this function
void* _this_func = __builtin_return_address(0);
// Save the real main function address
rocprofsys_set_main(_main);
// Find the real __libc_start_main()
start_main_t user_main = dlsym(RTLD_NEXT, "__libc_start_main");
// disable future LD_PRELOADs
setenv("ROCPROFSYS_PRELOAD", "0", 1);
if(user_main && user_main != _this_func)
{
if(_preload == 0)
{
// call original main
return user_main(_main, _argc, _argv, _init, _fini, _rtld_fini, _stack_end);
}
else
{
// call rocprof-sys main function wrapper
return user_main(rocprofsys_main, _argc, _argv, _init, _fini, _rtld_fini,
_stack_end);
}
}
else
{
fputs("Error! rocprof-sys could not find __libc_start_main!", stderr);
return -1;
}
}
int
__libc_start_main(int (*_main)(int, char**, char**), int _argc, char** _argv,
int (*_init)(int, char**, char**), void (*_fini)(void),
void (*_rtld_fini)(void), void* _stack_end)
{
return rocprofsys_libc_start_main(_main, _argc, _argv, _init, _fini, _rtld_fini,
_stack_end);
}