1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205
|
// textfile.c -- file class for dealing with text files
/******************************************************************************
*
* MiXViews - an X window system based sound & data editor/processor
*
* Copyright (c) 1993, 1994 Regents of the University of California
*
* Author: Douglas Scott
* Date: December 13, 1994
*
* Permission to use, copy and modify this software and its documentation
* for research and/or educational purposes and without fee is hereby granted,
* provided that the above copyright notice appear in all copies and that
* both that copyright notice and this permission notice appear in
* supporting documentation. The author reserves the right to distribute this
* software and its documentation. The University of California and the author
* make no representations about the suitability of this software for any
* purpose, and in no event shall University of California be liable for any
* damage, loss of data, or profits resulting from its use.
* It is provided "as is" without express or implied warranty.
*
******************************************************************************/
#include "localdefs.h"
#ifdef __GNUG__
#pragma implementation
#endif
#include "textfile.h"
TextFile::TextFile(const char* filename, io_mode m, access_mode a) {
open(filename, m, a);
}
TextFile::TextFile(const char* filename, const char* m) {
open(filename, m);
}
//------------------------------------------------------------------
TextFile& TextFile::put(const char* s)
{
return failif(!writable() || fputs(s, fp) == EOF);
}
TextFile& TextFile::get(char* s, int n, char terminator)
{
if (!readable())
{
set(_fail);
return *this;
}
char ch;
stat = --n;
if (n > 0 && (get(ch)))
{
if (ch == terminator) {
unget(ch);
stat= 0; // This is not an error condition !
}
else
{
*s++ = ch; --n;
while (n > 0 && (get(ch)))
{
if (ch == terminator)
{
unget(ch);
break;
}
else
{
*s++ = ch; --n;
}
}
}
}
*s = 0;
return failif((stat != 0) && ((stat -= n) == 0));
}
TextFile& TextFile::getline(char* s, int n, char terminator)
{
if (!readable())
{
set(_fail);
return *this;
}
char ch;
stat = --n;
while (n > 0 && (get(ch)))
{
--n;
if ((*s++ = ch) == terminator)
break;
}
*s = 0;
return failif((stat != 0) && ((stat -= n) == 0));
}
// from Doug Schmidt
// This should probably be a page size....
#define CHUNK_SIZE 512
/* Reads an arbitrarily MXINT32 input line terminated by a user-specified
TERMINATOR. Super-nifty trick using recursion avoids unnecessary calls
to NEW! */
char *TextFile::readline (int chunk_number, char terminator)
{
char buf[CHUNK_SIZE];
register char *bufptr = buf;
register char *ptr;
char ch;
int continu;
while ((continu = !!get(ch)) && ch != terminator) /* fill the current buffer */
{
*bufptr++ = ch;
if (bufptr - buf >= CHUNK_SIZE) /* prepend remainder to ptr buffer */
{
if (ptr = readline (chunk_number + 1, terminator))
for (; bufptr != buf; *--ptr = *--bufptr);
return ptr;
}
}
if (!continu && bufptr == buf)
return NULL;
int size = (chunk_number * CHUNK_SIZE + bufptr - buf) + 1;
if (ptr = new char[stat = size])
{
for (*(ptr += (size - 1)) = '\0'; bufptr != buf; *--ptr = *--bufptr)
;
return ptr;
}
else
return NULL;
}
/* Reads an arbitrarily MXINT32 input line terminated by TERMINATOR.
This routine allocates its own memory, so the user should
only supply the address of a (char *). */
TextFile& TextFile::gets(char **s, char terminator)
{
if (!readable())
{
set(_fail);
return *this;
}
return failif(!(*s = readline (0, terminator)));
}
#ifndef VMS
TextFile& TextFile::scan(const char* fmt ...)
{
if (readable())
{
va_list args;
va_start(args, fmt);
#ifndef HAVE_VSCANF
stat = _doscan(fp, fmt, args);
#else
stat = vfscanf(fp, fmt, args);
#endif
va_end(args);
failif(stat <= 0);
}
return *this;
}
#endif
TextFile& TextFile::form(const char* fmt ...)
{
va_list args;
va_start(args, fmt);
#ifndef HAVE_VPRINTF
stat = _doprnt(fmt, args, fp);
#ifdef HAVE_VOID_DOPRNT
stat = ferror(fp) ? -1 : 0;
#endif
#else
stat = vfprintf(fp, fmt, args);
#endif
va_end(args);
failif(stat < 0);
return *this;
}
|