Added libksquirrel for KDE3

git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/libraries/libksquirrel@1095624 283d02a7-25f6-0310-bc7c-ecb5cbfe19da

1 files changed, 136 insertions, 0 deletions

diff --git a/kernel/ksquirrel-libs/fileio.cpp b/kernel/ksquirrel-libs/fileio.cpp
new file mode 100644
index 0000000..b7cea5c
--- /dev/null
+++ b/kernel/ksquirrel-libs/fileio.cpp
@@ -0,0 +1,136 @@
+/*  This file is part of ksquirrel-libs (http://ksquirrel.sf.net)
+
+    Copyright (c) 2004 Dmitry Baryshev <ksquirrel@tut.by>
+
+    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.  If not, write to
+    the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+    Boston, MA 02110-1301, USA.
+*/
+#include <stdio.h>
+#include <stdlib.h>
+
+#include "ksquirrel-libs/fileio.h"
+
+// implement read methods
+ifstreamK::ifstreamK() : ifstream()
+{}
+
+bool ifstreamK::readK(void *data, int size)
+{
+    read((char *)data, size);
+
+    return good();
+}
+
+bool ifstreamK::getS(char *s, const int sz)
+{
+    getline(s, sz);
+
+    return good();
+}
+
+bool ifstreamK::be_getchar(u8 *c)
+{
+    return readK(c, 1);
+}
+
+bool ifstreamK::be_getshort(u16 *s)
+{
+    u8 buf[2];
+
+    if(!readK(buf, 2))
+	return false;
+
+    *s = (buf[0] << 8) + buf[1];
+
+    return good();
+}
+
+bool ifstreamK::be_getlong(u32 *l)
+{
+    u8 buf[4];
+
+    if(!readK(buf, 4))
+	return false;
+
+    *l = (buf[0] << 24) + (buf[1] << 16) + (buf[2] << 8) + (buf[3]);
+
+    return good();
+}
+
+void ifstreamK::close()
+{
+    ifstream::close();
+    
+    clear();
+}
+
+bool ifstreamK::readCHex(u32 &hex)
+{
+    s8 prefix1, prefix2;
+    s8 h[9], c;
+    u32 i = 0;
+
+    if(!readK(&prefix1, sizeof(s8)))
+	return false;
+
+    if(!readK(&prefix2, sizeof(s8)))
+	return false;
+
+    if(prefix1 != '0' || prefix2 != 'x')
+	return false;
+
+    while(true)
+    {
+	if(!readK(&c, sizeof(s8)))
+	    return false;
+
+	if(c < '0' || c > '9')
+	{
+	    if(c != 'A' && c != 'B' && c != 'C' && c != 'D' && c != 'E' && c != 'F')
+	    {
+		seekg(-1, ios::cur);
+		break;
+	    }
+	}
+
+	h[i++] = c;
+    }
+
+    h[i] = '\0';
+
+    hex = strtol(h, NULL, 16);
+
+    return good();
+}
+
+
+// implement write methods
+ofstreamK::ofstreamK() : ofstream()
+{}
+
+bool ofstreamK::writeK(void *data, int size)
+{
+    write((char *)data, size);
+
+    return good();
+}
+
+void ofstreamK::close()
+{
+    ofstream::close();
+
+    clear();
+}