1 /**************************************************************************
3 * Copyright 2008 Tungsten Graphics, Inc., Cedar Park, Texas.
4 * Copyright (c) 2008 VMware, Inc.
7 * Permission is hereby granted, free of charge, to any person obtaining a
8 * copy of this software and associated documentation files (the
9 * "Software"), to deal in the Software without restriction, including
10 * without limitation the rights to use, copy, modify, merge, publish,
11 * distribute, sub license, and/or sell copies of the Software, and to
12 * permit persons to whom the Software is furnished to do so, subject to
13 * the following conditions:
15 * The above copyright notice and this permission notice (including the
16 * next paragraph) shall be included in all copies or substantial portions
19 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
20 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
21 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
22 * IN NO EVENT SHALL TUNGSTEN GRAPHICS AND/OR ITS SUPPLIERS BE LIABLE FOR
23 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
24 * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
25 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
27 **************************************************************************/
30 #include "pipe/p_config.h"
32 #include "pipe/p_compiler.h"
33 #include "util/u_debug.h"
34 #include "pipe/p_format.h"
35 #include "pipe/p_state.h"
36 #include "util/u_inlines.h"
37 #include "util/u_format.h"
38 #include "util/u_memory.h"
39 #include "util/u_string.h"
40 #include "util/u_math.h"
41 #include "util/u_tile.h"
42 #include "util/u_prim.h"
43 #include "util/u_surface.h"
46 #include <limits.h> /* CHAR_BIT */
47 #include <ctype.h> /* isalnum */
49 void _debug_vprintf(const char *format
, va_list ap
)
51 static char buf
[4096] = {'\0'};
52 #if defined(PIPE_OS_WINDOWS) || defined(PIPE_SUBSYSTEM_EMBEDDED)
53 /* We buffer until we find a newline. */
54 size_t len
= strlen(buf
);
55 int ret
= util_vsnprintf(buf
+ len
, sizeof(buf
) - len
, format
, ap
);
56 if(ret
> (int)(sizeof(buf
) - len
- 1) || util_strchr(buf
+ len
, '\n')) {
61 util_vsnprintf(buf
, sizeof(buf
), format
, ap
);
68 void debug_print_blob( const char *name
,
72 const unsigned *ublob
= (const unsigned *)blob
;
75 debug_printf("%s (%d dwords%s)\n", name
, size
/4,
76 size
%4 ? "... plus a few bytes" : "");
78 for (i
= 0; i
< size
/4; i
++) {
79 debug_printf("%d:\t%08x\n", i
, ublob
[i
]);
86 debug_get_option_should_print(void)
88 static boolean first
= TRUE
;
89 static boolean value
= FALSE
;
94 /* Oh hey this will call into this function,
95 * but its cool since we set first to false
98 value
= debug_get_bool_option("GALLIUM_PRINT_OPTIONS", FALSE
);
99 /* XXX should we print this option? Currently it wont */
104 debug_get_option(const char *name
, const char *dfault
)
108 result
= os_get_option(name
);
112 if (debug_get_option_should_print())
113 debug_printf("%s: %s = %s\n", __FUNCTION__
, name
, result
? result
: "(null)");
119 debug_get_bool_option(const char *name
, boolean dfault
)
121 const char *str
= os_get_option(name
);
126 else if(!util_strcmp(str
, "n"))
128 else if(!util_strcmp(str
, "no"))
130 else if(!util_strcmp(str
, "0"))
132 else if(!util_strcmp(str
, "f"))
134 else if(!util_strcmp(str
, "F"))
136 else if(!util_strcmp(str
, "false"))
138 else if(!util_strcmp(str
, "FALSE"))
143 if (debug_get_option_should_print())
144 debug_printf("%s: %s = %s\n", __FUNCTION__
, name
, result
? "TRUE" : "FALSE");
151 debug_get_num_option(const char *name
, long dfault
)
156 str
= os_get_option(name
);
171 while('0' <= c
&& c
<= '9') {
172 result
= result
*10 + (c
- '0');
178 if (debug_get_option_should_print())
179 debug_printf("%s: %s = %li\n", __FUNCTION__
, name
, result
);
184 static boolean
str_has_option(const char *str
, const char *name
)
192 if (!util_strcmp(str
, "all")) {
196 /* Find 'name' in 'str' surrounded by non-alphanumeric characters. */
198 const char *start
= str
;
199 unsigned name_len
= strlen(name
);
201 /* 'start' is the beginning of the currently-parsed word,
202 * we increment 'str' each iteration.
203 * if we find either the end of string or a non-alphanumeric character,
204 * we compare 'start' up to 'str-1' with 'name'. */
207 if (!*str
|| !(isalnum(*str
) || *str
== '_')) {
208 if (str
-start
== name_len
&&
209 !memcmp(start
, name
, name_len
)) {
228 debug_get_flags_option(const char *name
,
229 const struct debug_named_value
*flags
,
230 unsigned long dfault
)
232 unsigned long result
;
234 const struct debug_named_value
*orig
= flags
;
237 str
= os_get_option(name
);
240 else if (!util_strcmp(str
, "help")) {
242 _debug_printf("%s: help for %s:\n", __FUNCTION__
, name
);
243 for (; flags
->name
; ++flags
)
244 namealign
= MAX2(namealign
, strlen(flags
->name
));
245 for (flags
= orig
; flags
->name
; ++flags
)
246 _debug_printf("| %*s [0x%0*lx]%s%s\n", namealign
, flags
->name
,
247 (int)sizeof(unsigned long)*CHAR_BIT
/4, flags
->value
,
248 flags
->desc
? " " : "", flags
->desc
? flags
->desc
: "");
252 while( flags
->name
) {
253 if (str_has_option(str
, flags
->name
))
254 result
|= flags
->value
;
259 if (debug_get_option_should_print()) {
261 debug_printf("%s: %s = 0x%lx (%s)\n", __FUNCTION__
, name
, result
, str
);
263 debug_printf("%s: %s = 0x%lx\n", __FUNCTION__
, name
, result
);
271 void _debug_assert_fail(const char *expr
,
274 const char *function
)
276 _debug_printf("%s:%u:%s: Assertion `%s' failed.\n", file
, line
, function
, expr
);
277 if (debug_get_bool_option("GALLIUM_ABORT_ON_ASSERT", TRUE
))
280 _debug_printf("continuing...\n");
285 debug_dump_enum(const struct debug_named_value
*names
,
288 static char rest
[64];
291 if(names
->value
== value
)
296 util_snprintf(rest
, sizeof(rest
), "0x%08lx", value
);
302 debug_dump_enum_noprefix(const struct debug_named_value
*names
,
306 static char rest
[64];
309 if(names
->value
== value
) {
310 const char *name
= names
->name
;
311 while (*name
== *prefix
) {
322 util_snprintf(rest
, sizeof(rest
), "0x%08lx", value
);
328 debug_dump_flags(const struct debug_named_value
*names
,
331 static char output
[4096];
332 static char rest
[256];
338 if((names
->value
& value
) == names
->value
) {
340 util_strncat(output
, "|", sizeof(output
));
343 util_strncat(output
, names
->name
, sizeof(output
) - 1);
344 output
[sizeof(output
) - 1] = '\0';
345 value
&= ~names
->value
;
352 util_strncat(output
, "|", sizeof(output
));
356 util_snprintf(rest
, sizeof(rest
), "0x%08lx", value
);
357 util_strncat(output
, rest
, sizeof(output
) - 1);
358 output
[sizeof(output
) - 1] = '\0';
369 void debug_print_format(const char *msg
, unsigned fmt
)
371 debug_printf("%s: %s\n", msg
, util_format_name(fmt
));
377 static const struct debug_named_value pipe_prim_names
[] = {
379 DEBUG_NAMED_VALUE(PIPE_PRIM_POINTS
),
380 DEBUG_NAMED_VALUE(PIPE_PRIM_LINES
),
381 DEBUG_NAMED_VALUE(PIPE_PRIM_LINE_LOOP
),
382 DEBUG_NAMED_VALUE(PIPE_PRIM_LINE_STRIP
),
383 DEBUG_NAMED_VALUE(PIPE_PRIM_TRIANGLES
),
384 DEBUG_NAMED_VALUE(PIPE_PRIM_TRIANGLE_STRIP
),
385 DEBUG_NAMED_VALUE(PIPE_PRIM_TRIANGLE_FAN
),
386 DEBUG_NAMED_VALUE(PIPE_PRIM_QUADS
),
387 DEBUG_NAMED_VALUE(PIPE_PRIM_QUAD_STRIP
),
388 DEBUG_NAMED_VALUE(PIPE_PRIM_POLYGON
),
390 DEBUG_NAMED_VALUE_END
394 const char *u_prim_name( unsigned prim
)
396 return debug_dump_enum(pipe_prim_names
, prim
);
403 const char* fl_function
[1024];
405 int debug_funclog_enter(const char* f
, const int line
, const char* file
)
409 for (i
= 0; i
< fl_indent
; i
++)
411 debug_printf("%s\n", f
);
413 assert(fl_indent
< 1023);
414 fl_function
[fl_indent
++] = f
;
419 void debug_funclog_exit(const char* f
, const int line
, const char* file
)
422 assert(fl_indent
>= 0);
423 assert(fl_function
[fl_indent
] == f
);
426 void debug_funclog_enter_exit(const char* f
, const int line
, const char* file
)
429 for (i
= 0; i
< fl_indent
; i
++)
431 debug_printf("%s\n", f
);
439 * Dump an image to a .raw or .ppm file (depends on OS).
440 * \param format PIPE_FORMAT_x
441 * \param cpp bytes per pixel
442 * \param width width in pixels
443 * \param height height in pixels
444 * \param stride row stride in bytes
446 void debug_dump_image(const char *prefix
,
447 unsigned format
, unsigned cpp
,
448 unsigned width
, unsigned height
,
452 /* write a ppm file */
456 util_snprintf(filename
, sizeof(filename
), "%s.ppm", prefix
);
458 f
= fopen(filename
, "w");
462 const uint8_t *ptr
= (uint8_t *) data
;
464 /* XXX this is a hack */
466 case PIPE_FORMAT_B8G8R8A8_UNORM
:
478 fprintf(f
, "# ppm-file created by osdemo.c\n");
479 fprintf(f
, "%i %i\n", width
, height
);
483 f
= fopen(filename
, "ab"); /* reopen in binary append mode */
484 for (y
= 0; y
< height
; y
++) {
485 for (x
= 0; x
< width
; x
++) {
486 i
= y
* stride
+ x
* cpp
;
487 fputc(ptr
[i
+ r
], f
); /* write red */
488 fputc(ptr
[i
+ g
], f
); /* write green */
489 fputc(ptr
[i
+ b
], f
); /* write blue */
495 fprintf(stderr
, "Can't open %s for writing\n", filename
);
499 /* FIXME: dump resources, not surfaces... */
500 void debug_dump_surface(struct pipe_context
*pipe
,
502 struct pipe_surface
*surface
)
504 struct pipe_resource
*texture
;
505 struct pipe_transfer
*transfer
;
511 /* XXX: this doesn't necessarily work, as the driver may be using
512 * temporary storage for the surface which hasn't been propagated
513 * back into the texture. Need to nail down the semantics of views
514 * and transfers a bit better before we can say if extra work needs
517 texture
= surface
->texture
;
519 data
= pipe_transfer_map(pipe
, texture
, surface
->u
.tex
.level
,
520 surface
->u
.tex
.first_layer
,
522 0, 0, surface
->width
, surface
->height
, &transfer
);
526 debug_dump_image(prefix
,
528 util_format_get_blocksize(texture
->format
),
529 util_format_get_nblocksx(texture
->format
, surface
->width
),
530 util_format_get_nblocksy(texture
->format
, surface
->height
),
534 pipe
->transfer_unmap(pipe
, transfer
);
538 void debug_dump_texture(struct pipe_context
*pipe
,
540 struct pipe_resource
*texture
)
542 struct pipe_surface
*surface
, surf_tmpl
;
547 /* XXX for now, just dump image for layer=0, level=0 */
548 memset(&surf_tmpl
, 0, sizeof(surf_tmpl
));
549 u_surface_default_template(&surf_tmpl
, texture
, 0 /* no bind flag - not a surface */);
550 surface
= pipe
->create_surface(pipe
, texture
, &surf_tmpl
);
552 debug_dump_surface(pipe
, prefix
, surface
);
553 pipe
->surface_destroy(pipe
, surface
);
559 struct bmp_file_header
{
562 uint16_t bfReserved1
;
563 uint16_t bfReserved2
;
568 struct bmp_info_header
{
574 uint32_t biCompression
;
575 uint32_t biSizeImage
;
576 int32_t biXPelsPerMeter
;
577 int32_t biYPelsPerMeter
;
579 uint32_t biClrImportant
;
582 struct bmp_rgb_quad
{
590 debug_dump_surface_bmp(struct pipe_context
*pipe
,
591 const char *filename
,
592 struct pipe_surface
*surface
)
594 struct pipe_transfer
*transfer
;
595 struct pipe_resource
*texture
= surface
->texture
;
598 ptr
= pipe_transfer_map(pipe
, texture
, surface
->u
.tex
.level
,
599 surface
->u
.tex
.first_layer
, PIPE_TRANSFER_READ
,
600 0, 0, surface
->width
, surface
->height
, &transfer
);
602 debug_dump_transfer_bmp(pipe
, filename
, transfer
, ptr
);
604 pipe
->transfer_unmap(pipe
, transfer
);
608 debug_dump_transfer_bmp(struct pipe_context
*pipe
,
609 const char *filename
,
610 struct pipe_transfer
*transfer
, void *ptr
)
617 rgba
= MALLOC(transfer
->box
.width
*
618 transfer
->box
.height
*
619 transfer
->box
.depth
*
624 pipe_get_tile_rgba(transfer
, ptr
, 0, 0,
625 transfer
->box
.width
, transfer
->box
.height
,
628 debug_dump_float_rgba_bmp(filename
,
629 transfer
->box
.width
, transfer
->box
.height
,
630 rgba
, transfer
->box
.width
);
638 debug_dump_float_rgba_bmp(const char *filename
,
639 unsigned width
, unsigned height
,
640 float *rgba
, unsigned stride
)
643 struct bmp_file_header bmfh
;
644 struct bmp_info_header bmih
;
650 bmfh
.bfType
= 0x4d42;
651 bmfh
.bfSize
= 14 + 40 + height
*width
*4;
652 bmfh
.bfReserved1
= 0;
653 bmfh
.bfReserved2
= 0;
654 bmfh
.bfOffBits
= 14 + 40;
657 bmih
.biWidth
= width
;
658 bmih
.biHeight
= height
;
660 bmih
.biBitCount
= 32;
661 bmih
.biCompression
= 0;
662 bmih
.biSizeImage
= height
*width
*4;
663 bmih
.biXPelsPerMeter
= 0;
664 bmih
.biYPelsPerMeter
= 0;
666 bmih
.biClrImportant
= 0;
668 stream
= fopen(filename
, "wb");
672 fwrite(&bmfh
, 14, 1, stream
);
673 fwrite(&bmih
, 40, 1, stream
);
677 float *ptr
= rgba
+ (stride
* y
* 4);
678 for(x
= 0; x
< width
; ++x
)
680 struct bmp_rgb_quad pixel
;
681 pixel
.rgbRed
= float_to_ubyte(ptr
[x
*4 + 0]);
682 pixel
.rgbGreen
= float_to_ubyte(ptr
[x
*4 + 1]);
683 pixel
.rgbBlue
= float_to_ubyte(ptr
[x
*4 + 2]);
684 pixel
.rgbAlpha
= float_to_ubyte(ptr
[x
*4 + 3]);
685 fwrite(&pixel
, 1, 4, stream
);