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
|
/*
Popup Plus plugin for Miranda IM
Copyright © 2002 Luca Santarelli,
© 2004-2007 Victor Pavlychko
© 2010 MPK
© 2010 Merlin_de
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/
#ifndef __formula_h__
#define __formula_h__
class Formula
{
public:
class Args
{
private:
struct Item
{
char *name;
int value;
Item *next;
Item(char *aName, int aValue, Item *aNext) : value(aValue), next(aNext) { name = aName ? mir_strdup(aName) : 0; }
~Item() { if (name) mir_free(name); }
};
Item *items;
public:
Args() :items(0){}
~Args(){ clear(); }
void add(char *name, int value)
{
for (Item *p = items; p; p = p->next)
if (!mir_strcmp(p->name, name))
{
p->value = value;
return;
}
items = new Item(name, value, items);
}
int get(char *name)
{
for (Item *p = items; p; p = p->next)
if (!mir_strcmp(p->name, name))
return p->value;
return 0;
}
void clear()
{
while (items)
{
Item *p = items->next;
delete items;
items = p;
}
}
};
private:
TCHAR *m_str;
int eval_neq(TCHAR *&s, Args *args, bool *vars) const;
int eval_sum(TCHAR *&s, Args *args, bool *vars) const;
int eval_mul(TCHAR *&s, Args *args, bool *vars) const;
int eval_atom(TCHAR *&s, Args *args, bool *vars) const;
public:
Formula() :m_str(mir_tstrdup(_T(""))) {}
Formula(TCHAR *s) :m_str(mir_tstrdup(s)) {}
~Formula() { mir_free(m_str); }
void set(TCHAR *s){ mir_free(m_str); m_str = mir_tstrdup(s); }
int eval(Args *args, bool *vars = 0) const;
};
#endif // __formula_h__
|