106 lines
2.6 KiB
C
106 lines
2.6 KiB
C
|
// SPDX-License-Identifier: GPL-2.0-only
|
||
|
#ifndef _GNU_SOURCE
|
||
|
#define _GNU_SOURCE
|
||
|
#endif
|
||
|
#include <link.h>
|
||
|
#include <stdio.h>
|
||
|
#include <stdlib.h>
|
||
|
#include <stdbool.h>
|
||
|
#include "../kselftest.h"
|
||
|
|
||
|
struct Statistics {
|
||
|
unsigned long long load_address;
|
||
|
unsigned long long alignment;
|
||
|
bool interp;
|
||
|
};
|
||
|
|
||
|
int ExtractStatistics(struct dl_phdr_info *info, size_t size, void *data)
|
||
|
{
|
||
|
struct Statistics *stats = (struct Statistics *) data;
|
||
|
int i;
|
||
|
|
||
|
if (info->dlpi_name != NULL && info->dlpi_name[0] != '\0') {
|
||
|
// Ignore headers from other than the executable.
|
||
|
return 2;
|
||
|
}
|
||
|
|
||
|
stats->load_address = (unsigned long long) info->dlpi_addr;
|
||
|
stats->alignment = 0;
|
||
|
|
||
|
for (i = 0; i < info->dlpi_phnum; i++) {
|
||
|
unsigned long long align;
|
||
|
|
||
|
if (info->dlpi_phdr[i].p_type == PT_INTERP) {
|
||
|
stats->interp = true;
|
||
|
continue;
|
||
|
}
|
||
|
|
||
|
if (info->dlpi_phdr[i].p_type != PT_LOAD)
|
||
|
continue;
|
||
|
|
||
|
align = info->dlpi_phdr[i].p_align;
|
||
|
|
||
|
if (align > stats->alignment)
|
||
|
stats->alignment = align;
|
||
|
}
|
||
|
|
||
|
return 1; // Terminate dl_iterate_phdr.
|
||
|
}
|
||
|
|
||
|
int main(int argc, char **argv)
|
||
|
{
|
||
|
struct Statistics extracted = { };
|
||
|
unsigned long long misalign, pow2;
|
||
|
bool interp_needed;
|
||
|
char buf[1024];
|
||
|
FILE *maps;
|
||
|
int ret;
|
||
|
|
||
|
ksft_print_header();
|
||
|
ksft_set_plan(4);
|
||
|
|
||
|
/* Dump maps file for debugging reference. */
|
||
|
maps = fopen("/proc/self/maps", "r");
|
||
|
if (!maps)
|
||
|
ksft_exit_fail_msg("FAILED: /proc/self/maps: %s\n", strerror(errno));
|
||
|
while (fgets(buf, sizeof(buf), maps)) {
|
||
|
ksft_print_msg("%s", buf);
|
||
|
}
|
||
|
fclose(maps);
|
||
|
|
||
|
/* Walk the program headers. */
|
||
|
ret = dl_iterate_phdr(ExtractStatistics, &extracted);
|
||
|
if (ret != 1)
|
||
|
ksft_exit_fail_msg("FAILED: dl_iterate_phdr\n");
|
||
|
|
||
|
/* Report our findings. */
|
||
|
ksft_print_msg("load_address=%#llx alignment=%#llx\n",
|
||
|
extracted.load_address, extracted.alignment);
|
||
|
|
||
|
/* If we're named with ".static." we expect no INTERP. */
|
||
|
interp_needed = strstr(argv[0], ".static.") == NULL;
|
||
|
|
||
|
/* Were we built as expected? */
|
||
|
ksft_test_result(interp_needed == extracted.interp,
|
||
|
"%s INTERP program header %s\n",
|
||
|
interp_needed ? "Wanted" : "Unwanted",
|
||
|
extracted.interp ? "seen" : "missing");
|
||
|
|
||
|
/* Did we find an alignment? */
|
||
|
ksft_test_result(extracted.alignment != 0,
|
||
|
"Alignment%s found\n", extracted.alignment ? "" : " NOT");
|
||
|
|
||
|
/* Is the alignment sane? */
|
||
|
pow2 = extracted.alignment & (extracted.alignment - 1);
|
||
|
ksft_test_result(pow2 == 0,
|
||
|
"Alignment is%s a power of 2: %#llx\n",
|
||
|
pow2 == 0 ? "" : " NOT", extracted.alignment);
|
||
|
|
||
|
/* Is the load address aligned? */
|
||
|
misalign = extracted.load_address & (extracted.alignment - 1);
|
||
|
ksft_test_result(misalign == 0, "Load Address is %saligned (%#llx)\n",
|
||
|
misalign ? "MIS" : "", misalign);
|
||
|
|
||
|
ksft_finished();
|
||
|
}
|