WINGs/wfilepanel.c

   1
   2 #include "WINGsP.h"
   3
   4 #include <sys/types.h>
   5 #include <sys/stat.h>
   6 #include <unistd.h>
   7 #include <dirent.h>
   8 #include <limits.h>
   9
  10 #ifndef PATH_MAX
  11 #define PATH_MAX 1024
  12 #endif
  13
  14 typedef struct W_FilePanel {
  15     WMWindow *win;
  16
  17     WMLabel *iconLabel;
  18     WMLabel *titleLabel;
  19
  20     WMFrame *line;
  21
  22     WMLabel *nameLabel;
  23     WMBrowser *browser;
  24
  25     WMButton *okButton;
  26     WMButton *cancelButton;
  27
  28     WMButton *homeButton;
  29
  30     WMView *accessoryView;
  31
  32     WMTextField *fileField;
  33
  34     char **fileTypes;
  35
  36     struct {
  37         unsigned int canExit:1;
  38         unsigned int canceled:1;       /* clicked on cancel */
  39         unsigned int done:1;
  40         unsigned int filtered:1;
  41         unsigned int canChooseFiles:1;
  42         unsigned int canChooseDirectories:1;
  43         unsigned int autoCompletion:1;
  44         unsigned int showAllFiles:1;
  45         unsigned int canFreeFileTypes:1;
  46         unsigned int fileMustExist:1;
  47         unsigned int panelType:1;
  48
  49         /**/
  50         unsigned int ignoreTextChangeNotification:1;
  51     } flags;
  52 } W_FilePanel;
  53
  54
  55 /* Type of panel */
  56 #define WP_OPEN         0
  57 #define WP_SAVE         1
  58
  59 #define PWIDTH          320
  60 #define PHEIGHT         360
  61
  62 static void listDirectoryOnColumn(WMFilePanel *panel, int column, char *path);
  63 static void browserClick();
  64 static void browserDClick();
  65
  66 static void fillColumn(WMBrowser *bPtr, int column);
  67
  68 static void goHome();
  69
  70 static void buttonClick();
  71
  72 static char *getCurrentFileName(WMFilePanel *panel);
  73
  74 static void handleEvents(XEvent *event, void *data);
  75
  76
  77 static int
  78 closestListItem(WMList *list, char *text, Bool exact)
  79 {
  80     WMListItem *item = WMGetListItem(list, 0);
  81     int i = 0;
  82     int len = strlen(text);
  83
  84     if (len==0)
  85         return -1;
  86
  87     while (item) {
  88         if (strlen(item->text) >= len &&
  89             ((exact && strcmp(item->text, text)==0) ||
  90              (!exact && strncmp(item->text, text, len)==0))) {
  91             return i;
  92         }
  93         item = item->nextPtr;
  94         i++;
  95     }
  96     return -1;
  97 }
  98
  99
 100 static void
 101 textChangedObserver(void *observerData, WMNotification *notification)
 102 {
 103     W_FilePanel *panel = (W_FilePanel*)observerData;
 104     char *text;
 105     WMList *list;
 106     int col = WMGetBrowserNumberOfColumns(panel->browser) - 1;
 107     int i, j, textEvent = (int)WMGetNotificationClientData(notification);
 108     static int running = 0;
 109
 110     if (running)
 111         return;
 112
 113     running = 1;
 114
 115     if (panel->flags.ignoreTextChangeNotification)
 116         return;
 117
 118     list = WMGetBrowserListInColumn(panel->browser, col);
 119     if (!list)
 120         return;
 121
 122     text = WMGetTextFieldText(panel->fileField);
 123
 124     if (panel->flags.autoCompletion && textEvent!=WMDeleteTextEvent)
 125         i = closestListItem(list, text, False);
 126     else
 127         i = closestListItem(list, text, True);
 128
 129     WMSelectListItem(list, i);
 130     if (i>=0 && panel->flags.autoCompletion) {
 131         WMListItem *item = WMGetListItem(list, i);
 132         int textLen = strlen(text), itemTextLen = strlen(item->text);
 133         int visibleItems = WMWidgetHeight(list)/WMGetListItemHeight(list);
 134
 135         if (textEvent!=WMSetTextEvent || textLen<itemTextLen)
 136             WMSetListPosition(list, i - visibleItems/2);
 137
 138         if (textEvent!=WMDeleteTextEvent && textLen<itemTextLen) {
 139             WMRange range;
 140
 141             WMInsertTextFieldText(panel->fileField, &item->text[textLen],
 142                                   textLen);
 143             WMSetTextFieldCursorPosition(panel->fileField, itemTextLen);
 144             range.position = textLen;
 145             range.count = itemTextLen - textLen;
 146             WMSelectTextFieldRange(panel->fileField, range);
 147         }
 148     }
 149
 150     free(text);
 151     running = 0;
 152 }
 153
 154
 155 static void
 156 textEditedObserver(void *observerData, WMNotification *notification)
 157 {
 158     W_FilePanel *panel = (W_FilePanel*)observerData;
 159
 160     if ((int)WMGetNotificationClientData(notification)==WMReturnTextMovement) {
 161         WMPerformButtonClick(panel->okButton);
 162     }
 163 }
 164
 165
 166
 167 static WMFilePanel*
 168 makeFilePanel(WMScreen *scrPtr, char *name, char *title)
 169 {
 170     WMFilePanel *fPtr;
 171     WMFont *largeFont;
 172
 173     fPtr = wmalloc(sizeof(WMFilePanel));
 174     memset(fPtr, 0, sizeof(WMFilePanel));
 175
 176     fPtr->win = WMCreateWindowWithStyle(scrPtr, name, WMTitledWindowMask
 177                                         |WMResizableWindowMask);
 178     WMResizeWidget(fPtr->win, PWIDTH, PHEIGHT);
 179     WMSetWindowTitle(fPtr->win, "");
 180
 181     WMCreateEventHandler(WMWidgetView(fPtr->win), StructureNotifyMask,
 182                          handleEvents, fPtr);
 183     WMSetWindowMinSize(fPtr->win, PWIDTH, PHEIGHT);
 184
 185
 186     fPtr->iconLabel = WMCreateLabel(fPtr->win);
 187     WMResizeWidget(fPtr->iconLabel, 64, 64);
 188     WMMoveWidget(fPtr->iconLabel, 0, 0);
 189     WMSetLabelImagePosition(fPtr->iconLabel, WIPImageOnly);
 190     WMSetLabelImage(fPtr->iconLabel, scrPtr->applicationIcon);
 191
 192     fPtr->titleLabel = WMCreateLabel(fPtr->win);
 193     WMResizeWidget(fPtr->titleLabel, PWIDTH-64, 64);
 194     WMMoveWidget(fPtr->titleLabel, 64, 0);
 195     largeFont = WMBoldSystemFontOfSize(scrPtr, 24);
 196     WMSetLabelFont(fPtr->titleLabel, largeFont);
 197     WMReleaseFont(largeFont);
 198     WMSetLabelText(fPtr->titleLabel, title);
 199
 200     fPtr->line = WMCreateFrame(fPtr->win);
 201     WMMoveWidget(fPtr->line, 0, 64);
 202     WMResizeWidget(fPtr->line, PWIDTH, 2);
 203     WMSetFrameRelief(fPtr->line, WRGroove);
 204
 205     fPtr->browser = WMCreateBrowser(fPtr->win);
 206     WMSetBrowserFillColumnProc(fPtr->browser, fillColumn);
 207     WMSetBrowserAction(fPtr->browser, browserClick, fPtr);
 208     WMSetBrowserDoubleAction(fPtr->browser, browserDClick, fPtr);
 209     WMMoveWidget(fPtr->browser, 7, 72);
 210     WMHangData(fPtr->browser, fPtr);
 211
 212     fPtr->nameLabel = WMCreateLabel(fPtr->win);
 213     WMMoveWidget(fPtr->nameLabel, 7, 282);
 214     WMResizeWidget(fPtr->nameLabel, 55, 14);
 215     WMSetLabelText(fPtr->nameLabel, "Name:");
 216
 217     fPtr->fileField = WMCreateTextField(fPtr->win);
 218     WMMoveWidget(fPtr->fileField, 60, 278);
 219     WMResizeWidget(fPtr->fileField, PWIDTH-60-10, 24);
 220     WMAddNotificationObserver(textEditedObserver, fPtr,
 221                               WMTextDidEndEditingNotification,
 222                               fPtr->fileField);
 223     WMAddNotificationObserver(textChangedObserver, fPtr,
 224                               WMTextDidChangeNotification,
 225                               fPtr->fileField);
 226
 227     fPtr->okButton = WMCreateCommandButton(fPtr->win);
 228     WMMoveWidget(fPtr->okButton, 230, 325);
 229     WMResizeWidget(fPtr->okButton, 80, 28);
 230     WMSetButtonText(fPtr->okButton, "OK");
 231     WMSetButtonImage(fPtr->okButton, scrPtr->buttonArrow);
 232     WMSetButtonAltImage(fPtr->okButton, scrPtr->pushedButtonArrow);
 233     WMSetButtonImagePosition(fPtr->okButton, WIPRight);
 234     WMSetButtonAction(fPtr->okButton, buttonClick, fPtr);
 235
 236     fPtr->cancelButton = WMCreateCommandButton(fPtr->win);
 237     WMMoveWidget(fPtr->cancelButton, 140, 325);
 238     WMResizeWidget(fPtr->cancelButton, 80, 28);
 239     WMSetButtonText(fPtr->cancelButton, "Cancel");
 240     WMSetButtonAction(fPtr->cancelButton, buttonClick, fPtr);
 241
 242     fPtr->homeButton = WMCreateCommandButton(fPtr->win);
 243     WMMoveWidget(fPtr->homeButton, 55, 325);
 244     WMResizeWidget(fPtr->homeButton, 28, 28);
 245     WMSetButtonImagePosition(fPtr->homeButton, WIPImageOnly);
 246     WMSetButtonImage(fPtr->homeButton, scrPtr->homeIcon);
 247     WMSetButtonAltImage(fPtr->homeButton, scrPtr->altHomeIcon);
 248     WMSetButtonAction(fPtr->homeButton, goHome, fPtr);
 249
 250     WMRealizeWidget(fPtr->win);
 251     WMMapSubwidgets(fPtr->win);
 252
 253     WMSetFocusToWidget(fPtr->fileField);
 254     WMSetTextFieldCursorPosition(fPtr->fileField, 0);
 255
 256     WMLoadBrowserColumnZero(fPtr->browser);
 257
 258     fPtr->flags.canChooseFiles = 1;
 259     fPtr->flags.canChooseDirectories = 1;
 260     fPtr->flags.autoCompletion = 1;
 261
 262     return fPtr;
 263 }
 264
 265
 266 WMOpenPanel*
 267 WMGetOpenPanel(WMScreen *scrPtr)
 268 {
 269     WMFilePanel *panel;
 270
 271     if (scrPtr->sharedOpenPanel)
 272         return scrPtr->sharedOpenPanel;
 273
 274     panel = makeFilePanel(scrPtr, "openFilePanel", "Open");
 275     panel->flags.fileMustExist = 1;
 276     panel->flags.panelType = WP_OPEN;
 277
 278     scrPtr->sharedOpenPanel = panel;
 279
 280     return panel;
 281 }
 282
 283
 284 WMSavePanel*
 285 WMGetSavePanel(WMScreen *scrPtr)
 286 {
 287     WMFilePanel *panel;
 288
 289     if (scrPtr->sharedSavePanel)
 290         return scrPtr->sharedSavePanel;
 291
 292     panel = makeFilePanel(scrPtr, "saveFilePanel", "Save");
 293     panel->flags.fileMustExist = 0;
 294     panel->flags.panelType = WP_SAVE;
 295
 296     scrPtr->sharedSavePanel = panel;
 297
 298     return panel;
 299 }
 300
 301
 302 void
 303 WMFreeFilePanel(WMFilePanel *panel)
 304 {
 305     if (panel == WMWidgetScreen(panel->win)->sharedSavePanel) {
 306         WMWidgetScreen(panel->win)->sharedSavePanel = NULL;
 307     }
 308     if (panel == WMWidgetScreen(panel->win)->sharedOpenPanel) {
 309         WMWidgetScreen(panel->win)->sharedOpenPanel = NULL;
 310     }
 311     WMRemoveNotificationObserver(panel);
 312     WMUnmapWidget(panel->win);
 313     WMDestroyWidget(panel->win);
 314     free(panel);
 315 }
 316
 317
 318 int
 319 WMRunModalFilePanelForDirectory(WMFilePanel *panel, WMWindow *owner,
 320                                 char *path, char *name, char **fileTypes)
 321 {
 322     WMScreen *scr = WMWidgetScreen(panel->win);
 323     XEvent event;
 324
 325     WMChangePanelOwner(panel->win, owner);
 326
 327     if (name && !owner) {
 328         WMSetWindowTitle(panel->win, name);
 329     }
 330
 331     WMSetFilePanelDirectory(panel, path);
 332
 333     panel->flags.done = 0;
 334     switch(panel->flags.panelType) {
 335     case WP_OPEN:
 336         if (fileTypes)
 337             panel->flags.filtered = 1;
 338         panel->fileTypes = fileTypes;
 339         if (name == NULL)
 340             name = "Open";
 341         break;
 342     case WP_SAVE:
 343         panel->fileTypes = NULL;
 344         panel->flags.filtered = 0;
 345         if (name == NULL)
 346             name = "Save";
 347         break;
 348     default:
 349         break;
 350     }
 351
 352     WMSetLabelText(panel->titleLabel, name);
 353
 354     WMMapWidget(panel->win);
 355
 356     while (!panel->flags.done) {
 357         WMNextEvent(scr->display, &event);
 358         WMHandleEvent(&event);
 359     }
 360
 361     /* Must withdraw window because the next time we map
 362      * it, it might have a different transient owner.
 363      */
 364     WMCloseWindow(panel->win);
 365
 366     return (panel->flags.canceled ? False : True);
 367 }
 368
 369
 370
 371
 372 void
 373 WMSetFilePanelDirectory(WMFilePanel *panel, char *path)
 374 {
 375     WMList *list;
 376     WMListItem *item;
 377     int col;
 378     char *rest;
 379
 380     rest = WMSetBrowserPath(panel->browser, path);
 381     if (strcmp(path, "/")==0)
 382         rest = NULL;
 383
 384     col = WMGetBrowserSelectedColumn(panel->browser);
 385     list = WMGetBrowserListInColumn(panel->browser, col);
 386     if (list && (item = WMGetListSelectedItem(list))) {
 387         if (item->isBranch) {
 388             WMSetTextFieldText(panel->fileField, rest);
 389         } else {
 390             WMSetTextFieldText(panel->fileField, item->text);
 391         }
 392     } else {
 393         WMSetTextFieldText(panel->fileField, rest);
 394     }
 395 }
 396
 397
 398 void
 399 WMSetFilePanelCanChooseDirectories(WMFilePanel *panel, Bool flag)
 400 {
 401     panel->flags.canChooseDirectories = flag;
 402 }
 403
 404 void
 405 WMSetFilePanelCanChooseFiles(WMFilePanel *panel, Bool flag)
 406 {
 407     panel->flags.canChooseFiles = flag;
 408 }
 409
 410
 411 void
 412 WMSetFilePanelAutoCompletion(WMFilePanel *panel, Bool flag)
 413 {
 414     panel->flags.autoCompletion = flag;
 415 }
 416
 417
 418 char*
 419 WMGetFilePanelFileName(WMFilePanel *panel)
 420 {
 421     return getCurrentFileName(panel);
 422 }
 423
 424
 425 void
 426 WMSetFilePanelAccessoryView(WMFilePanel *panel, WMView *view)
 427 {
 428     WMView *v;
 429
 430     panel->accessoryView = view;
 431
 432     v = WMWidgetView(panel->win);
 433
 434     W_ReparentView(view, v, 0, 0);
 435
 436     W_MoveView(view, (v->size.width - v->size.width)/2, 300);
 437 }
 438
 439
 440 WMView*
 441 WMGetFilePanelAccessoryView(WMFilePanel *panel)
 442 {
 443     return panel->accessoryView;
 444 }
 445
 446
 447 static char*
 448 get_name_from_path(char *path)
 449 {
 450     int size;
 451
 452     assert(path!=NULL);
 453
 454     size = strlen(path);
 455
 456     /* remove trailing / */
 457     while (size > 0 && path[size-1]=='/')
 458         size--;
 459     /* directory was root */
 460     if (size == 0)
 461         return wstrdup("/");
 462
 463     while (size > 0 && path[size-1] != '/')
 464         size--;
 465
 466     return wstrdup(&(path[size]));
 467 }
 468
 469
 470 static int
 471 filterFileName(WMFilePanel *panel, char *file, Bool isDirectory)
 472 {
 473     return True;
 474 }
 475
 476
 477 static void
 478 listDirectoryOnColumn(WMFilePanel *panel, int column, char *path)
 479 {
 480     WMBrowser *bPtr = panel->browser;
 481     struct dirent *dentry;
 482     DIR *dir;
 483     struct stat stat_buf;
 484     char pbuf[PATH_MAX+16];
 485
 486     assert(column >= 0);
 487     assert(path != NULL);
 488
 489     /* put directory name in the title */
 490     WMSetBrowserColumnTitle(bPtr, column, get_name_from_path(path));
 491
 492     dir = opendir(path);
 493
 494     if (!dir) {
 495 #ifdef VERBOSE
 496         printf("WINGs: could not open directory %s\n", path);
 497 #endif
 498         return;
 499     }
 500
 501     /* list contents in the column */
 502     while ((dentry = readdir(dir))) {
 503         if (strcmp(dentry->d_name, ".")==0 ||
 504             strcmp(dentry->d_name, "..")==0)
 505             continue;
 506
 507         strcpy(pbuf, path);
 508         if (strcmp(path, "/")!=0)
 509             strcat(pbuf, "/");
 510         strcat(pbuf, dentry->d_name);
 511
 512         if (stat(pbuf, &stat_buf)!=0) {
 513 #ifdef VERBOSE
 514             printf("WINGs: could not stat %s\n", pbuf);
 515 #endif
 516             continue;
 517         } else {
 518             int isDirectory;
 519
 520             isDirectory = S_ISDIR(stat_buf.st_mode);
 521
 522             if (filterFileName(panel, dentry->d_name, isDirectory))
 523                 WMAddSortedBrowserItem(bPtr, column, dentry->d_name,
 524                                           isDirectory);
 525         }
 526     }
 527
 528     closedir(dir);
 529 }
 530
 531
 532 static void
 533 fillColumn(WMBrowser *bPtr, int column)
 534 {
 535     char *path;
 536     WMFilePanel *panel;
 537
 538     if (column > 0) {
 539         path = WMGetBrowserPathToColumn(bPtr, column-1);
 540     } else {
 541         path = wstrdup("/");
 542     }
 543
 544     panel = WMGetHangedData(bPtr);
 545     listDirectoryOnColumn(panel, column, path);
 546     free(path);
 547 }
 548
 549
 550 static void
 551 browserDClick(WMBrowser *bPtr, WMFilePanel *panel)
 552 {
 553     WMPerformButtonClick(panel->okButton);
 554 }
 555
 556 static void
 557 browserClick(WMBrowser *bPtr, WMFilePanel *panel)
 558 {
 559     int col = WMGetBrowserSelectedColumn(bPtr);
 560     WMListItem *item = WMGetBrowserSelectedItemInColumn(bPtr, col);
 561
 562     panel->flags.ignoreTextChangeNotification = 1;
 563
 564     if (!item || item->isBranch)
 565         WMSetTextFieldText(panel->fileField, NULL);
 566     else {
 567         WMSetTextFieldText(panel->fileField, item->text);
 568     }
 569
 570     panel->flags.ignoreTextChangeNotification = 0;
 571 }
 572
 573
 574 static void
 575 goHome(WMButton *bPtr, WMFilePanel *panel)
 576 {
 577     char *home;
 578
 579     /* home is statically allocated. Don't free it! */
 580     home = wgethomedir();
 581     if (!home)
 582         return;
 583
 584     WMSetFilePanelDirectory(panel, home);
 585 }
 586
 587
 588 static void
 589 handleEvents(XEvent *event, void *data)
 590 {
 591     W_FilePanel *pPtr = (W_FilePanel*)data;
 592     W_View *view = WMWidgetView(pPtr->win);
 593
 594     if (event->type == ConfigureNotify) {
 595         if (event->xconfigure.width != view->size.width
 596             || event->xconfigure.height != view->size.height) {
 597             unsigned int newWidth = event->xconfigure.width;
 598             unsigned int newHeight = event->xconfigure.height;
 599             int newColumnCount;
 600
 601             W_ResizeView(view, newWidth, newHeight);
 602             WMResizeWidget(pPtr->line, newWidth, 2);
 603             WMResizeWidget(pPtr->browser, newWidth-14,
 604                            newHeight-(PHEIGHT-200));
 605             WMResizeWidget(pPtr->fileField, newWidth-60-10, 24);
 606             WMMoveWidget(pPtr->nameLabel, 7, newHeight-(PHEIGHT-282));
 607             WMMoveWidget(pPtr->fileField, 60, newHeight-(PHEIGHT-278));
 608             WMMoveWidget(pPtr->okButton, newWidth-(PWIDTH-230),
 609                          newHeight-(PHEIGHT-325));
 610             WMMoveWidget(pPtr->cancelButton, newWidth-(PWIDTH-140),
 611                          newHeight-(PHEIGHT-325));
 612             WMMoveWidget(pPtr->homeButton, 55, newHeight-(PHEIGHT-325));
 613
 614             newColumnCount = (newWidth - 14) / 140;
 615             WMSetBrowserMaxVisibleColumns(pPtr->browser, newColumnCount);
 616         }
 617     }
 618 }
 619
 620
 621 static char*
 622 getCurrentFileName(WMFilePanel *panel)
 623 {
 624     char *path;
 625     char *file;
 626     char *tmp;
 627     int len;
 628
 629     path = WMGetBrowserPath(panel->browser);
 630
 631     len = strlen(path);
 632     if (path[len-1]=='/') {
 633         file = WMGetTextFieldText(panel->fileField);
 634         tmp = wmalloc(strlen(path)+strlen(file)+8);
 635         if (file[0]!='/') {
 636            strcpy(tmp, path);
 637            strcat(tmp, file);
 638         } else
 639            strcpy(tmp, file);
 640
 641         free(file);
 642         free(path);
 643         return tmp;
 644     } else {
 645         return path;
 646     }
 647 }
 648
 649
 650
 651 static Bool
 652 validOpenFile(WMFilePanel *panel)
 653 {
 654     WMListItem *item;
 655     int col, haveFile = 0;
 656     char *file = WMGetTextFieldText(panel->fileField);
 657
 658     if (file[0] != '\0')
 659         haveFile = 1;
 660     free(file);
 661
 662     col = WMGetBrowserSelectedColumn(panel->browser);
 663     item = WMGetBrowserSelectedItemInColumn(panel->browser, col);
 664     if (item) {
 665         if (item->isBranch && !panel->flags.canChooseDirectories && !haveFile)
 666             return False;
 667         else if (!item->isBranch && !panel->flags.canChooseFiles)
 668             return False;
 669         else
 670             return True;
 671     } else {
 672         /* we compute for / here */
 673         if (!panel->flags.canChooseDirectories && !haveFile)
 674             return False;
 675         else
 676             return True;
 677     }
 678     return True;
 679 }
 680
 681
 682
 683 static void
 684 buttonClick(WMButton *bPtr, WMFilePanel *panel)
 685 {
 686     WMRange range;
 687
 688     if (bPtr == panel->okButton) {
 689         if (!validOpenFile(panel))
 690             return;
 691         if (panel->flags.fileMustExist) {
 692             char *file;
 693
 694             file = getCurrentFileName(panel);
 695             if (access(file, F_OK)!=0) {
 696                 WMRunAlertPanel(WMWidgetScreen(panel->win), panel->win,
 697                                 "Error", "File does not exist.",
 698                                 "Ok", NULL, NULL);
 699                 free(file);
 700                 return;
 701             }
 702             free(file);
 703         }
 704         panel->flags.canceled = 0;
 705     } else
 706         panel->flags.canceled = 1;
 707
 708     range.count = range.position = 0;
 709     WMSelectTextFieldRange(panel->fileField, range);
 710     panel->flags.done = 1;
 711 }
 712
 713