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