annotate src/oct-stdstrm.h @ 4327:c29c382a5b4b

[project @ 2003-02-16 03:24:26 by jwe]
author jwe
date Sun, 16 Feb 2003 03:24:26 +0000
parents 1cae4472c624
children 34014c0fb2ce
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
1 /*
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
2
2847
8b262e771614 [project @ 1997-03-27 16:18:26 by jwe]
jwe
parents: 2800
diff changeset
3 Copyright (C) 1996, 1997 John W. Eaton
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
4
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
5 This file is part of Octave.
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
6
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
7 Octave is free software; you can redistribute it and/or modify it
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
8 under the terms of the GNU General Public License as published by the
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
9 Free Software Foundation; either version 2, or (at your option) any
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
10 later version.
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
11
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
12 Octave is distributed in the hope that it will be useful, but WITHOUT
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
15 for more details.
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
16
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
18 along with Octave; see the file COPYING. If not, write to the Free
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
19 Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
20
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
21 */
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
22
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
23 #if !defined (octave_octave_stdiostream_h)
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
24 #define octave_octave_stdiostream_h 1
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
25
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
26 #include "oct-stream.h"
3630
8fbe6931e709 [project @ 2000-03-23 07:42:55 by jwe]
jwe
parents: 3611
diff changeset
27 #include "c-file-ptr-stream.h"
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
28
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
29 class
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
30 octave_stdiostream : public octave_base_stream
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
31 {
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
32 public:
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
33
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
34 octave_stdiostream (const std::string& n, FILE *f = 0,
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
35 std::ios::openmode arg_md = std::ios::in|std::ios::out,
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
36 oct_mach_info::float_format flt_fmt = oct_mach_info::native,
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
37 c_file_ptr_buf::close_fcn cf = c_file_ptr_buf::fclose)
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
38 : octave_base_stream (arg_md, flt_fmt), nm (n), md (arg_md), s(0)
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
39 {
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
40 if (f)
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
41 s = new io_c_file_ptr_stream (f, cf);
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
42 }
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
43
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
44 static octave_stream
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
45 create (const std::string& n, FILE *f = 0,
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
46 std::ios::openmode arg_md = std::ios::in|std::ios::out,
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
47 oct_mach_info::float_format flt_fmt = oct_mach_info::native,
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
48 c_file_ptr_buf::close_fcn cf = c_file_ptr_buf::fclose)
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
49 {
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
50 return octave_stream (new octave_stdiostream (n, f, arg_md, flt_fmt, cf));
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
51 }
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
52
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
53 // Position a stream at OFFSET relative to ORIGIN.
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
54
3775
13905c3a24af [project @ 2001-02-06 01:56:59 by jwe]
jwe
parents: 3716
diff changeset
55 int seek (std::streamoff offset, std::ios::seekdir origin);
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
56
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
57 // Return current stream position.
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
58
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
59 long tell (void) const;
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
60
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
61 // Return non-zero if EOF has been reached on this stream.
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
62
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
63 bool eof (void) const { return s ? s->eof () : true; }
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
64
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
65 // The name of the file.
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
66
3523
b80bbb43a1a9 [project @ 2000-02-02 10:25:52 by jwe]
jwe
parents: 3340
diff changeset
67 std::string name (void) const { return nm; }
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
68
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
69 std::istream *input_stream (void) { return (md & std::ios::in) ? s : 0; }
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
70
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
71 std::ostream *output_stream (void) { return (md & std::ios::in) ? s : 0; }
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
72
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
73 // XXX FIXME XXX -- should not have to cast away const here.
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
74 c_file_ptr_buf *rdbuf (void) const
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
75 { return s ? (const_cast<io_c_file_ptr_stream *> (s))->rdbuf () : 0; }
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
76
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
77 bool bad (void) const { return s ? s->bad () : true; }
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
78
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
79 void clear (void) { if (s) s->clear (); }
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
80
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
81 void do_close (void) { if (s) s->close (); }
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
82
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
83 protected:
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
84
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
85 std::string nm;
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
86
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
87 std::ios::openmode md;
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
88
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
89 io_c_file_ptr_stream *s;
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
90
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
91 ~octave_stdiostream (void) { delete s; }
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
92
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
93 private:
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
94
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
95 // No copying!
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
96
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
97 octave_stdiostream (const octave_stdiostream&);
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
98
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
99 octave_stdiostream& operator = (const octave_stdiostream&);
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
100 };
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
101
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
102 #endif
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
103
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
104 /*
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
105 ;;; Local Variables: ***
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
106 ;;; mode: C++ ***
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
107 ;;; End: ***
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
108 */