Add Qt3 development HEAD version

1 files changed, 485 insertions, 0 deletions

diff --git a/src/codecs/qeucjpcodec.cpp b/src/codecs/qeucjpcodec.cpp
new file mode 100644
index 0000000..ca3d465
--- /dev/null
+++ b/src/codecs/qeucjpcodec.cpp
@@ -0,0 +1,485 @@
+/****************************************************************************
+**
+** Implementation of QEucJpCodec class
+**
+** Created : 990225
+**
+** Copyright (C) 2000-2008 Trolltech ASA.  All rights reserved.
+**
+** This file is part of the tools module of the Qt GUI Toolkit.
+**
+** This file may be used under the terms of the GNU General
+** Public License versions 2.0 or 3.0 as published by the Free
+** Software Foundation and appearing in the files LICENSE.GPL2
+** and LICENSE.GPL3 included in the packaging of this file.
+** Alternatively you may (at your option) use any later version
+** of the GNU General Public License if such license has been
+** publicly approved by Trolltech ASA (or its successors, if any)
+** and the KDE Free Qt Foundation.
+**
+** Please review the following information to ensure GNU General
+** Public Licensing requirements will be met:
+** http://trolltech.com/products/qt/licenses/licensing/opensource/.
+** If you are unsure which license is appropriate for your use, please
+** review the following information:
+** http://trolltech.com/products/qt/licenses/licensing/licensingoverview
+** or contact the sales department at sales@trolltech.com.
+**
+** This file may be used under the terms of the Q Public License as
+** defined by Trolltech ASA and appearing in the file LICENSE.QPL
+** included in the packaging of this file.  Licensees holding valid Qt
+** Commercial licenses may use this file in accordance with the Qt
+** Commercial License Agreement provided with the Software.
+**
+** This file is provided "AS IS" with NO WARRANTY OF ANY KIND,
+** INCLUDING THE WARRANTIES OF DESIGN, MERCHANTABILITY AND FITNESS FOR
+** A PARTICULAR PURPOSE. Trolltech reserves all rights not granted
+** herein.
+**
+**********************************************************************/
+
+// Most of the code here was originally written by Serika Kurusugawa
+// a.k.a. Junji Takagi, and is included in Qt with the author's permission,
+// and the grateful thanks of the Trolltech team.
+
+/*! \class QEucJpCodec qeucjpcodec.h
+    \reentrant
+    \ingroup i18n
+
+  \brief The QEucJpCodec class provides conversion to and from EUC-JP character sets.
+
+  More precisely, the QEucJpCodec class subclasses QTextCodec to
+  provide support for EUC-JP, the main legacy encoding for Unix
+  machines in Japan.
+
+  The environment variable \c UNICODEMAP_JP can be used to fine-tune
+  QJisCodec, QSjisCodec and QEucJpCodec. The \l QJisCodec
+  documentation describes how to use this variable.
+
+  Most of the code here was written by Serika Kurusugawa,
+  a.k.a. Junji Takagi, and is included in Qt with the author's
+  permission and the grateful thanks of the Trolltech team. Here is
+  the copyright statement for that code:
+
+  \legalese
+
+  Copyright (C) 1999 Serika Kurusugawa. All rights reserved.
+
+  Redistribution and use in source and binary forms, with or without
+  modification, are permitted provided that the following conditions
+  are met:
+  \list 1
+  \i Redistributions of source code must retain the above copyright
+     notice, this list of conditions and the following disclaimer.
+  \i Redistributions in binary form must reproduce the above copyright
+     notice, this list of conditions and the following disclaimer in the
+     documentation and/or other materials provided with the distribution.
+  \endlist
+
+  THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS "AS IS".
+  ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+  ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+  FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+  DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+  OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+  HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+  LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+  OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+  SUCH DAMAGE.
+*/
+
+/*
+ * Copyright (C) 1999 Serika Kurusugawa, All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
+#include "qeucjpcodec.h"
+
+#ifndef QT_NO_BIG_CODECS
+
+static const uchar Esc = 0x1b;
+static const uchar Ss2 = 0x8e;	// Single Shift 2
+static const uchar Ss3 = 0x8f;	// Single Shift 3
+
+#define	IsKana(c)	(((c) >= 0xa1) && ((c) <= 0xdf))
+#define	IsEucChar(c)	(((c) >= 0xa1) && ((c) <= 0xfe))
+
+#define	QValidChar(u)	((u) ? QChar((ushort)(u)) : QChar::replacement)
+
+/*!
+  Constructs a QEucJpCodec.
+*/
+QEucJpCodec::QEucJpCodec() : conv(QJpUnicodeConv::newConverter( QJpUnicodeConv::Default ))
+{
+}
+
+/*!
+  Destroys the codec.
+*/
+QEucJpCodec::~QEucJpCodec()
+{
+    delete (QJpUnicodeConv*)conv;
+    conv = 0;
+}
+
+/*!
+  Returns 18.
+*/
+int QEucJpCodec::mibEnum() const
+{
+    /*
+    Name: Extended_UNIX_Code_Packed_Format_for_Japanese
+    MIBenum: 18
+    Source: Standardized by OSF, UNIX International, and UNIX Systems
+	    Laboratories Pacific.  Uses ISO 2022 rules to select
+		   code set 0: US-ASCII (a single 7-bit byte set)
+		   code set 1: JIS X0208-1990 (a double 8-bit byte set)
+			       restricted to A0-FF in both bytes
+		   code set 2: Half Width Katakana (a single 7-bit byte set)
+			       requiring SS2 as the character prefix
+		   code set 3: JIS X0212-1990 (a double 7-bit byte set)
+			       restricted to A0-FF in both bytes
+			       requiring SS3 as the character prefix
+    Alias: csEUCPkdFmtJapanese
+    Alias: EUC-JP  (preferred MIME name)
+    */
+    return 18;
+}
+
+/*!
+  \reimp
+*/
+QCString QEucJpCodec::fromUnicode(const QString& uc, int& lenInOut) const
+{
+    int l = QMIN((int)uc.length(),lenInOut);
+    int rlen = l*3+1;
+    QCString rstr(rlen);
+    uchar* cursor = (uchar*)rstr.data();
+    for (int i=0; i<l; i++) {
+	QChar ch = uc[i];
+	uint j;
+	if ( ch.row() == 0x00 && ch.cell() < 0x80 ) {
+	    // ASCII
+	    *cursor++ = ch.cell();
+	} else if ((j = conv->unicodeToJisx0201(ch.row(), ch.cell())) != 0) {
+	    if (j < 0x80) {
+		// JIS X 0201 Latin ?
+		*cursor++ = j;
+	    } else {
+		// JIS X 0201 Kana
+		*cursor++ = Ss2;
+		*cursor++ = j;
+	    }
+	} else if ((j = conv->unicodeToJisx0208(ch.row(), ch.cell())) != 0) {
+	    // JIS X 0208
+	    *cursor++ = (j >> 8)   | 0x80;
+	    *cursor++ = (j & 0xff) | 0x80;
+	} else if ((j = conv->unicodeToJisx0212(ch.row(), ch.cell())) != 0) {
+	    // JIS X 0212
+	    *cursor++ = Ss3;
+	    *cursor++ = (j >> 8)   | 0x80;
+	    *cursor++ = (j & 0xff) | 0x80;
+	} else {
+	    // Error
+	    *cursor++ = '?';	// unknown char
+	}
+    }
+    lenInOut = cursor - (uchar*)rstr.data();
+    rstr.truncate(lenInOut);
+    return rstr;
+}
+
+/*!
+  \reimp
+*/
+QString QEucJpCodec::toUnicode(const char* chars, int len) const
+{
+    QString result;
+    for (int i=0; i<len; i++) {
+	uchar ch = chars[i];
+	if ( ch < 0x80 ) {
+	    // ASCII
+	    result += QChar(ch);
+	} else if ( ch == Ss2 ) {
+	    // JIS X 0201 Kana
+	    if ( i < len-1 ) {
+		uchar c2 = chars[++i];
+		if ( IsKana(c2) ) {
+		    uint u = conv->jisx0201ToUnicode(c2);
+		    result += QValidChar(u);
+		} else {
+		    i--;
+		    result += QChar::replacement;
+		}
+	    }
+	} else if ( ch == Ss3 ) {
+	    // JIS X 0212
+	    if ( i < len-1 ) {
+		uchar c2 = chars[++i];
+		if ( IsEucChar(c2) ) {
+		    if ( i < len-1 ) {
+			uchar c3 = chars[++i];
+			if ( IsEucChar(c3) ) {
+			    uint u = conv->jisx0212ToUnicode(c2 & 0x7f, c3 & 0x7f);
+			    result += QValidChar(u);
+			} else {
+			    i--;
+			    result += QChar::replacement;
+			}
+		    } else {
+			result += QChar::replacement;
+		    }
+		} else {
+		    i--;
+		    result += QChar::replacement;
+		}
+	    } else {
+		result += QChar::replacement;
+	    }
+	} else if ( IsEucChar(ch) ) {
+	    // JIS X 0208
+	    if ( i < len-1 ) {
+		uchar c2 = chars[++i];
+		if ( IsEucChar(c2) ) {
+		    uint u = conv->jisx0208ToUnicode(ch & 0x7f, c2 & 0x7f);
+		    result += QValidChar(u);
+		} else {
+		    i--;
+		    result += QChar::replacement;
+		}
+	    } else {
+		result += QChar::replacement;
+	    }
+	} else {
+	    // Invalid
+	    result += QChar::replacement;
+	}
+    }
+    return result;
+}
+
+/*!
+  \reimp
+*/
+const char* QEucJpCodec::name() const
+{
+    return "eucJP";
+}
+
+/*!
+    Returns the codec's mime name.
+*/
+const char* QEucJpCodec::mimeName() const
+{
+    return "EUC-JP";
+}
+
+/*!
+  \reimp
+*/
+int QEucJpCodec::heuristicNameMatch(const char* hint) const
+{
+    int score = 0;
+    bool ja = FALSE;
+    if (qstrnicmp(hint, "ja_JP", 5) == 0 || qstrnicmp(hint, "japan", 5) == 0) {
+	score += 3;
+	ja = TRUE;
+    } else if (qstrnicmp(hint, "ja", 2) == 0) {
+	score += 2;
+	ja = TRUE;
+    }
+    const char *p;
+    if (ja) {
+	p = strchr(hint, '.');
+	if (p == 0) {
+	    return score;
+	}
+	p++;
+    } else {
+	p = hint;
+    }
+    if (p) {
+	if ((qstricmp(p, "AJEC") == 0) ||
+	    (qstricmp(p, "eucJP") == 0) ||
+	    (qstricmp(p, "ujis") == 0) ||
+	    (simpleHeuristicNameMatch(p, "eucJP") > 0) ||
+	    (simpleHeuristicNameMatch(p, "x-euc-jp") > 0)) {
+	    return score + 4;
+	}
+	// there exists ja_JP.EUC, ko_KR.EUC, zh_CN.EUC and zh_TW.EUC
+	// so "euc" may or may not be Japanese EUC.
+	if (qstricmp(p, "euc") == 0 && ja) {
+	    return score + 4;
+	}
+    }
+    return QTextCodec::heuristicNameMatch(hint);
+}
+
+/*!
+  \reimp
+*/
+int QEucJpCodec::heuristicContentMatch(const char* chars, int len) const
+{
+    int score = 0;
+    for (int i=0; i<len; i++) {
+	uchar ch = chars[i];
+	// No nulls allowed.
+	if ( !ch || ch == Esc )
+	    return -1;
+	if ( ch < 32 && ch != '\t' && ch != '\n' && ch != '\r' ) {
+	    // Suspicious
+	    if ( score )
+		score--;
+	} else if ( ch < 0x80 ) {
+	    // Inconclusive
+	    score++;
+	} else if ( ch == Ss2 ) {
+	    // JIS X 0201 Kana
+	    if ( i < len-1 ) {
+		uchar c2 = chars[++i];
+		if ( !IsKana(c2) )
+		    return -1;
+		score+=2;
+	    }
+	    score++;
+	} else if ( ch == Ss3 ) {
+	    // JIS X 0212
+	    if ( i < len-1 ) {
+		uchar c2 = chars[++i];
+		if ( !IsEucChar(c2) )
+		    return -1;
+		if ( i < len-1 ) {
+		    uchar c3 = chars[++i];
+		    if ( !IsEucChar(c3) )
+			return -1;
+		    score++;
+		}
+		score+=2;
+	    }
+	    score++;
+	} else if ( IsEucChar(ch) ) {
+	    // JIS X 0208-1990
+	    if ( i < len-1 ) {
+		uchar c2 = chars[++i];
+		if ( !IsEucChar(c2) )
+		    return -1;
+		score+=2;
+	    }
+	    score++;
+	} else {
+	    // Invalid
+	    return -1;
+	}
+    }
+    return score;
+}
+
+class QEucJpDecoder : public QTextDecoder {
+    uchar buf[2];
+    int nbuf;
+    const QJpUnicodeConv * const conv;
+public:
+    QEucJpDecoder(const QJpUnicodeConv *c) : nbuf(0), conv(c)
+    {
+    }
+
+    QString toUnicode(const char* chars, int len)
+    {
+	QString result;
+	for (int i=0; i<len; i++) {
+	    uchar ch = chars[i];
+	    switch (nbuf) {
+	      case 0:
+		if ( ch < 0x80 ) {
+		    // ASCII
+		    result += QChar(ch);
+		} else if ( ch == Ss2 || ch == Ss3 ) {
+		    // JIS X 0201 Kana or JIS X 0212
+		    buf[0] = ch;
+		    nbuf = 1;
+		} else if ( IsEucChar(ch) ) {
+		    // JIS X 0208
+		    buf[0] = ch;
+		    nbuf = 1;
+		} else {
+		    // Invalid
+		    result += QChar::replacement;
+		}
+		break;
+	      case 1:
+		if ( buf[0] == Ss2 ) {
+		    // JIS X 0201 Kana
+		    if ( IsKana(ch) ) {
+			uint u = conv->jisx0201ToUnicode(ch);
+			result += QValidChar(u);
+		    } else {
+			result += QChar::replacement;
+		    }
+		    nbuf = 0;
+		} else if ( buf[0] == Ss3 ) {
+		    // JIS X 0212-1990
+		    if ( IsEucChar(ch) ) {
+			buf[1] = ch;
+			nbuf = 2;
+		    } else {
+			// Error
+			result += QChar::replacement;
+			nbuf = 0;
+		    }
+		} else {
+		    // JIS X 0208-1990
+		    if ( IsEucChar(ch) ) {
+			uint u = conv->jisx0208ToUnicode(buf[0] & 0x7f, ch & 0x7f);
+			result += QValidChar(u);
+		    } else {
+			// Error
+			result += QChar::replacement;
+		    }
+		    nbuf = 0;
+		}
+		break;
+	    case 2:
+		// JIS X 0212
+		if ( IsEucChar(ch) ) {
+		    uint u = conv->jisx0212ToUnicode(buf[1] & 0x7f, ch & 0x7f);
+		    result += QValidChar(u);
+		} else {
+		    result += QChar::replacement;
+		}
+		nbuf = 0;
+	    }
+	}
+	return result;
+    }
+};
+
+/*!
+  \reimp
+*/
+QTextDecoder* QEucJpCodec::makeDecoder() const
+{
+    return new QEucJpDecoder(conv);
+}
+
+#endif