3 /* Break string in two parts to avoid buggy C compilers that ignore characters
4 after nulls in strings. */
6 char string1
[] = "Testing distribution of nonprinting chars:\n\
7 Should be 0177: \177 Should be 0377: \377 Should be 0212: \212.\n\
10 char string2
[] = ".\n\
11 This file is read by the `test-distribution' program.\n\
12 If you change it, you will make that program fail.\n";
16 /* Like `read' but keeps trying until it gets SIZE bytes or reaches eof. */
18 cool_read (fd
, buf
, size
)
27 if ((num
= read (fd
, buf
+ sofar
, size
- sofar
)) == 0)
44 fprintf (stderr
, "Usage: %s testfile\n", argv
[0]);
47 fd
= open (argv
[1], 0);
53 if (cool_read (fd
, buf
, sizeof string1
) != sizeof string1
||
54 strcmp (buf
, string1
) ||
55 cool_read (fd
, buf
, sizeof string2
) != sizeof string2
- 1 ||
56 strncmp (buf
, string2
, sizeof string2
- 1))
58 fprintf (stderr
, "Data in file `%s' has been damaged.\n\
59 Most likely this means that many nonprinting characters\n\
60 have been corrupted in the files of Emacs, and it will not work.\n",
66 exit (1); /* On VMS, success is 1. */