mpv_kde4.cpp

   1 /*
   2
   3     Minimum Profit - Programmer Text Editor
   4
   5     KDE4 driver.
   6
   7     Copyright (C) 2008-2010 Angel Ortega <angel@triptico.com>
   8
   9     This program is free software; you can redistribute it and/or
  10     modify it under the terms of the GNU General Public License
  11     as published by the Free Software Foundation; either version 2
  12     of the License, or (at your option) any later version.
  13
  14     This program is distributed in the hope that it will be useful,
  15     but WITHOUT ANY WARRANTY; without even the implied warranty of
  16     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17     GNU General Public License for more details.
  18
  19     You should have received a copy of the GNU General Public License
  20     along with this program; if not, write to the Free Software
  21     Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  22
  23     http://www.triptico.com
  24
  25 */
  26
  27 /* override auto-generated definition in config.h */
  28 extern "C" int kde4_drv_detect(int * argc, char *** argv);
  29
  30 #include "config.h"
  31
  32 #include <stdio.h>
  33 #include <wchar.h>
  34 #include <unistd.h>
  35 #include "mpdm.h"
  36 #include "mpsl.h"
  37 #include "mp.h"
  38 #include "mp.xpm"
  39
  40 #include <QtGui/QKeyEvent>
  41 #include <QtGui/QPainter>
  42 #include <QtGui/QMenu>
  43
  44 #include <QtGui/QLabel>
  45 #include <QtGui/QComboBox>
  46 #include <QtGui/QLineEdit>
  47 #include <QtGui/QCheckBox>
  48 #include <QtGui/QListWidget>
  49 #include <QtGui/QScrollBar>
  50 #include <QtGui/QClipboard>
  51
  52 #include <KApplication>
  53 #include <KAboutData>
  54 #include <KCmdLineArgs>
  55
  56 #include <KMainWindow>
  57 #include <KMenuBar>
  58 #include <KStatusBar>
  59 #include <KMenu>
  60 #include <KTabBar>
  61
  62 #include <KVBox>
  63 #include <KHBox>
  64
  65 #include <KDialog>
  66 #include <KMessageBox>
  67 #include <KFileDialog>
  68 #include <KUrl>
  69
  70 /** data **/
  71
  72 class MPWindow : public KMainWindow
  73 {
  74         public:
  75                 MPWindow(QWidget *parent = 0);
  76                 bool queryExit(void);
  77                 bool event(QEvent *event);
  78 };
  79
  80 class MPArea : public QWidget
  81 {
  82         Q_OBJECT
  83
  84         public:
  85                 MPArea(QWidget *parent = 0);
  86                 void inputMethodEvent(QInputMethodEvent *event);
  87                 void keyPressEvent(QKeyEvent *event);
  88                 void keyReleaseEvent(QKeyEvent *event);
  89                 void mousePressEvent(QMouseEvent *event);
  90                 void mouseReleaseEvent(QMouseEvent *event);
  91                 void mouseMoveEvent(QMouseEvent *event);
  92                 void wheelEvent(QWheelEvent *event);
  93                 void dragEnterEvent(QDragEnterEvent *event);
  94                 void dropEvent(QDropEvent *event);
  95                 bool event(QEvent *event);
  96
  97                 QTimer *timer;
  98
  99         protected:
 100                 void paintEvent(QPaintEvent *event);
 101
 102         public slots:
 103                 void from_scrollbar(int);
 104                 void from_filetabs(int);
 105                 void from_menu(QAction *);
 106                 void from_timer(void);
 107 };
 108
 109 /* global data */
 110 KApplication *app;
 111 MPWindow *window;
 112 KMenuBar *menubar;
 113 KStatusBar *statusbar;
 114 KTabBar *file_tabs;
 115
 116 #define MENU_CLASS KMenu
 117
 118 #include "mpv_qk_common.cpp"
 119
 120 static void draw_status(void)
 121 {
 122         statusbar->changeItem(str_to_qstring(mp_build_status_line()), 0);
 123 }
 124
 125 /** MPWindow methods **/
 126
 127 MPWindow::MPWindow(QWidget *parent) : KMainWindow(parent)
 128 {
 129         menubar = this->menuBar();
 130         build_menu();
 131
 132         statusbar = this->statusBar();
 133         statusbar->insertItem("mp " VERSION, 0);
 134
 135         /* the full container */
 136         KVBox *vb = new KVBox(this);
 137
 138         file_tabs = new KTabBar(vb);
 139         file_tabs->setFocusPolicy(Qt::NoFocus);
 140
 141         KHBox *hb = new KHBox(vb);
 142
 143         /* main area */
 144         area = new MPArea(hb);
 145         scrollbar = new QScrollBar(hb);
 146         scrollbar->setFocusPolicy(Qt::NoFocus);
 147
 148         setCentralWidget(vb);
 149
 150         connect(scrollbar, SIGNAL(valueChanged(int)),
 151                 area, SLOT(from_scrollbar(int)));
 152
 153         connect(file_tabs, SIGNAL(currentChanged(int)),
 154                 area, SLOT(from_filetabs(int)));
 155
 156         connect(menubar, SIGNAL(triggered(QAction *)),
 157                 area, SLOT(from_menu(QAction *)));
 158
 159         this->setWindowIcon(QIcon(QPixmap(mp_xpm)));
 160
 161         this->setAutoSaveSettings(QLatin1String("MinimumProfit"), true);
 162 }
 163
 164
 165 bool MPWindow::queryExit(void)
 166 {
 167         mp_process_event(MPDM_LS(L"close-window"));
 168
 169         this->saveAutoSaveSettings();
 170
 171         return mp_exit_requested ? true : false;
 172 }
 173
 174
 175 bool MPWindow::event(QEvent *event)
 176 {
 177         /* do the processing */
 178         bool r = QWidget::event(event);
 179
 180         if (mp_exit_requested) {
 181                 this->saveAutoSaveSettings();
 182                 exit(0);
 183         }
 184
 185         return r;
 186 }
 187
 188
 189 /** driver functions **/
 190
 191 static mpdm_t kde4_drv_update_ui(mpdm_t a)
 192 {
 193         return qt4_drv_update_ui(a);
 194 }
 195
 196
 197 static mpdm_t kde4_drv_alert(mpdm_t a)
 198 /* alert driver function */
 199 {
 200         /* 1# arg: prompt */
 201         KMessageBox::information(0, str_to_qstring(mpdm_aget(a, 0)),
 202                 i18n("mp " VERSION));
 203
 204         return NULL;
 205 }
 206
 207 static mpdm_t kde4_drv_confirm(mpdm_t a)
 208 /* confirm driver function */
 209 {
 210         int r;
 211
 212         /* 1# arg: prompt */
 213         r = KMessageBox::questionYesNoCancel(0,
 214                 str_to_qstring(mpdm_aget(a, 0)), i18n("mp" VERSION));
 215
 216         switch (r) {
 217         case KMessageBox::Yes:
 218                 r = 1;
 219                 break;
 220
 221         case KMessageBox::No:
 222                 r = 2;
 223                 break;
 224
 225         case KMessageBox::Cancel:
 226                 r = 0;
 227                 break;
 228         }
 229
 230         return MPDM_I(r);
 231 }
 232
 233
 234 static mpdm_t kde4_drv_openfile(mpdm_t a)
 235 {
 236         QString r;
 237         char tmp[128];
 238
 239         getcwd(tmp, sizeof(tmp));
 240
 241         /* 1# arg: prompt */
 242         r = KFileDialog::getOpenFileName(KUrl::fromPath(tmp), "*", 0,
 243                 str_to_qstring(mpdm_aget(a, 0)));
 244
 245         return qstring_to_str(r);
 246 }
 247
 248
 249 static mpdm_t kde4_drv_savefile(mpdm_t a)
 250 {
 251         QString r;
 252         char tmp[128];
 253
 254         getcwd(tmp, sizeof(tmp));
 255
 256         /* 1# arg: prompt */
 257         r = KFileDialog::getSaveFileName(KUrl::fromPath(tmp), "*", 0,
 258                 str_to_qstring(mpdm_aget(a, 0)));
 259
 260         return qstring_to_str(r);
 261 }
 262
 263
 264 static mpdm_t kde4_drv_form(mpdm_t a)
 265 {
 266         int n;
 267         mpdm_t widget_list;
 268         QWidget *qlist[100];
 269         mpdm_t r;
 270
 271         KDialog *dialog = new KDialog(window);
 272
 273         dialog->setModal(true);
 274         dialog->setButtons(KDialog::Ok | KDialog::Cancel);
 275
 276         widget_list = mpdm_aget(a, 0);
 277
 278         KVBox *vb = new KVBox(dialog);
 279         dialog->setMainWidget(vb);
 280
 281         for (n = 0; n < mpdm_size(widget_list); n++) {
 282                 mpdm_t w = mpdm_aget(widget_list, n);
 283                 wchar_t *type;
 284                 mpdm_t t;
 285                 KHBox *hb = new KHBox(vb);
 286
 287                 type = mpdm_string(mpdm_hget_s(w, L"type"));
 288
 289                 if ((t = mpdm_hget_s(w, L"label")) != NULL) {
 290                         QLabel *ql = new QLabel(hb);
 291                         ql->setText(str_to_qstring(mpdm_gettext(t)));
 292                 }
 293
 294                 t = mpdm_hget_s(w, L"value");
 295
 296                 if (wcscmp(type, L"text") == 0) {
 297                         mpdm_t h;
 298                         QComboBox *ql = new QComboBox(hb);
 299
 300                         ql->setEditable(true);
 301                         ql->setMinimumContentsLength(30);
 302                         ql->setMaxVisibleItems(8);
 303
 304                         if (t != NULL)
 305                                 ql->setEditText(str_to_qstring(t));
 306
 307                         qlist[n] = ql;
 308
 309                         if ((h = mpdm_hget_s(w, L"history")) != NULL) {
 310                                 int i;
 311
 312                                 /* has history; fill it */
 313                                 h = mp_get_history(h);
 314
 315                                 for (i = mpdm_size(h) - 1; i >= 0; i--)
 316                                         ql->addItem(str_to_qstring(mpdm_aget(h, i)));
 317                         }
 318                 }
 319                 else
 320                 if (wcscmp(type, L"password") == 0) {
 321                         QLineEdit *ql = new QLineEdit(hb);
 322
 323                         ql->setEchoMode(QLineEdit::Password);
 324
 325                         qlist[n] = ql;
 326                 }
 327                 else
 328                 if (wcscmp(type, L"checkbox") == 0) {
 329                         QCheckBox *qc = new QCheckBox(hb);
 330
 331                         if (mpdm_ival(t))
 332                                 qc->setCheckState(Qt::Checked);
 333
 334                         qlist[n] = qc;
 335                 }
 336                 else
 337                 if (wcscmp(type, L"list") == 0) {
 338                         int i;
 339                         QListWidget *ql = new QListWidget(hb);
 340                         ql->setMinimumWidth(480);
 341
 342                         /* use a monospaced font */
 343                         ql->setFont(QFont(QString("Mono")));
 344
 345                         mpdm_t l = mpdm_hget_s(w, L"list");
 346
 347                         for (i = 0; i < mpdm_size(l); i++)
 348                                 ql->addItem(str_to_qstring(mpdm_aget(l, i)));
 349
 350                         ql->setCurrentRow(mpdm_ival(t));
 351
 352                         qlist[n] = ql;
 353                 }
 354
 355                 if (n == 0)
 356                         qlist[n]->setFocus(Qt::OtherFocusReason);
 357         }
 358
 359         n = dialog->exec();
 360
 361         if (!n)
 362                 return NULL;
 363
 364         r = MPDM_A(mpdm_size(widget_list));
 365
 366         /* fill the return values */
 367         for (n = 0; n < mpdm_size(widget_list); n++) {
 368                 mpdm_t w = mpdm_aget(widget_list, n);
 369                 mpdm_t v = NULL;
 370                 wchar_t *type;
 371
 372                 type = mpdm_string(mpdm_hget_s(w, L"type"));
 373
 374                 if (wcscmp(type, L"text") == 0) {
 375                         mpdm_t h;
 376                         QComboBox *ql = (QComboBox *)qlist[n];
 377
 378                         v = qstring_to_str(ql->currentText());
 379
 380                         /* if it has history, add to it */
 381                         if ((h = mpdm_hget_s(w, L"history")) != NULL &&
 382                                 v != NULL && mpdm_cmp_s(v, L"") != 0) {
 383                                 h = mp_get_history(h);
 384
 385                                 if (mpdm_cmp(v, mpdm_aget(h, -1)) != 0)
 386                                         mpdm_push(h, v);
 387                         }
 388                 }
 389                 else
 390                 if (wcscmp(type, L"password") == 0) {
 391                         QLineEdit *ql = (QLineEdit *)qlist[n];
 392
 393                         v = qstring_to_str(ql->text());
 394                 }
 395                 else
 396                 if (wcscmp(type, L"checkbox") == 0) {
 397                         QCheckBox *qb = (QCheckBox *)qlist[n];
 398
 399                         v = MPDM_I(qb->checkState() == Qt::Checked);
 400                 }
 401                 else
 402                 if (wcscmp(type, L"list") == 0) {
 403                         QListWidget *ql = (QListWidget *)qlist[n];
 404
 405                         v = MPDM_I(ql->currentRow());
 406                 }
 407
 408                 mpdm_aset(r, v, n);
 409         }
 410
 411         return r;
 412 }
 413
 414
 415 static mpdm_t kde4_drv_busy(mpdm_t a)
 416 {
 417         return qt4_drv_busy(a);
 418 }
 419
 420
 421 static mpdm_t kde4_drv_main_loop(mpdm_t a)
 422 {
 423         return qt4_drv_main_loop(a);
 424 }
 425
 426
 427 static mpdm_t kde4_drv_shutdown(mpdm_t a)
 428 {
 429         return qt4_drv_shutdown(a);
 430 }
 431
 432
 433 static mpdm_t kde4_drv_clip_to_sys(mpdm_t a)
 434 {
 435         return qt4_drv_clip_to_sys(a);
 436 }
 437
 438
 439 static mpdm_t kde4_drv_sys_to_clip(mpdm_t a)
 440 {
 441         return qt4_drv_sys_to_clip(a);
 442 }
 443
 444
 445 static mpdm_t kde4_drv_timer(mpdm_t a)
 446 {
 447         return qt4_drv_timer(a);
 448 }
 449
 450 static void register_functions(void)
 451 {
 452         mpdm_t drv;
 453
 454         drv = mpdm_hget_s(mp, L"drv");
 455         mpdm_hset_s(drv, L"main_loop", MPDM_X(kde4_drv_main_loop));
 456         mpdm_hset_s(drv, L"shutdown", MPDM_X(kde4_drv_shutdown));
 457
 458         mpdm_hset_s(drv, L"clip_to_sys", MPDM_X(kde4_drv_clip_to_sys));
 459         mpdm_hset_s(drv, L"sys_to_clip", MPDM_X(kde4_drv_sys_to_clip));
 460         mpdm_hset_s(drv, L"update_ui", MPDM_X(kde4_drv_update_ui));
 461         mpdm_hset_s(drv, L"timer", MPDM_X(kde4_drv_timer));
 462         mpdm_hset_s(drv, L"busy", MPDM_X(kde4_drv_busy));
 463
 464         mpdm_hset_s(drv, L"alert", MPDM_X(kde4_drv_alert));
 465         mpdm_hset_s(drv, L"confirm", MPDM_X(kde4_drv_confirm));
 466         mpdm_hset_s(drv, L"openfile", MPDM_X(kde4_drv_openfile));
 467         mpdm_hset_s(drv, L"savefile", MPDM_X(kde4_drv_savefile));
 468         mpdm_hset_s(drv, L"form", MPDM_X(kde4_drv_form));
 469 }
 470
 471
 472 static mpdm_t kde4_drv_startup(mpdm_t a)
 473 /* driver initialization */
 474 {
 475         register_functions();
 476
 477         build_font(1);
 478         build_colors();
 479
 480         window = new MPWindow();
 481         window->show();
 482
 483         return NULL;
 484 }
 485
 486 extern "C" Display *XOpenDisplay(char *);
 487
 488 extern "C" int kde4_drv_detect(int * argc, char *** argv)
 489 {
 490         mpdm_t drv;
 491         KCmdLineOptions opts;
 492         Display *x11_display;
 493         int n;
 494
 495         for (n = 0; n < *argc; n++) {
 496                 if (strcmp(argv[0][n], "-txt") == 0 ||
 497                         strcmp(argv[0][n], "-h") == 0)
 498                         return 0;
 499         }
 500
 501         /* try connecting directly to the Xserver */
 502         if ((x11_display = XOpenDisplay((char *)NULL)) == NULL)
 503                 return 0;
 504
 505         KAboutData aboutData(
 506                 "mp", 0,
 507                 ki18n("Minimum Profit"), VERSION,
 508                 ki18n("A programmer's text editor"),
 509                 KAboutData::License_GPL,
 510                 ki18n("Copyright (c) 1991-2009 Angel Ortega"),
 511                 ki18n(""),
 512                 "http://triptico.com",
 513                 "angel@triptico.com"
 514         );
 515
 516         KCmdLineArgs::init(*argc, *argv, &aboutData);
 517
 518         /* command line options should be inserted here (I don't like this) */
 519         opts.add("t {tag}", ki18n("Edits the file where tag is defined"));
 520         opts.add("e {mpsl_code}", ki18n("Executes MPSL code"));
 521         opts.add("f {mpsl_script}", ki18n("Executes MPSL script file"));
 522         opts.add("d {directory}", ki18n("Sets working directory"));
 523         opts.add("x {file}", ki18n("Open file in the hexadecimal viewer"));
 524         opts.add(" +NNN", ki18n("Moves to line number NNN of last file"));
 525         opts.add("txt", ki18n("Use text mode instead of GUI"));
 526         opts.add("+[file(s)]", ki18n("Documents to open"));
 527         KCmdLineArgs::addCmdLineOptions(opts);
 528
 529         /* this is where it crashes if no X server */
 530         app = new KApplication(x11_display);
 531
 532         drv = mpdm_hget_s(mp, L"drv");
 533         mpdm_hset_s(drv, L"id", MPDM_LS(L"kde4"));
 534         mpdm_hset_s(drv, L"startup", MPDM_X(kde4_drv_startup));
 535
 536         return 1;
 537 }
 538
 539 #include "mpv_kde4.moc"