]> git.cworth.org Git - fips/blobdiff - metrics.c
Add explicit link to libpthread, to work around debugging issues
[fips] / metrics.c
index fdd794a726863bba4a4b756d81be9d95e82b10d1..9c2e080860d44ae75b1f19dd64367c586b984c7a 100644 (file)
--- a/metrics.c
+++ b/metrics.c
@@ -59,7 +59,7 @@ typedef struct monitor
 typedef struct op_metrics
 {
        /* This happens to also be the index into the
-        * ctx->op_metrics array currently
+        * metrics->op_metrics array currently
         */
        metrics_op_t op;
        double time_ns;
@@ -69,6 +69,11 @@ typedef struct op_metrics
 
 struct metrics
 {
+       /* Description of all available peformance counters, counter
+        * groups, their names and IDs, etc. */
+       metrics_info_t *info;
+
+       /* The current operation being measured. */
        metrics_op_t op;
 
        /* GL_TIME_ELAPSED query for which glEndQuery has not yet
@@ -95,6 +100,91 @@ struct metrics
        op_metrics_t *op_metrics;
 };
 
+metrics_t *
+metrics_create (metrics_info_t *info)
+{
+       metrics_t *metrics;
+
+       metrics = xmalloc (sizeof (metrics_t));
+
+       metrics->info = info;
+
+       metrics->op = 0;
+
+       metrics->timer_begun_id = 0;
+
+       metrics->timer_head = NULL;
+       metrics->timer_tail = NULL;
+
+       metrics->monitor_begun_id = 0;
+
+       metrics->monitor_head = NULL;
+       metrics->monitor_tail = NULL;
+
+       metrics->monitors_in_flight = 0;
+
+       metrics->num_op_metrics = 0;
+       metrics->op_metrics = NULL;
+
+       return metrics;
+}
+
+void
+metrics_fini (metrics_t *metrics)
+{
+       timer_query_t *timer, *timer_next;
+       monitor_t *monitor, *monitor_next;
+
+       /* Discard and cleanup any outstanding queries. */
+       if (metrics->timer_begun_id) {
+               glEndQuery (GL_TIME_ELAPSED);
+               glDeleteQueries (1, &metrics->timer_begun_id);
+               metrics->timer_begun_id = 0;
+       }
+
+       for (timer = metrics->timer_head;
+            timer;
+            timer = timer_next)
+       {
+               glDeleteQueries (1, &timer->id);
+               timer_next = timer->next;
+               free (timer);
+       }
+       metrics->timer_head = NULL;
+       metrics->timer_tail = NULL;
+
+       if (metrics->info->have_perfmon) {
+
+               if (metrics->monitor_begun_id) {
+                       glEndPerfMonitorAMD (metrics->monitor_begun_id);
+                       glDeletePerfMonitorsAMD (1, &metrics->monitor_begun_id);
+                       metrics->monitor_begun_id = 0;
+               }
+
+               for (monitor = metrics->monitor_head;
+                    monitor;
+                    monitor = monitor_next)
+               {
+                       glDeletePerfMonitorsAMD (1, &monitor->id);
+                       monitor_next = monitor->next;
+                       free (monitor);
+               }
+               metrics->monitor_head = NULL;
+               metrics->monitor_tail = NULL;
+
+       }
+
+       metrics->monitors_in_flight = 0;
+}
+
+void
+metrics_destroy (metrics_t *metrics)
+{
+       metrics_fini (metrics);
+
+       free (metrics);
+}
+
 static const char *
 metrics_op_string (metrics_op_t op)
 {
@@ -141,23 +231,30 @@ metrics_op_string (metrics_op_t op)
 }
 
 void
-metrics_counter_start (void)
+metrics_counter_start (metrics_t *metrics)
 {
-       context_t *ctx = context_get_current ();
-       metrics_t *metrics = ctx->metrics;
        unsigned i;
 
-       /* Initialize the timer_query and monitor objects */
+       /* Initialize the timer_query object. */
        glGenQueries (1, &metrics->timer_begun_id);
 
+       /* Most everything else in this function is
+        * performance-monitor related. If we don't have that
+        * extension, just start the timer query and be done. */
+       if (! metrics->info->have_perfmon) {
+               glBeginQuery (GL_TIME_ELAPSED, metrics->timer_begun_id);
+               return;
+       }
+
+       /* Initialize the performance-monitor object */
        glGenPerfMonitorsAMD (1, &metrics->monitor_begun_id);
 
-       for (i = 0; i < ctx->metrics_info.num_groups; i++)
+       for (i = 0; i < metrics->info->num_groups; i++)
        {
                metrics_group_info_t *group;
                int num_counters;
 
-               group = &ctx->metrics_info.groups[i];
+               group = &metrics->info->groups[i];
 
                num_counters = group->num_counters;
                if (group->max_active_counters < group->num_counters)
@@ -182,16 +279,16 @@ metrics_counter_start (void)
 }
 
 void
-metrics_counter_stop (void)
+metrics_counter_stop (metrics_t *metrics)
 {
-       context_t *ctx = context_get_current ();
-       metrics_t *metrics = ctx->metrics;
        timer_query_t *timer;
        monitor_t *monitor;
 
        /* Stop the current timer and monitor. */
        glEndQuery (GL_TIME_ELAPSED);
-       glEndPerfMonitorAMD (metrics->monitor_begun_id);
+
+       if (metrics->info->have_perfmon)
+               glEndPerfMonitorAMD (metrics->monitor_begun_id);
 
        /* Add these IDs to our lists of outstanding queries and
         * monitors so the results can be collected later. */
@@ -209,19 +306,21 @@ metrics_counter_stop (void)
                metrics->timer_head = timer;
        }
 
-       /* Create a new performance-monitor query */
-       monitor = xmalloc (sizeof (monitor_t));
+       if (metrics->info->have_perfmon) {
+               /* Create a new performance-monitor query */
+               monitor = xmalloc (sizeof (monitor_t));
 
-       monitor->op = metrics->op;
-       monitor->id = metrics->monitor_begun_id;
-       monitor->next = NULL;
+               monitor->op = metrics->op;
+               monitor->id = metrics->monitor_begun_id;
+               monitor->next = NULL;
 
-       if (metrics->monitor_tail) {
-               metrics->monitor_tail->next = monitor;
-               metrics->monitor_tail = monitor;
-       } else {
-               metrics->monitor_tail = monitor;
-               metrics->monitor_head = monitor;
+               if (metrics->monitor_tail) {
+                       metrics->monitor_tail->next = monitor;
+                       metrics->monitor_tail = monitor;
+               } else {
+                       metrics->monitor_tail = monitor;
+                       metrics->monitor_head = monitor;
+               }
        }
 
        metrics->monitors_in_flight++;
@@ -232,31 +331,24 @@ metrics_counter_stop (void)
         * available by now.)
         */
        if (metrics->monitors_in_flight > MAX_MONITORS_IN_FLIGHT)
-               metrics_collect_available ();
+               metrics_collect_available (metrics);
 }
 
 void
-metrics_set_current_op (metrics_op_t op)
+metrics_set_current_op (metrics_t *metrics, metrics_op_t op)
 {
-       context_t *ctx = context_get_current ();
-       metrics_t *metrics = ctx->metrics;
-
        metrics->op = op;
 }
 
 metrics_op_t
-metrics_get_current_op (void)
+metrics_get_current_op (metrics_t *metrics)
 {
-       context_t *ctx = context_get_current ();
-       metrics_t *metrics = ctx->metrics;
-
        return metrics->op;
 }
 
 static void
-op_metrics_init (context_t *ctx, op_metrics_t *metrics, metrics_op_t op)
+op_metrics_init (metrics_info_t *info, op_metrics_t *metrics, metrics_op_t op)
 {
-       metrics_info_t *info = &ctx->metrics_info;
        unsigned i, j;
 
        metrics->op = op;
@@ -273,9 +365,8 @@ op_metrics_init (context_t *ctx, op_metrics_t *metrics, metrics_op_t op)
 }
 
 static op_metrics_t *
-ctx_get_op_metrics (context_t *ctx, metrics_op_t op)
+_get_op_metrics (metrics_t *metrics, metrics_op_t op)
 {
-       metrics_t *metrics = ctx->metrics;
        unsigned i;
 
        if (op >= metrics->num_op_metrics)
@@ -283,7 +374,7 @@ ctx_get_op_metrics (context_t *ctx, metrics_op_t op)
                metrics->op_metrics = realloc (metrics->op_metrics,
                                               (op + 1) * sizeof (op_metrics_t));
                for (i = metrics->num_op_metrics; i < op + 1; i++)
-                       op_metrics_init (ctx, &metrics->op_metrics[i], i);
+                       op_metrics_init (metrics->info, &metrics->op_metrics[i], i);
 
                metrics->num_op_metrics = op + 1;
        }
@@ -292,7 +383,8 @@ ctx_get_op_metrics (context_t *ctx, metrics_op_t op)
 }
 
 static void
