Lines Matching defs:files
60 /* #define FOPEN_MAX 40 */ /* max number of open files */
1612 struct files {
1616 } files[FOPEN_MAX] ={
1624 files[0].fp = stdin;
1625 files[1].fp = stdout;
1626 files[2].fp = stderr;
1638 if (files[i].fname && strcmp(s, files[i].fname) == 0) {
1639 if (a == files[i].mode || (a==APPEND && files[i].mode==GT))
1640 return files[i].fp;
1642 return files[i].fp;
1648 if (files[i].fp == 0)
1651 FATAL("%s makes too many open files", s);
1668 files[i].fname = tostring(s);
1669 files[i].fp = fp;
1670 files[i].mode = m;
1680 if (fp == files[i].fp)
1681 return files[i].fname;
1695 if (files[i].fname && strcmp(x->sval, files[i].fname) == 0) {
1696 if (ferror(files[i].fp))
1697 WARNING( "i/o error occurred on %s", files[i].fname );
1698 if (files[i].mode == '|' || files[i].mode == LE)
1699 stat = pclose(files[i].fp);
1701 stat = fclose(files[i].fp);
1703 WARNING( "i/o error occurred closing %s", files[i].fname );
1705 xfree(files[i].fname);
1706 files[i].fname = NULL; /* watch out for ref thru this */
1707 files[i].fp = NULL;
1721 if (files[i].fp) {
1722 if (ferror(files[i].fp))
1723 WARNING( "i/o error occurred on %s", files[i].fname );
1724 if (files[i].mode == '|' || files[i].mode == LE)
1725 stat = pclose(files[i].fp);
1727 stat = fclose(files[i].fp);
1729 WARNING( "i/o error occurred while closing %s", files[i].fname );
1739 if (files[i].fp)
1740 fflush(files[i].fp);
