49 #define ISWRITEMODE(mode)  (((mode)&FILEWRITEMODE)  == FILEWRITEMODE)  argument
51 #define ISBINARYMODE(mode) (((mode)&FILEBINARYMODE) == FILEBINARYMODE)  argument
52 #define ISREOPENMODE(mode) (((mode)&FILEREOPENMODE) == FILEREOPENMODE)  argument
170   PORT_FILE PortFopen(const char *filename, const char *mode)  in PortFopen()  argument
183     passert(mode);  in PortFopen()
192     if (mode[0] == 'r' || mode[0] == 'w' || mode[0] == 'R') /* w means w+, attaching text */  in PortFopen()
197       access_mode  = (mode[0] == 'r') ? FILEREADMODE   : FILEWRITEMODE;  in PortFopen()
200       if (mode[1] == '+')  in PortFopen()
201         text_mode = (mode[2] == 'b') ? FILEBINARYMODE : FILETEXTMODE;  in PortFopen()
203         text_mode = (mode[1] == 'b') ? FILEBINARYMODE : FILETEXTMODE;  in PortFopen()
254         pCurRec->mode = m;  in PortFopen()
329     PortFile->mode =  m;  in PortFopen()
339     if (ISWRITEMODE(PortFile->mode) && !ISREOPENMODE(PortFile->mode))  /* writable file */  in PortFclose()
723     if (ISWRITEMODE(PortFile->mode))  /* writable file */  in PortFflush()
737           pCurRec->mode = PortFile->mode;  in PortFflush()
823   PORT_FILE PortFreopen(const char *path, const char *mode, PORT_FILE PortFile)  in PortFreopen()  argument
828       PortFile = PortFopen(path, mode);  in PortFreopen()
857     char mode[3];  in PortSaveFileToDisk()  local
877     if (ISBINARYMODE(PortFile->mode))  /* binary file, the wav file */  in PortSaveFileToDisk()
879       sprintf(mode, "wb");  in PortSaveFileToDisk()
883       sprintf(mode, "w");  in PortSaveFileToDisk()
886     if ((fp = fopen(fullfname, mode)) != NULL)  in PortSaveFileToDisk()
898       PLogError(L("Error to fopen %s with mode %s\n\n"), fullfname, mode);  in PortSaveFileToDisk()
904   int PortLoadFileFromDisk(PORT_FILE PortFile, const char *filename, const char *mode)  in PortLoadFileFromDisk()  argument
915     if (mode == NULL)  in PortLoadFileFromDisk()
918       if (ISBINARYMODE(PortFile->mode))  in PortLoadFileFromDisk()
923       mode = data;  in PortLoadFileFromDisk()
926     fp = fopen(filename, mode);  in PortLoadFileFromDisk()
967     char mode[3];  in XanaviLoadFileFromDisk()  local
973     mode[0] = 'r';  in XanaviLoadFileFromDisk()
974     if (ISBINARYMODE(PortFile->mode))  in XanaviLoadFileFromDisk()
975       mode[1] = 'b';  in XanaviLoadFileFromDisk()
977       mode[1] = '\0';  in XanaviLoadFileFromDisk()
979     mode[2] = '\0';  in XanaviLoadFileFromDisk()
981     return PortLoadFileFromDisk(PortFile, fname, mode);  in XanaviLoadFileFromDisk()