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