summaryrefslogtreecommitdiff
path: root/tools/orc-bugreport.c
diff options
context:
space:
mode:
Diffstat (limited to 'tools/orc-bugreport.c')
-rw-r--r--tools/orc-bugreport.c233
1 files changed, 117 insertions, 116 deletions
diff --git a/tools/orc-bugreport.c b/tools/orc-bugreport.c
index 359b3d9..2f939b0 100644
--- a/tools/orc-bugreport.c
+++ b/tools/orc-bugreport.c
@@ -11,7 +11,7 @@
#include <stdlib.h>
#include <string.h>
-static char * read_file (const char *filename);
+static char *read_file (const char *filename);
void test_opcodes (void);
@@ -27,67 +27,68 @@ main (int argc, char *argv[])
orc_init ();
orc_test_init ();
- for(i=1;i<argc;i++){
- if (strcmp(argv[i], "--help") == 0) {
- printf("Usage:\n");
- printf(" orc-bugreport [file.orc]\n");
- printf("\n");
- printf("Options:\n");
- printf(" --help Show help options\n");
- printf(" --verbose Increase debugging messages\n");
- printf("\n");
- printf("Environment Variables:\n");
- printf(" ORC_DEBUG=<LEVEL> Set debugging level\n");
- printf(" ORC_CODE=[KEYWORDS,...] Modify code generation\n");
- printf(" General keywords:\n");
- printf(" backup Always use backup function\n");
- printf(" debug Generate debuggable code (useful for backtraces on i386)\n");
- printf(" SSE keywords:\n");
- printf(" -sse2 Disable SSE2\n");
- printf(" -sse3 Disable SSE3\n");
- printf(" -ssse3 Disable SSEE3\n");
- printf(" -sse41 Disable SSE4.1\n");
- printf(" -sse42 Disable SSE4.2\n");
- printf(" -sse4a Disable SSE4a\n");
- printf(" -sse5 Disable SSE5\n");
- printf("\n");
+ for (i = 1; i < argc; i++) {
+ if (strcmp (argv[i], "--help") == 0) {
+ printf ("Usage:\n");
+ printf (" orc-bugreport [file.orc]\n");
+ printf ("\n");
+ printf ("Options:\n");
+ printf (" --help Show help options\n");
+ printf (" --verbose Increase debugging messages\n");
+ printf ("\n");
+ printf ("Environment Variables:\n");
+ printf (" ORC_DEBUG=<LEVEL> Set debugging level\n");
+ printf (" ORC_CODE=[KEYWORDS,...] Modify code generation\n");
+ printf (" General keywords:\n");
+ printf (" backup Always use backup function\n");
+ printf
+ (" debug Generate debuggable code (useful for backtraces on i386)\n");
+ printf (" SSE keywords:\n");
+ printf (" -sse2 Disable SSE2\n");
+ printf (" -sse3 Disable SSE3\n");
+ printf (" -ssse3 Disable SSEE3\n");
+ printf (" -sse41 Disable SSE4.1\n");
+ printf (" -sse42 Disable SSE4.2\n");
+ printf (" -sse4a Disable SSE4a\n");
+ printf (" -sse5 Disable SSE5\n");
+ printf ("\n");
exit (0);
}
filename = argv[i];
}
- printf("Orc " VERSION " - integrated testing tool\n");
+ printf ("Orc " VERSION " - integrated testing tool\n");
- printf("Active backend: %s\n",
- orc_target_get_name(orc_target_get_default()));
+ printf ("Active backend: %s\n",
+ orc_target_get_name (orc_target_get_default ()));
{
int level1, level2, level3;
- orc_get_data_cache_sizes(&level1, &level2, &level3);
- printf("L1 cache: %d\n", level1);
- printf("L2 cache: %d\n", level2);
- printf("L3 cache: %d\n", level3);
+ orc_get_data_cache_sizes (&level1, &level2, &level3);
+ printf ("L1 cache: %d\n", level1);
+ printf ("L2 cache: %d\n", level2);
+ printf ("L3 cache: %d\n", level3);
}
{
int family, model, stepping;
orc_get_cpu_family_model_stepping (&family, &model, &stepping);
- printf("Family/Model/Stepping: %d/%d/%d\n", family, model, stepping);
- printf("CPU name: %s\n", orc_get_cpu_name ());
+ printf ("Family/Model/Stepping: %d/%d/%d\n", family, model, stepping);
+ printf ("CPU name: %s\n", orc_get_cpu_name ());
}
{
int i;
- int flags = orc_target_get_default_flags (orc_target_get_default());
+ int flags = orc_target_get_default_flags (orc_target_get_default ());
- printf("Compiler options: ");
- for(i=0;i<32;i++){
- if (flags & (1<<i)) {
- printf("%s ", orc_target_get_flag_name (orc_target_get_default(), i));
+ printf ("Compiler options: ");
+ for (i = 0; i < 32; i++) {
+ if (flags & (1 << i)) {
+ printf ("%s ", orc_target_get_flag_name (orc_target_get_default (), i));
}
}
- printf("\n");
+ printf ("\n");
}
if (filename) {
@@ -97,30 +98,30 @@ main (int argc, char *argv[])
code = read_file (filename);
if (!code) {
- printf("orc-bugreport: could not read file %s\n", filename);
- exit(1);
+ printf ("orc-bugreport: could not read file %s\n", filename);
+ exit (1);
}
- printf("Parsing %s\n", filename);
+ printf ("Parsing %s\n", filename);
n = orc_parse (code, &programs);
- for(i=0;i<n;i++){
+ for (i = 0; i < n; i++) {
ret = orc_test_compare_output_full (programs[i], 0);
if (!ret) {
- printf("FAIL: %s\n", programs[i]->name);
+ printf ("FAIL: %s\n", programs[i]->name);
error = TRUE;
}
}
} else {
- printf("Opcode test:\n");
- test_opcodes();
+ printf ("Opcode test:\n");
+ test_opcodes ();
}
if (error) {
- printf("Errors detected. Please send entire output to ds@schleef.org.\n");
+ printf ("Errors detected. Please send entire output to ds@schleef.org.\n");
return 1;
} else {
- printf("No errors detected.\n");
+ printf ("No errors detected.\n");
return 0;
}
}
@@ -135,42 +136,50 @@ read_file (const char *filename)
int ret;
file = fopen (filename, "r");
- if (file == NULL) return NULL;
+ if (file == NULL)
+ return NULL;
ret = fseek (file, 0, SEEK_END);
- if (ret < 0) goto bail;
+ if (ret < 0)
+ goto bail;
size = ftell (file);
- if (size < 0) goto bail;
+ if (size < 0)
+ goto bail;
ret = fseek (file, 0, SEEK_SET);
- if (ret < 0) goto bail;
+ if (ret < 0)
+ goto bail;
contents = malloc (size + 1);
- if (contents == NULL) goto bail;
+ if (contents == NULL)
+ goto bail;
ret = fread (contents, size, 1, file);
- if (ret < 0) goto bail;
+ if (ret < 0)
+ goto bail;
contents[size] = 0;
return contents;
bail:
/* something failed */
- if (file) fclose (file);
- if (contents) free (contents);
+ if (file)
+ fclose (file);
+ if (contents)
+ free (contents);
return NULL;
}
-void test_opcode_src (OrcStaticOpcode *opcode);
-void test_opcode_const (OrcStaticOpcode *opcode);
-void test_opcode_param (OrcStaticOpcode *opcode);
-void test_opcode_inplace (OrcStaticOpcode *opcode);
-void test_opcode_src_2d (OrcStaticOpcode *opcode);
-void test_opcode_src_const_n (OrcStaticOpcode *opcode);
-void test_opcode_src_const_n_2d (OrcStaticOpcode *opcode);
+void test_opcode_src (OrcStaticOpcode * opcode);
+void test_opcode_const (OrcStaticOpcode * opcode);
+void test_opcode_param (OrcStaticOpcode * opcode);
+void test_opcode_inplace (OrcStaticOpcode * opcode);
+void test_opcode_src_2d (OrcStaticOpcode * opcode);
+void test_opcode_src_const_n (OrcStaticOpcode * opcode);
+void test_opcode_src_const_n_2d (OrcStaticOpcode * opcode);
void
test_opcodes (void)
@@ -180,31 +189,31 @@ test_opcodes (void)
opcode_set = orc_opcode_set_get ("sys");
- for(i=0;i<opcode_set->n_opcodes;i++){
+ for (i = 0; i < opcode_set->n_opcodes; i++) {
test_opcode_src (opcode_set->opcodes + i);
}
- for(i=0;i<opcode_set->n_opcodes;i++){
+ for (i = 0; i < opcode_set->n_opcodes; i++) {
test_opcode_const (opcode_set->opcodes + i);
}
- for(i=0;i<opcode_set->n_opcodes;i++){
+ for (i = 0; i < opcode_set->n_opcodes; i++) {
test_opcode_param (opcode_set->opcodes + i);
}
- for(i=0;i<opcode_set->n_opcodes;i++){
+ for (i = 0; i < opcode_set->n_opcodes; i++) {
test_opcode_inplace (opcode_set->opcodes + i);
}
- for(i=0;i<opcode_set->n_opcodes;i++){
+ for (i = 0; i < opcode_set->n_opcodes; i++) {
test_opcode_src_2d (opcode_set->opcodes + i);
}
- for(i=0;i<opcode_set->n_opcodes;i++){
+ for (i = 0; i < opcode_set->n_opcodes; i++) {
test_opcode_src_const_n (opcode_set->opcodes + i);
}
- for(i=0;i<opcode_set->n_opcodes;i++){
+ for (i = 0; i < opcode_set->n_opcodes; i++) {
test_opcode_src_const_n_2d (opcode_set->opcodes + i);
}
}
void
-test_opcode_src (OrcStaticOpcode *opcode)
+test_opcode_src (OrcStaticOpcode * opcode)
{
OrcProgram *p;
char s[40];
@@ -234,7 +243,7 @@ test_opcode_src (OrcStaticOpcode *opcode)
flags = ORC_TEST_FLAGS_FLOAT;
}
- sprintf(s, "test_s_%s", opcode->name);
+ sprintf (s, "test_s_%s", opcode->name);
orc_program_set_name (p, s);
if (opcode->dest_size[1] != 0) {
@@ -245,7 +254,7 @@ test_opcode_src (OrcStaticOpcode *opcode)
ret = orc_test_compare_output_full (p, flags);
if (!ret) {
- printf("FAIL: %s src\n", opcode->name);
+ printf ("FAIL: %s src\n", opcode->name);
error = TRUE;
}
@@ -253,7 +262,7 @@ test_opcode_src (OrcStaticOpcode *opcode)
}
void
-test_opcode_const (OrcStaticOpcode *opcode)
+test_opcode_const (OrcStaticOpcode * opcode)
{
OrcProgram *p;
char s[40];
@@ -269,22 +278,19 @@ test_opcode_const (OrcStaticOpcode *opcode)
p = orc_program_new ();
if (opcode->flags & ORC_STATIC_OPCODE_ACCUMULATOR) {
args[n_args++] =
- orc_program_add_accumulator (p, opcode->dest_size[0], "d1");
+ orc_program_add_accumulator (p, opcode->dest_size[0], "d1");
} else {
args[n_args++] =
- orc_program_add_destination (p, opcode->dest_size[0], "d1");
+ orc_program_add_destination (p, opcode->dest_size[0], "d1");
}
if (opcode->dest_size[1] != 0) {
args[n_args++] =
- orc_program_add_destination (p, opcode->dest_size[1], "d2");
+ orc_program_add_destination (p, opcode->dest_size[1], "d2");
}
- args[n_args++] =
- orc_program_add_source (p, opcode->src_size[0], "s1");
- args[n_args++] =
- orc_program_add_constant (p, opcode->src_size[1], 1, "c1");
+ args[n_args++] = orc_program_add_source (p, opcode->src_size[0], "s1");
+ args[n_args++] = orc_program_add_constant (p, opcode->src_size[1], 1, "c1");
if (opcode->src_size[2]) {
- args[n_args++] =
- orc_program_add_constant (p, opcode->src_size[2], 1, "c2");
+ args[n_args++] = orc_program_add_constant (p, opcode->src_size[2], 1, "c2");
}
if ((opcode->flags & ORC_STATIC_OPCODE_FLOAT_SRC) ||
@@ -292,15 +298,14 @@ test_opcode_const (OrcStaticOpcode *opcode)
flags = ORC_TEST_FLAGS_FLOAT;
}
- sprintf(s, "test_const_%s", opcode->name);
+ sprintf (s, "test_const_%s", opcode->name);
orc_program_set_name (p, s);
- orc_program_append_2 (p, opcode->name, 0, args[0], args[1],
- args[2], args[3]);
+ orc_program_append_2 (p, opcode->name, 0, args[0], args[1], args[2], args[3]);
ret = orc_test_compare_output_full (p, flags);
if (!ret) {
- printf("FAIL: %s const\n", opcode->name);
+ printf ("FAIL: %s const\n", opcode->name);
error = TRUE;
}
@@ -308,7 +313,7 @@ test_opcode_const (OrcStaticOpcode *opcode)
}
void
-test_opcode_param (OrcStaticOpcode *opcode)
+test_opcode_param (OrcStaticOpcode * opcode)
{
OrcProgram *p;
char s[40];
@@ -323,22 +328,19 @@ test_opcode_param (OrcStaticOpcode *opcode)
p = orc_program_new ();
if (opcode->flags & ORC_STATIC_OPCODE_ACCUMULATOR) {
args[n_args++] =
- orc_program_add_accumulator (p, opcode->dest_size[0], "d1");
+ orc_program_add_accumulator (p, opcode->dest_size[0], "d1");
} else {
args[n_args++] =
- orc_program_add_destination (p, opcode->dest_size[0], "d1");
+ orc_program_add_destination (p, opcode->dest_size[0], "d1");
}
if (opcode->dest_size[1] != 0) {
args[n_args++] =
- orc_program_add_destination (p, opcode->dest_size[1], "d2");
+ orc_program_add_destination (p, opcode->dest_size[1], "d2");
}
- args[n_args++] =
- orc_program_add_source (p, opcode->src_size[0], "s1");
- args[n_args++] =
- orc_program_add_parameter (p, opcode->src_size[1], "p1");
+ args[n_args++] = orc_program_add_source (p, opcode->src_size[0], "s1");
+ args[n_args++] = orc_program_add_parameter (p, opcode->src_size[1], "p1");
if (opcode->src_size[2]) {
- args[n_args++] =
- orc_program_add_parameter (p, opcode->src_size[2], "p2");
+ args[n_args++] = orc_program_add_parameter (p, opcode->src_size[2], "p2");
}
if ((opcode->flags & ORC_STATIC_OPCODE_FLOAT_SRC) ||
@@ -346,15 +348,14 @@ test_opcode_param (OrcStaticOpcode *opcode)
flags = ORC_TEST_FLAGS_FLOAT;
}
- sprintf(s, "test_p_%s", opcode->name);
+ sprintf (s, "test_p_%s", opcode->name);
orc_program_set_name (p, s);
- orc_program_append_2 (p, opcode->name, 0, args[0], args[1],
- args[2], args[3]);
+ orc_program_append_2 (p, opcode->name, 0, args[0], args[1], args[2], args[3]);
ret = orc_test_compare_output_full (p, flags);
if (!ret) {
- printf("FAIL: %s param\n", opcode->name);
+ printf ("FAIL: %s param\n", opcode->name);
error = TRUE;
}
@@ -362,14 +363,15 @@ test_opcode_param (OrcStaticOpcode *opcode)
}
void
-test_opcode_inplace (OrcStaticOpcode *opcode)
+test_opcode_inplace (OrcStaticOpcode * opcode)
{
OrcProgram *p;
char s[40];
int ret;
int flags = 0;
- if (opcode->dest_size[0] != opcode->src_size[0]) return;
+ if (opcode->dest_size[0] != opcode->src_size[0])
+ return;
if (opcode->flags & ORC_STATIC_OPCODE_SCALAR ||
opcode->flags & ORC_STATIC_OPCODE_ACCUMULATOR) {
@@ -390,14 +392,14 @@ test_opcode_inplace (OrcStaticOpcode *opcode)
flags = ORC_TEST_FLAGS_FLOAT;
}
- sprintf(s, "test_inplace_%s", opcode->name);
+ sprintf (s, "test_inplace_%s", opcode->name);
orc_program_set_name (p, s);
orc_program_append_str (p, opcode->name, "d1", "d1", "s2");
ret = orc_test_compare_output_full (p, flags);
if (!ret) {
- printf("FAIL: %s inplace\n", opcode->name);
+ printf ("FAIL: %s inplace\n", opcode->name);
error = TRUE;
}
@@ -405,7 +407,7 @@ test_opcode_inplace (OrcStaticOpcode *opcode)
}
void
-test_opcode_src_2d (OrcStaticOpcode *opcode)
+test_opcode_src_2d (OrcStaticOpcode * opcode)
{
OrcProgram *p;
char s[40];
@@ -435,7 +437,7 @@ test_opcode_src_2d (OrcStaticOpcode *opcode)
flags = ORC_TEST_FLAGS_FLOAT;
}
- sprintf(s, "test_s_%s", opcode->name);
+ sprintf (s, "test_s_%s", opcode->name);
orc_program_set_name (p, s);
orc_program_set_2d (p);
@@ -447,7 +449,7 @@ test_opcode_src_2d (OrcStaticOpcode *opcode)
ret = orc_test_compare_output_full (p, flags);
if (!ret) {
- printf("FAIL: %s src_2d\n", opcode->name);
+ printf ("FAIL: %s src_2d\n", opcode->name);
error = TRUE;
}
@@ -455,7 +457,7 @@ test_opcode_src_2d (OrcStaticOpcode *opcode)
}
void
-test_opcode_src_const_n (OrcStaticOpcode *opcode)
+test_opcode_src_const_n (OrcStaticOpcode * opcode)
{
OrcProgram *p;
char s[40];
@@ -485,7 +487,7 @@ test_opcode_src_const_n (OrcStaticOpcode *opcode)
flags = ORC_TEST_FLAGS_FLOAT;
}
- sprintf(s, "test_s_%s", opcode->name);
+ sprintf (s, "test_s_%s", opcode->name);
orc_program_set_name (p, s);
orc_program_set_constant_n (p, 8);
@@ -497,7 +499,7 @@ test_opcode_src_const_n (OrcStaticOpcode *opcode)
ret = orc_test_compare_output_full (p, flags);
if (!ret) {
- printf("FAIL: %s src_const_n\n", opcode->name);
+ printf ("FAIL: %s src_const_n\n", opcode->name);
error = TRUE;
}
@@ -505,7 +507,7 @@ test_opcode_src_const_n (OrcStaticOpcode *opcode)
}
void
-test_opcode_src_const_n_2d (OrcStaticOpcode *opcode)
+test_opcode_src_const_n_2d (OrcStaticOpcode * opcode)
{
OrcProgram *p;
char s[40];
@@ -535,7 +537,7 @@ test_opcode_src_const_n_2d (OrcStaticOpcode *opcode)
flags = ORC_TEST_FLAGS_FLOAT;
}
- sprintf(s, "test_s_%s", opcode->name);
+ sprintf (s, "test_s_%s", opcode->name);
orc_program_set_name (p, s);
orc_program_set_2d (p);
orc_program_set_constant_n (p, 8);
@@ -548,10 +550,9 @@ test_opcode_src_const_n_2d (OrcStaticOpcode *opcode)
ret = orc_test_compare_output_full (p, flags);
if (!ret) {
- printf("FAIL: %s src_const_n_2d\n", opcode->name);
+ printf ("FAIL: %s src_const_n_2d\n", opcode->name);
error = TRUE;
}
orc_program_free (p);
}
-
View Lorry Controller Status