| |
| |
| |
| |
| |
| |
| |
| |
| |
| errno=0, ((r) = (f)) == (x) || \ |
| (t_error("%s failed (" m ")\n", |
| |
| |
| !strcmp((s),(x)) || \ |
| (t_error("[%s] != [%s] (%s)\n", s, x, m), 0) ) |
| |
| static FILE *writetemp(const char *data) |
| { |
| FILE *f = tmpfile(); |
| size_t n = strlen(data); |
| if (!f) return 0; |
| if (write(fileno(f), data, n) != n) { |
| t_error("write: %s\n", strerror(errno)); |
| fclose(f); |
| return 0; |
| } |
| if (lseek(fileno(f), 0, SEEK_SET) != 0) { |
| t_error("lseek: %s\n", strerror(errno)); |
| fclose(f); |
| return 0; |
| } |
| return f; |
| } |
| |
| int main(void) |
| { |
| int i, x, y; |
| double u; |
| char a[100], b[100]; |
| FILE *f; |
| |
| TEST(i, !!(f=writetemp(" 42")), 1, "failed to make temp file"); |
| if (f) { |
| x=y=-1; |
| TEST(i, fwscanf(f, L" %n%*d%n", &x, &y), 0, "%d != %d"); |
| TEST(i, x, 6, "%d != %d"); |
| TEST(i, y, 8, "%d != %d"); |
| TEST(i, ftell(f), 8, "%d != %d"); |
| TEST(i, !!feof(f), 1, "%d != %d"); |
| fclose(f); |
| } |
| |
| TEST(i, !!(f=writetemp("[abc123]....x")), 1, "failed to make temp file"); |
| if (f) { |
| x=y=-1; |
| TEST(i, fwscanf(f, L"%10[^]]%n%10[].]%n", a, &x, b, &y), 2, "%d != %d"); |
| TEST_S(a, "[abc123", "wrong result for %[^]]"); |
| TEST_S(b, "]....", "wrong result for %[].]"); |
| TEST(i, x, 7, "%d != %d"); |
| TEST(i, y, 12, "%d != %d"); |
| TEST(i, ftell(f), 12, "%d != %d"); |
| TEST(i, feof(f), 0, "%d != %d"); |
| TEST(i, fgetc(f), 'x', "%d != %d"); |
| fclose(f); |
| } |
| |
| TEST(i, !!(f=writetemp("0x1p 12")), 1, "failed to make temp file"); |
| if (f) { |
| x=y=-1; |
| u=-1; |
| TEST(i, fwscanf(f, L"%lf%n %d", &u, &x, &y), 0, "%d != %d"); |
| TEST(u, u, -1.0, "%g != %g"); |
| TEST(i, x, -1, "%d != %d"); |
| TEST(i, y, -1, "%d != %d"); |
| TEST(i, ftell(f), 4, "%d != %d"); |
| TEST(i, feof(f), 0, "%d != %d"); |
| TEST(i, fgetc(f), ' ', "%d != %d"); |
| rewind(f); |
| TEST(i, fgetc(f), '0', "%d != %d"); |
| TEST(i, fgetc(f), 'x', "%d != %d"); |
| TEST(i, fwscanf(f, L"%lf%n%c %d", &u, &x, a, &y), 3, "%d != %d"); |
| TEST(u, u, 1.0, "%g != %g"); |
| TEST(i, x, 1, "%d != %d"); |
| TEST(i, a[0], 'p', "%d != %d"); |
| TEST(i, y, 12, "%d != %d"); |
| TEST(i, ftell(f), 7, "%d != %d"); |
| TEST(i, !!feof(f), 1, "%d != %d"); |
| fclose(f); |
| } |
| |
| TEST(i, !!(f=writetemp("0x.1p4 012")), 1, "failed to make temp file"); |
| if (f) { |
| x=y=-1; |
| u=-1; |
| TEST(i, fwscanf(f, L"%lf%n %i", &u, &x, &y), 2, "%d != %d"); |
| TEST(u, u, 1.0, "%g != %g"); |
| TEST(i, x, 6, "%d != %d"); |
| TEST(i, y, 10, "%d != %d"); |
| TEST(i, ftell(f), 13, "%d != %d"); |
| TEST(i, !!feof(f), 1, "%d != %d"); |
| fclose(f); |
| } |
| |
| TEST(i, !!(f=writetemp("0xx")), 1, "failed to make temp file"); |
| if (f) { |
| x=y=-1; |
| TEST(i, fwscanf(f, L"%x%n", &x, &y), 0, "%d != %d"); |
| TEST(i, x, -1, "%d != %d"); |
| TEST(i, y, -1, "%d != %d"); |
| TEST(i, ftell(f), 2, "%d != %d"); |
| TEST(i, feof(f), 0, "%d != %d"); |
| fclose(f); |
| } |
| |
| return t_status; |
| } |