Chris@57: /* -*- c-basic-offset: 4 indent-tabs-mode: nil -*-  vi:set ts=8 sts=4 sw=4: */
Chris@57: 
Chris@57: /*
Chris@57:     EasyMercurial
Chris@57: 
Chris@57:     Based on HgExplorer by Jari Korhonen
Chris@57:     Copyright (c) 2010 Jari Korhonen
Chris@57:     Copyright (c) 2010 Chris Cannam
Chris@57:     Copyright (c) 2010 Queen Mary, University of London
Chris@57:     
Chris@57:     This program is free software; you can redistribute it and/or
Chris@57:     modify it under the terms of the GNU General Public License as
Chris@57:     published by the Free Software Foundation; either version 2 of the
Chris@57:     License, or (at your option) any later version.  See the file
Chris@57:     COPYING included with this distribution for more information.
Chris@57: */
jtkorhonen@0: 
jtkorhonen@0: #include "hgrunner.h"
Chris@62: #include "common.h"
Chris@57: #include "debug.h"
Chris@50: 
Chris@50: #include <QPushButton>
Chris@50: #include <QListWidget>
Chris@50: #include <QDialog>
Chris@50: #include <QLabel>
Chris@50: #include <QVBoxLayout>
Chris@62: #include <QSettings>
Chris@75: #include <QInputDialog>
Chris@161: #include <QDir>
jtkorhonen@0: 
Chris@43: #include <iostream>
Chris@75: #include <errno.h>
Chris@75: #include <stdio.h>
Chris@111: #include <stdlib.h>
jtkorhonen@0: 
Chris@76: #ifndef Q_OS_WIN32
Chris@111: #include <unistd.h>
Chris@113: #include <termios.h>
Chris@111: #include <fcntl.h>
Chris@80: #endif
Chris@76: 
Chris@172: HgRunner::HgRunner(QString myDirPath, QWidget * parent) :
Chris@172:     QProgressBar(parent),
Chris@172:     m_myDirPath(myDirPath)
jtkorhonen@0: {
Chris@113:     m_proc = 0;
Chris@84: 
jtkorhonen@0:     setTextVisible(false);
jtkorhonen@0:     setVisible(false);
Chris@84:     m_isRunning = false;
Chris@161: 
Chris@172:     findExtension();
jtkorhonen@0: }
jtkorhonen@0: 
jtkorhonen@0: HgRunner::~HgRunner()
jtkorhonen@0: {
Chris@111:     closeTerminal();
Chris@120:     if (m_proc) {
Chris@120:         m_proc->kill();
Chris@122:         m_proc->deleteLater();
Chris@120:     }
jtkorhonen@0: }
jtkorhonen@0: 
Chris@172: void HgRunner::findExtension()
Chris@172: {
Chris@172:     m_extensionPath = findInPath("easyhg.py", m_myDirPath, false);
Chris@172:     if (m_extensionPath == "easyhg.py") {
Chris@172:         if (!unbundleExtension()) {
Chris@172:             m_extensionPath = "";
Chris@172:         }
Chris@172:     }
Chris@172: }   
Chris@172: 
Chris@161: bool HgRunner::unbundleExtension()
Chris@161: {
Chris@161:     QString bundled = ":easyhg.py";
Chris@166:     QString home = QDir::homePath();
Chris@161:     QString target = QString("%1/.easyhg").arg(home);
Chris@161:     if (!QDir().mkpath(target)) {
Chris@161:         DEBUG << "Failed to make unbundle path " << target << endl;
Chris@161:         std::cerr << "Failed to make unbundle path " << target.toStdString() << std::endl;
Chris@161:         return false; 
Chris@161:     }
Chris@161:     QFile bf(bundled);
Chris@161:     m_extensionPath = QString("%1/easyhg.py").arg(target);
Chris@161:     if (!bf.copy(m_extensionPath)) {
Chris@161:         DEBUG << "Failed to unbundle extension to " << target << endl;
Chris@161:         std::cerr << "Failed to unbundle extension to " << m_extensionPath.toStdString() << std::endl;
Chris@161:         return false;
Chris@161:     }
Chris@161:     DEBUG << "Unbundled extension to " << m_extensionPath << endl;
Chris@161:     return true;
Chris@161: }        
Chris@161: 
Chris@109: void HgRunner::requestAction(HgAction action)
Chris@109: {
Chris@109:     DEBUG << "requestAction " << action.action << endl;
Chris@109:     bool pushIt = true;
Chris@109:     if (m_queue.empty()) {
Chris@109:         if (action == m_currentAction) {
Chris@109:             // this request is identical to the thing we're executing
Chris@109:             DEBUG << "requestAction: we're already handling this one, ignoring identical request" << endl;
Chris@109:             pushIt = false;
Chris@109:         }
Chris@109:     } else {
Chris@109:         HgAction last = m_queue.back();
Chris@109:         if (action == last) {
Chris@109:             // this request is identical to the previous thing we
Chris@109:             // queued which we haven't executed yet
Chris@109:             DEBUG << "requestAction: we're already queueing this one, ignoring identical request" << endl;
Chris@109:             pushIt = false;
Chris@109:         }
Chris@109:     }
Chris@109:     if (pushIt) m_queue.push_back(action);
Chris@109:     checkQueue();
Chris@109: }
Chris@109: 
Chris@62: QString HgRunner::getHgBinaryName()
Chris@62: {
Chris@62:     QSettings settings;
Chris@77:     QString hg = settings.value("hgbinary", "").toString();
Chris@77:     if (hg == "") {
Chris@172:         hg = findInPath("hg", m_myDirPath, true);
Chris@77:     }
Chris@77:     if (hg != "hg") {
Chris@77:         settings.setValue("hgbinary", hg);
Chris@77:     }
Chris@62:     return hg;
Chris@62: }
Chris@62: 
jtkorhonen@0: void HgRunner::started()
jtkorhonen@0: {
Chris@104:     DEBUG << "started" << endl;
Chris@75:     /*
Chris@104:     m_proc->write("blah\n");
Chris@104:     m_proc->write("blah\n");
Chris@104:     m_proc -> closeWriteChannel();
Chris@75:     */
jtkorhonen@0: }
jtkorhonen@0: 
Chris@84: void HgRunner::noteUsername(QString name)
Chris@75: {
Chris@84:     m_userName = name;
Chris@75: }
Chris@75: 
Chris@84: void HgRunner::noteRealm(QString realm)
Chris@75: {
Chris@84:     m_realm = realm;
Chris@84: }
Chris@84: 
Chris@84: void HgRunner::getUsername()
Chris@84: {
Chris@113:     if (m_ptyFile) {
Chris@84:         bool ok = false;
Chris@84:         QString prompt = tr("User name:");
Chris@84:         if (m_realm != "") {
Chris@84:             prompt = tr("User name for \"%1\":").arg(m_realm);
Chris@84:         }
Chris@84:         QString pwd = QInputDialog::getText
Chris@84:             (qobject_cast<QWidget *>(parent()),
Chris@84:             tr("Enter user name"), prompt,
Chris@84:             QLineEdit::Normal, QString(), &ok);
Chris@84:         if (ok) {
Chris@113:             m_ptyFile->write(QString("%1\n").arg(pwd).toUtf8());
Chris@113:             m_ptyFile->flush();
Chris@84:             return;
Chris@111:         } else {
Chris@111:             DEBUG << "HgRunner::getUsername: user cancelled" << endl;
Chris@111:             killCurrentCommand();
Chris@111:             return;
Chris@84:         }
Chris@84:     }
Chris@84:     // user cancelled or something went wrong
Chris@111:     DEBUG << "HgRunner::getUsername: something went wrong" << endl;
Chris@84:     killCurrentCommand();
Chris@84: }
Chris@84: 
Chris@84: void HgRunner::getPassword()
Chris@84: {
Chris@113:     if (m_ptyFile) {
Chris@84:         bool ok = false;
Chris@84:         QString prompt = tr("Password:");
Chris@84:         if (m_userName != "") {
Chris@84:             if (m_realm != "") {
Chris@84:                 prompt = tr("Password for \"%1\" at \"%2\":")
Chris@84:                          .arg(m_userName).arg(m_realm);
Chris@75:             } else {
Chris@84:                 prompt = tr("Password for user \"%1\":")
Chris@84:                          .arg(m_userName);
Chris@75:             }
Chris@75:         }
Chris@84:         QString pwd = QInputDialog::getText
Chris@84:             (qobject_cast<QWidget *>(parent()),
Chris@84:             tr("Enter password"), prompt,
Chris@84:              QLineEdit::Password, QString(), &ok);
Chris@84:         if (ok) {
Chris@113:             m_ptyFile->write(QString("%1\n").arg(pwd).toUtf8());
Chris@113:             m_ptyFile->flush();
Chris@84:             return;
Chris@111:         } else {
Chris@111:             DEBUG << "HgRunner::getPassword: user cancelled" << endl;
Chris@111:             killCurrentCommand();
Chris@111:             return;
Chris@84:         }
Chris@75:     }
Chris@84:     // user cancelled or something went wrong
Chris@111:     DEBUG << "HgRunner::getPassword: something went wrong" << endl;
Chris@84:     killCurrentCommand();
Chris@84: }
Chris@84: 
Chris@113: bool HgRunner::checkPrompts(QString chunk)
Chris@84: {
Chris@93:     //DEBUG << "checkPrompts: " << chunk << endl;
Chris@84: 
Chris@128:     if (!m_currentAction.mayBeInteractive()) return false;
Chris@128: 
Chris@84:     QString text = chunk.trimmed();
Chris@84:     QString lower = text.toLower();
Chris@84:     if (lower.endsWith("password:")) {
Chris@84:         getPassword();
Chris@113:         return true;
Chris@84:     }
Chris@128:     if (lower.endsWith("user:") || lower.endsWith("username:")) {
Chris@84:         getUsername();
Chris@113:         return true;
Chris@84:     }
Chris@128:     QRegExp userRe("\\buser(name)?:\\s*([^\\s]+)");
Chris@84:     if (userRe.indexIn(text) >= 0) {
Chris@128:         noteUsername(userRe.cap(2));
Chris@84:     }
Chris@84:     QRegExp realmRe("\\brealmr:\\s*([^\\s]+)");
Chris@84:     if (realmRe.indexIn(text) >= 0) {
Chris@84:         noteRealm(realmRe.cap(1));
Chris@84:     }
Chris@113:     return false;
Chris@84: }
Chris@84: 
Chris@110: void HgRunner::dataReadyStdout()
Chris@84: {
Chris@110:     DEBUG << "dataReadyStdout" << endl;
Chris@110:     QString chunk = QString::fromUtf8(m_proc->readAllStandardOutput());
Chris@113:     if (!checkPrompts(chunk)) {
Chris@113:         m_stdout += chunk;
Chris@113:     }
Chris@110: }
Chris@110: 
Chris@110: void HgRunner::dataReadyStderr()
Chris@110: {
Chris@110:     DEBUG << "dataReadyStderr" << endl;
Chris@110:     QString chunk = QString::fromUtf8(m_proc->readAllStandardError());
Chris@113:     DEBUG << chunk;
Chris@113:     if (!checkPrompts(chunk)) {
Chris@113:         m_stderr += chunk;
Chris@113:     }
Chris@113: }
Chris@113: 
Chris@113: void HgRunner::dataReadyPty()
Chris@113: {
Chris@113:     DEBUG << "dataReadyPty" << endl;
Chris@113:     QString chunk = QString::fromUtf8(m_ptyFile->readAll());
Chris@113:     DEBUG << "chunk of " << chunk.length() << " chars" << endl;
Chris@113:     if (!checkPrompts(chunk)) {
Chris@113:         m_stdout += chunk;
Chris@113:     }
Chris@75: }
Chris@75: 
jtkorhonen@0: void HgRunner::finished(int procExitCode, QProcess::ExitStatus procExitStatus)
jtkorhonen@0: {
Chris@109:     // Save the current action and reset m_currentAction before we
Chris@109:     // emit a signal to mark the completion; otherwise we may be
Chris@109:     // resetting the action after a slot has already tried to set it
Chris@109:     // to something else to start a new action
Chris@109: 
Chris@109:     HgAction completedAction = m_currentAction;
Chris@109: 
Chris@84:     m_isRunning = false;
Chris@109:     m_currentAction = HgAction();
Chris@84: 
Chris@84:     closeProcInput();
Chris@113:     delete m_proc;
Chris@113:     m_proc = 0;
jtkorhonen@0: 
Chris@109:     if (completedAction.action == ACT_NONE) {
Chris@109:         DEBUG << "HgRunner::finished: WARNING: completed action is ACT_NONE" << endl;
Chris@62:     } else {
Chris@113:         if (procExitCode == 0 && procExitStatus == QProcess::NormalExit) {
Chris@113:             DEBUG << "HgRunner::finished: Command completed successfully"
Chris@113:                   << endl;
Chris@124: //            DEBUG << "stdout is " << m_stdout << endl;
Chris@113:             emit commandCompleted(completedAction, m_stdout);
Chris@113:         } else {
Chris@113:             DEBUG << "HgRunner::finished: Command failed, exit code "
Chris@113:                   << procExitCode << ", exit status " << procExitStatus
Chris@113:                   << ", stderr follows" << endl;
Chris@113:             DEBUG << m_stderr << endl;
Chris@113:             emit commandFailed(completedAction, m_stderr);
Chris@113:         }
jtkorhonen@0:     }
Chris@109: 
Chris@109:     checkQueue();
jtkorhonen@0: }
jtkorhonen@0: 
Chris@62: void HgRunner::killCurrentCommand()
jtkorhonen@0: {
Chris@109:     if (m_isRunning) {
Chris@113:         m_currentAction.action = ACT_NONE; // so that we don't bother to notify
Chris@113:         m_proc->kill();
jtkorhonen@0:     }
jtkorhonen@0: }
jtkorhonen@0: 
Chris@109: void HgRunner::checkQueue()
Chris@62: {
Chris@109:     if (m_isRunning) {
Chris@109:         return;
Chris@109:     }
Chris@109:     if (m_queue.empty()) {
Chris@109:         hide();
Chris@109:         return;
Chris@109:     }
Chris@109:     HgAction toRun = m_queue.front();
Chris@109:     m_queue.pop_front();
Chris@109:     DEBUG << "checkQueue: have action: running " << toRun.action << endl;
Chris@109:     startCommand(toRun);
Chris@109: }
Chris@109: 
Chris@109: void HgRunner::startCommand(HgAction action)
Chris@109: {
Chris@109:     QString executable = action.executable;
Chris@109:     bool interactive = false;
Chris@109:     QStringList params = action.params;
Chris@109: 
Chris@109:     if (executable == "") {
Chris@109:         // This is a Hg command
Chris@109:         executable = getHgBinaryName();
Chris@161: 
Chris@161:         if (action.mayBeInteractive()) {
Chris@161:             params.push_front("ui.interactive=true");
Chris@161:             params.push_front("--config");
Chris@161:             params.push_front(QString("extensions.easyhg=%1").arg(m_extensionPath));
Chris@161:             params.push_front("--config");
Chris@161:             interactive = true;
Chris@161:         }            
Chris@161: 
Chris@161:         //!!! want an option to use the mercurial_keyring extension as well
Chris@107:     }
jtkorhonen@0: 
Chris@84:     m_isRunning = true;
jtkorhonen@0:     setRange(0, 0);
Chris@115:     if (!action.shouldBeFast()) show();
Chris@110:     m_stdout.clear();
Chris@110:     m_stderr.clear();
Chris@84:     m_realm = "";
Chris@84:     m_userName = "";
jtkorhonen@0: 
Chris@113:     m_proc = new QProcess;
Chris@113: 
Chris@172:     QProcessEnvironment env = QProcessEnvironment::systemEnvironment();
Chris@172: 
Chris@172: #ifdef Q_OS_WIN32
Chris@172:     if (m_myDirPath != "") {
Chris@172:         env.insert("PATH", m_myDirPath + ";" + env.value("PATH"));
Chris@172:     }
Chris@172: #endif
Chris@172: 
Chris@113:     env.insert("LANG", "en_US.utf8");
Chris@113:     env.insert("LC_ALL", "en_US.utf8");
Chris@113:     env.insert("HGPLAIN", "1");
Chris@113:     m_proc->setProcessEnvironment(env);
Chris@113: 
Chris@113:     connect(m_proc, SIGNAL(started()), this, SLOT(started()));
Chris@113:     connect(m_proc, SIGNAL(finished(int, QProcess::ExitStatus)),
Chris@113:             this, SLOT(finished(int, QProcess::ExitStatus)));
Chris@113:     connect(m_proc, SIGNAL(readyReadStandardOutput()),
Chris@113:             this, SLOT(dataReadyStdout()));
Chris@113:     connect(m_proc, SIGNAL(readyReadStandardError()),
Chris@113:             this, SLOT(dataReadyStderr()));
Chris@113: 
Chris@109:     if (!action.workingDir.isEmpty()) {
Chris@109:         m_proc->setWorkingDirectory(action.workingDir);
jtkorhonen@0:     }
jtkorhonen@0: 
Chris@107:     if (interactive) {
Chris@111:         openTerminal();
Chris@111:         if (m_ptySlaveFilename != "") {
Chris@113:             DEBUG << "HgRunner: connecting to pseudoterminal" << endl;
Chris@107:             m_proc->setStandardInputFile(m_ptySlaveFilename);
Chris@114: //            m_proc->setStandardOutputFile(m_ptySlaveFilename);
Chris@113: //            m_proc->setStandardErrorFile(m_ptySlaveFilename);
Chris@107:         }
Chris@84:     }
Chris@84: 
Chris@109:     QString cmdline = executable;
Chris@57:     foreach (QString param, params) cmdline += " " + param;
Chris@64:     DEBUG << "HgRunner: starting: " << cmdline << " with cwd "
Chris@109:           << action.workingDir << endl;
Chris@43: 
Chris@109:     m_currentAction = action;
Chris@109: 
Chris@113:     // fill these out with what we actually ran
Chris@113:     m_currentAction.executable = executable;
Chris@113:     m_currentAction.params = params;
Chris@113: 
Chris@109:     DEBUG << "set current action to " << m_currentAction.action << endl;
Chris@109:     
Chris@109:     m_proc->start(executable, params);
Chris@84: }
Chris@84: 
Chris@84: void HgRunner::closeProcInput()
Chris@84: {
Chris@84:     DEBUG << "closeProcInput" << endl;
Chris@84: 
Chris@84:     m_proc->closeWriteChannel();
Chris@111: }
Chris@111: 
Chris@111: void HgRunner::openTerminal()
Chris@111: {
Chris@111: #ifndef Q_OS_WIN32
Chris@111:     if (m_ptySlaveFilename != "") return; // already open
Chris@111:     DEBUG << "HgRunner::openTerminal: trying to open new pty" << endl;
Chris@111:     int master = posix_openpt(O_RDWR | O_NOCTTY);
Chris@111:     if (master < 0) {
Chris@111:         DEBUG << "openpt failed" << endl;
Chris@111:         perror("openpt failed");
Chris@111:         return;
Chris@111:     }
Chris@113:     struct termios t;
Chris@113:     if (tcgetattr(master, &t)) {
Chris@113:         DEBUG << "tcgetattr failed" << endl;
Chris@113:         perror("tcgetattr failed");
Chris@113:     }
Chris@113:     cfmakeraw(&t);
Chris@113:     if (tcsetattr(master, TCSANOW, &t)) {
Chris@113:         DEBUG << "tcsetattr failed" << endl;
Chris@113:         perror("tcsetattr failed");
Chris@113:     }
Chris@111:     if (grantpt(master)) {
Chris@111:         perror("grantpt failed");
Chris@111:     }
Chris@111:     if (unlockpt(master)) {
Chris@111:         perror("unlockpt failed");
Chris@111:     }
Chris@111:     char *slave = ptsname(master);
Chris@111:     if (!slave) {
Chris@111:         perror("ptsname failed");
Chris@111:         ::close(master);
Chris@111:         return;
Chris@111:     }
Chris@111:     m_ptyMasterFd = master;
Chris@113:     m_ptyFile = new QFile();
Chris@113:     connect(m_ptyFile, SIGNAL(readyRead()), this, SLOT(dataReadyPty()));
Chris@113:     if (!m_ptyFile->open(m_ptyMasterFd, QFile::ReadWrite)) {
Chris@113:         DEBUG << "HgRunner::openTerminal: Failed to open QFile on master fd" << endl;
Chris@113:     }
Chris@111:     m_ptySlaveFilename = slave;
Chris@111:     DEBUG << "HgRunner::openTerminal: succeeded, slave is "
Chris@111:           << m_ptySlaveFilename << endl;
Chris@111: #endif
Chris@111: }
Chris@111: 
Chris@111: void HgRunner::closeTerminal()
Chris@111: {
Chris@84: #ifndef Q_OS_WIN32
Chris@84:     if (m_ptySlaveFilename != "") {
Chris@113:         delete m_ptyFile;
Chris@113:         m_ptyFile = 0;
Chris@84:         ::close(m_ptyMasterFd);
Chris@84:         m_ptySlaveFilename = "";
Chris@84:     }
Chris@84: #endif
jtkorhonen@0: }