Fixing BR #147. Needs core update.
[quassel.git] / src / core / core.cpp
1 /***************************************************************************
2  *   Copyright (C) 2005-08 by the Quassel Project                          *
3  *   devel@quassel-irc.org                                                 *
4  *                                                                         *
5  *   This program is free software; you can redistribute it and/or modify  *
6  *   it under the terms of the GNU General Public License as published by  *
7  *   the Free Software Foundation; either version 2 of the License, or     *
8  *   (at your option) version 3.                                           *
9  *                                                                         *
10  *   This program is distributed in the hope that it will be useful,       *
11  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
12  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
13  *   GNU General Public License for more details.                          *
14  *                                                                         *
15  *   You should have received a copy of the GNU General Public License     *
16  *   along with this program; if not, write to the                         *
17  *   Free Software Foundation, Inc.,                                       *
18  *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
19  ***************************************************************************/
20
21 #include <QMetaObject>
22 #include <QMetaMethod>
23 #include <QMutexLocker>
24 #include <QCoreApplication>
25
26 #include "core.h"
27 #include "coresession.h"
28 #include "coresettings.h"
29 #include "signalproxy.h"
30 #include "sqlitestorage.h"
31 #include "network.h"
32
33 #include "util.h"
34
35 Core *Core::instanceptr = 0;
36 QMutex Core::mutex;
37
38 Core *Core::instance() {
39   if(instanceptr) return instanceptr;
40   instanceptr = new Core();
41   instanceptr->init();
42   return instanceptr;
43 }
44
45 void Core::destroy() {
46   delete instanceptr;
47   instanceptr = 0;
48 }
49
50 Core::Core() : storage(0) {
51   startTime = QDateTime::currentDateTime();  // for uptime :)
52
53   // Register storage backends here!
54   registerStorageBackend(new SqliteStorage(this));
55
56   if(!_storageBackends.count()) {
57     qWarning() << qPrintable(tr("Could not initialize any storage backend! Exiting..."));
58     exit(1); // TODO make this less brutal (especially for mono client -> popup)
59   }
60   connect(&_storageSyncTimer, SIGNAL(timeout()), this, SLOT(syncStorage()));
61   _storageSyncTimer.start(10 * 60 * 1000); // in msecs
62 }
63
64 void Core::init() {
65   configured = false;
66
67   CoreSettings cs;
68
69   if(!(configured = initStorage(cs.storageSettings().toMap()))) {
70     qWarning("Core is currently not configured! Please connect with a Quassel Client for basic setup.");
71
72     // try to migrate old settings
73     QVariantMap old = cs.oldDbSettings().toMap();
74     if(old.count() && old["Type"].toString().toUpper() == "SQLITE") {
75       QVariantMap newSettings;
76       newSettings["Backend"] = "SQLite";
77       if((configured = initStorage(newSettings))) {
78         qWarning("...but thankfully I found some old settings to migrate!");
79         cs.setStorageSettings(newSettings);
80       }
81     }
82   }
83
84   connect(&server, SIGNAL(newConnection()), this, SLOT(incomingConnection()));
85   if(!startListening(cs.port())) exit(1); // TODO make this less brutal
86 }
87
88 Core::~Core() {
89   foreach(QTcpSocket *socket, blocksizes.keys()) { qDebug() << "disconnecting" << socket << blocksizes.keys();
90     socket->disconnectFromHost();  // disconnect local (i.e. non-authed) clients
91   }
92   qDeleteAll(sessions);
93   qDeleteAll(_storageBackends);
94 }
95
96 /*** Session Restore ***/
97
98 void Core::saveState() {
99   CoreSettings s;
100   QVariantMap state;
101   QVariantList activeSessions;
102   foreach(UserId user, instance()->sessions.keys()) activeSessions << QVariant::fromValue<UserId>(user);
103   state["CoreStateVersion"] = 1;
104   state["ActiveSessions"] = activeSessions;
105   s.setCoreState(state);
106 }
107
108 void Core::restoreState() {
109   if(!instance()->configured) {
110     // qWarning() << qPrintable(tr("Cannot restore a state for an unconfigured core!"));
111     return;
112   }
113   if(instance()->sessions.count()) {
114     qWarning() << qPrintable(tr("Calling restoreState() even though active sessions exist!"));
115     return;
116   }
117   CoreSettings s;
118   /* We don't check, since we are at the first version since switching to Git
119   uint statever = s.coreState().toMap()["CoreStateVersion"].toUInt();
120   if(statever < 1) {
121     qWarning() << qPrintable(tr("Core state too old, ignoring..."));
122     return;
123   }
124   */
125   QVariantList activeSessions = s.coreState().toMap()["ActiveSessions"].toList();
126   if(activeSessions.count() > 0) {
127     qDebug() << "Restoring previous core state...";
128     foreach(QVariant v, activeSessions) {
129       UserId user = v.value<UserId>();
130       instance()->createSession(user, true);
131     }
132   }
133 }
134
135 /*** Core Setup ***/
136
137 QString Core::setupCore(const QVariant &setupData_) {
138   QVariantMap setupData = setupData_.toMap();
139   QString user = setupData.take("AdminUser").toString();
140   QString password = setupData.take("AdminPasswd").toString();
141   if(user.isEmpty() || password.isEmpty()) {
142     return tr("Admin user or password not set.");
143   }
144   if(!initStorage(setupData, true)) {
145     return tr("Could not setup storage!");
146   }
147   CoreSettings s;
148   s.setStorageSettings(setupData);
149   qDebug() << qPrintable(tr("Creating admin user..."));
150   mutex.lock();
151   storage->addUser(user, password);
152   mutex.unlock();
153   startListening();  // TODO check when we need this
154   return QString();
155 }
156
157 /*** Storage Handling ***/
158
159 bool Core::registerStorageBackend(Storage *backend) {
160   if(backend->isAvailable()) {
161     _storageBackends[backend->displayName()] = backend;
162     return true;
163   } else {
164     backend->deleteLater();
165     return false;
166   }
167 }
168
169 void Core::unregisterStorageBackend(Storage *backend) {
170   _storageBackends.remove(backend->displayName());
171   backend->deleteLater();
172 }
173
174 // old db settings:
175 // "Type" => "sqlite"
176 bool Core::initStorage(QVariantMap dbSettings, bool setup) {
177   QString backend = dbSettings["Backend"].toString();
178   if(backend.isEmpty()) {
179     //qWarning() << "No storage backend selected!";
180     return configured = false;
181   }
182
183   if(_storageBackends.contains(backend)) {
184     storage = _storageBackends[backend];
185   } else {
186     qWarning() << "Selected storage backend is not available:" << backend;
187     return configured = false;
188   }
189   if(!storage->init(dbSettings)) {
190     if(!setup || !(storage->setup(dbSettings) && storage->init(dbSettings))) {
191       qWarning() << "Could not init storage!";
192       storage = 0;
193       return configured = false;
194     }
195   }
196   // delete all other backends
197   foreach(Storage *s, _storageBackends.values()) {
198     if(s != storage) s->deleteLater();
199   }
200   _storageBackends.clear();
201
202   connect(storage, SIGNAL(bufferInfoUpdated(UserId, const BufferInfo &)), this, SIGNAL(bufferInfoUpdated(UserId, const BufferInfo &)));
203   return configured = true;
204 }
205
206 void Core::syncStorage() {
207   QMutexLocker locker(&mutex);
208   if(storage) storage->sync();
209 }
210
211 /*** Storage Access ***/
212 void Core::setUserSetting(UserId userId, const QString &settingName, const QVariant &data) {
213   QMutexLocker locker(&mutex);
214   instance()->storage->setUserSetting(userId, settingName, data);
215 }
216
217 QVariant Core::getUserSetting(UserId userId, const QString &settingName, const QVariant &data) {
218   QMutexLocker locker(&mutex);
219   return instance()->storage->getUserSetting(userId, settingName, data);
220 }
221
222 bool Core::createNetwork(UserId user, NetworkInfo &info) {
223   QMutexLocker locker(&mutex);
224   NetworkId networkId = instance()->storage->createNetwork(user, info);
225   if(!networkId.isValid())
226     return false;
227
228   info.networkId = networkId;
229   return true;
230 }
231
232 bool Core::updateNetwork(UserId user, const NetworkInfo &info) {
233   QMutexLocker locker(&mutex);
234   return instance()->storage->updateNetwork(user, info);
235 }
236
237 bool Core::removeNetwork(UserId user, const NetworkId &networkId) {
238   QMutexLocker locker(&mutex);
239   return instance()->storage->removeNetwork(user, networkId);
240 }
241
242 QList<NetworkInfo> Core::networks(UserId user) {
243   QMutexLocker locker(&mutex);
244   return instance()->storage->networks(user);
245 }
246
247 NetworkId Core::networkId(UserId user, const QString &network) {
248   QMutexLocker locker(&mutex);
249   return instance()->storage->getNetworkId(user, network);
250 }
251
252 QList<NetworkId> Core::connectedNetworks(UserId user) {
253   QMutexLocker locker(&mutex);
254   return instance()->storage->connectedNetworks(user);
255 }
256
257 void Core::setNetworkConnected(UserId user, const NetworkId &networkId, bool isConnected) {
258   QMutexLocker locker(&mutex);
259   return instance()->storage->setNetworkConnected(user, networkId, isConnected);
260 }
261
262 QHash<QString, QString> Core::persistentChannels(UserId user, const NetworkId &networkId) {
263   QMutexLocker locker(&mutex);
264   return instance()->storage->persistentChannels(user, networkId);
265 }
266
267 void Core::setChannelPersistent(UserId user, const NetworkId &networkId, const QString &channel, bool isJoined) {
268   QMutexLocker locker(&mutex);
269   return instance()->storage->setChannelPersistent(user, networkId, channel, isJoined);
270 }
271
272 void Core::setPersistentChannelKey(UserId user, const NetworkId &networkId, const QString &channel, const QString &key) {
273   QMutexLocker locker(&mutex);
274   return instance()->storage->setPersistentChannelKey(user, networkId, channel, key);
275 }
276
277 BufferInfo Core::bufferInfo(UserId user, const NetworkId &networkId, BufferInfo::Type type, const QString &buffer) {
278   QMutexLocker locker(&mutex);
279   return instance()->storage->getBufferInfo(user, networkId, type, buffer);
280 }
281
282 BufferInfo Core::getBufferInfo(UserId user, const BufferId &bufferId) {
283   QMutexLocker locker(&mutex);
284   return instance()->storage->getBufferInfo(user, bufferId);
285 }
286
287 MsgId Core::storeMessage(const Message &message) {
288   QMutexLocker locker(&mutex);
289   return instance()->storage->logMessage(message);
290 }
291
292 QList<Message> Core::requestMsgs(UserId user, BufferId buffer, int lastmsgs, int offset) {
293   QMutexLocker locker(&mutex);
294   return instance()->storage->requestMsgs(user, buffer, lastmsgs, offset);
295 }
296
297 QList<Message> Core::requestMsgs(UserId user, BufferId buffer, QDateTime since, int offset) {
298   QMutexLocker locker(&mutex);
299   return instance()->storage->requestMsgs(user, buffer, since, offset);
300 }
301
302 QList<Message> Core::requestMsgRange(UserId user, BufferId buffer, int first, int last) {
303   QMutexLocker locker(&mutex);
304   return instance()->storage->requestMsgRange(user, buffer, first, last);
305 }
306
307 QList<BufferInfo> Core::requestBuffers(UserId user) {
308   QMutexLocker locker(&mutex);
309   return instance()->storage->requestBuffers(user);
310 }
311
312 QList<BufferId> Core::requestBufferIdsForNetwork(UserId user, NetworkId networkId) {
313   QMutexLocker locker(&mutex);
314   return instance()->storage->requestBufferIdsForNetwork(user, networkId);
315 }
316
317 bool Core::removeBuffer(const UserId &user, const BufferId &bufferId) {
318   QMutexLocker locker(&mutex);
319   return instance()->storage->removeBuffer(user, bufferId);
320 }
321
322 BufferId Core::renameBuffer(const UserId &user, const NetworkId &networkId, const QString &newName, const QString &oldName) {
323   QMutexLocker locker(&mutex);
324   return instance()->storage->renameBuffer(user, networkId, newName, oldName);
325 }
326
327 void Core::setBufferLastSeenMsg(UserId user, const BufferId &bufferId, const MsgId &msgId) {
328   QMutexLocker locker(&mutex);
329   return instance()->storage->setBufferLastSeenMsg(user, bufferId, msgId);
330 }
331
332 QHash<BufferId, MsgId> Core::bufferLastSeenMsgIds(UserId user) {
333   QMutexLocker locker(&mutex);
334   return instance()->storage->bufferLastSeenMsgIds(user);
335 }
336
337 /*** Network Management ***/
338
339 bool Core::startListening(uint port) {
340   if(!server.listen(QHostAddress::Any, port)) {
341     qWarning("%s", qPrintable(QString("Could not open GUI client port %1: %2").arg(port).arg(server.errorString())));
342     return false;
343   }
344   qDebug() << "Listening for GUI clients on port" << server.serverPort();
345   return true;
346 }
347
348 void Core::stopListening() {
349   server.close();
350   qDebug() << "No longer listening for GUI clients.";
351 }
352
353 void Core::incomingConnection() {
354   while(server.hasPendingConnections()) {
355     QTcpSocket *socket = server.nextPendingConnection();
356     connect(socket, SIGNAL(disconnected()), this, SLOT(clientDisconnected()));
357     connect(socket, SIGNAL(readyRead()), this, SLOT(clientHasData()));
358     connect(socket, SIGNAL(error(QAbstractSocket::SocketError)), this, SLOT(socketError(QAbstractSocket::SocketError)));
359     
360     QVariantMap clientInfo;
361     blocksizes.insert(socket, (quint32)0);
362     qDebug() << "Client connected from"  << qPrintable(socket->peerAddress().toString());
363
364     if (!configured) {
365       server.close();
366       qDebug() << "Closing server for basic setup.";
367     }
368   }
369 }
370
371 void Core::clientHasData() {
372   QTcpSocket *socket = dynamic_cast<QTcpSocket*>(sender());
373   Q_ASSERT(socket && blocksizes.contains(socket));
374   QVariant item;
375   while(SignalProxy::readDataFromDevice(socket, blocksizes[socket], item)) {
376     QVariantMap msg = item.toMap();
377     processClientMessage(socket, msg);
378     if(!blocksizes.contains(socket)) break;  // this socket is no longer ours to handle!
379   }
380 }
381
382 void Core::processClientMessage(QTcpSocket *socket, const QVariantMap &msg) {
383   if(!msg.contains("MsgType")) {
384     // Client is way too old, does not even use the current init format
385     qWarning() << qPrintable(tr("Antique client trying to connect... refusing."));
386     socket->close();
387     return;
388   }
389   // OK, so we have at least an init message format we can understand
390   if(msg["MsgType"] == "ClientInit") {
391     QVariantMap reply;
392
393     // Just version information -- check it!
394     if((msg.contains("ClientBuild") && msg["ClientBuild"].toUInt() < 732)
395        || (!msg.contains("ClientBuild") && msg["ProtocolVersion"].toUInt() < Global::coreNeedsProtocol)) {
396       reply["MsgType"] = "ClientInitReject";
397       reply["Error"] = tr("<b>Your Quassel Client is too old!</b><br>"
398       "This core needs at least client/core protocol version %1.<br>"
399       "Please consider upgrading your client.").arg(Global::coreNeedsProtocol);
400       SignalProxy::writeDataToDevice(socket, reply);
401       qWarning() << qPrintable(tr("Client %1 too old, rejecting.").arg(socket->peerAddress().toString()));
402       socket->close(); return;
403     }
404
405     reply["CoreVersion"] = Global::quasselVersion;
406     reply["CoreDate"] = Global::quasselBuildDate;
407     reply["CoreBuild"] = 860; // FIXME legacy
408     reply["ProtocolVersion"] = Global::protocolVersion;
409     // TODO: Make the core info configurable
410     int uptime = startTime.secsTo(QDateTime::currentDateTime());
411     int updays = uptime / 86400; uptime %= 86400;
412     int uphours = uptime / 3600; uptime %= 3600;
413     int upmins = uptime / 60;
414     reply["CoreInfo"] = tr("<b>Quassel Core Version %1</b><br>"
415                             "Built: %2<br>"
416                             "Up %3d%4h%5m (since %6)").arg(Global::quasselVersion).arg(Global::quasselBuildDate)
417                             .arg(updays).arg(uphours,2,10,QChar('0')).arg(upmins,2,10,QChar('0')).arg(startTime.toString(Qt::TextDate));
418
419 #ifndef QT_NO_OPENSSL
420     SslServer *sslServer = qobject_cast<SslServer *>(&server);
421     QSslSocket *sslSocket = qobject_cast<QSslSocket *>(socket);
422     bool supportSsl = (bool)sslServer && (bool)sslSocket && sslServer->certIsValid();
423 #else
424     bool supportSsl = false;
425 #endif
426
427 #ifndef QT_NO_COMPRESS
428     bool supportsCompression = true;
429 #else
430     bool supportsCompression = false;
431 #endif
432
433     reply["SupportSsl"] = supportSsl;
434     reply["SupportsCompression"] = supportsCompression;
435     // switch to ssl/compression after client has been informed about our capabilities (see below)
436
437     reply["LoginEnabled"] = true;
438
439     // check if we are configured, start wizard otherwise
440     if(!configured) {
441       reply["Configured"] = false;
442       QList<QVariant> backends;
443       foreach(Storage *backend, _storageBackends.values()) {
444         QVariantMap v;
445         v["DisplayName"] = backend->displayName();
446         v["Description"] = backend->description();
447         backends.append(v);
448       }
449       reply["StorageBackends"] = backends;
450       reply["LoginEnabled"] = false;
451     } else {
452       reply["Configured"] = true;
453     }
454     clientInfo[socket] = msg; // store for future reference
455     reply["MsgType"] = "ClientInitAck";
456     SignalProxy::writeDataToDevice(socket, reply);
457
458 #ifndef QT_NO_OPENSSL
459     // after we told the client that we are ssl capable we switch to ssl mode
460     if(supportSsl && msg["UseSsl"].toBool()) {
461       qDebug() << "Starting TLS for Client:" << qPrintable(socket->peerAddress().toString());
462       connect(sslSocket, SIGNAL(sslErrors(const QList<QSslError> &)), this, SLOT(sslErrors(const QList<QSslError> &)));
463       sslSocket->startServerEncryption();
464     }
465 #endif
466
467 #ifndef QT_NO_COMPRESS
468     if(supportsCompression && msg["UseCompression"].toBool()) {
469       socket->setProperty("UseCompression", true);
470       qDebug() << "Using compression for Client:" << qPrintable(socket->peerAddress().toString());
471     }
472 #endif
473     
474   } else {
475     // for the rest, we need an initialized connection
476     if(!clientInfo.contains(socket)) {
477       QVariantMap reply;
478       reply["MsgType"] = "ClientLoginReject";
479       reply["Error"] = tr("<b>Client not initialized!</b><br>You need to send an init message before trying to login.");
480       SignalProxy::writeDataToDevice(socket, reply);
481       qWarning() << qPrintable(tr("Client %1 did not send an init message before trying to login, rejecting.").arg(socket->peerAddress().toString()));
482       socket->close(); return;
483     }
484     if(msg["MsgType"] == "CoreSetupData") {
485       QVariantMap reply;
486       QString result = setupCore(msg["SetupData"]);
487       if(!result.isEmpty()) {
488         reply["MsgType"] = "CoreSetupReject";
489         reply["Error"] = result;
490       } else {
491         reply["MsgType"] = "CoreSetupAck";
492       }
493       SignalProxy::writeDataToDevice(socket, reply);
494     } else if(msg["MsgType"] == "ClientLogin") {
495       QVariantMap reply;
496       mutex.lock();
497       UserId uid = storage->validateUser(msg["User"].toString(), msg["Password"].toString());
498       mutex.unlock();
499       if(uid == 0) {
500         reply["MsgType"] = "ClientLoginReject";
501         reply["Error"] = tr("<b>Invalid username or password!</b><br>The username/password combination you supplied could not be found in the database.");
502         SignalProxy::writeDataToDevice(socket, reply);
503         return;
504       }
505       reply["MsgType"] = "ClientLoginAck";
506       SignalProxy::writeDataToDevice(socket, reply);
507       qDebug() << qPrintable(tr("Client %1 initialized and authenticated successfully as \"%2\" (UserId: %3).").arg(socket->peerAddress().toString(), msg["User"].toString()).arg(uid.toInt()));
508       setupClientSession(socket, uid);
509     }
510   }
511 }
512
513 // Potentially called during the initialization phase (before handing the connection off to the session)
514 void Core::clientDisconnected() {
515   QTcpSocket *socket = dynamic_cast<QTcpSocket*>(sender());  // Note: This might be a QObject* already (if called by ~Core())!
516   Q_ASSERT(socket);
517   blocksizes.remove(socket);
518   clientInfo.remove(socket);
519   qDebug() << qPrintable(tr("Non-authed client disconnected."));
520   socket->deleteLater();
521   socket = 0;
522
523   // make server listen again if still not configured
524   if (!configured) {
525     startListening();
526   }
527
528   // TODO remove unneeded sessions - if necessary/possible...
529   // Suggestion: kill sessions if they are not connected to any network and client.
530 }
531
532 void Core::setupClientSession(QTcpSocket *socket, UserId uid) {
533   // Find or create session for validated user
534   SessionThread *sess;
535   if(sessions.contains(uid)) sess = sessions[uid];
536   else sess = createSession(uid);
537   // Hand over socket, session then sends state itself
538   disconnect(socket, 0, this, 0);
539   blocksizes.remove(socket);
540   clientInfo.remove(socket);
541   if(!sess) {
542     qWarning() << qPrintable(tr("Could not initialize session for client %1!").arg(socket->peerAddress().toString()));
543     socket->close();
544   }
545   sess->addClient(socket);
546 }
547
548 SessionThread *Core::createSession(UserId uid, bool restore) {
549   if(sessions.contains(uid)) {
550     qWarning() << "Calling createSession() when a session for the user already exists!";
551     return 0;
552   }
553   SessionThread *sess = new SessionThread(uid, restore, this);
554   sessions[uid] = sess;
555   sess->start();
556   return sess;
557 }
558
559 #ifndef QT_NO_OPENSSL
560 void Core::sslErrors(const QList<QSslError> &errors) {
561   Q_UNUSED(errors);
562   QSslSocket *socket = qobject_cast<QSslSocket *>(sender());
563   if(socket)
564     socket->ignoreSslErrors();
565 }
566 #endif
567
568 void Core::socketError(QAbstractSocket::SocketError err) {
569   QAbstractSocket *socket = qobject_cast<QAbstractSocket *>(sender());
570   if(socket && err != QAbstractSocket::RemoteHostClosedError)
571     qDebug() << "Core::socketError()" << socket << err << socket->errorString();
572 }