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
|
/***************************************************************************
copyright : (C) 2003-2006 by Robby Stephenson
email : robby@periapsis.org
***************************************************************************/
/***************************************************************************
* *
* This file has been modified to match the requirements of KBibTeX. *
* In case of problems or bugs arising from this implementation, please *
* contact the KBibTeX team first. *
* Thomas Fischer <fischer@unix-ag.uni-kl.de> *
* *
***************************************************************************/
/***************************************************************************
* *
* This program is free software; you can redistribute it and/or modify *
* it under the terms of version 2 of the GNU General Public License as *
* published by the Free Software Foundation; *
* *
***************************************************************************/
// this code was original published to the kde-core-devel email list
// copyright 2003 Harri Porten <porten@kde.org>
// Originally licensed under LGPL, included here under GPL v2
#ifndef LATIN1LITERAL_H
#define LATIN1LITERAL_H
#include <tqstring.h>
namespace KBibTeX {
/**
* A class for explicit marking of string literals encoded in the ISO
* 8859-1 character set. Allows for efficient, still (in terms of the
* chosen encoding) safe comparison with TQString instances. To be used
* like this:
*
* \code
* TQString s = .....
* if (s == Latin1Literal("o")) { ..... }
* \endcode
*
*/
#define Latin1Literal(s) \
KBibTeX::Latin1LiteralInternal((s), sizeof(s)/sizeof(char)-1)
class Latin1LiteralInternal {
public:
Latin1LiteralInternal(const char* s, size_t l)
: str(s), len(s ? l : (size_t)-1) { }
// this is lazy, leave these public since I can't figure out
// how to declare a friend function that works for gcc 2.95
const char* str;
size_t len;
};
} // end namespace
inline
bool operator==(const TQString& s1, const KBibTeX::Latin1LiteralInternal& s2) {
const TQChar* uc = s1.unicode();
const char* c = s2.str;
if(!c || !uc) {
return (!c && !uc);
}
const size_t& l = s2.len;
if(s1.length() != l) {
return false;
}
for(size_t i = 0; i < l; ++i, ++uc, ++c) {
if(uc->unicode() != static_cast<uchar>(*c)) {
return false;
}
}
return true;
}
inline
bool operator!=(const TQString& s1, const KBibTeX::Latin1LiteralInternal& s2) {
return !(s1 == s2);
}
inline
bool operator==(const KBibTeX::Latin1LiteralInternal& s1, const TQString& s2) {
return s2 == s1;
}
inline
bool operator!=(const KBibTeX::Latin1LiteralInternal& s1, const TQString& s2) {
return !(s2 == s1);
}
#endif
|
