sortix-mirror/libc/init/init.c

87 lines
2.5 KiB
C

/*******************************************************************************
Copyright(C) Jonas 'Sortie' Termansen 2011, 2012, 2013, 2014.
This file is part of the Sortix C Library.
The Sortix C Library is free software: you can redistribute it and/or modify
it under the terms of the GNU Lesser General Public License as published by
the Free Software Foundation, either version 3 of the License, or (at your
option) any later version.
The Sortix C Library is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public
License for more details.
You should have received a copy of the GNU Lesser General Public License
along with the Sortix C Library. If not, see <http://www.gnu.org/licenses/>.
init/init.c
Initializes the standard library.
*******************************************************************************/
#include <elf.h>
#include <malloc.h>
#include <pthread.h>
#include <string.h>
char* program_invocation_name;
char* program_invocation_short_name;
static char* find_last_elem(char* str)
{
size_t len = strlen(str);
for ( size_t i = len; i; i-- )
if ( str[i-1] == '/' )
return str + i;
return str;
}
// Emit an ELF note containing the size and alignment of struct pthread.
__attribute__((used))
static void elf_note_sortix_pthread_size(void)
{
asm volatile (
".pushsection .note.sortix,\"a\",@note\n\t"
".align 4\n\t"
".long 2f-1f\n\t" // namesz
".long 4f-3f\n\t" // descsz
".long %c0\n" // type
"1:\n\t"
".string \"Sortix\"\n" // name
"2:\n\t"
".align 4\n"
"3:\n\t"
#if defined(__x86_64__)
".quad %c1\n"
".quad %c2\n"
#elif defined(__i386__)
".long %c1\n"
".long %c2\n"
#endif
"4:\n\t"
".align 4\n\t"
".popsection\n\t"
:: "n"(ELF_NOTE_SORTIX_UTHREAD_SIZE),
"n"(sizeof(struct pthread)),
"n"(alignof(struct pthread))
);
}
void initialize_standard_library(int argc, char* argv[])
{
const char* argv0 = argc ? argv[0] : "";
program_invocation_name = (char*) argv0;
program_invocation_short_name = find_last_elem((char*) argv0);
struct pthread* self = pthread_self();
self->join_lock = (pthread_mutex_t) PTHREAD_NORMAL_MUTEX_INITIALIZER_NP;
self->join_lock.lock = 1 /* LOCKED_VALUE */;
self->join_lock.type = PTHREAD_MUTEX_NORMAL;
self->join_lock.owner = (unsigned long) self;
self->detach_lock = (pthread_mutex_t) PTHREAD_NORMAL_MUTEX_INITIALIZER_NP;
self->detach_state = PTHREAD_CREATE_JOINABLE;
}