annotate libinterp/corefcn/c-file-ptr-stream.h @ 25438:cb1606f78f6b

prefer <istream>, <ostream>, or <iosfwd> to <iostream> where possible Using <iostream> brings with it a static initializer for the std::cin, std::cout, and std::cerr streams. In most cases they are not needed and should be avoided if possible. Files affected: build-aux/mk-opts.pl libgui/qterminal/libqterminal/win32/QWinTerminalImpl.cpp libinterp/corefcn/__dsearchn__.cc libinterp/corefcn/c-file-ptr-stream.cc libinterp/corefcn/c-file-ptr-stream.h libinterp/corefcn/daspk.cc libinterp/corefcn/dasrt.cc libinterp/corefcn/dassl.cc libinterp/corefcn/defaults.cc libinterp/corefcn/defun.cc libinterp/corefcn/file-io.cc libinterp/corefcn/ft-text-renderer.cc libinterp/corefcn/gl-render.cc libinterp/corefcn/help.cc libinterp/corefcn/ls-ascii-helper.cc libinterp/corefcn/ls-hdf5.cc libinterp/corefcn/ls-hdf5.h libinterp/corefcn/ls-mat-ascii.cc libinterp/corefcn/ls-mat4.cc libinterp/corefcn/ls-mat5.cc libinterp/corefcn/ls-oct-binary.cc libinterp/corefcn/ls-oct-text.cc libinterp/corefcn/lsode.cc libinterp/corefcn/oct-iostrm.cc libinterp/corefcn/oct-procbuf.cc libinterp/corefcn/oct-stdstrm.h libinterp/corefcn/procstream.cc libinterp/corefcn/procstream.h libinterp/corefcn/quad.cc libinterp/corefcn/symscope.h libinterp/corefcn/symtab.h libinterp/corefcn/toplev.cc libinterp/corefcn/urlwrite.cc libinterp/corefcn/utils.cc libinterp/corefcn/zfstream.cc libinterp/dldfcn/__ode15__.cc libinterp/dldfcn/convhulln.cc libinterp/octave-value/ov-base-diag.cc libinterp/octave-value/ov-base-int.cc libinterp/octave-value/ov-base-mat.cc libinterp/octave-value/ov-base-scalar.cc libinterp/octave-value/ov-base-sparse.cc libinterp/octave-value/ov-base.cc libinterp/octave-value/ov-bool-mat.cc libinterp/octave-value/ov-bool-sparse.cc libinterp/octave-value/ov-bool.cc libinterp/octave-value/ov-cell.cc libinterp/octave-value/ov-ch-mat.cc libinterp/octave-value/ov-class.cc libinterp/octave-value/ov-colon.cc libinterp/octave-value/ov-complex.cc libinterp/octave-value/ov-cs-list.cc libinterp/octave-value/ov-cx-mat.cc libinterp/octave-value/ov-cx-sparse.cc libinterp/octave-value/ov-fcn-handle.cc libinterp/octave-value/ov-fcn-inline.cc libinterp/octave-value/ov-float.cc libinterp/octave-value/ov-flt-complex.cc libinterp/octave-value/ov-flt-cx-mat.cc libinterp/octave-value/ov-flt-re-mat.cc libinterp/octave-value/ov-int16.cc libinterp/octave-value/ov-int32.cc libinterp/octave-value/ov-int64.cc libinterp/octave-value/ov-int8.cc libinterp/octave-value/ov-java.cc libinterp/octave-value/ov-range.cc libinterp/octave-value/ov-re-mat.cc libinterp/octave-value/ov-re-sparse.cc libinterp/octave-value/ov-scalar.cc libinterp/octave-value/ov-str-mat.cc libinterp/octave-value/ov-struct.cc libinterp/octave-value/ov-typeinfo.cc libinterp/octave-value/ov-uint16.cc libinterp/octave-value/ov-uint32.cc libinterp/octave-value/ov-uint64.cc libinterp/octave-value/ov-uint8.cc libinterp/octave.cc libinterp/parse-tree/bp-table.cc libinterp/parse-tree/lex.h libinterp/parse-tree/profiler.cc libinterp/parse-tree/pt-arg-list.cc libinterp/parse-tree/pt-array-list.cc libinterp/parse-tree/pt-assign.cc libinterp/parse-tree/pt-cell.cc libinterp/parse-tree/pt-const.cc libinterp/parse-tree/pt-eval.cc libinterp/parse-tree/pt-exp.cc libinterp/parse-tree/pt-fcn-handle.cc libinterp/parse-tree/pt-jit.cc libinterp/parse-tree/pt-pr-code.cc libinterp/parse-tree/pt-tm-const.cc libinterp/parse-tree/pt.cc liboctave/array/Array.cc liboctave/array/CColVector.cc liboctave/array/CDiagMatrix.cc liboctave/array/CMatrix.cc liboctave/array/CNDArray.cc liboctave/array/CRowVector.cc liboctave/array/CSparse.cc liboctave/array/DiagArray2.cc liboctave/array/MArray.cc liboctave/array/Range.cc liboctave/array/Sparse.cc liboctave/array/boolMatrix.cc liboctave/array/boolSparse.cc liboctave/array/chMatrix.cc liboctave/array/dColVector.cc liboctave/array/dDiagMatrix.cc liboctave/array/dMatrix.cc liboctave/array/dNDArray.cc liboctave/array/dRowVector.cc liboctave/array/dSparse.cc liboctave/array/fCColVector.cc liboctave/array/fCDiagMatrix.cc liboctave/array/fCMatrix.cc liboctave/array/fCNDArray.cc liboctave/array/fCRowVector.cc liboctave/array/fColVector.cc liboctave/array/fDiagMatrix.cc liboctave/array/fMatrix.cc liboctave/array/fNDArray.cc liboctave/array/fRowVector.cc liboctave/array/idx-vector.cc liboctave/numeric/CollocWt.cc liboctave/numeric/eigs-base.cc liboctave/system/file-ops.cc liboctave/system/oct-time.cc liboctave/util/cmd-hist.cc liboctave/util/data-conv.cc liboctave/util/data-conv.h liboctave/util/file-info.cc liboctave/util/lo-utils.cc liboctave/util/lo-utils.h liboctave/util/quit.cc liboctave/util/str-vec.cc liboctave/util/url-transfer.cc liboctave/util/url-transfer.h
author John W. Eaton <jwe@octave.org>
date Thu, 07 Jun 2018 10:11:54 -0400
parents 6652d3823428
children 37132909ac91
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
1 /*
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
2
25054
6652d3823428 maint: Update copyright dates in all source files.
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
3 Copyright (C) 2000-2018 John W. Eaton
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
4
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
5 This file is part of Octave.
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
6
24534
194eb4bd202b maint: Update punctuation for GPL v3 license text.
Rik <rik@octave.org>
parents: 23795
diff changeset
7 Octave is free software: you can redistribute it and/or modify it
22755
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
8 under the terms of the GNU General Public License as published by
24534
194eb4bd202b maint: Update punctuation for GPL v3 license text.
Rik <rik@octave.org>
parents: 23795
diff changeset
9 the Free Software Foundation, either version 3 of the License, or
22755
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
10 (at your option) any later version.
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
11
22755
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
12 Octave is distributed in the hope that it will be useful, but
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
13 WITHOUT ANY WARRANTY; without even the implied warranty of
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
15 GNU General Public License for more details.
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
16
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
7016
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5884
diff changeset
18 along with Octave; see the file COPYING. If not, see
24534
194eb4bd202b maint: Update punctuation for GPL v3 license text.
Rik <rik@octave.org>
parents: 23795
diff changeset
19 <https://www.gnu.org/licenses/>.
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
20
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
21 */
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
22
20791
f7084eae3318 maint: Use Octave coding conventions for #if statements.
Rik <rik@octave.org>
parents: 20088
diff changeset
23 #if ! defined (octave_c_file_ptr_stream_h)
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
24 #define octave_c_file_ptr_stream_h 1
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
25
21244
1473547f50f5 include octave-config.h in public header files
John W. Eaton <jwe@octave.org>
parents: 21200
diff changeset
26 #include "octave-config.h"
1473547f50f5 include octave-config.h in public header files
John W. Eaton <jwe@octave.org>
parents: 21200
diff changeset
27
3775
13905c3a24af [project @ 2001-02-06 01:56:59 by jwe]
jwe
parents: 3716
diff changeset
28 #include <cstdio>
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
29
25438
cb1606f78f6b prefer <istream>, <ostream>, or <iosfwd> to <iostream> where possible
John W. Eaton <jwe@octave.org>
parents: 25054
diff changeset
30 #include <iosfwd>
20088
1663b82bd009 Stop "implicit instantiation of undefined template" error (bug #44818).
Mike Miller <mtmiller@octave.org>
parents: 19697
diff changeset
31 #include <streambuf>
8950
d865363208d6 include <iosfwd> instead of <iostream> in header files
John W. Eaton <jwe@octave.org>
parents: 7017
diff changeset
32
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
33 class
4310
da7226ca8b91 [project @ 2003-01-30 03:26:26 by jwe]
jwe
parents: 4192
diff changeset
34 c_file_ptr_buf : public std::streambuf
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
35 {
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
36 public:
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
37
4310
da7226ca8b91 [project @ 2003-01-30 03:26:26 by jwe]
jwe
parents: 4192
diff changeset
38 typedef std::streambuf::int_type int_type;
3775
13905c3a24af [project @ 2001-02-06 01:56:59 by jwe]
jwe
parents: 3716
diff changeset
39
3716
08fe5f74c7d4 [project @ 2000-09-07 04:59:03 by jwe]
jwe
parents: 3652
diff changeset
40 typedef int (*close_fcn) (FILE *);
08fe5f74c7d4 [project @ 2000-09-07 04:59:03 by jwe]
jwe
parents: 3652
diff changeset
41
23449
c763214a8260 maint: Use convention 'int *x' for naming pointers.
Rik <rik@octave.org>
parents: 23446
diff changeset
42 FILE *stdiofile (void) { return f; }
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
43
10288
5e972e2deffe avoid some possible gnulib #defines
John W. Eaton <jwe@octave.org>
parents: 10160
diff changeset
44 c_file_ptr_buf (FILE *f_arg, close_fcn cf_arg = file_close)
4310
da7226ca8b91 [project @ 2003-01-30 03:26:26 by jwe]
jwe
parents: 4192
diff changeset
45 : std::streambuf (), f (f_arg), cf (cf_arg)
17787
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
46 { }
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
47
22869
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
48 // No copying!
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
49
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
50 c_file_ptr_buf (const c_file_ptr_buf&) = delete;
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
51
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
52 c_file_ptr_buf& operator = (const c_file_ptr_buf&) = delete;
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
53
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
54 ~c_file_ptr_buf (void);
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
55
3775
13905c3a24af [project @ 2001-02-06 01:56:59 by jwe]
jwe
parents: 3716
diff changeset
56 int_type overflow (int_type);
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
57
4310
da7226ca8b91 [project @ 2003-01-30 03:26:26 by jwe]
jwe
parents: 4192
diff changeset
58 int_type underflow (void) { return underflow_common (false); }
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
59
4310
da7226ca8b91 [project @ 2003-01-30 03:26:26 by jwe]
jwe
parents: 4192
diff changeset
60 int_type uflow (void) { return underflow_common (true); }
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
61
3775
13905c3a24af [project @ 2001-02-06 01:56:59 by jwe]
jwe
parents: 3716
diff changeset
62 int_type pbackfail (int_type);
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
63
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
64 std::streamsize xsputn (const char*, std::streamsize);
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
65
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
66 std::streamsize xsgetn (char *, std::streamsize);
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
67
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
68 std::streampos seekoff (std::streamoff, std::ios::seekdir,
10313
f3b65e1ae355 untabify src header files
John W. Eaton <jwe@octave.org>
parents: 10288
diff changeset
69 std::ios::openmode = std::ios::in | std::ios::out);
11586
12df7854fa7c strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents: 11523
diff changeset
70
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
71 std::streampos seekpos (std::streampos,
10313
f3b65e1ae355 untabify src header files
John W. Eaton <jwe@octave.org>
parents: 10288
diff changeset
72 std::ios::openmode = std::ios::in | std::ios::out);
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
73
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
74 int sync (void);
3644
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
75
3652
25e84fcef38a [project @ 2000-03-31 08:50:48 by jwe]
jwe
parents: 3644
diff changeset
76 int flush (void);
25e84fcef38a [project @ 2000-03-31 08:50:48 by jwe]
jwe
parents: 3644
diff changeset
77
10288
5e972e2deffe avoid some possible gnulib #defines
John W. Eaton <jwe@octave.org>
parents: 10160
diff changeset
78 int buf_close (void);
3652
25e84fcef38a [project @ 2000-03-31 08:50:48 by jwe]
jwe
parents: 3644
diff changeset
79
4310
da7226ca8b91 [project @ 2003-01-30 03:26:26 by jwe]
jwe
parents: 4192
diff changeset
80 int file_number () const { return f ? fileno (f) : -1; }
3775
13905c3a24af [project @ 2001-02-06 01:56:59 by jwe]
jwe
parents: 3716
diff changeset
81
16011
8122286c69a9 initial large file support for 32-bit systems
John W. Eaton <jwe@octave.org>
parents: 15195
diff changeset
82 int seek (off_t offset, int origin);
4797
19b8225bdaa2 [project @ 2004-02-23 22:10:31 by jwe]
jwe
parents: 4326
diff changeset
83
16011
8122286c69a9 initial large file support for 32-bit systems
John W. Eaton <jwe@octave.org>
parents: 15195
diff changeset
84 off_t tell (void);
4797
19b8225bdaa2 [project @ 2004-02-23 22:10:31 by jwe]
jwe
parents: 4326
diff changeset
85
4888
4a796c5fc7a3 [project @ 2004-04-30 18:27:07 by jwe]
jwe
parents: 4797
diff changeset
86 void clear (void) { if (f) clearerr (f); }
4a796c5fc7a3 [project @ 2004-04-30 18:27:07 by jwe]
jwe
parents: 4797
diff changeset
87
10411
479cc8a0a846 use gnulib namespace
John W. Eaton <jwe@octave.org>
parents: 10313
diff changeset
88 static int file_close (FILE *f);
3951
e6f67a1ed814 [project @ 2002-05-23 03:41:25 by jwe]
jwe
parents: 3944
diff changeset
89
3644
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
90 protected:
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
91
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
92 FILE *f;
3716
08fe5f74c7d4 [project @ 2000-09-07 04:59:03 by jwe]
jwe
parents: 3652
diff changeset
93
08fe5f74c7d4 [project @ 2000-09-07 04:59:03 by jwe]
jwe
parents: 3652
diff changeset
94 close_fcn cf;
3775
13905c3a24af [project @ 2001-02-06 01:56:59 by jwe]
jwe
parents: 3716
diff changeset
95
13905c3a24af [project @ 2001-02-06 01:56:59 by jwe]
jwe
parents: 3716
diff changeset
96 private:
13905c3a24af [project @ 2001-02-06 01:56:59 by jwe]
jwe
parents: 3716
diff changeset
97
4310
da7226ca8b91 [project @ 2003-01-30 03:26:26 by jwe]
jwe
parents: 4192
diff changeset
98 int_type underflow_common (bool);
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
99 };
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
100
17787
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
101 // FIXME: the following three classes could probably share some code...
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
102
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
103 template <typename STREAM_T, typename FILE_T, typename BUF_T>
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
104 class
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
105 c_file_ptr_stream : public STREAM_T
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
106 {
3644
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
107 public:
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
108
10288
5e972e2deffe avoid some possible gnulib #defines
John W. Eaton <jwe@octave.org>
parents: 10160
diff changeset
109 c_file_ptr_stream (FILE_T f, typename BUF_T::close_fcn cf = BUF_T::file_close)
23795
980f39c3ab90 Use C++11 nullptr rather than 0 in code (bug #51565).
Rik <rik@octave.org>
parents: 23449
diff changeset
110 : STREAM_T (nullptr), buf (new BUF_T (f, cf)) { STREAM_T::init (buf); }
3644
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
111
22869
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
112 // No copying!
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
113
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
114 c_file_ptr_stream (const c_file_ptr_stream&) = delete;
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
115
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
116 c_file_ptr_stream& operator = (const c_file_ptr_stream&) = delete;
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
117
23795
980f39c3ab90 Use C++11 nullptr rather than 0 in code (bug #51565).
Rik <rik@octave.org>
parents: 23449
diff changeset
118 ~c_file_ptr_stream (void) { delete buf; buf = nullptr; }
3644
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
119
23446
cd4e1ee28716 maint: Use convention 'void * fcn ()' for functions which return pointers.
Rik <rik@octave.org>
parents: 23220
diff changeset
120 BUF_T * rdbuf (void) { return buf; }
3644
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
121
10288
5e972e2deffe avoid some possible gnulib #defines
John W. Eaton <jwe@octave.org>
parents: 10160
diff changeset
122 void stream_close (void) { if (buf) buf->buf_close (); }
3652
25e84fcef38a [project @ 2000-03-31 08:50:48 by jwe]
jwe
parents: 3644
diff changeset
123
16011
8122286c69a9 initial large file support for 32-bit systems
John W. Eaton <jwe@octave.org>
parents: 15195
diff changeset
124 int seek (off_t offset, int origin)
17787
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
125 { return buf ? buf->seek (offset, origin) : -1; }
4797
19b8225bdaa2 [project @ 2004-02-23 22:10:31 by jwe]
jwe
parents: 4326
diff changeset
126
16011
8122286c69a9 initial large file support for 32-bit systems
John W. Eaton <jwe@octave.org>
parents: 15195
diff changeset
127 off_t tell (void) { return buf ? buf->tell () : -1; }
4797
19b8225bdaa2 [project @ 2004-02-23 22:10:31 by jwe]
jwe
parents: 4326
diff changeset
128
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
129 void clear (void) { if (buf) buf->clear (); STREAM_T::clear (); }
4888
4a796c5fc7a3 [project @ 2004-04-30 18:27:07 by jwe]
jwe
parents: 4797
diff changeset
130
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
131 private:
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
132
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
133 BUF_T *buf;
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
134 };
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
135
17787
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
136 typedef c_file_ptr_stream<std::istream, FILE *, c_file_ptr_buf>
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
137 i_c_file_ptr_stream;
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
138 typedef c_file_ptr_stream<std::ostream, FILE *, c_file_ptr_buf>
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
139 o_c_file_ptr_stream;
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
140 typedef c_file_ptr_stream<std::iostream, FILE *, c_file_ptr_buf>
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
141 io_c_file_ptr_stream;
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
142
21724
aba2e6293dd8 use "#if ..." consistently instead of "#ifdef" and "#ifndef"
John W. Eaton <jwe@octave.org>
parents: 21244
diff changeset
143 #if defined (HAVE_ZLIB)
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
144
21724
aba2e6293dd8 use "#if ..." consistently instead of "#ifdef" and "#ifndef"
John W. Eaton <jwe@octave.org>
parents: 21244
diff changeset
145 #if defined (HAVE_ZLIB_H)
21200
fcac5dbbf9ed maint: Indent #ifdef blocks in libinterp.
Rik <rik@octave.org>
parents: 21183
diff changeset
146 # include <zlib.h>
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
147 #endif
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
148
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
149 class
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
150 c_zfile_ptr_buf : public std::streambuf
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
151 {
3644
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
152 public:
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
153
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
154 typedef std::streambuf::int_type int_type;
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
155
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
156 typedef int (*close_fcn) (gzFile);
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
157
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
158 gzFile stdiofile (void) { return f; }
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
159
10288
5e972e2deffe avoid some possible gnulib #defines
John W. Eaton <jwe@octave.org>
parents: 10160
diff changeset
160 c_zfile_ptr_buf (gzFile f_arg, close_fcn cf_arg = file_close)
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
161 : std::streambuf (), f (f_arg), cf (cf_arg)
17787
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
162 { }
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
163
22869
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
164 // No copying!
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
165
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
166 c_zfile_ptr_buf (const c_zfile_ptr_buf&) = delete;
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
167
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
168 c_zfile_ptr_buf& operator = (const c_zfile_ptr_buf&) = delete;
f75d289645ec make deleted functions public
John W. Eaton <jwe@octave.org>
parents: 22865
diff changeset
169
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
170 ~c_zfile_ptr_buf (void);
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
171
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
172 int_type overflow (int_type);
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
173
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
174 int_type underflow (void) { return underflow_common (false); }
3644
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
175
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
176 int_type uflow (void) { return underflow_common (true); }
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
177
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
178 int_type pbackfail (int_type);
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
179
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
180 std::streamsize xsputn (const char*, std::streamsize);
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
181
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
182 std::streamsize xsgetn (char *, std::streamsize);
3644
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
183
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
184 std::streampos seekoff (std::streamoff, std::ios::seekdir,
10313
f3b65e1ae355 untabify src header files
John W. Eaton <jwe@octave.org>
parents: 10288
diff changeset
185 std::ios::openmode = std::ios::in | std::ios::out);
11586
12df7854fa7c strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents: 11523
diff changeset
186
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
187 std::streampos seekpos (std::streampos,
10313
f3b65e1ae355 untabify src header files
John W. Eaton <jwe@octave.org>
parents: 10288
diff changeset
188 std::ios::openmode = std::ios::in | std::ios::out);
3644
9add655e8b8c [project @ 2000-03-24 11:58:50 by jwe]
jwe
parents: 3628
diff changeset
189
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
190 int sync (void);
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
191
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
192 int flush (void);
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
193
10288
5e972e2deffe avoid some possible gnulib #defines
John W. Eaton <jwe@octave.org>
parents: 10160
diff changeset
194 int buf_close (void);
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
195
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
196 int file_number () const { return -1; }
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 4310
diff changeset
197
16011
8122286c69a9 initial large file support for 32-bit systems
John W. Eaton <jwe@octave.org>
parents: 15195
diff changeset
198 int seek (off_t offset, int origin)
17787
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
199 { return f ? gzseek (f, offset, origin) >= 0 : -1; }
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
200
16011
8122286c69a9 initial large file support for 32-bit systems
John W. Eaton <jwe@octave.org>
parents: 15195
diff changeset
201 off_t tell (void) { return f ? gztell (f) : -1; }
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
202
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
203 void clear (void) { if (f) gzclearerr (f); }
4797
19b8225bdaa2 [project @ 2004-02-23 22:10:31 by jwe]
jwe
parents: 4326
diff changeset
204
10288
5e972e2deffe avoid some possible gnulib #defines
John W. Eaton <jwe@octave.org>
parents: 10160
diff changeset
205 static int file_close (gzFile f) { return ::gzclose (f); }
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
206
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
207 protected:
4797
19b8225bdaa2 [project @ 2004-02-23 22:10:31 by jwe]
jwe
parents: 4326
diff changeset
208
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
209 gzFile f;
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
210
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
211 close_fcn cf;
4888
4a796c5fc7a3 [project @ 2004-04-30 18:27:07 by jwe]
jwe
parents: 4797
diff changeset
212
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 4310
diff changeset
213 private:
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 4310
diff changeset
214
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
215 int_type underflow_common (bool);
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 4310
diff changeset
216 };
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 4310
diff changeset
217
17787
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
218 typedef c_file_ptr_stream<std::istream, gzFile, c_zfile_ptr_buf>
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
219 i_c_zfile_ptr_stream;
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
220 typedef c_file_ptr_stream<std::ostream, gzFile, c_zfile_ptr_buf>
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
221 o_c_zfile_ptr_stream;
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
222 typedef c_file_ptr_stream<std::iostream, gzFile, c_zfile_ptr_buf>
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
223 io_c_zfile_ptr_stream;
4326
1cae4472c624 [project @ 2003-02-15 23:14:47 by jwe]
jwe
parents: 4310
diff changeset
224
5325
ecbe4aa87e51 [project @ 2005-04-29 20:48:35 by jwe]
jwe
parents: 5307
diff changeset
225 #endif
3628
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
226
168c4d71dc63 [project @ 2000-03-23 07:34:54 by jwe]
jwe
parents:
diff changeset
227 #endif