static void*
_profile_stream_thread(void* arg) {
FOUNDATION_UNUSED(arg);
thread_yield();
while (!thread_try_wait(4)) {
profile_log(STRING_CONST("Thread message"));
profile_begin_block(STRING_CONST("Thread block"));
{
profile_update_block();
profile_begin_block(STRING_CONST("Thread subblock"));
{
profile_log(STRING_CONST("Sub message"));
profile_trylock(STRING_CONST("Trylock"));
profile_lock(STRING_CONST("Trylock"));
profile_wait(STRING_CONST("Wait"));
profile_signal(STRING_CONST("Signal"));
thread_sleep(2);
profile_unlock(STRING_CONST("Trylock"));
profile_log(STRING_CONST("End sub"));
}
profile_end_block();
profile_begin_block(STRING_CONST("Thread second subblock"));
{
profile_update_block();
profile_begin_block(STRING_CONST("Thread subblock"));
{
}
profile_end_block();
}
profile_end_block();
profile_trylock(STRING_CONST("Trylock"));
thread_sleep(1);
profile_lock(STRING_CONST("Trylock"));
thread_sleep(4);
profile_unlock(STRING_CONST("Trylock"));
}
profile_end_block();
atomic_add64(&_profile_generated_blocks, 14);
}
return 0;
}
static void* _profile_stream_thread( object_t thread, void* arg )
{
FOUNDATION_UNUSED( arg );
thread_yield();
while( !thread_should_terminate( thread ) )
{
profile_log( "Thread message" );
profile_begin_block( "Thread block" );
{
profile_update_block();
profile_begin_block( "Thread subblock" );
{
profile_log( "Sub message" );
profile_trylock( "Trylock" );
profile_lock( "Trylock" );
profile_wait( "Wait" );
profile_signal( "Signal" );
thread_sleep( 2 );
profile_unlock( "Trylock" );
profile_log( "End sub" );
}
profile_end_block();
profile_trylock( "Trylock" );
thread_sleep( 1 );
profile_lock( "Trylock" );
thread_sleep( 4 );
profile_unlock( "Trylock" );
}
profile_end_block();
thread_sleep( 4 );
atomic_add64( &_profile_generated_blocks, 12 );
}
return 0;
}
/* Reads any pending input and adds events to the event queue.
*
* This should be called frequently during event processing so that the host
* process does not block.
*/
static void read_input(void) {
char filename[CHISTKA_MAX_FILENAME_LEN+2]; /* +2 for LF and NUL */
while (fgets(filename, sizeof(filename), stdin)) {
if (!filename[0]) continue;
/* Remove the trailing newline */
filename[strlen(filename)-1] = 0;
/* Don't even bother with /proc/, /sys/, or /dev/ ! */
if (filename == strstr(filename, "/proc/") ||
filename == strstr(filename, "/sys/") ||
filename == strstr(filename, "/dev/"))
continue;
/* Log if appropriate */
profile_log(filename);
/* Schedule any events applying to this file. */
add_events(filename);
}
/* Any error terminates reading, except for indications that there is
* /currently/ no input, which we simply ignore.
*
* If nothing remains to read, just terminate the program because its
* usefullness has ceased.
*/
if (errno != EAGAIN && errno != EWOULDBLOCK && errno != EINTR)
exit(0);
else
clearerr(stdin);
}
DECLARE_TEST( profile, initialize )
{
error_t err = error();
_test_profile_offset = 0;
atomic_store32( &_test_profile_output_counter, 0 );
profile_initialize( "test_profile", _test_profile_buffer, _test_profile_buffer_size );
profile_enable( true );
profile_log( "testing" );
thread_sleep( 1000 );
profile_enable( false );
profile_shutdown();
#if BUILD_ENABLE_PROFILE
EXPECT_GT( atomic_load32( &_test_profile_output_counter ), 0 );
#else
EXPECT_EQ( atomic_load32( &_test_profile_output_counter ), 0 );
#endif
err = error();
EXPECT_EQ( err, ERROR_NONE );
return 0;
}
DECLARE_TEST(profile, initialize) {
error_t err = error();
_test_profile_offset = 0;
atomic_store32(&_test_profile_output_counter, 0);
profile_initialize(STRING_CONST("test_profile"), _test_profile_buffer, TEST_PROFILE_BUFFER_SIZE);
profile_enable(true);
profile_log(STRING_CONST("testing"));
thread_sleep(1000);
profile_enable(false);
profile_finalize();
#if BUILD_ENABLE_PROFILE
EXPECT_GT(atomic_load32(&_test_profile_output_counter), 0);
#else
EXPECT_EQ(atomic_load32(&_test_profile_output_counter), 0);
#endif
err = error();
EXPECT_EQ(err, ERROR_NONE);
return 0;
}
static void*
_profile_fail_thread(void* arg) {
FOUNDATION_UNUSED(arg);
thread_sleep(10);
while (!thread_try_wait(1)) {
profile_log(STRING_CONST("Thread message"));
profile_begin_block(STRING_CONST("Thread block"));
{
profile_update_block();
profile_begin_block(STRING_CONST("Thread subblock"));
{
profile_log(STRING_CONST("Sub message"));
profile_trylock(STRING_CONST("Trylock"));
profile_lock(STRING_CONST("Trylock"));
profile_wait(STRING_CONST("Wait"));
profile_signal(STRING_CONST("Signal"));
profile_unlock(STRING_CONST("Trylock"));
profile_log(STRING_CONST("End sub"));
thread_yield();
}
profile_end_block();
}
profile_end_block();
}
return 0;
}
DECLARE_TEST( profile, stream )
{
object_t thread[32];
int ith;
int frame;
char* filename;
error();
filename = path_merge( environment_temporary_directory(), "test.profile" );
log_infof( HASH_TEST, "Output to profile file: %s", filename );
fs_make_directory( environment_temporary_directory() );
_profile_stream = fs_open_file( filename, STREAM_OUT | STREAM_BINARY );
string_deallocate( filename );
profile_initialize( "test_profile", _test_profile_buffer, _test_profile_buffer_size );
profile_set_output( _profile_file_writer );
profile_set_output_wait( 10 );
profile_enable( true );
for( ith = 0; ith < 32; ++ith )
{
thread[ith] = thread_create( _profile_stream_thread, "profile_thread", THREAD_PRIORITY_NORMAL, 0 );
thread_start( thread[ith], 0 );
}
test_wait_for_threads_startup( thread, 32 );
for( frame = 0; frame < 1000; ++frame )
{
thread_sleep( 16 );
profile_log( "This is a really long profile log line that should break into multiple profile blocks automatically without causing any issues whatsoever if everything works as expected which it should or the code needs to be fixed" );
profile_end_frame( frame++ );
if( ( frame % 30 ) == 0 )
{
profile_enable( false );
thread_sleep( 10 );
profile_enable( true );
}
}
for( ith = 0; ith < 32; ++ith )
{
thread_terminate( thread[ith] );
thread_destroy( thread[ith] );
thread_yield();
}
test_wait_for_threads_exit( thread, 32 );
profile_end_frame( frame++ );
profile_set_output_wait( 100 );
thread_sleep( 1000 );
profile_enable( false );
profile_shutdown();
error();
stream_deallocate( _profile_stream );
//TODO: Validate that output is sane
log_debugf( HASH_TEST, "Generated %lld blocks", atomic_load64( &_profile_generated_blocks ) );
return 0;
}
DECLARE_TEST(profile, stream) {
thread_t thread[32];
int ith;
uint64_t frame;
string_t filename;
error(); //Clear error
filename = path_allocate_concat(STRING_ARGS(environment_temporary_directory()),
STRING_CONST("test.profile"));
//log_infof(HASH_TEST, STRING_CONST("Output to profile file: %.*s"), STRING_FORMAT(filename));
fs_make_directory(STRING_ARGS(environment_temporary_directory()));
_profile_stream = fs_open_file(STRING_ARGS(filename), STREAM_OUT | STREAM_BINARY);
string_deallocate(filename.str);
profile_initialize(STRING_CONST("test_profile"), _test_profile_buffer, TEST_PROFILE_BUFFER_SIZE);
profile_set_output(_profile_file_writer);
profile_set_output_wait(10);
profile_enable(true);
for (ith = 0; ith < 32; ++ith)
thread_initialize(&thread[ith], _profile_stream_thread, 0, STRING_CONST("profile_thread"),
THREAD_PRIORITY_NORMAL, 0);
for (ith = 0; ith < 32; ++ith)
thread_start(&thread[ith]);
test_wait_for_threads_startup(thread, 32);
for (frame = 0; frame < 1000; ++frame) {
thread_sleep(16);
profile_log(
STRING_CONST("This is a really long profile log line that should break into multiple profile blocks automatically without causing any issues whatsoever if everything works as expected which it should or the code needs to be fixed"));
profile_end_frame(frame++);
if ((frame % 30) == 0) {
profile_enable(false);
thread_sleep(10);
profile_enable(true);
}
}
for (ith = 0; ith < 32; ++ith)
thread_signal(&thread[ith]);
test_wait_for_threads_finish(thread, 32);
for (ith = 0; ith < 32; ++ith)
thread_finalize(&thread[ith]);
profile_end_frame(frame++);
profile_set_output_wait(10000);
thread_sleep(1000);
profile_begin_block(STRING_CONST("Should be cleaned up"));
profile_end_block();
profile_enable(false);
profile_finalize();
error();
stream_deallocate(_profile_stream);
//TODO: Validate that output is sane
log_debugf(HASH_TEST, STRING_CONST("Generated %" PRId64 " blocks"),
atomic_load64(&_profile_generated_blocks));
return 0;
}
