#include <errno.h>
#include <fcntl.h>
#include <locale.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <wchar.h>
void error(int exitCode, int, const char* message);
int
main(int argc, char *argv[])
{
int a = 3;
int fd;
char name[] = "/tmp/wprintf.out.XXXXXX";
FILE *fp;
char buf[100];
size_t len;
int res = 0;
fd = mkstemp(name);
if (fd == -1)
error(EXIT_FAILURE, errno, "cannot open temporary file");
unlink(name);
setlocale(LC_ALL, "");
fp = fdopen(dup(fd), "w");
if (fp == NULL)
error(EXIT_FAILURE, errno, "fdopen(,\"w\")");
fwprintf(fp,L"test start" );
fwprintf(fp, L" int %d\n", a);
fwprintf(fp, L"1[%6.3s]\n", argv[1]);
fclose(fp);
fp = fdopen(dup (fd), "a");
if (fp == NULL)
error(EXIT_FAILURE, errno, "fdopen(,\"a\")");
setvbuf(fp, NULL, _IONBF, 0);
fwprintf(fp, L"hello.\n");
fclose(fp);
lseek(fd, SEEK_SET, 0);
fp = fdopen(fd, "r");
if (fp == NULL)
error(EXIT_FAILURE, errno, "fdopen(,\"r\")");
if (fgets(buf, sizeof buf, fp) != buf)
error(EXIT_FAILURE, errno, "first fgets");
len = strlen(buf);
if (buf[len - 1] == '\n')
--len;
else {
puts ("newline missing after first line");
res = 1;
}
printf("1st line: \"%.*s\" -> %s\n", (int) len, buf,
strncmp(buf, "test start int 3", len) == 0 ? "OK" : "FAIL");
res |= strncmp(buf, "test start int 3", len) != 0;
if (fgets(buf, sizeof(buf), fp) != buf)
error(EXIT_FAILURE, errno, "second fgets");
len = strlen(buf);
if (buf[len - 1] == '\n')
--len;
else {
puts("newline missing after second line");
res = 1;
}
printf ("2nd line: \"%.*s\" -> %s\n", (int) len, buf,
strncmp(buf, "1[ Som]", len) == 0 ? "OK" : "FAIL");
res |= strncmp(buf, "1[ Som]", len) != 0;
if (fgets(buf, sizeof(buf), fp) != buf)
error(EXIT_FAILURE, errno, "third fgets");
len = strlen(buf);
if (buf[len - 1] == '\n')
--len;
else {
puts("newline missing after third line");
res = 1;
}
printf("3rd line: \"%.*s\" -> %s\n", (int) len, buf,
strncmp(buf, "hello.", len) == 0 ? "OK" : "FAIL");
res |= strncmp(buf, "hello.", len) != 0;
return res;
}
void
error(int exitCode, int errorCode, const char* message)
{
perror(message);
exit(exitCode);
}