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
206
207
208
209
210
211
212
|
#ifndef _FORMAT_H
#define _FORMAT_H
#include "ledger.h"
#include "valexpr.h"
namespace ledger {
std::string truncated(const std::string& str, unsigned int width);
std::string partial_account_name(const account_t * account,
const unsigned int start_depth);
struct element_t
{
enum kind_t {
STRING,
VALUE_EXPR,
DATE_STRING,
CLEARED,
CODE,
PAYEE,
ACCOUNT_NAME,
ACCOUNT_FULLNAME,
OPT_AMOUNT,
VALUE,
TOTAL,
SPACER
};
bool align_left;
unsigned int min_width;
unsigned int max_width;
kind_t type;
std::string chars;
node_t * val_expr;
struct element_t * next;
element_t() : align_left(false), min_width(0), max_width(0),
type(STRING), val_expr(NULL), next(NULL) {}
~element_t() {
if (val_expr) delete val_expr;
if (next) delete next; // recursive, but not too deep
}
};
struct format_t
{
element_t * elements;
static std::auto_ptr<node_t> value_expr;
static std::auto_ptr<node_t> total_expr;
format_t(const std::string& _format) : elements(NULL) {
reset(_format);
}
~format_t() {
if (elements) delete elements;
}
void reset(const std::string& _format) {
if (elements)
delete elements;
elements = parse_elements(_format);
}
static element_t * parse_elements(const std::string& fmt);
void format_elements(std::ostream& out, const details_t& details) const;
static void compute_value(balance_t& result, const details_t& details) {
if (value_expr.get())
value_expr->compute(result, details);
}
static void compute_total(balance_t& result, const details_t& details) {
if (total_expr.get())
total_expr->compute(result, details);
}
};
class format_transaction
{
std::ostream& output_stream;
const format_t& first_line_format;
const format_t& next_lines_format;
#ifdef COLLAPSED_REGISTER
const bool collapsed;
#endif
const bool inverted;
item_predicate<transaction_t> disp_pred_functor;
#ifdef COLLAPSED_REGISTER
mutable balance_pair_t subtotal;
mutable unsigned int count;
#endif
mutable entry_t * last_entry;
mutable transaction_t * last_xact;
public:
format_transaction(std::ostream& _output_stream,
const format_t& _first_line_format,
const format_t& _next_lines_format,
const node_t * display_predicate,
#ifdef COLLAPSED_REGISTER
const bool _collapsed = false,
#endif
const bool _inverted = false)
: output_stream(_output_stream),
first_line_format(_first_line_format),
next_lines_format(_next_lines_format),
#ifdef COLLAPSED_REGISTER
collapsed(_collapsed),
#endif
inverted(_inverted), disp_pred_functor(display_predicate),
#ifdef COLLAPSED_REGISTER
count(0),
#endif
last_entry(NULL), last_xact(NULL) {}
#ifdef COLLAPSED_REGISTER
~format_transaction() {
if (subtotal)
report_cumulative_subtotal();
}
void report_cumulative_subtotal() const;
#endif
void operator()(transaction_t * xact) const;
};
template <typename Function>
class changed_value_filter
{
const Function& functor;
mutable entry_t modified_entry;
mutable transaction_t modified_xact;
mutable transaction_t * last_xact;
public:
changed_value_filter(const Function& _functor)
: functor(_functor), modified_xact(&modified_entry, NULL),
last_xact(NULL) {
modified_entry.payee = "Commodities revalued";
}
~changed_value_filter() {
(*this)(NULL);
}
void operator()(transaction_t * xact) const {
if (last_xact) {
balance_t prev_bal, cur_bal;
format_t::compute_total(prev_bal, details_t(last_xact));
std::time_t current = xact ? xact->entry->date : std::time(NULL);
std::time_t prev_date = last_xact->entry->date;
last_xact->entry->date = current;
format_t::compute_total(cur_bal, details_t(last_xact));
last_xact->entry->date = prev_date;
if (balance_t diff = cur_bal - prev_bal) {
modified_entry.date = current;
// jww (2004-08-07): What if there are multiple commodities?
assert(diff.amounts.size() == 1);
modified_xact.amount = diff.amount();
modified_xact.total = diff;
modified_xact.total.negate();
functor(&modified_xact);
}
}
if (xact)
functor(xact);
last_xact = xact;
}
};
class format_account
{
std::ostream& output_stream;
const format_t& format;
item_predicate<account_t> disp_pred_functor;
public:
format_account(std::ostream& _output_stream,
const format_t& _format,
const node_t * display_predicate = NULL)
: output_stream(_output_stream), format(_format),
disp_pred_functor(display_predicate) {}
void operator()(account_t * account,
const unsigned int max_depth = 1,
const bool report_top = false) const;
};
} // namespace ledger
#endif // _REPORT_H
|
