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
|
#ifndef INCLUDE_BLASSIC_FILE_H
#define INCLUDE_BLASSIC_FILE_H
// file.h
// Revision 7-feb-2005
#ifdef __BORLANDC__
#pragma warn -8022
#endif
#include "blassic.h"
#include "dim.h"
#include <iostream>
#include <fstream>
#include <string>
#include <vector>
#include <sstream>
namespace blassic {
namespace file {
enum OpenMode {
Input= 1, Output= 2, InOut= 3,
Append= 6, Random= 8, Binary= 16,
WithErr= 32
};
class BlFile {
public:
struct field_element {
size_t size;
std::string name;
Dimension dim;
field_element (size_t n,
const std::string & str, const Dimension & dim)
:
size (n), name (str), dim (dim)
{ }
};
enum Align { AlignRight, AlignLeft };
BlFile (OpenMode nmode);
virtual ~BlFile ();
virtual void closein ();
virtual void closeout ();
virtual void reset (int x1, int x2, int y1, int y2);
virtual bool isfile () const = 0;
virtual bool istextwindow () const;
virtual bool eof ();
virtual size_t loc ();
virtual void flush ();
virtual size_t getwidth () const;
virtual void movecharforward ();
virtual void movecharforward (size_t n);
virtual void movecharback ();
virtual void movecharback (size_t n);
virtual void movecharup ();
virtual void movecharup (size_t n);
virtual void movechardown ();
virtual void movechardown (size_t n);
virtual void showcursor ();
virtual void hidecursor ();
virtual std::string getkey ();
virtual std::string inkey ();
virtual void getline (std::string & str, bool endline= true);
char delimiter () { return cDelimiter; }
void delimiter (char delim) { cDelimiter= delim; }
char quote () { return cQuote; }
void quote (char qu) { cQuote= qu; }
char escape () { return cEscape; }
void escape (char esc) { cEscape= esc; }
friend BlFile & operator << (BlFile & bf, const std::string & str);
friend BlFile & operator << (BlFile & bf, char c);
friend BlFile & operator << (BlFile & bf, BlNumber n);
friend BlFile & operator << (BlFile & bf, BlInteger n);
friend BlFile & operator << (BlFile & bf, BlLineNumber l);
friend BlFile & operator << (BlFile & bf, unsigned short n);
void putspaces (size_t n);
virtual void tab ();
virtual void tab (size_t n);
virtual void endline ();
virtual void put (size_t pos);
virtual void get (size_t pos);
virtual void field_clear ();
virtual void field (const std::vector <field_element> & elem);
virtual void field_append (const std::vector <field_element> & elem);
virtual bool assign (const std::string & name, const Dimension & dim,
const std::string & value, Align align);
virtual bool assign_mid (const std::string & name,
const Dimension & dim,
const std::string & value,
size_t inipos, std::string::size_type len);
virtual std::string read (size_t n);
virtual void gotoxy (int x, int y);
virtual void setcolor (int color);
virtual int getcolor ();
virtual void setbackground (int color);
virtual int getbackground ();
virtual void cls ();
virtual std::string copychr (BlChar from, BlChar to);
virtual int pos ();
virtual int vpos ();
virtual void tag ();
virtual void tagoff ();
virtual bool istagactive ();
virtual void inverse (bool active);
virtual bool getinverse ();
virtual void bright (bool active);
virtual bool getbright ();
virtual void setwidth (size_t w);
virtual void setmargin (size_t m);
virtual BlInteger lof ();
virtual bool poll ();
virtual void scroll (int nlines);
private:
virtual void outstring (const std::string & str);
virtual void outchar (char c);
BlFile (const BlFile &); // Forbidden
void operator = (const BlFile &); // Forbidden.
OpenMode mode;
char cDelimiter, cQuote, cEscape;
protected:
OpenMode getmode () const { return mode; }
};
// Create BlFile functions.
BlFile * newBlFileConsole ();
BlFile * newBlFileWindow (BlChannel ch);
BlFile * newBlFileWindow (BlChannel ch, int x1, int x2, int y1, int y2);
BlFile * newBlFileOutString ();
BlFile * newBlFileOutput (std::ostream & os);
BlFile * newBlFileRegular (const std::string & name, OpenMode mode);
BlFile * newBlFileRandom (const std::string & name, size_t record_len);
BlFile * newBlFilePopen (const std::string & name, OpenMode mode);
BlFile * newBlFileSocket (const std::string & host, short port);
BlFile * newBlFilePrinter ();
class BlFileOut : public BlFile {
public:
BlFileOut ();
BlFileOut (OpenMode mode);
void flush ();
protected:
virtual std::ostream & ofs ()= 0;
private:
void outstring (const std::string & str);
void outchar (char c);
//void outnumber (BlNumber n);
//void outinteger (BlInteger n);
//void outlinenumber (BlLineNumber l);
};
class BlFileOutString : public BlFileOut {
public:
BlFileOutString ();
bool isfile () const { return false; }
std::string str ();
private:
std::ostream & ofs ();
std::ostringstream oss;
};
} // namespace blassic
} // namespace file
#endif
// Fin de file.h
|