-accumulate_program_metrics (metrics_op_t op, GLuint *result, GLuint size)
+accumulate_program_metrics (metrics_t *metrics, metrics_op_t op,
+                           GLuint *result, GLuint size)
 {
 #define CONSUME(var)                                                   \
        if (p + sizeof(var) > ((unsigned char *) result) + size)        \
@@ -304,9 +396,8 @@ accumulate_program_metrics (metrics_op_t op, GLuint *result, GLuint size)
        (var) = *((typeof(var) *) p);                                   \
        p += sizeof(var);
 
-       context_t *ctx = context_get_current ();
-       metrics_info_t *info = &ctx->metrics_info;
-       op_metrics_t *metrics = ctx_get_op_metrics (ctx, op);
+       metrics_info_t *info = metrics->info;
+       op_metrics_t *op_metrics = _get_op_metrics (metrics, op);
        unsigned char *p = (unsigned char *) result;
 
        while (p < ((unsigned char *) result) + size)
@@ -314,7 +405,7 @@ accumulate_program_metrics (metrics_op_t op, GLuint *result, GLuint size)
                GLuint group_id, group_index;
                GLuint counter_id, counter_index;
                metrics_group_info_t *group;
-               double value;
+               double value = 0.0;
                unsigned i;
 
                CONSUME (group_id);
@@ -360,19 +451,18 @@ accumulate_program_metrics (metrics_op_t op, GLuint *result, GLuint size)
                        break;
                }
 
