0447a341e60bc1357507f4d408771ca39f27a23d
[quassel.git] / src / core / core.cpp
1 /***************************************************************************
2  *   Copyright (C) 2005-09 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 <QCoreApplication>
22
23 #include "core.h"
24 #include "coresession.h"
25 #include "coresettings.h"
26 #include "postgresqlstorage.h"
27 #include "quassel.h"
28 #include "signalproxy.h"
29 #include "sqlitestorage.h"
30 #include "network.h"
31 #include "logger.h"
32
33 #include "util.h"
34
35 // migration related
36 #include <QFile>
37 #ifdef Q_OS_WIN32
38 #  include <windows.h>
39 #else
40 #  include <unistd.h>
41 #  include <termios.h>
42 #endif /* Q_OS_WIN32 */
43
44 // ==============================
45 //  Custom Events
46 // ==============================
47 const int Core::AddClientEventId = QEvent::registerEventType();
48
49 class AddClientEvent : public QEvent {
50 public:
51   AddClientEvent(QTcpSocket *socket, UserId uid) : QEvent(QEvent::Type(Core::AddClientEventId)), socket(socket), userId(uid) {}
52   QTcpSocket *socket;
53   UserId userId;
54 };
55
56
57 // ==============================
58 //  Core
59 // ==============================
60 Core *Core::instanceptr = 0;
61
62 Core *Core::instance() {
63   if(instanceptr) return instanceptr;
64   instanceptr = new Core();
65   instanceptr->init();
66   return instanceptr;
67 }
68
69 void Core::destroy() {
70   delete instanceptr;
71   instanceptr = 0;
72 }
73
74 Core::Core()
75   : _storage(0)
76 {
77   _startTime = QDateTime::currentDateTime().toUTC();  // for uptime :)
78
79   Quassel::loadTranslation(QLocale::system());
80
81   // FIXME: MIGRATION 0.3 -> 0.4: Move database and core config to new location
82   // Move settings, note this does not delete the old files
83 #ifdef Q_WS_MAC
84     QSettings newSettings("quassel-irc.org", "quasselcore");
85 #else
86
87 # ifdef Q_WS_WIN
88     QSettings::Format format = QSettings::IniFormat;
89 # else
90     QSettings::Format format = QSettings::NativeFormat;
91 # endif
92     QString newFilePath = Quassel::configDirPath() + "quasselcore"
93     + ((format == QSettings::NativeFormat) ? QLatin1String(".conf") : QLatin1String(".ini"));
94     QSettings newSettings(newFilePath, format);
95 #endif /* Q_WS_MAC */
96
97   if(newSettings.value("Config/Version").toUInt() == 0) {
98 #   ifdef Q_WS_MAC
99     QString org = "quassel-irc.org";
100 #   else
101     QString org = "Quassel Project";
102 #   endif
103     QSettings oldSettings(org, "Quassel Core");
104     if(oldSettings.allKeys().count()) {
105       qWarning() << "\n\n*** IMPORTANT: Config and data file locations have changed. Attempting to auto-migrate your core settings...";
106       foreach(QString key, oldSettings.allKeys())
107         newSettings.setValue(key, oldSettings.value(key));
108       newSettings.setValue("Config/Version", 1);
109       qWarning() << "*   Your core settings have been migrated to" << newSettings.fileName();
110
111 #ifndef Q_WS_MAC /* we don't need to move the db and cert for mac */
112 #ifdef Q_OS_WIN32
113       QString quasselDir = qgetenv("APPDATA") + "/quassel/";
114 #elif defined Q_WS_MAC
115       QString quasselDir = QDir::homePath() + "/Library/Application Support/Quassel/";
116 #else
117       QString quasselDir = QDir::homePath() + "/.quassel/";
118 #endif
119
120       QFileInfo info(Quassel::configDirPath() + "quassel-storage.sqlite");
121       if(!info.exists()) {
122       // move database, if we found it
123         QFile oldDb(quasselDir + "quassel-storage.sqlite");
124         if(oldDb.exists()) {
125           bool success = oldDb.rename(Quassel::configDirPath() + "quassel-storage.sqlite");
126           if(success)
127             qWarning() << "*   Your database has been moved to" << Quassel::configDirPath() + "quassel-storage.sqlite";
128           else
129             qWarning() << "!!! Moving your database has failed. Please move it manually into" << Quassel::configDirPath();
130         }
131       }
132       // move certificate
133       QFileInfo certInfo(quasselDir + "quasselCert.pem");
134       if(certInfo.exists()) {
135         QFile cert(quasselDir + "quasselCert.pem");
136         bool success = cert.rename(Quassel::configDirPath() + "quasselCert.pem");
137         if(success)
138           qWarning() << "*   Your certificate has been moved to" << Quassel::configDirPath() + "quasselCert.pem";
139         else
140           qWarning() << "!!! Moving your certificate has failed. Please move it manually into" << Quassel::configDirPath();
141       }
142 #endif /* !Q_WS_MAC */
143       qWarning() << "*** Migration completed.\n\n";
144     }
145   }
146   // MIGRATION end
147
148   // check settings version
149   // so far, we only have 1
150   CoreSettings s;
151   if(s.version() != 1) {
152     qCritical() << "Invalid core settings version, terminating!";
153     exit(EXIT_FAILURE);
154   }
155
156   registerStorageBackends();
157
158   connect(&_storageSyncTimer, SIGNAL(timeout()), this, SLOT(syncStorage()));
159   _storageSyncTimer.start(10 * 60 * 1000); // 10 minutes
160 }
161
162 void Core::init() {
163   CoreSettings cs;
164   _configured = initStorage(cs.storageSettings().toMap());
165
166   if(Quassel::isOptionSet("select-backend")) {
167     selectBackend(Quassel::optionValue("select-backend"));
168     exit(0);
169   }
170
171   if(!_configured) {
172     if(!_storageBackends.count()) {
173       qWarning() << qPrintable(tr("Could not initialize any storage backend! Exiting..."));
174       qWarning() << qPrintable(tr("Currently, Quassel supports SQLite3 and PostgreSQL. You need to build your\n"
175                                   "Qt library with the sqlite or postgres plugin enabled in order for quasselcore\n"
176                                   "to work."));
177       exit(1); // TODO make this less brutal (especially for mono client -> popup)
178     }
179     qWarning() << "Core is currently not configured! Please connect with a Quassel Client for basic setup.";
180   }
181
182   if(Quassel::isOptionSet("add-user")) {
183     createUser();
184     exit(0);
185   }
186
187   if(Quassel::isOptionSet("change-userpass")) {
188     changeUserPass(Quassel::optionValue("change-userpass"));
189     exit(0);
190   }
191
192   connect(&_server, SIGNAL(newConnection()), this, SLOT(incomingConnection()));
193   connect(&_v6server, SIGNAL(newConnection()), this, SLOT(incomingConnection()));
194   if(!startListening()) exit(1); // TODO make this less brutal
195 }
196
197 Core::~Core() {
198   foreach(QTcpSocket *socket, blocksizes.keys()) {
199     socket->disconnectFromHost();  // disconnect non authed clients
200   }
201   qDeleteAll(sessions);
202   qDeleteAll(_storageBackends);
203 }
204
205 /*** Session Restore ***/
206
207 void Core::saveState() {
208   CoreSettings s;
209   QVariantMap state;
210   QVariantList activeSessions;
211   foreach(UserId user, instance()->sessions.keys()) activeSessions << QVariant::fromValue<UserId>(user);
212   state["CoreStateVersion"] = 1;
213   state["ActiveSessions"] = activeSessions;
214   s.setCoreState(state);
215 }
216
217 void Core::restoreState() {
218   if(!instance()->_configured) {
219     // qWarning() << qPrintable(tr("Cannot restore a state for an unconfigured core!"));
220     return;
221   }
222   if(instance()->sessions.count()) {
223     qWarning() << qPrintable(tr("Calling restoreState() even though active sessions exist!"));
224     return;
225   }
226   CoreSettings s;
227   /* We don't check, since we are at the first version since switching to Git
228   uint statever = s.coreState().toMap()["CoreStateVersion"].toUInt();
229   if(statever < 1) {
230     qWarning() << qPrintable(tr("Core state too old, ignoring..."));
231     return;
232   }
233   */
234   QVariantList activeSessions = s.coreState().toMap()["ActiveSessions"].toList();
235   if(activeSessions.count() > 0) {
236     quInfo() << "Restoring previous core state...";
237     foreach(QVariant v, activeSessions) {
238       UserId user = v.value<UserId>();
239       instance()->createSession(user, true);
240     }
241   }
242 }
243
244 /*** Core Setup ***/
245 QString Core::setupCoreForInternalUsage() {
246   Q_ASSERT(!_storageBackends.isEmpty());
247   QVariantMap setupData;
248   qsrand(QDateTime::currentDateTime().toTime_t());
249   int pass = 0;
250   for(int i = 0; i < 10; i++) {
251     pass *= 10;
252     pass += qrand() % 10;
253   }
254   setupData["AdminUser"] = "AdminUser";
255   setupData["AdminPasswd"] = QString::number(pass);
256   setupData["Backend"] = _storageBackends[_storageBackends.keys().first()]->displayName();
257   return setupCore(setupData);
258 }
259
260 QString Core::setupCore(QVariantMap setupData) {
261   QString user = setupData.take("AdminUser").toString();
262   QString password = setupData.take("AdminPasswd").toString();
263   if(user.isEmpty() || password.isEmpty()) {
264     return tr("Admin user or password not set.");
265   }
266   _configured = initStorage(setupData, true);
267   if(!_configured) {
268     return tr("Could not setup storage!");
269   }
270   CoreSettings s;
271   s.setStorageSettings(setupData);
272   quInfo() << qPrintable(tr("Creating admin user..."));
273   _storage->addUser(user, password);
274   startListening();  // TODO check when we need this
275   return QString();
276 }
277
278 /*** Storage Handling ***/
279 void Core::registerStorageBackends() {
280   // Register storage backends here!
281   registerStorageBackend(new SqliteStorage(this));
282   registerStorageBackend(new PostgreSqlStorage(this));
283 }
284
285 bool Core::registerStorageBackend(Storage *backend) {
286   if(backend->isAvailable()) {
287     _storageBackends[backend->displayName()] = backend;
288     return true;
289   } else {
290     backend->deleteLater();
291     return false;
292   }
293 }
294
295 void Core::unregisterStorageBackends() {
296   foreach(Storage *s, _storageBackends.values()) {
297     s->deleteLater();
298   }
299   _storageBackends.clear();
300 }
301
302 void Core::unregisterStorageBackend(Storage *backend) {
303   _storageBackends.remove(backend->displayName());
304   backend->deleteLater();
305 }
306
307 // old db settings:
308 // "Type" => "sqlite"
309 bool Core::initStorage(const QString &backend, QVariantMap settings, bool setup) {
310   _storage = 0;
311
312   if(backend.isEmpty()) {
313     return false;
314   }
315
316   Storage *storage = 0;
317   if(_storageBackends.contains(backend)) {
318     storage = _storageBackends[backend];
319   } else {
320     qCritical() << "Selected storage backend is not available:" << backend;
321     return false;
322   }
323
324   Storage::State storageState = storage->init(settings);
325   switch(storageState) {
326   case Storage::NeedsSetup:
327     if(!setup)
328       return false; // trigger setup process
329     if(storage->setup(settings))
330       return initStorage(backend, settings, false);
331     // if setup wasn't successfull we mark the backend as unavailable
332   case Storage::NotAvailable:
333     qCritical() << "Selected storage backend is not available:" << backend;
334     storage->deleteLater();
335     _storageBackends.remove(backend);
336     storage = 0;
337     return false;
338   case Storage::IsReady:
339     // delete all other backends
340     _storageBackends.remove(backend);
341     unregisterStorageBackends();
342     connect(storage, SIGNAL(bufferInfoUpdated(UserId, const BufferInfo &)), this, SIGNAL(bufferInfoUpdated(UserId, const BufferInfo &)));
343   }
344   _storage = storage;
345   return true;
346 }
347
348 bool Core::initStorage(QVariantMap dbSettings, bool setup) {
349   return initStorage(dbSettings["Backend"].toString(), dbSettings["ConnectionProperties"].toMap(), setup);
350 }
351
352
353 void Core::syncStorage() {
354   if(_storage)
355     _storage->sync();
356 }
357
358 /*** Storage Access ***/
359 bool Core::createNetwork(UserId user, NetworkInfo &info) {
360   NetworkId networkId = instance()->_storage->createNetwork(user, info);
361   if(!networkId.isValid())
362     return false;
363
364   info.networkId = networkId;
365   return true;
366 }
367
368 /*** Network Management ***/
369
370 bool Core::startListening() {
371   // in mono mode we only start a local port if a port is specified in the cli call
372   if(Quassel::runMode() == Quassel::Monolithic && !Quassel::isOptionSet("port"))
373     return true;
374
375   bool success = false;
376   uint port = Quassel::optionValue("port").toUInt();
377
378   const QString listen = Quassel::optionValue("listen");
379   const QStringList listen_list = listen.split(",", QString::SkipEmptyParts);
380   if(listen_list.size() > 0) {
381     foreach (const QString listen_term, listen_list) {  // TODO: handle multiple interfaces for same TCP version gracefully
382       QHostAddress addr;
383       if(!addr.setAddress(listen_term)) {
384         qCritical() << qPrintable(
385           tr("Invalid listen address %1")
386             .arg(listen_term)
387         );
388       } else {
389         switch(addr.protocol()) {
390           case QAbstractSocket::IPv4Protocol:
391             if(_server.listen(addr, port)) {
392               quInfo() << qPrintable(
393                 tr("Listening for GUI clients on IPv4 %1 port %2 using protocol version %3")
394                   .arg(addr.toString())
395                   .arg(_server.serverPort())
396                   .arg(Quassel::buildInfo().protocolVersion)
397               );
398               success = true;
399             } else
400               quWarning() << qPrintable(
401                 tr("Could not open IPv4 interface %1:%2: %3")
402                   .arg(addr.toString())
403                   .arg(port)
404                   .arg(_server.errorString()));
405             break;
406           case QAbstractSocket::IPv6Protocol:
407             if(_v6server.listen(addr, port)) {
408               quInfo() << qPrintable(
409                 tr("Listening for GUI clients on IPv6 %1 port %2 using protocol version %3")
410                   .arg(addr.toString())
411                   .arg(_v6server.serverPort())
412                   .arg(Quassel::buildInfo().protocolVersion)
413               );
414               success = true;
415             } else {
416               // if v4 succeeded on Any, the port will be already in use - don't display the error then
417               // FIXME: handle this more sanely, make sure we can listen to both v4 and v6 by default!
418               if(!success || _v6server.serverError() != QAbstractSocket::AddressInUseError)
419                 quWarning() << qPrintable(
420                   tr("Could not open IPv6 interface %1:%2: %3")
421                   .arg(addr.toString())
422                   .arg(port)
423                   .arg(_v6server.errorString()));
424             }
425             break;
426           default:
427             qCritical() << qPrintable(
428               tr("Invalid listen address %1, unknown network protocol")
429                   .arg(listen_term)
430             );
431             break;
432         }
433       }
434     }
435   }
436   if(!success)
437     quError() << qPrintable(tr("Could not open any network interfaces to listen on!"));
438
439   return success;
440 }
441
442 void Core::stopListening(const QString &reason) {
443   bool wasListening = false;
444   if(_server.isListening()) {
445     wasListening = true;
446     _server.close();
447   }
448   if(_v6server.isListening()) {
449     wasListening = true;
450     _v6server.close();
451   }
452   if(wasListening) {
453     if(reason.isEmpty())
454       quInfo() << "No longer listening for GUI clients.";
455     else
456       quInfo() << qPrintable(reason);
457   }
458 }
459
460 void Core::incomingConnection() {
461   QTcpServer *server = qobject_cast<QTcpServer *>(sender());
462   Q_ASSERT(server);
463   while(server->hasPendingConnections()) {
464     QTcpSocket *socket = server->nextPendingConnection();
465     connect(socket, SIGNAL(disconnected()), this, SLOT(clientDisconnected()));
466     connect(socket, SIGNAL(readyRead()), this, SLOT(clientHasData()));
467     connect(socket, SIGNAL(error(QAbstractSocket::SocketError)), this, SLOT(socketError(QAbstractSocket::SocketError)));
468
469     QVariantMap clientInfo;
470     blocksizes.insert(socket, (quint32)0);
471     quInfo() << qPrintable(tr("Client connected from"))  << qPrintable(socket->peerAddress().toString());
472
473     if(!_configured) {
474       stopListening(tr("Closing server for basic setup."));
475     }
476   }
477 }
478
479 void Core::clientHasData() {
480   QTcpSocket *socket = dynamic_cast<QTcpSocket*>(sender());
481   Q_ASSERT(socket && blocksizes.contains(socket));
482   QVariant item;
483   while(SignalProxy::readDataFromDevice(socket, blocksizes[socket], item)) {
484     QVariantMap msg = item.toMap();
485     processClientMessage(socket, msg);
486     if(!blocksizes.contains(socket)) break;  // this socket is no longer ours to handle!
487   }
488 }
489
490 void Core::processClientMessage(QTcpSocket *socket, const QVariantMap &msg) {
491   if(!msg.contains("MsgType")) {
492     // Client is way too old, does not even use the current init format
493     qWarning() << qPrintable(tr("Antique client trying to connect... refusing."));
494     socket->close();
495     return;
496   }
497   // OK, so we have at least an init message format we can understand
498   if(msg["MsgType"] == "ClientInit") {
499     QVariantMap reply;
500
501     // Just version information -- check it!
502     uint ver = msg["ProtocolVersion"].toUInt();
503     if(ver < Quassel::buildInfo().coreNeedsProtocol) {
504       reply["MsgType"] = "ClientInitReject";
505       reply["Error"] = tr("<b>Your Quassel Client is too old!</b><br>"
506       "This core needs at least client/core protocol version %1.<br>"
507       "Please consider upgrading your client.").arg(Quassel::buildInfo().coreNeedsProtocol);
508       SignalProxy::writeDataToDevice(socket, reply);
509       qWarning() << qPrintable(tr("Client")) << qPrintable(socket->peerAddress().toString()) << qPrintable(tr("too old, rejecting."));
510       socket->close(); return;
511     }
512
513     reply["ProtocolVersion"] = Quassel::buildInfo().protocolVersion;
514     reply["CoreVersion"] = Quassel::buildInfo().fancyVersionString;
515     reply["CoreDate"] = Quassel::buildInfo().buildDate;
516     reply["CoreStartTime"] = startTime(); // v10 clients don't necessarily parse this, see below
517
518     // FIXME: newer clients no longer use the hardcoded CoreInfo (for now), since it gets the
519     //        time zone wrong. With the next protocol bump (10 -> 11), we should remove this
520     //        or make it properly configurable.
521
522     int uptime = startTime().secsTo(QDateTime::currentDateTime().toUTC());
523     int updays = uptime / 86400; uptime %= 86400;
524     int uphours = uptime / 3600; uptime %= 3600;
525     int upmins = uptime / 60;
526     reply["CoreInfo"] = tr("<b>Quassel Core Version %1</b><br>"
527                            "Built: %2<br>"
528                            "Up %3d%4h%5m (since %6)").arg(Quassel::buildInfo().fancyVersionString)
529                                                      .arg(Quassel::buildInfo().buildDate)
530       .arg(updays).arg(uphours,2,10,QChar('0')).arg(upmins,2,10,QChar('0')).arg(startTime().toString(Qt::TextDate));
531
532 #ifdef HAVE_SSL
533     SslServer *sslServer = qobject_cast<SslServer *>(&_server);
534     QSslSocket *sslSocket = qobject_cast<QSslSocket *>(socket);
535     bool supportSsl = (bool)sslServer && (bool)sslSocket && sslServer->isCertValid();
536 #else
537     bool supportSsl = false;
538 #endif
539
540 #ifndef QT_NO_COMPRESS
541     bool supportsCompression = true;
542 #else
543     bool supportsCompression = false;
544 #endif
545
546     reply["SupportSsl"] = supportSsl;
547     reply["SupportsCompression"] = supportsCompression;
548     // switch to ssl/compression after client has been informed about our capabilities (see below)
549
550     reply["LoginEnabled"] = true;
551
552     // check if we are configured, start wizard otherwise
553     if(!_configured) {
554       reply["Configured"] = false;
555       QList<QVariant> backends;
556       foreach(Storage *backend, _storageBackends.values()) {
557         QVariantMap v;
558         v["DisplayName"] = backend->displayName();
559         v["Description"] = backend->description();
560         v["SetupKeys"] = backend->setupKeys();
561         v["SetupDefaults"] = backend->setupDefaults();
562         backends.append(v);
563       }
564       reply["StorageBackends"] = backends;
565       reply["LoginEnabled"] = false;
566     } else {
567       reply["Configured"] = true;
568     }
569     clientInfo[socket] = msg; // store for future reference
570     reply["MsgType"] = "ClientInitAck";
571     SignalProxy::writeDataToDevice(socket, reply);
572     socket->flush(); // ensure that the write cache is flushed before we switch to ssl
573
574 #ifdef HAVE_SSL
575     // after we told the client that we are ssl capable we switch to ssl mode
576     if(supportSsl && msg["UseSsl"].toBool()) {
577       qDebug() << qPrintable(tr("Starting TLS for Client:"))  << qPrintable(socket->peerAddress().toString());
578       connect(sslSocket, SIGNAL(sslErrors(const QList<QSslError> &)), this, SLOT(sslErrors(const QList<QSslError> &)));
579       sslSocket->startServerEncryption();
580     }
581 #endif
582
583 #ifndef QT_NO_COMPRESS
584     if(supportsCompression && msg["UseCompression"].toBool()) {
585       socket->setProperty("UseCompression", true);
586       qDebug() << "Using compression for Client:" << qPrintable(socket->peerAddress().toString());
587     }
588 #endif
589
590   } else {
591     // for the rest, we need an initialized connection
592     if(!clientInfo.contains(socket)) {
593       QVariantMap reply;
594       reply["MsgType"] = "ClientLoginReject";
595       reply["Error"] = tr("<b>Client not initialized!</b><br>You need to send an init message before trying to login.");
596       SignalProxy::writeDataToDevice(socket, reply);
597       qWarning() << qPrintable(tr("Client")) << qPrintable(socket->peerAddress().toString()) << qPrintable(tr("did not send an init message before trying to login, rejecting."));
598       socket->close(); return;
599     }
600     if(msg["MsgType"] == "CoreSetupData") {
601       QVariantMap reply;
602       QString result = setupCore(msg["SetupData"].toMap());
603       if(!result.isEmpty()) {
604         reply["MsgType"] = "CoreSetupReject";
605         reply["Error"] = result;
606       } else {
607         reply["MsgType"] = "CoreSetupAck";
608       }
609       SignalProxy::writeDataToDevice(socket, reply);
610     } else if(msg["MsgType"] == "ClientLogin") {
611       QVariantMap reply;
612       UserId uid = _storage->validateUser(msg["User"].toString(), msg["Password"].toString());
613       if(uid == 0) {
614         reply["MsgType"] = "ClientLoginReject";
615         reply["Error"] = tr("<b>Invalid username or password!</b><br>The username/password combination you supplied could not be found in the database.");
616         SignalProxy::writeDataToDevice(socket, reply);
617         return;
618       }
619       reply["MsgType"] = "ClientLoginAck";
620       SignalProxy::writeDataToDevice(socket, reply);
621       quInfo() << qPrintable(tr("Client")) << qPrintable(socket->peerAddress().toString()) << qPrintable(tr("initialized and authenticated successfully as \"%1\" (UserId: %2).").arg(msg["User"].toString()).arg(uid.toInt()));
622       setupClientSession(socket, uid);
623     }
624   }
625 }
626
627 // Potentially called during the initialization phase (before handing the connection off to the session)
628 void Core::clientDisconnected() {
629   QTcpSocket *socket = qobject_cast<QTcpSocket *>(sender());
630   if(socket) {
631     // here it's safe to call methods on socket!
632     quInfo() << qPrintable(tr("Non-authed client disconnected.")) << qPrintable(socket->peerAddress().toString());
633     blocksizes.remove(socket);
634     clientInfo.remove(socket);
635     socket->deleteLater();
636   } else {
637     // we have to crawl through the hashes and see if we find a victim to remove
638     qDebug() << qPrintable(tr("Non-authed client disconnected. (socket allready destroyed)"));
639
640     // DO NOT CALL ANY METHODS ON socket!!
641     socket = static_cast<QTcpSocket *>(sender());
642
643     QHash<QTcpSocket *, quint32>::iterator blockSizeIter = blocksizes.begin();
644     while(blockSizeIter != blocksizes.end()) {
645       if(blockSizeIter.key() == socket) {
646         blockSizeIter = blocksizes.erase(blockSizeIter);
647       } else {
648         blockSizeIter++;
649       }
650     }
651
652     QHash<QTcpSocket *, QVariantMap>::iterator clientInfoIter = clientInfo.begin();
653     while(clientInfoIter != clientInfo.end()) {
654       if(clientInfoIter.key() == socket) {
655         clientInfoIter = clientInfo.erase(clientInfoIter);
656       } else {
657         clientInfoIter++;
658       }
659     }
660   }
661
662
663   // make server listen again if still not configured
664   if (!_configured) {
665     startListening();
666   }
667
668   // TODO remove unneeded sessions - if necessary/possible...
669   // Suggestion: kill sessions if they are not connected to any network and client.
670 }
671
672 void Core::setupClientSession(QTcpSocket *socket, UserId uid) {
673   // From now on everything is handled by the client session
674   disconnect(socket, 0, this, 0);
675   socket->flush();
676   blocksizes.remove(socket);
677   clientInfo.remove(socket);
678
679   // Find or create session for validated user
680   SessionThread *session;
681   if(sessions.contains(uid)) {
682     session = sessions[uid];
683   } else {
684     session = createSession(uid);
685     if(!session) {
686       qWarning() << qPrintable(tr("Could not initialize session for client:")) << qPrintable(socket->peerAddress().toString());
687       socket->close();
688       return;
689     }
690   }
691
692   // as we are currently handling an event triggered by incoming data on this socket
693   // it is unsafe to directly move the socket to the client thread.
694   QCoreApplication::postEvent(this, new AddClientEvent(socket, uid));
695 }
696
697 void Core::customEvent(QEvent *event) {
698   if(event->type() == AddClientEventId) {
699     AddClientEvent *addClientEvent = static_cast<AddClientEvent *>(event);
700     addClientHelper(addClientEvent->socket, addClientEvent->userId);
701     return;
702   }
703 }
704
705 void Core::addClientHelper(QTcpSocket *socket, UserId uid) {
706   // Find or create session for validated user
707   if(!sessions.contains(uid)) {
708     qWarning() << qPrintable(tr("Could not find a session for client:")) << qPrintable(socket->peerAddress().toString());
709     socket->close();
710     return;
711   }
712
713   SessionThread *session = sessions[uid];
714   session->addClient(socket);
715 }
716
717 void Core::setupInternalClientSession(SignalProxy *proxy) {
718   if(!_configured) {
719     stopListening();
720     setupCoreForInternalUsage();
721   }
722
723   UserId uid;
724   if(_storage) {
725     uid = _storage->internalUser();
726   } else {
727     qWarning() << "Core::setupInternalClientSession(): You're trying to run monolithic Quassel with an unusable Backend! Go fix it!";
728     return;
729   }
730
731   // Find or create session for validated user
732   SessionThread *sess;
733   if(sessions.contains(uid))
734     sess = sessions[uid];
735   else
736     sess = createSession(uid);
737   sess->addClient(proxy);
738 }
739
740 SessionThread *Core::createSession(UserId uid, bool restore) {
741   if(sessions.contains(uid)) {
742     qWarning() << "Calling createSession() when a session for the user already exists!";
743     return 0;
744   }
745   SessionThread *sess = new SessionThread(uid, restore, this);
746   sessions[uid] = sess;
747   sess->start();
748   return sess;
749 }
750
751 #ifdef HAVE_SSL
752 void Core::sslErrors(const QList<QSslError> &errors) {
753   Q_UNUSED(errors);
754   QSslSocket *socket = qobject_cast<QSslSocket *>(sender());
755   if(socket)
756     socket->ignoreSslErrors();
757 }
758 #endif
759
760 void Core::socketError(QAbstractSocket::SocketError err) {
761   QAbstractSocket *socket = qobject_cast<QAbstractSocket *>(sender());
762   if(socket && err != QAbstractSocket::RemoteHostClosedError)
763     qWarning() << "Core::socketError()" << socket << err << socket->errorString();
764 }
765
766 // migration / backend selection
767 bool Core::selectBackend(const QString &backend) {
768   // reregister all storage backends
769   registerStorageBackends();
770   if(!_storageBackends.contains(backend)) {
771     qWarning() << qPrintable(QString("Core::selectBackend(): unsupported backend: %1").arg(backend));
772     qWarning() << "    supported backends are:" << qPrintable(QStringList(_storageBackends.keys()).join(", "));
773     return false;
774   }
775
776   Storage *storage = _storageBackends[backend];
777   QVariantMap settings = promptForSettings(storage);
778
779   Storage::State storageState = storage->init(settings);
780   switch(storageState) {
781   case Storage::IsReady:
782     saveBackendSettings(backend, settings);
783     qWarning() << "Switched backend to:" << qPrintable(backend);
784     qWarning() << "Backend already initialized. Skipping Migration";
785     return true;
786   case Storage::NotAvailable:
787     qCritical() << "Backend is not available:" << qPrintable(backend);
788     return false;
789   case Storage::NeedsSetup:
790     if(!storage->setup(settings)) {
791       qWarning() << qPrintable(QString("Core::selectBackend(): unable to setup backend: %1").arg(backend));
792       return false;
793     }
794
795     if(storage->init(settings) != Storage::IsReady) {
796       qWarning() << qPrintable(QString("Core::migrateBackend(): unable to initialize backend: %1").arg(backend));
797       return false;
798     }
799
800     saveBackendSettings(backend, settings);
801     qWarning() << "Switched backend to:" << qPrintable(backend);
802     break;
803   }
804
805   // let's see if we have a current storage object we can migrate from
806   AbstractSqlMigrationReader *reader = getMigrationReader(_storage);
807   AbstractSqlMigrationWriter *writer = getMigrationWriter(storage);
808   if(reader && writer) {
809     qDebug() << qPrintable(QString("Migrating Storage backend %1 to %2...").arg(_storage->displayName(), storage->displayName()));
810     delete _storage;
811     _storage = 0;
812     delete storage;
813     storage = 0;
814     if(reader->migrateTo(writer)) {
815       qDebug() << "Migration finished!";
816       saveBackendSettings(backend, settings);
817       return true;
818     }
819     return false;
820     qWarning() << qPrintable(QString("Core::migrateDb(): unable to migrate storage backend! (No migration writer for %1)").arg(backend));
821   }
822
823   // inform the user why we cannot merge
824   if(!_storage) {
825     qWarning() << "No currently active backend. Skipping migration.";
826   } else if(!reader) {
827     qWarning() << "Currently active backend does not support migration:" << qPrintable(_storage->displayName());
828   }
829   if(writer) {
830     qWarning() << "New backend does not support migration:" << qPrintable(backend);
831   }
832
833   // so we were unable to merge, but let's create a user \o/
834   _storage = storage;
835   createUser();
836   return true;
837 }
838
839 void Core::createUser() {
840   QTextStream out(stdout);
841   QTextStream in(stdin);
842   out << "Add a new user:" << endl;
843   out << "Username: ";
844   out.flush();
845   QString username = in.readLine().trimmed();
846
847   disableStdInEcho();
848   out << "Password: ";
849   out.flush();
850   QString password = in.readLine().trimmed();
851   out << endl;
852   out << "Repeat Password: ";
853   out.flush();
854   QString password2 = in.readLine().trimmed();
855   out << endl;
856   enableStdInEcho();
857
858   if(password != password2) {
859     qWarning() << "Passwords don't match!";
860     return;
861   }
862   if(password.isEmpty()) {
863     qWarning() << "Password is empty!";
864     return;
865   }
866
867   if(_storage->addUser(username, password).isValid()) {
868     out << "Added user " << username << " successfully!" << endl;
869   } else {
870     qWarning() << "Unable to add user:" << qPrintable(username);
871   }
872 }
873
874 void Core::changeUserPass(const QString &username) {
875   QTextStream out(stdout);
876   QTextStream in(stdin);
877   UserId userId = _storage->getUserId(username);
878   if(!userId.isValid()) {
879     out << "User " << username << " does not exist." << endl;
880     return;
881   }
882
883   out << "Change password for user: " << username << endl;
884
885   disableStdInEcho();
886   out << "New Password: ";
887   out.flush();
888   QString password = in.readLine().trimmed();
889   out << endl;
890   out << "Repeat Password: ";
891   out.flush();
892   QString password2 = in.readLine().trimmed();
893   out << endl;
894   enableStdInEcho();
895
896   if(password != password2) {
897     qWarning() << "Passwords don't match!";
898     return;
899   }
900   if(password.isEmpty()) {
901     qWarning() << "Password is empty!";
902     return;
903   }
904
905   if(_storage->updateUser(userId, password)) {
906     out << "Password changed successfuly!" << endl;
907   } else {
908     qWarning() << "Failed to change password!";
909   }
910 }
911
912 AbstractSqlMigrationReader *Core::getMigrationReader(Storage *storage) {
913   if(!storage)
914     return 0;
915
916   AbstractSqlStorage *sqlStorage = qobject_cast<AbstractSqlStorage *>(storage);
917   if(!sqlStorage) {
918     qDebug() << "Core::migrateDb(): only SQL based backends can be migrated!";
919     return 0;
920   }
921
922   return sqlStorage->createMigrationReader();
923 }
924
925 AbstractSqlMigrationWriter *Core::getMigrationWriter(Storage *storage) {
926   if(!storage)
927     return 0;
928
929   AbstractSqlStorage *sqlStorage = qobject_cast<AbstractSqlStorage *>(storage);
930   if(!sqlStorage) {
931     qDebug() << "Core::migrateDb(): only SQL based backends can be migrated!";
932     return 0;
933   }
934
935   return sqlStorage->createMigrationWriter();
936 }
937
938 void Core::saveBackendSettings(const QString &backend, const QVariantMap &settings) {
939   QVariantMap dbsettings;
940   dbsettings["Backend"] = backend;
941   dbsettings["ConnectionProperties"] = settings;
942   CoreSettings().setStorageSettings(dbsettings);
943 }
944
945 QVariantMap Core::promptForSettings(const Storage *storage) {
946   QVariantMap settings;
947
948   QStringList keys = storage->setupKeys();
949   if(keys.isEmpty())
950     return settings;
951
952   QTextStream out(stdout);
953   QTextStream in(stdin);
954   out << "Default values are in brackets" << endl;
955
956   QVariantMap defaults = storage->setupDefaults();
957   QString value;
958   foreach(QString key, keys) {
959     QVariant val;
960     if(defaults.contains(key)) {
961       val = defaults[key];
962     }
963     out << key;
964     if(!val.toString().isEmpty()) {
965       out << " (" << val.toString() << ")";
966     }
967     out << ": ";
968     out.flush();
969
970     bool noEcho = QString("password").toLower().startsWith(key.toLower());
971     if(noEcho) {
972       disableStdInEcho();
973     }
974     value = in.readLine().trimmed();
975     if(noEcho) {
976       out << endl;
977       enableStdInEcho();
978     }
979
980     if(!value.isEmpty()) {
981       switch(defaults[key].type()) {
982       case QVariant::Int:
983         val = QVariant(value.toInt());
984         break;
985       default:
986         val = QVariant(value);
987       }
988     }
989     settings[key] = val;
990   }
991   return settings;
992 }
993
994
995 #ifdef Q_OS_WIN32
996 void Core::stdInEcho(bool on) {
997   HANDLE hStdin = GetStdHandle(STD_INPUT_HANDLE);
998   DWORD mode = 0;
999   GetConsoleMode(hStdin, &mode);
1000   if(on)
1001     mode |= ENABLE_ECHO_INPUT;
1002   else
1003     mode &= ~ENABLE_ECHO_INPUT;
1004   SetConsoleMode(hStdin, mode);
1005 }
1006 #else
1007 void Core::stdInEcho(bool on) {
1008   termios t;
1009   tcgetattr(STDIN_FILENO, &t);
1010   if(on)
1011     t.c_lflag |= ECHO;
1012   else
1013     t.c_lflag &= ~ECHO;
1014   tcsetattr(STDIN_FILENO, TCSANOW, &t);
1015 }
1016 #endif /* Q_OS_WIN32 */