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
|
/* This file is part of the KDE project
Copyright (C) 2001 Nicolas GOUTTE <goutte@kde.org>
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License as published by the Free Software Foundation; either
version 2 of the License, or (at your option) any later version.
This library 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
Library General Public License for more details.
You should have received a copy of the GNU Library General Public License
along with this library; see the file COPYING.LIB. If not, write to
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include <tqstringlist.h>
#include <tqregexp.h>
#include <kdebug.h>
#include "ImportHelpers.h"
bool AbiPropsMap::setProperty(const TQString& newName, const TQString& newValue)
{
replace(newName,AbiProps(newValue));
return true;
}
// Treat the "props" attribute of AbiWord's tags and split it in separates names and values
void AbiPropsMap::splitAndAddAbiProps(const TQString& strProps)
{
if (strProps.isEmpty())
return;
// Split the properties (we do not want empty ones)
TQStringList list=TQStringList::split(';',strProps,false);
TQString name,value;
TQStringList::ConstIterator it;
TQStringList::ConstIterator end(list.end());
for (it=list.begin();it!=end;++it)
{
const int result=(*it).find(':');
if (result==-1)
{
name=(*it);
value=TQString();
kdWarning(30506) << "Property without value: " << name << endl;
}
else
{
name=(*it).left(result);
value=(*it).mid(result+1);
}
// kdDebug(30506) << "========== (Property :" << name.stripWhiteSpace()<< "=" << value.stripWhiteSpace() <<":)"<<endl;
// Now set the property
setProperty(name.stripWhiteSpace(),value.stripWhiteSpace());
}
}
double ValueWithLengthUnit( const TQString& _str, bool* atleast )
{
if ( atleast )
*atleast = false;
double result;
// We search an unit (defined by a sequence of lower case characters), with possibly a + sign after it
TQRegExp unitExp("([a-z]+)\\s*(\\+?)");
const int pos=unitExp.search(_str);
if (pos==-1)
{
bool flag=false;
result=_str.toDouble(&flag);
if (!flag)
kdWarning(30506) << "Unknown value: " << _str << " (ValueWithLengthUnit)" << endl;
}
else
{
const double rawValue=_str.left(pos).toDouble();
const TQString strUnit ( unitExp.cap(1) );
if (strUnit=="cm")
result=CentimetresToPoints(rawValue);
else if (strUnit=="in")
result=InchesToPoints(rawValue);
else if (strUnit=="mm")
result=MillimetresToPoints(rawValue);
else if (strUnit=="pt")
result=rawValue;
else if(strUnit=="pi")
result=PicaToPoints(rawValue);
else
{
kdWarning(30506) << "Value " << _str << " has non-supported unit: "
<< strUnit << " (ValueWithLengthUnit)" << endl;
result=rawValue;
}
if ( atleast )
{
*atleast = ( unitExp.cap(2) == "+" );
}
// kdDebug(30506) << "Value: " << _str << " Unit: " << strUnit << " Result: " << result << endl;
}
return result;
}
|