-               metrics->counters[group_index][counter_index] += value;
+               op_metrics->counters[group_index][counter_index] += value;
        }
 }
 
 static void
-accumulate_program_time (metrics_op_t op, unsigned time_ns)
+accumulate_program_time (metrics_t *metrics, metrics_op_t op, unsigned time_ns)
 {
-       context_t *ctx = context_get_current ();
-       op_metrics_t *metrics;
+       op_metrics_t *op_metrics;
 
-       metrics = ctx_get_op_metrics (ctx, op);
+       op_metrics = _get_op_metrics (metrics, op);
 
-       metrics->time_ns += time_ns;
+       op_metrics->time_ns += time_ns;
 }
 
 typedef struct per_stage_metrics
@@ -411,12 +501,12 @@ _is_shader_stage_counter (metrics_info_t *info,
 }
 
 static void
-print_per_stage_metrics (context_t *ctx,
+print_per_stage_metrics (metrics_t *metrics,
                         per_stage_metrics_t *per_stage,
                         double total)
 {
-       metrics_info_t *info = &ctx->metrics_info;
-       op_metrics_t *metric = per_stage->metrics;
+       metrics_info_t *info = metrics->info;
+       op_metrics_t *op_metrics = per_stage->metrics;
        metrics_group_info_t *group;
        const char *op_string;
        unsigned group_index, counter;
@@ -426,12 +516,12 @@ print_per_stage_metrics (context_t *ctx,
        if (per_stage->time_ns == 0.0)
                return;
 
-       op_string = metrics_op_string (metric->op);
+       op_string = metrics_op_string (op_metrics->op);
 
        printf ("%21s", op_string);
 
-       if (metric->op >= METRICS_OP_SHADER) {
-               printf (" %3d", metric->op - METRICS_OP_SHADER);
+       if (op_metrics->op >= METRICS_OP_SHADER) {
+               printf (" %3d", op_metrics->op - METRICS_OP_SHADER);
        } else {
                printf ("    ");
 
@@ -468,7 +558,7 @@ print_per_stage_metrics (context_t *ctx,
                        if (_is_shader_stage_counter (info, group_index, counter))
                                continue;
 
-                       value = metric->counters[group_index][counter];
+                       value = op_metrics->counters[group_index][counter];
                        if (value == 0.0)
                                continue;
                        printf ("%s: %.2f ", group->counter_names[counter],
@@ -493,11 +583,9 @@ time_compare(const void *in_a, const void *in_b, void *arg unused)
 }
 
 static void
-print_program_metrics (void)
+print_program_metrics (metrics_t *metrics)
 {
-       context_t *ctx = context_get_current ();
-       metrics_t *metrics = ctx->metrics;
-       metrics_info_t *info = &ctx->metrics_info;
+       metrics_info_t *info = metrics->info;
        unsigned num_shader_stages = info->num_shader_stages;
        per_stage_metrics_t *sorted, *per_stage;
        double total_time, op_cycles;
@@ -508,7 +596,10 @@ print_program_metrics (void)
        /* Make a sorted list of the per-stage operations by time
         * used, and figure out the total so we can print percentages.
         */
-       num_sorted = metrics->num_op_metrics * num_shader_stages;
+       if (num_shader_stages)
+               num_sorted = metrics->num_op_metrics * num_shader_stages;
+       else
+               num_sorted = metrics->num_op_metrics;
 
        sorted = xmalloc (sizeof (*sorted) * num_sorted);
 
@@ -524,6 +615,14 @@ print_program_metrics (void)
                /* Also, find total cycles in all stages of this op. */
                op_cycles = 0.0;
 
+               if (num_shader_stages == 0) {
+                       per_stage = &sorted[i];
+                       per_stage->metrics = op;
+                       per_stage->stage = NULL;
+                       per_stage->time_ns = op->time_ns;
+                       per_stage->active = 0.0;
+               }
+
                for (j = 0; j < num_shader_stages; j++) {
                        /* Active cycles */
                        group_index = info->stages[j].active_group_index;
@@ -584,76 +683,14 @@ print_program_metrics (void)
                 time_compare, metrics->op_metrics);
 
        for (i = 0; i < num_sorted; i++)
-               print_per_stage_metrics (ctx, &sorted[i], total_time);
+               print_per_stage_metrics (metrics, &sorted[i], total_time);
 
        free (sorted);
 }
 
-/* Called at program exit.
- *
- * This is similar to metrics_info_fini, but only frees any used
- * memory. Notably, it does not call any OpenGL functions, (since the
- * OpenGL context no longer exists at program exit).
- */
-static void
-metrics_exit (void)
-{
-       context_t *ctx = context_get_current ();
-       metrics_t *metrics = ctx->metrics;
-       metrics_info_t *info = &ctx->metrics_info;
-       unsigned i, j;
-       timer_query_t *timer, *timer_next;
-       monitor_t *monitor, *monitor_next;
-
-       if (verbose)
-               printf ("fips: terminating\n");
-
-       if (! info->initialized)
-               return;
-
-       for (timer = metrics->timer_head;
-            timer;
-            timer = timer_next)
-       {
-               timer_next = timer->next;
-               free (timer);
-       }
-
-       for (monitor = metrics->monitor_head;
-            monitor;
-            monitor = monitor_next)
-       {
-               monitor_next = monitor->next;
-               free (monitor);
-       }
-
-       for (i = 0; i < info->num_groups; i++) {
-               metrics_group_info_t *group = &info->groups[i];
-
-               for (j = 0; j < group->num_counters; i++)
-                       free (group->counter_names[j]);
-
-               free (group->counter_types);
-               free (group->counter_names);
-               free (group->counter_ids);
-
-               free (group->name);
-       }
-
-       free (info->groups);
-
-       for (i = 0; i < info->num_shader_stages; i++)
-               free (info->stages[i].name);
-
-       free (info->stages);
-}
-
 void
-metrics_collect_available (void)
+metrics_collect_available (metrics_t *metrics)
 {
-       context_t *ctx = context_get_current ();
-       metrics_t *metrics = ctx->metrics;
-
        /* Consume all timer queries that are ready. */
        timer_query_t *timer = metrics->timer_head;
 
@@ -668,7 +705,7 @@ metrics_collect_available (void)
                glGetQueryObjectuiv (timer->id,
                                     GL_QUERY_RESULT, &elapsed);
 
-               accumulate_program_time (timer->op, elapsed);
+               accumulate_program_time (metrics, timer->op, elapsed);
 
                metrics->timer_head = timer->next;
                if (metrics->timer_head == NULL)
@@ -680,6 +717,9 @@ metrics_collect_available (void)
                timer = metrics->timer_head;
        }
 
+       if (! metrics->info->have_perfmon)
+               return;
+
        /* And similarly for all performance monitors that are ready. */
        monitor_t *monitor = metrics->monitor_head;
 
@@ -706,7 +746,7 @@ metrics_collect_available (void)
                                                result_size, result,
                                                &bytes_written);
 
-               accumulate_program_metrics (monitor->op, result, result_size);
+               accumulate_program_metrics (metrics, monitor->op, result, result_size);
 
                free (result);
 
@@ -724,9 +764,15 @@ metrics_collect_available (void)
        }
 }
 
+static void
+metrics_exit (void)
+{
+       if (verbose)
+               printf ("fips: terminating\n");
+}
 
 void
-metrics_end_frame (void)
+metrics_end_frame (metrics_t *metrics)
 {
        static int initialized = 0;
        static struct timeval tv_start, tv_now;
@@ -741,7 +787,7 @@ metrics_end_frame (void)
 
        frames++;
 
-       metrics_collect_available ();
+       metrics_collect_available (metrics);
 
        if (frames % 15 == 0) {
                double fps;
@@ -753,85 +799,6 @@ metrics_end_frame (void)
 
                printf("FPS: %.3f\n", fps);
 
-               print_program_metrics ();
+               print_program_metrics (metrics);
        }
 }
-
-metrics_t *
-metrics_create (void)
-{
-       metrics_t *metrics;
-
-       metrics = xmalloc (sizeof (metrics_t));
-
-       metrics->op = 0;
-
-       metrics->timer_begun_id = 0;
-
-       metrics->timer_head = NULL;
-       metrics->timer_tail = NULL;
-
-       metrics->monitor_begun_id = 0;
-
-       metrics->monitor_head = NULL;
-       metrics->monitor_tail = NULL;
-
-       metrics->monitors_in_flight = 0;
-
-       metrics->num_op_metrics = 0;
-       metrics->op_metrics = NULL;
-
-       return metrics;
-}
-
-void
-metrics_fini (metrics_t *metrics)
-{
-       timer_query_t *timer, *timer_next;
-       monitor_t *monitor, *monitor_next;
-
-       /* Discard and cleanup any outstanding queries. */
-       if (metrics->timer_begun_id) {
-               glEndQuery (GL_TIME_ELAPSED);
-               glDeleteQueries (1, &metrics->timer_begun_id);
-               metrics->timer_begun_id = 0;
-       }
-
-       for (timer = metrics->timer_head;
-            timer;
-            timer = timer_next)
-       {
-               glDeleteQueries (1, &timer->id);
-               timer_next = timer->next;
-               free (timer);
-       }
-       metrics->timer_head = NULL;
-       metrics->timer_tail = NULL;
-
-       if (metrics->monitor_begun_id) {
-               glEndPerfMonitorAMD (metrics->monitor_begun_id);
-               glDeletePerfMonitorsAMD (1, &metrics->monitor_begun_id);
-               metrics->monitor_begun_id = 0;
-       }
-
-       for (monitor = metrics->monitor_head;
-            monitor;
-            monitor = monitor_next)
-       {
-               glDeletePerfMonitorsAMD (1, &monitor->id);
-               monitor_next = monitor->next;
-               free (monitor);
-       }
-       metrics->monitor_head = NULL;
-       metrics->monitor_tail = NULL;
-
-       metrics->monitors_in_flight = 0;
-}
-
-void
-metrics_destroy (metrics_t *metrics)
-{
-       metrics_fini (metrics);
-
-       free (metrics);
-}