ORCA-C/Tests/Spec.Conform/SPC17.16.0.1.CC
Stephen Heumann 91d33b586d Fix various C99+ conformance issues and bugs in test cases.
The main changes made to most tests are:

*Declarations always include explicit types, not relying on implicit int. The declaration of main in most test programs is changed to be "int main (void) {...}", adding an explicit return type and a prototype. (There are still some non-prototyped functions, though.)

*Functions are always declared before use, either by including a header or by providing a declaration for the specific function. The latter approach is usually used for printf, to avoid requiring ORCA/C to process stdio.h when compiling every test case (which might make test runs noticeably slower).

*Make all return statements in non-void functions (e.g. main) return a value.

*Avoid some instances of undefined behavior and type errors in printf and scanf calls.

Several miscellaneous bugs are also fixed.

There are still a couple test cases that intentionally rely on the C89 behavior, to ensure it still works.
2022-10-17 20:17:24 -05:00

138 lines
3.6 KiB
C++

/* Special Conformance Test 17.16.0.1: Verification of tmpnam function */
/* */
/* The temporary filenames that the system generates will be displayed. */
/* The tester needs to verify that these files are created after the */
/* the test is complete. */
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
struct S { int i;
float f;
char c; };
int main (void)
{
struct S s [3] = { 1, 1.0, 'a', 2, 2.0, 'b', 3, 3.0, 'c' };
struct S buff [3];
FILE *f1, *f2, *f3;
int i;
char filename [3] [L_tmpnam]; /* filename buffers */
char *namePtr;
/* Call tmpnam to obtain 3 filenames and display the names to the tester. */
namePtr = tmpnam (filename [0]);
if (namePtr == NULL)
goto Fail;
if (strcmp (namePtr,filename [0]))
goto Fail;
printf ("The first filename is: %s\n", filename [0]);
namePtr = tmpnam (filename [1]);
if (namePtr == NULL)
goto Fail;
if (strcmp (namePtr, filename [1]))
goto Fail;
printf ("The second filename is: %s\n", filename [1]);
namePtr = tmpnam (NULL); /* test sending NULL pointer */
if (namePtr == NULL)
goto Fail;
printf ("The third filename is: %s\n", namePtr);
namePtr = strcpy (filename [2], namePtr);
if (strcmp (namePtr, filename [2]))
goto Fail;
/* Create 3 temp files and write the elements to the files. */
f1 = fopen (filename [0], "w+b");
if (f1 == NULL)
goto Fail1;
i = fwrite ((void *) s, sizeof (struct S), 3, f1);
if (i != 3)
goto Fail;
f2 = fopen (filename [1], "w+b");
if (f2 == NULL)
goto Fail1;
i = fwrite ((void *) s, sizeof (struct S), 3, f2);
if (i != 3)
goto Fail;
f3 = fopen (filename [2], "w+b");
if (f3 == NULL)
goto Fail1;
i = fwrite ((void *) s, sizeof (struct S), 3, f3);
if (i != 3)
goto Fail;
/* Read the elements from the files. */
rewind (f1);
i = fread ((void *) buff, sizeof (struct S), 3, f1);
if (i != 3)
goto Fail;
if ((s [0].i != 1) || (s [1].i != 2) || (s [2].i != 3))
goto Fail;
if ((s [0].f != 1.0) || (s [1].f != 2.0) || (s [2].f != 3.0))
goto Fail;
if ((s [0].c != 'a') || (s [1].c != 'b') || (s [2].c != 'c'))
goto Fail;
rewind (f2);
i = fread ((void *) buff, sizeof (struct S), 3, f2);
if (i != 3)
goto Fail;
if ((s [0].i != 1) || (s [1].i != 2) || (s [2].i != 3))
goto Fail;
if ((s [0].f != 1.0) || (s [1].f != 2.0) || (s [2].f != 3.0))
goto Fail;
if ((s [0].c != 'a') || (s [1].c != 'b') || (s [2].c != 'c'))
goto Fail;
rewind (f2);
i = fread ((void *) buff, sizeof (struct S), 3, f2);
if (i != 3)
goto Fail;
if ((s [0].i != 1) || (s [1].i != 2) || (s [2].i != 3))
goto Fail;
if ((s [0].f != 1.0) || (s [1].f != 2.0) || (s [2].f != 3.0))
goto Fail;
if ((s [0].c != 'a') || (s [1].c != 'b') || (s [2].c != 'c'))
goto Fail;
i = fclose (f1); /* close the files and quit */
if (i == EOF)
goto Fail2;
i = fclose (f2);
if (i == EOF)
goto Fail2;
i = fclose (f3);
if (i == EOF)
goto Fail2;
printf ("Passed Special Conformance Test 17.16.0.1\n");
return 0;
Fail:
printf ("Failed Special Conformance Test 17.16.0.1\n");
exit (0);
Fail1:
printf ("Unable to open temp file for Special Conformance Test 17.16.0.1\n");
exit (0);
Fail2:
printf ("Unable to close output file for Special Conformance Test 17.16.0.1\n");
exit (0);
}