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
|
//////////////////////////////////////////////////////////////////////////
//
// pgScript - PostgreSQL Tools
//
// Copyright (C) 2002 - 2014, The pgAdmin Development Team
// This software is released under the PostgreSQL Licence
//
//////////////////////////////////////////////////////////////////////////
#include "pgAdmin3.h"
#include "pgscript/expressions/pgsGenDictionary.h"
#include <wx/filename.h>
#include "pgscript/exceptions/pgsParameterException.h"
#include "pgscript/generators/pgsDictionaryGen.h"
#include "pgscript/objects/pgsGenerator.h"
pgsGenDictionary::pgsGenDictionary(const pgsExpression *file_path, const pgsExpression *sequence,
const pgsExpression *seed, const pgsExpression *wx_conv) :
pgsExpression(), m_file_path(file_path), m_sequence(sequence), m_seed(seed),
m_wx_conv(wx_conv)
{
}
pgsGenDictionary::~pgsGenDictionary()
{
pdelete(m_file_path);
pdelete(m_sequence);
pdelete(m_seed);
pdelete(m_wx_conv);
}
pgsExpression *pgsGenDictionary::clone() const
{
return pnew pgsGenDictionary(*this);
}
pgsGenDictionary::pgsGenDictionary(const pgsGenDictionary &that) :
pgsExpression(that)
{
m_file_path = that.m_file_path->clone();
m_sequence = that.m_sequence->clone();
m_seed = that.m_seed->clone();
m_wx_conv = that.m_wx_conv->clone();
}
pgsGenDictionary &pgsGenDictionary::operator =(const pgsGenDictionary &that)
{
if (this != &that)
{
pgsExpression::operator=(that);
pdelete(m_file_path);
pdelete(m_sequence);
pdelete(m_seed);
pdelete(m_wx_conv);
m_file_path = that.m_file_path->clone();
m_sequence = that.m_sequence->clone();
m_seed = that.m_seed->clone();
m_wx_conv = that.m_wx_conv->clone();
}
return (*this);
}
wxString pgsGenDictionary::value() const
{
return wxString() << wxT("file[ file = ") << m_file_path->value() << wxT(" sequence = ")
<< m_sequence->value() << wxT(" seed = ") << m_seed->value()
<< wxT(" encoding = ") << m_wx_conv->value() << wxT(" ]");
}
pgsOperand pgsGenDictionary::eval(pgsVarMap &vars) const
{
// Evaluate parameters
pgsOperand file_path(m_file_path->eval(vars));
pgsOperand sequence(m_sequence->eval(vars));
pgsOperand seed(m_seed->eval(vars));
pgsOperand wx_conv(m_wx_conv->eval(vars));
// Check parameters and create the generator
if (file_path->is_string() && sequence->is_integer() && seed->is_integer()
&& wx_conv->is_string())
{
wxFileName file(file_path->value());
if (file.FileExists() && file.IsFileReadable())
{
long aux_sequence, aux_seed;
sequence->value().ToLong(&aux_sequence);
seed->value().ToLong(&aux_seed);
return pnew pgsGenerator(pgsVariable::pgsTString,
pnew pgsDictionaryGen(file_path->value(), aux_sequence != 0,
aux_seed, wxCSConv(wx_conv->value())));
}
else
{
throw pgsParameterException(wxString() << value()
<< wxT(":\nFile <") << file_path->value()
<< wxT("> does not exist"));
}
}
else
{
// Deal with errors
if (!file_path->is_string())
{
throw pgsParameterException(wxString() << value()
<< wxT(":\nfile should be a string"));
}
else if (!sequence->is_integer())
{
throw pgsParameterException(wxString() << value()
<< wxT(":\nsequence should be an integer"));
}
else if (!seed->is_integer())
{
throw pgsParameterException(wxString() << value()
<< wxT(":\nseed should be an integer"));
}
else
{
throw pgsParameterException(wxString() << value()
<< wxT(":\nencoding should be a string"));
}
}
}
|
