Sprinter/mame
2
0
Fork 0
mirror of https://github.com/holub/mame synced 2025-05-18 11:39:29 +03:00
Code Issues Actions Packages Projects Releases Wiki Activity

Added some profiling code for discrete tasks

Browse Source
This commit is contained in:
Couriersud 2009-09-02 22:08:25 +00:00
parent b2edb79562
commit cbb4decb5d
2 changed files with 65 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

69
src/emu/sound/discrete.c
View File

@ -106,19 +106,31 @@ struct _task_info
INLINE void step_nodes_in_list(linked_list_entry **list)
{
linked_list_entry *entry;
for (entry = *list; entry != NULL; entry = entry->next)
if (DISCRETE_PROFILING)
{
node_description *node = (node_description *) entry->ptr;
osd_ticks_t last = osd_profiling_ticks();
/* Now step the node */
if (DISCRETE_PROFILING)
node->run_time -= osd_profiling_ticks();
for (entry = *list; entry != NULL; entry = entry->next)
{
node_description *node = (node_description *) entry->ptr;
(*node->module->step)(node);
//bigselect(info->device, node);
node->run_time -= last;
(*node->module->step)(node);
last = osd_profiling_ticks();
node->run_time += last;
}
}
else
{
for (entry = *list; entry != NULL; entry = entry->next)
{
node_description *node = (node_description *) entry->ptr;
if (DISCRETE_PROFILING)
node->run_time += osd_profiling_ticks();
/* Now step the node */
(*node->module->step)(node);
//bigselect(info->device, node);
}
}
}
@ -538,6 +550,20 @@ static DEVICE_START( discrete )
*
*************************************/
static osd_ticks_t task_run_time(linked_list_entry *list)
{
linked_list_entry *entry;
osd_ticks_t total = 0;
for (entry = list; entry != NULL; entry = entry->next)
{
node_description *node = (node_description *) entry->ptr;
total += node->run_time;
}
return total;
}
static DEVICE_STOP( discrete )
{
discrete_info *info = get_safe_token(device);
@ -551,9 +577,10 @@ static DEVICE_STOP( discrete )
linked_list_entry *entry;
osd_ticks_t total = 0;
osd_ticks_t tresh;
double tt;
/* calculate total time */
for (entry = info->step_list; entry != NULL; entry = entry->next)
for (entry = info->node_list; entry != NULL; entry = entry->next)
{
node_description *node = (node_description *) entry->ptr;
@ -564,13 +591,26 @@ static DEVICE_STOP( discrete )
/* print statistics */
printf("Total Samples: %d\n", info->total_samples);
tresh = total / count;
for (entry = info->step_list; entry != NULL; entry = entry->next)
for (entry = info->node_list; entry != NULL; entry = entry->next)
{
node_description *node = (node_description *) entry->ptr;
if (node->run_time > tresh)
printf("%3d: %20s %8.2f %10d\n", NODE_INDEX(node->node), node->module->name, (float) node->run_time / (float) total * 100.0, ((int) node->run_time) / info->total_samples);
printf("%3d: %20s %8.2f %10.2f\n", NODE_INDEX(node->node), node->module->name, (float) node->run_time / (float) total * 100.0, ((float) node->run_time) / (float) info->total_samples);
}
/* Task information */
for (entry = info->task_list; entry != 0; entry = entry->next)
{
discrete_task_context *task = (discrete_task_context *) entry->ptr;
tt = task_run_time(task->list);
printf("Task: %8.2f %15.2f\n", tt / (double) total * 100.0, tt / (double) info->total_samples);
}
tt = task_run_time(info->step_list);
printf("Main: %8.2f %15.2f\n", tt / (double) total * 100.0, tt / (double) info->total_samples);
}
/* close any csv files */
@ -767,7 +807,7 @@ INLINE void discrete_stream_update_nodes(discrete_info *info)
discrete_task_context *task = (discrete_task_context *) entry->ptr;
int i;
for (i = 0; i < task->numbuffered; i++)
for (i = task->numbuffered - 1; i >= 0 ; i--)
**task->dest[i] = *task->ptr[i]++;
}
@ -916,7 +956,10 @@ static void init_nodes(discrete_info *info, linked_list_entry *block_list, const
{
int i;
for (i = 0; i < task->numbuffered; i++)
{
task->node_buf[i] = auto_alloc_array(info->device->machine, double, 2048);
task->dest[i] = (double **) &node->input[i];
}
}
node->context = task;
task = NULL;

8
src/emu/sound/discrete.h
View File

@ -3380,6 +3380,7 @@
#define DISCRETE_MAX_WAVELOGS 10
#define DISCRETE_MAX_CSVLOGS 10
#define DISCRETE_MAX_OUTPUTS 8
#define DISCRETE_MAX_TASK_OUTPUTS 5
/*************************************
@ -3670,9 +3671,10 @@ struct _discrete_task_context
linked_list_entry *list;
int numbuffered;
double *ptr[5];
double node_buf[5][2048];
double **dest[5];
double *ptr[DISCRETE_MAX_TASK_OUTPUTS];
double *node_buf[DISCRETE_MAX_TASK_OUTPUTS];
double **dest[DISCRETE_MAX_TASK_OUTPUTS];
};
struct _discrete_info