src/modules/fileman/e_int_config_mime.c

   1 #include "e.h"
   2 #include "e_int_config_mime_edit.h"
   3
   4 typedef struct _Config_Glob Config_Glob;
   5 typedef struct _Config_Mime Config_Mime;
   6 typedef struct _Config_Type Config_Type;
   7 struct _Config_Glob
   8 {
   9    const char *name;
  10 };
  11 struct _Config_Mime
  12 {
  13    const char *mime;
  14    Eina_List *globs;
  15 };
  16 struct _Config_Type
  17 {
  18    const char *name;
  19    const char *type;
  20 };
  21 struct _E_Config_Dialog_Data
  22 {
  23    Eina_List *mimes;
  24    const char *cur_type;
  25    struct
  26      {
  27         Evas_Object *tlist, *list;
  28      } gui;
  29    E_Config_Dialog *cfd, *edit_dlg;
  30 };
  31
  32 static void        *_create_data     (E_Config_Dialog *cfd);
  33 static void         _free_data       (E_Config_Dialog *cfd, E_Config_Dialog_Data *cfdata);
  34 static Evas_Object *_basic_create    (E_Config_Dialog *cfd, Evas *evas, E_Config_Dialog_Data *cfdata);
  35 static void         _fill_list       (E_Config_Dialog_Data *cfdata, const char *mtype);
  36 static void         _fill_tlist      (E_Config_Dialog_Data *cfdata);
  37 static void         _load_mimes      (E_Config_Dialog_Data *cfdata, char *file);
  38 static void         _load_globs      (E_Config_Dialog_Data *cfdata, char *file);
  39 static void         _fill_types      (E_Config_Dialog_Data *cfdata);
  40 static void         _tlist_cb_change (void *data);
  41 static int          _sort_mimes      (const void *data1, const void *data2);
  42 static Config_Mime *_find_mime       (E_Config_Dialog_Data *cfdata, char *mime);
  43 static Config_Glob *_find_glob       (Config_Mime *mime, char *glob);
  44 static void         _cb_config       (void *data, void *data2);
  45
  46 Eina_List *types = NULL;
  47
  48 E_Config_Dialog *
  49 e_int_config_mime(E_Container *con, const char *params __UNUSED__)
  50 {
  51    E_Config_Dialog *cfd;
  52    E_Config_Dialog_View *v;
  53
  54    if (e_config_dialog_find("E", "fileman/file_icons")) return NULL;
  55
  56    v = E_NEW(E_Config_Dialog_View, 1);
  57    v->create_cfdata = _create_data;
  58    v->free_cfdata = _free_data;
  59    v->basic.create_widgets = _basic_create;
  60
  61    cfd = e_config_dialog_new(con, _("File Icons"), "E", "fileman/file_icons",
  62                              "preferences-file-icons", 0, v, NULL);
  63    return cfd;
  64 }
  65
  66 void
  67 e_int_config_mime_edit_done(void *data)
  68 {
  69    E_Config_Dialog_Data *cfdata;
  70
  71    cfdata = data;
  72    if (!cfdata) return;
  73    if (cfdata->edit_dlg)
  74      cfdata->edit_dlg = NULL;
  75    _tlist_cb_change(cfdata);
  76 }
  77
  78 static void
  79 _fill_data(E_Config_Dialog_Data *cfdata)
  80 {
  81    const char *homedir;
  82    char buf[4096];
  83
  84    if (!cfdata) return;
  85    homedir = e_user_homedir_get();
  86
  87    snprintf(buf, sizeof(buf), "/usr/local/etc/mime.types");
  88    if (ecore_file_exists(buf))
  89      _load_mimes(cfdata, buf);
  90
  91    snprintf(buf, sizeof(buf), "/etc/mime.types");
  92    if (ecore_file_exists(buf))
  93      _load_mimes(cfdata, buf);
  94
  95    snprintf(buf, sizeof(buf), "/usr/local/share/mime/globs");
  96    if (ecore_file_exists(buf))
  97      _load_globs(cfdata, buf);
  98
  99    snprintf(buf, sizeof(buf), "/usr/share/mime/globs");
 100    if (ecore_file_exists(buf))
 101      _load_globs(cfdata, buf);
 102
 103    snprintf(buf, sizeof(buf), "%s/.mime.types", homedir);
 104    if (ecore_file_exists(buf))
 105      _load_mimes(cfdata, buf);
 106
 107    snprintf(buf, sizeof(buf), "%s/.local/share/mime/globs", homedir);
 108    if (ecore_file_exists(buf))
 109      _load_globs(cfdata, buf);
 110
 111    cfdata->mimes = eina_list_sort(cfdata->mimes, 0, _sort_mimes);
 112
 113    _fill_types(cfdata);
 114 }
 115
 116 static void *
 117 _create_data(E_Config_Dialog *cfd)
 118 {
 119    E_Config_Dialog_Data *cfdata;
 120
 121    cfdata = E_NEW(E_Config_Dialog_Data, 1);
 122    cfdata->cfd = cfd;
 123    _fill_data(cfdata);
 124    return cfdata;
 125 }
 126
 127 static void
 128 _free_data(E_Config_Dialog *cfd __UNUSED__, E_Config_Dialog_Data *cfdata)
 129 {
 130    Config_Type *t;
 131    Config_Mime *m;
 132
 133    if (cfdata->edit_dlg)
 134      {
 135         e_object_del(E_OBJECT(cfdata->edit_dlg));
 136         cfdata->edit_dlg = NULL;
 137      }
 138
 139    EINA_LIST_FREE(types, t)
 140      {
 141         if (!t) continue;
 142
 143         eina_stringshare_del(t->name);
 144         eina_stringshare_del(t->type);
 145         E_FREE(t);
 146      }
 147
 148    EINA_LIST_FREE(cfdata->mimes, m)
 149      {
 150         Config_Glob *g;
 151
 152         if (!m) continue;
 153
 154         EINA_LIST_FREE(m->globs, g)
 155           {
 156              if (!g) continue;
 157
 158              eina_stringshare_del(g->name);
 159              E_FREE(g);
 160           }
 161
 162         eina_stringshare_del(m->mime);
 163         E_FREE(m);
 164      }
 165
 166    E_FREE(cfdata);
 167 }
 168
 169 static Evas_Object *
 170 _basic_create(E_Config_Dialog *cfd, Evas *evas, E_Config_Dialog_Data *cfdata)
 171 {
 172    Evas_Object *o, *of, *ol;
 173    Evas_Object *ob;
 174
 175    o = e_widget_list_add(evas, 0, 1);
 176    of  = e_widget_framelist_add(evas, _("Categories"), 0);
 177    ol = e_widget_ilist_add(evas, 16, 16, &(cfdata->cur_type));
 178    cfdata->gui.tlist = ol;
 179    _fill_tlist(cfdata);
 180    e_widget_framelist_object_append(of, ol);
 181    e_widget_list_object_append(o, of, 1, 1, 0.5);
 182
 183    of = e_widget_frametable_add(evas, _("File Types"), 0);
 184    ol = e_widget_ilist_add(evas, 16, 16, NULL);
 185    cfdata->gui.list = ol;
 186    e_widget_ilist_go(ol);
 187    e_widget_size_min_set(cfdata->gui.list, 250, 200);
 188    e_widget_frametable_object_append(of, ol, 0, 0, 3, 1, 1, 1, 1, 1);
 189
 190    ob = e_widget_button_add(evas, _("Set"), "configure", _cb_config, cfdata, NULL);
 191    e_widget_frametable_object_append(of, ob, 1, 1, 1, 1, 1, 1, 1, 0);
 192    e_widget_list_object_append(o, of, 1, 1, 0.5);
 193
 194    e_dialog_resizable_set(cfd->dia, 1);
 195    return o;
 196 }
 197
 198 static void
 199 _fill_list(E_Config_Dialog_Data *cfdata, const char *mtype)
 200 {
 201    Config_Mime *m;
 202    Eina_List *l;
 203    Evas_Coord w, h;
 204    Evas *evas;
 205
 206    evas = evas_object_evas_get(cfdata->gui.list);
 207    evas_event_freeze(evas);
 208    edje_freeze();
 209    e_widget_ilist_freeze(cfdata->gui.list);
 210
 211    e_widget_ilist_clear(cfdata->gui.list);
 212    EINA_LIST_FOREACH(cfdata->mimes, l, m)
 213      {
 214         Evas_Object *icon = NULL;
 215         const char *tmp;
 216         char buf[4096];
 217         int edj = 0, img = 0;
 218
 219         if (!m) return;
 220         if (!strstr(m->mime, mtype)) continue;
 221         tmp = e_fm_mime_icon_get(m->mime);
 222         if (!tmp)
 223           snprintf(buf, sizeof(buf), "e/icons/fileman/file");
 224         else if (!strcmp(tmp, "THUMB"))
 225           snprintf(buf, sizeof(buf), "e/icons/fileman/mime/%s", m->mime);
 226         else if (!strncmp(tmp, "e/icons/fileman/mime/", 21))
 227           snprintf(buf, sizeof(buf), "e/icons/fileman/mime/%s", m->mime);
 228         else
 229           {
 230              char *p;
 231
 232              p = strrchr(tmp, '.');
 233              if ((p) && (!strcmp(p, ".edj")))
 234                edj = 1;
 235              else if (p)
 236                img = 1;
 237           }
 238         if (edj)
 239           {
 240              icon = edje_object_add(evas);
 241              if (!e_theme_edje_object_set(icon, tmp, "icon"))
 242                e_theme_edje_object_set(icon, "base/theme/fileman", "e/icons/fileman/file");
 243           }
 244         else if (img)
 245           icon = e_widget_image_add_from_file(evas, tmp, 16, 16);
 246         else
 247           {
 248              icon = edje_object_add(evas);
 249              if (!e_theme_edje_object_set(icon, "base/theme/fileman", buf))
 250                e_theme_edje_object_set(icon, "base/theme/fileman", "e/icons/fileman/file");
 251           }
 252         e_widget_ilist_append(cfdata->gui.list, icon, m->mime, NULL, NULL, NULL);
 253      }
 254    e_widget_ilist_go(cfdata->gui.list);
 255    e_widget_size_min_get(cfdata->gui.list, &w, &h);
 256    e_widget_size_min_set(cfdata->gui.list, w, 200);
 257    e_widget_ilist_thaw(cfdata->gui.list);
 258    edje_thaw();
 259    evas_event_thaw(evas);
 260 }
 261
 262 static void
 263 _fill_tlist(E_Config_Dialog_Data *cfdata)
 264 {
 265    Config_Type *tmp;
 266    Eina_List *l;
 267    Evas_Coord w, h;
 268
 269    evas_event_freeze(evas_object_evas_get(cfdata->gui.tlist));
 270    edje_freeze();
 271    e_widget_ilist_freeze(cfdata->gui.tlist);
 272    e_widget_ilist_clear(cfdata->gui.tlist);
 273    EINA_LIST_FOREACH(types, l, tmp)
 274      {
 275         Evas_Object *icon;
 276         char buf[4096];
 277         char *t;
 278
 279         if (!tmp) continue;
 280         t = strdup(tmp->name);
 281         t[0] = tolower(t[0]);
 282         icon = edje_object_add(evas_object_evas_get(cfdata->gui.tlist));
 283         snprintf(buf, sizeof(buf), "e/icons/fileman/mime/%s", t);
 284         if (!e_theme_edje_object_set(icon, "base/theme/fileman", buf))
 285           e_theme_edje_object_set(icon, "base/theme/fileman", "e/icons/fileman/file");
 286         e_widget_ilist_append(cfdata->gui.tlist, icon, tmp->name, _tlist_cb_change, cfdata, tmp->type);
 287      }
 288
 289    e_widget_ilist_go(cfdata->gui.tlist);
 290    e_widget_size_min_get(cfdata->gui.tlist, &w, &h);
 291    e_widget_size_min_set(cfdata->gui.tlist, w, 225);
 292    e_widget_ilist_thaw(cfdata->gui.tlist);
 293    edje_thaw();
 294    evas_event_thaw(evas_object_evas_get(cfdata->gui.tlist));
 295 }
 296
 297 static void
 298 _load_mimes(E_Config_Dialog_Data *cfdata, char *file)
 299 {
 300    FILE *f;
 301    char buf[4096], mimetype[4096], ext[4096];
 302    char *p, *pp;
 303    Config_Mime *mime;
 304    Config_Glob *glob;
 305
 306    if (!cfdata) return;
 307
 308    f = fopen(file, "rb");
 309    if (!f) return;
 310    while (fgets(buf, sizeof(buf), f))
 311      {
 312         p = buf;
 313         while (isblank(*p) && (*p != 0) && (*p != '\n')) p++;
 314         if (*p == '#') continue;
 315         if ((*p == '\n') || (*p == 0)) continue;
 316         pp = p;
 317         while (!isblank(*p) && (*p != 0) && (*p != '\n')) p++;
 318         if ((*p == '\n') || (*p == 0)) continue;
 319         strncpy(mimetype, pp, (p - pp));
 320         mimetype[p - pp] = 0;
 321         do
 322           {
 323              while (isblank(*p) && (*p != 0) && (*p != '\n')) p++;
 324              if ((*p == '\n') || (*p == 0)) continue;
 325              pp = p;
 326              while (!isblank(*p) && (*p != 0) && (*p != '\n')) p++;
 327              strncpy(ext, pp, (p - pp));
 328              ext[p - pp] = 0;
 329              mime = _find_mime(cfdata, mimetype);
 330              if (!mime)
 331                {
 332                   mime = E_NEW(Config_Mime, 1);
 333                   if (mime)
 334                     {
 335                        mime->mime = eina_stringshare_add(mimetype);
 336                        if (!mime->mime)
 337                          free(mime);
 338                        else
 339                          {
 340                             glob = E_NEW(Config_Glob, 1);
 341                             glob->name = eina_stringshare_add(ext);
 342                             mime->globs = eina_list_append(mime->globs, glob);
 343                             cfdata->mimes = eina_list_append(cfdata->mimes, mime);
 344                          }
 345                     }
 346                }
 347           }
 348         while ((*p != '\n') && (*p != 0));
 349      }
 350    fclose(f);
 351 }
 352
 353 static void
 354 _load_globs(E_Config_Dialog_Data *cfdata, char *file)
 355 {
 356    FILE *f;
 357    char buf[4096], mimetype[4096], ext[4096];
 358    char *p, *pp;
 359    Config_Mime *mime;
 360    Config_Glob *glob;
 361
 362    if (!cfdata) return;
 363
 364    f = fopen(file, "rb");
 365    if (!f) return;
 366    while (fgets(buf, sizeof(buf), f))
 367      {
 368         p = buf;
 369         while (isblank(*p) && (*p != 0) && (*p != '\n')) p++;
 370         if (*p == '#') continue;
 371         if ((*p == '\n') || (*p == 0)) continue;
 372         pp = p;
 373         while ((*p != ':') && (*p != 0) && (*p != '\n')) p++;
 374         if ((*p == '\n') || (*p == 0)) continue;
 375         strncpy(mimetype, pp, (p - pp));
 376         mimetype[p - pp] = 0;
 377         p++;
 378         pp = ext;
 379         while ((*p != 0) && (*p != '\n'))
 380           {
 381              *pp = *p;
 382              pp++;
 383              p++;
 384           }
 385         *pp = 0;
 386         mime = _find_mime(cfdata, mimetype);
 387         if (!mime)
 388           {
 389              mime = E_NEW(Config_Mime, 1);
 390              if (mime)
 391                {
 392                   mime->mime = eina_stringshare_add(mimetype);
 393                   if (!mime->mime)
 394                     free(mime);
 395                   else
 396                     {
 397                        glob = E_NEW(Config_Glob, 1);
 398                        glob->name = eina_stringshare_add(ext);
 399                        mime->globs = eina_list_append(mime->globs, glob);
 400                        cfdata->mimes = eina_list_append(cfdata->mimes, mime);
 401                     }
 402                }
 403           }
 404         else
 405           {
 406              glob = _find_glob(mime, ext);
 407              if (!glob)
 408                {
 409                   glob = E_NEW(Config_Glob, 1);
 410                   glob->name = eina_stringshare_add(ext);
 411                   mime->globs = eina_list_append(mime->globs, glob);
 412                }
 413           }
 414      }
 415    fclose(f);
 416 }
 417
 418 static void
 419 _fill_types(E_Config_Dialog_Data *cfdata)
 420 {
 421    Config_Mime *m;
 422    Eina_List *l;
 423
 424    EINA_LIST_FOREACH(cfdata->mimes, l, m)
 425      {
 426         Config_Type *tmp;
 427         Eina_List *ll;
 428         char *tok;
 429         int found = 0;
 430
 431         if (!m) continue;
 432         tok = strtok(strdup(m->mime), "/");
 433         if (!tok) continue;
 434
 435         EINA_LIST_FOREACH(types, ll, tmp)
 436           {
 437              if (!tmp) continue;
 438
 439              if (strcmp(tmp->type, tok) >= 0)
 440                {
 441                   found = 1;
 442                   break;
 443                }
 444           }
 445
 446         if (!found)
 447           {
 448              tmp = E_NEW(Config_Type, 1);
 449              tmp->type = eina_stringshare_add(tok);
 450              tok[0] = toupper(tok[0]);
 451              tmp->name = eina_stringshare_add(tok);
 452
 453              types = eina_list_append(types, tmp);
 454           }
 455      }
 456 }
 457
 458 static void
 459 _tlist_cb_change(void *data)
 460 {
 461    E_Config_Dialog_Data *cfdata;
 462    Config_Type *t;
 463    Eina_List *l;
 464
 465    cfdata = data;
 466    if (!cfdata) return;
 467
 468    EINA_LIST_FOREACH(types, l, t)
 469      {
 470         if (!t) continue;
 471         if (t->name != cfdata->cur_type /* Both string are stringshare. */
 472             && strcasecmp(t->name, cfdata->cur_type)) continue;
 473         _fill_list(cfdata, t->type);
 474         break;
 475      }
 476 }
 477
 478 static int
 479 _sort_mimes(const void *data1, const void *data2)
 480 {
 481    const Config_Mime *m1, *m2;
 482
 483    if (!data1) return 1;
 484    if (!data2) return -1;
 485
 486    m1 = data1;
 487    m2 = data2;
 488
 489    return (strcmp(m1->mime, m2->mime));
 490 }
 491
 492 static Config_Mime *
 493 _find_mime(E_Config_Dialog_Data *cfdata, char *mime)
 494 {
 495    Config_Mime *cm;
 496    const char *tmp;
 497    Eina_List *l;
 498
 499    if (!cfdata) return NULL;
 500
 501    if (eina_list_count(cfdata->mimes) > 10)
 502      {
 503         tmp = eina_stringshare_add(mime);
 504
 505         EINA_LIST_FOREACH(cfdata->mimes, l, cm)
 506           {
 507              if (!cm) continue;
 508              if (cm->mime != mime) continue;
 509
 510              eina_stringshare_del(tmp);
 511              return cm;
 512           }
 513
 514         eina_stringshare_del(tmp);
 515      }
 516    else
 517      {
 518         EINA_LIST_FOREACH(cfdata->mimes, l, cm)
 519           {
 520              if (!cm) continue;
 521              if (strcmp(cm->mime, mime)) continue;
 522              return cm;
 523           }
 524      }
 525
 526    return NULL;
 527 }
 528
 529 static Config_Glob *
 530 _find_glob(Config_Mime *mime, char *glob)
 531 {
 532    Config_Glob *g;
 533    Eina_List *l;
 534
 535    if (!mime) return NULL;
 536    EINA_LIST_FOREACH(mime->globs, l, g)
 537      {
 538         if (!g) continue;
 539         if (strcmp(g->name, glob)) continue;
 540         return g;
 541      }
 542    return NULL;
 543 }
 544
 545 static void
 546 _cb_config(void *data, void *data2 __UNUSED__)
 547 {
 548    Eina_List *l;
 549    E_Config_Dialog_Data *cfdata;
 550    E_Config_Mime_Icon *mi = NULL;
 551    const char *m;
 552    int found = 0;
 553
 554    cfdata = data;
 555    if (!cfdata) return;
 556    m = e_widget_ilist_selected_label_get(cfdata->gui.list);
 557    if (!m) return;
 558
 559    EINA_LIST_FOREACH(e_config->mime_icons, l, mi)
 560      {
 561         if (!mi) continue;
 562         if (!mi->mime) continue;
 563         if (strcmp(mi->mime, m)) continue;
 564         found = 1;
 565         break;
 566      }
 567    if (!found)
 568      {
 569         mi = E_NEW(E_Config_Mime_Icon, 1);
 570         mi->mime = eina_stringshare_add(m);
 571      }
 572
 573    cfdata->edit_dlg = e_int_config_mime_edit(mi, cfdata);
 574 }