ORCA-C/Tests/Conformance/C17.11.0.11.CC

1 line
2.7 KiB
Plaintext
Raw Normal View History

/* Conformance Test 17.11.0.11: Verification of fprintf, printf, sprintf: */ /* n and % format codes */ #include <stdio.h> main () { FILE *f1; int i, i1, i2; short sh; long l1; extended e1; char string [80], sstring [80]; f1 = fopen ("3/tmp", "w+"); /* open output file for test */ if (f1 == NULL) goto Fail1; stdout = freopen ("3/tmp2", "w+", stdout); /* redirect stdout to file */ if (stdout == NULL) goto Fail4; e1 = 123.456e-205; i1 = 6; i2 = 16; /* Write formatted output as string to the output files and sstring. */ i = fprintf (f1, "%% %hn %0+*.*le %s %% %ln N\n", &sh, i1, i2, e1, "a string", &l1); if (i != 48) goto Fail; if ((sh != 3) || (l1 != 44)) /* check return values for n format */ goto Fail; i = printf ("%% %hn %0+*.*le %s %% %ln N\n", &sh, i1, i2, e1, "a string", &l1); if (i != 48) goto Fail; if ((sh != 3) || (l1 != 44)) /* check return values for n format */ goto Fail; i = sprintf (sstring, "%% %hn %0+*.*le %s %% %ln N\n", &sh, i1, i2, e1, "a string", &l1); if (i != 48) goto Fail; if ((sh != 3) || (l1 != 44)) /* check return values for n format */ goto Fail; /* Check the string written. */ rewind (f1); i = fscanf (f1, "%47c", string); if (i != 1) goto Fail3; string [47] = '\0'; if (strcmp (string, "% +1.2345599999999999e-203 a string % N")) goto Fail; rewind (stdout); i = fscanf (stdout, "%47c", string); if (i != 1) goto Fail3; string [47] = '\0'; if (strcmp (string, "% +1.2345599999999999e-203 a string % N")) goto Fail; if (strcmp (sstring, "% +1.2345599999999999e-203 a string % N\n")) goto Fail; fclose(stdout); /* redirect stdout to screen */ i = fclose (f1); /* close the file and quit */ if (i == EOF) goto Fail2; printf ("Passed Conformance Test 17.11.0.11\n"); return; Fail: fprintf (stderr, "Failed Conformance Test 17.11.0.11\n"); return; Fail1: fprintf (stderr, "Unable to open output file for Conformance Test 17.11.0.11\n"); return; Fail2: fprintf (stderr, "Unable to close output file for Conformance Test 17.11.0.11\n"); return; Fail3: fprintf (stderr, "Unable to read output file for Conformance Test 17.11.0.11\n"); return; Fail4: fprintf (stderr, "Unable to redirect stdout for Conformance Test 17.11.0.11\n"); return; }