annotate src/oct-stdstrm.h @ 5103:e2ed74b9bfa0 after-gnuplot-split

[project @ 2004-12-28 02:43:01 by jwe]
author jwe
date Tue, 28 Dec 2004 02:43:01 +0000
parents 6d481b6e349e
children 4c8a2e4e0717
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,
4587
7b957b442818 [project @ 2003-11-10 15:50:39 by jwe]
jwe
parents: 4574
diff changeset
35 std::ios::openmode m = std::ios::in|std::ios::out,
5015
6d481b6e349e [project @ 2004-09-22 02:18:13 by jwe]
jwe
parents: 4797
diff changeset
36 oct_mach_info::float_format ff
6d481b6e349e [project @ 2004-09-22 02:18:13 by jwe]
jwe
parents: 4797
diff changeset
37 = oct_mach_info::native_float_format (),
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
38 c_file_ptr_buf::close_fcn cf = c_file_ptr_buf::fclose)
4587
7b957b442818 [project @ 2003-11-10 15:50:39 by jwe]
jwe
parents: 4574
diff changeset
39 : octave_base_stream (m, ff), nm (n), md (m), s(0)
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
40 {
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
41 if (f)
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
42 s = new io_c_file_ptr_stream (f, cf);
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
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
45 static octave_stream
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
46 create (const std::string& n, FILE *f = 0,
4587
7b957b442818 [project @ 2003-11-10 15:50:39 by jwe]
jwe
parents: 4574
diff changeset
47 std::ios::openmode m = std::ios::in|std::ios::out,
5015
6d481b6e349e [project @ 2004-09-22 02:18:13 by jwe]
jwe
parents: 4797
diff changeset
48 oct_mach_info::float_format ff
6d481b6e349e [project @ 2004-09-22 02:18:13 by jwe]
jwe
parents: 4797
diff changeset
49 = oct_mach_info::native_float_format (),
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
50 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
51 {
4587
7b957b442818 [project @ 2003-11-10 15:50:39 by jwe]
jwe
parents: 4574
diff changeset
52 return octave_stream (new octave_stdiostream (n, f, m, ff, cf));
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
53 }
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
54
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
55 // Position a stream at OFFSET relative to ORIGIN.
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
56
4797
19b8225bdaa2 [project @ 2004-02-23 22:10:31 by jwe]
jwe
parents: 4643
diff changeset
57 int seek (long offset, int origin);
2081
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 // Return current stream position.
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
60
4797
19b8225bdaa2 [project @ 2004-02-23 22:10:31 by jwe]
jwe
parents: 4643
diff changeset
61 long tell (void);
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
62
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
63 // 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
64
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
65 bool eof (void) const { return s ? s->eof () : true; }
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
66
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
67 // The name of the file.
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
68
3523
b80bbb43a1a9 [project @ 2000-02-02 10:25:52 by jwe]
jwe
parents: 3340
diff changeset
69 std::string name (void) const { return nm; }
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::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
72
4361
34014c0fb2ce [project @ 2003-03-02 03:12:08 by jwe]
jwe
parents: 4327
diff changeset
73 std::ostream *output_stream (void) { return (md & std::ios::out) ? s : 0; }
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
74
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
75 // 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
76 c_file_ptr_buf *rdbuf (void) const
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
77 { 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
78
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
79 bool bad (void) const { return s ? s->bad () : true; }
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 clear (void) { if (s) s->clear (); }
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
82
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
83 void do_close (void) { if (s) s->close (); }
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
84
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
85 protected:
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
86
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
87 std::string nm;
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
88
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
89 std::ios::openmode md;
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
90
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
91 io_c_file_ptr_stream *s;
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
92
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
93 ~octave_stdiostream (void) { delete s; }
4326
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 private:
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
96
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
97 // No copying!
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 (const octave_stdiostream&);
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
100
4327
c29c382a5b4b [project @ 2003-02-16 03:24:26 by jwe]
jwe
parents: 4326
diff changeset
101 octave_stdiostream& operator = (const octave_stdiostream&);
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
102 };
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 3951
diff changeset
103
2081
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
104 #endif
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
105
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
106 /*
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
107 ;;; Local Variables: ***
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
108 ;;; mode: C++ ***
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
109 ;;; End: ***
e9ec222a53e1 [project @ 1996-04-25 03:17:36 by jwe]
jwe
parents:
diff changeset
110 */