application/Sidebar.c

   1 /*
   2  * Copyright 2022 Olaf Wintermann
   3  *
   4  * Permission is hereby granted, free of charge, to any person obtaining a
   5  * copy of this software and associated documentation files (the "Software"),
   6  * to deal in the Software without restriction, including without limitation
   7  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
   8  * and/or sell copies of the Software, and to permit persons to whom the
   9  * Software is furnished to do so, subject to the following conditions:
  10  *
  11  * The above copyright notice and this permission notice shall be included in
  12  * all copies or substantial portions of the Software.
  13  *
  14  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  15  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  16  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
  17  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  18  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
  19  * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
  20  * DEALINGS IN THE SOFTWARE.
  21  */
  22
  23 #include "Sidebar.h"
  24 #include "SidebarP.h"
  25
  26 #include <stdio.h>
  27 #include <stdlib.h>
  28 #include <string.h>
  29 #include <errno.h>
  30
  31 #include "xdnd.h"
  32 #include "utils.h"
  33 #include "playlist.h"
  34 #include <cx/string.h>
  35
  36
  37 static void sidebar_class_init(void);
  38 static void sidebar_class_part_init (WidgetClass wc);
  39 static void sidebar_init(Widget request, Widget neww, ArgList args, Cardinal *num_args);
  40 static void sidebar_destroy(Widget widget);
  41 static void sidebar_resize(Widget widget);
  42 static void sidebar_realize(Widget widget, XtValueMask *mask, XSetWindowAttributes *attributes);
  43 static void sidebar_expose(Widget widget, XEvent *event, Region region);
  44 static Boolean sidebar_set_values(Widget old, Widget request, Widget neww, ArgList args, Cardinal *num_args);
  45 static void sidebar_insert_child(Widget child);
  46 Boolean sidebar_acceptfocus(Widget widget, Time *time);
  47
  48 static void FocusInAP(Widget w, XEvent *event, String *args, Cardinal *nArgs);
  49 static void SelectElmAP(Widget w, XEvent *event, String *args, Cardinal *nArgs);
  50 static void PopupAP(Widget w, XEvent *event, String *args, Cardinal *nArgs);
  51
  52 static void sidebar_xdnd_callback(Widget w, XtPointer udata, XtPointer cdata);
  53
  54
  55 static XtResource resources[] = {
  56
  57 };
  58
  59 static XtActionsRec actionslist[] = {
  60   {"focusIn", FocusInAP},
  61   {"selectElm", SelectElmAP},
  62   {"popup", PopupAP}
  63 };
  64
  65 static char defaultTranslations[] = "<FocusIn>:  focusIn()\n"
  66                                     "<Btn1Down>: selectElm()\n"
  67                                     "<Btn3Down>: popup()";
  68
  69
  70 static XtResource constraints[] = {};
  71
  72 SidebarClassRec sidebarWidgetClassRec = {
  73     // Core Class
  74     {
  75         (WidgetClass)&xmManagerClassRec,
  76         "XnSidebar",                         // class_name
  77         sizeof(SidebarRec),                  // widget_size
  78         sidebar_class_init,                  // class_initialize
  79         sidebar_class_part_init,             // class_part_initialize
  80         FALSE,                           // class_inited
  81         sidebar_init,                        // initialize
  82         NULL,                            // initialize_hook
  83         sidebar_realize,                     // realize
  84         actionslist,                     // actions
  85         XtNumber(actionslist),           // num_actions
  86         resources,                       // resources
  87         XtNumber(resources),             // num_resources
  88         NULLQUARK,                       // xrm_class
  89         True,                            // compress_motion
  90         True,                            // compress_exposure
  91         True,                            // compress_enterleave
  92         False,                           // visible_interest
  93         sidebar_destroy,                     // destroy
  94         sidebar_resize,                      // resize
  95         sidebar_expose,                 // expose
  96         sidebar_set_values,                  // set_values
  97         NULL,                            // set_values_hook
  98         XtInheritSetValuesAlmost,        // set_values_almost
  99         NULL,                            // get_values_hook
 100         sidebar_acceptfocus,                 // accept_focus
 101         XtVersion,                       // version
 102         NULL,                            // callback_offsets
 103         defaultTranslations,             // tm_table
 104         XtInheritQueryGeometry,          // query_geometry
 105         XtInheritDisplayAccelerator,     // display_accelerator
 106         NULL,                            // extension
 107     },
 108     // Composite Class
 109     {
 110         XtInheritGeometryManager, // geometry_manager
 111         XtInheritChangeManaged,   // change_managed
 112         sidebar_insert_child,         // insert_child
 113         XtInheritDeleteChild,     // delete_child
 114         NULL,                     // extension
 115     },
 116     // Constraint Class
 117     {
 118         constraints,                 // resources
 119         XtNumber(constraints),       // num_resources
 120         sizeof(XmFormConstraintRec), // constraint_size
 121         NULL,                        // initialize
 122         NULL,                        // destroy
 123         NULL,                        // set_value
 124         NULL,                        // extension
 125     },
 126     // XmManager Class
 127     {
 128         XtInheritTranslations, // translations
 129         NULL, // syn_resources
 130         0,    // num_syn_resources
 131         NULL, // syn_constraint_resources
 132         0,    // num_syn_constraint_resources
 133         XmInheritParentProcess, // parent_process
 134         NULL  // extension
 135     },
 136     // Sidebar Class
 137     {
 138         0
 139     }
 140 };
 141
 142 WidgetClass xnSidebarWidgetClass = (WidgetClass)&sidebarWidgetClassRec;
 143
 144
 145 static void sidebar_class_init(void) {
 146
 147 }
 148
 149 static void sidebar_class_part_init (WidgetClass wc) {
 150     SidebarClassRec *sidebarClass = (SidebarClassRec*)wc;
 151     XmManagerClassRec *managerClass = (XmManagerClassRec*)xmManagerWidgetClass;
 152
 153     sidebarClass->constraint_class.initialize = managerClass->constraint_class.initialize;
 154     sidebarClass->constraint_class.set_values = managerClass->constraint_class.set_values;
 155 }
 156
 157
 158
 159 static void sidebar_init(Widget request, Widget neww, ArgList args, Cardinal *num_args) {
 160     Sidebar sb = (Sidebar)neww;
 161
 162     // initialize everything except XftDraw or other stuff that needs a Window
 163
 164     XftColor fg, bg;
 165     fg.color.red = 0;
 166     fg.color.green = 0;
 167     fg.color.blue = 0;
 168     fg.color.alpha = 0xFFFF;
 169
 170     bg.color.red = 0xFFFF;
 171     bg.color.green = 0xFFFF;
 172     bg.color.blue = 0xFFFF;
 173     bg.color.alpha = 0xFFFF;
 174
 175     sb->sidebar.fg = fg;
 176     sb->sidebar.bg = bg;
 177
 178     sb->sidebar.font = FontFromName(XtDisplay(neww), "Sans:size=11");
 179     if(!sb->sidebar.font) {
 180         fprintf(stderr, "Cannot open font.\nAbort.\n");
 181         exit(-1);
 182     }
 183
 184     XftFont *xftFont = sb->sidebar.font->fonts->font;
 185     int padding = 2;
 186     int fontheight = xftFont->ascent;
 187     sb->sidebar.elmHeight = fontheight + 2*padding;
 188 }
 189
 190
 191
 192 static void sidebar_destroy(Widget widget) {
 193
 194 }
 195
 196 static int testresize = 1;
 197 static void sidebar_resize(Widget widget) {
 198     if(testresize) {
 199         XtWidgetGeometry geom;
 200         geom.request_mode = CWWidth | CWHeight;
 201         geom.width = 200;
 202         geom.height = 2000;
 203         XtWidgetGeometry result;
 204         //XtMakeGeometryRequest(widget, &geom, &result);
 205         testresize = 0;
 206     }
 207     printf("resize\n");
 208 }
 209
 210 static int xdnd_initialized = 0;
 211
 212 static void sidebar_realize(Widget widget, XtValueMask *mask, XSetWindowAttributes *attributes) {
 213     (xmManagerClassRec.core_class.realize)(widget, mask, attributes);
 214
 215     if(!xdnd_initialized) {
 216         XdndInit(XtDisplay(widget), XtWidgetToApplicationContext(widget), sidebar_xdnd_callback, widget);
 217     }
 218     XdndEnable(widget);
 219
 220     Screen *screen = widget->core.screen;
 221     Visual *visual = screen->root_visual;
 222     for(int i=0;i<screen->ndepths;i++) {
 223         Depth d = screen->depths[i];
 224         if(d.depth == widget->core.depth) {
 225             visual = d.visuals;
 226             break;
 227         }
 228     }
 229
 230     Sidebar sb = (Sidebar)widget;
 231     sb->sidebar.d = XftDrawCreate(
 232             XtDisplay(widget),
 233             XtWindow(widget),
 234             visual,
 235             widget->core.colormap);
 236
 237     Dimension w, h;
 238
 239     Widget parent = XtParent(widget);
 240     XtVaSetValues(parent, XmNbackground, WhitePixelOfScreen(XtScreen(parent)), NULL);
 241
 242     XtMakeResizeRequest(widget, 200, 100, &w, &h);
 243
 244 }
 245
 246 static void sidebar_expose(Widget widget, XEvent *event, Region region) {
 247     //printf("expose\n");
 248     Dimension w, h;
 249     //XtMakeResizeRequest(widget, 200, 2000, &w, &h);
 250
 251     w = widget->core.width;
 252     h = widget->core.height;
 253
 254     Widget parent = XtParent(widget);
 255
 256     Sidebar s = (Sidebar)widget;
 257     XftFont *xftFont = s->sidebar.font->fonts->font;
 258     CxList *tracks = s->sidebar.window->playlist.tracks;
 259     size_t numTracks = tracks->size;
 260
 261     int fontheight = xftFont->ascent;
 262     int height = s->sidebar.elmHeight;
 263
 264
 265     int list_height = numTracks * height;
 266     if((list_height > s->core.height) || (w < parent->core.width)) {
 267         XtMakeResizeRequest(widget, parent->core.width, list_height + 5, &w, &h);
 268     }
 269
 270
 271     XftDrawRect(s->sidebar.d, &s->sidebar.bg, 0, 0, w, h);
 272
 273
 274     //printf("current track: %d\n", s->sidebar.window->playlist.current_track);
 275
 276     CxIterator i = cxListIterator(s->sidebar.window->playlist.tracks);
 277     cx_foreach(const char *, elm, i) {
 278         const char *name = util_resource_name(elm);
 279         XftColor *cg = &s->sidebar.fg;
 280         if(i.index == s->sidebar.window->playlist.current_track) {
 281             XftDrawRect(s->sidebar.d, &s->sidebar.fg, 0, i.index*height, s->core.width, height);
 282             cg = &s->sidebar.bg;
 283         }
 284
 285         XftDrawString8(s->sidebar.d, cg, s->sidebar.font->fonts->font, 10, i.index*height + xftFont->ascent, (const FcChar8*)name, strlen(name));
 286     }
 287 }
 288
 289 static Boolean sidebar_set_values(Widget old, Widget request, Widget neww, ArgList args, Cardinal *num_args) {
 290     Boolean r = False;
 291
 292     return r;
 293 }
 294
 295 static void sidebar_insert_child(Widget child) {
 296     (xmManagerClassRec.composite_class.insert_child)(child);
 297 }
 298
 299 Boolean sidebar_acceptfocus(Widget widget, Time *time) {
 300     return 0;
 301 }
 302
 303
 304 static void FocusInAP(Widget w, XEvent *event, String *args, Cardinal *nArgs) {
 305
 306 }
 307
 308 static void SelectElmAP(Widget w, XEvent *event, String *args, Cardinal *nArgs) {
 309     //printf("btn1\n");
 310     XButtonEvent *e = &event->xbutton;
 311     Sidebar s = (Sidebar)w;
 312
 313     int selected = e->y / s->sidebar.elmHeight;
 314     PlayListPlayTrack(s->sidebar.window, selected);
 315
 316     SidebarRepaint(w);
 317 }
 318
 319 static void PopupAP(Widget w, XEvent *event, String *args, Cardinal *nArgs) {
 320     //printf("btn3\n");
 321 }
 322
 323
 324 static void open_uri(Sidebar s, cxstring uri) {
 325     const char *urilist = uri.ptr;
 326     size_t len = uri.length;
 327
 328     size_t start = 0;
 329     if(len > 7 && !memcmp(urilist, "file://", 7)) {
 330         start = 7;
 331     }
 332
 333     int err = 0;
 334
 335     // urldecode
 336     char *path = malloc(len + 1);
 337     int k = 0;
 338     for(int i=start;i<len;i++) {
 339         char c = urilist[i];
 340         if(c == '%') {
 341             if(i + 2 < len) {
 342                 char code[3];
 343                 code[0] = urilist[i+1];
 344                 code[1] = urilist[i+2];
 345                 code[2] = '\0';
 346
 347                 errno = 0;
 348                 char *end = NULL;
 349                 int ascii = (int)strtol(code, &end, 16);
 350                 if(errno == 0 && end == &code[2]) {
 351                     path[k] = ascii;
 352                     i += 2;
 353                 } else {
 354                     err = 1;
 355                     break;
 356                 }
 357             } else {
 358                 err = 1;
 359                 break;
 360             }
 361         } else if(c == '\n' || c == '\r') {
 362             break;
 363         } else {
 364             path[k] = c;
 365         }
 366
 367         k++;
 368     }
 369     path[k] = '\0';
 370
 371     PlayListAddFile(s->sidebar.window, path);
 372
 373     free(path);
 374 }
 375
 376 static void sidebar_xdnd_callback(Widget w, XtPointer udata, XtPointer cdata) {
 377     printf("xdnd\n");
 378     fflush(stdout);
 379
 380     Sidebar s = (Sidebar)cdata;
 381
 382     cxstring urllist = cx_str(udata);
 383
 384     CxStrtokCtx tk = cx_strtok(urllist, cx_str("\r\n"), INT_MAX);
 385     cxstring uri;
 386     while(cx_strtok_next(&tk, &uri)) {
 387         open_uri(s, uri);
 388     }
 389
 390     SidebarRepaint((Widget)s);
 391 }
 392
 393
 394 /* --------------------------- public --------------------------- */
 395
 396 Widget CreateSidebar(
 397         Widget parent,
 398         String name,
 399         ArgList arglist,
 400         Cardinal argcount)
 401 {
 402     return XtCreateWidget(name, xnSidebarWidgetClass, parent, arglist, argcount);
 403 }
 404
 405 void SidebarSetWindow(Widget widget, MainWindow *win) {
 406     Sidebar sb = (Sidebar)widget;
 407     sb->sidebar.window = win;
 408 }
 409
 410 void SidebarRepaint(Widget widget) {
 411     XClearArea(XtDisplay(widget), XtWindow(widget), 0, 0, widget->core.width, widget->core.height, true);
 412 }