cinelerra-5.1/guicast/bcresources.C

   1
   2 /*
   3  * CINELERRA
   4  * Copyright (C) 2009-2015 Adam Williams <broadcast at earthling dot net>
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  *
  20  */
  21
  22 #include "bcdisplayinfo.h"
  23 #include "bcipc.h"
  24 #include "bclistbox.inc"
  25 #include "bcfontentry.h"
  26 #include "bcresources.h"
  27 #include "bcsignals.h"
  28 #include "bcsynchronous.h"
  29 #include "bcwindowbase.h"
  30 #include "colors.h"
  31 #include "bccmodels.h"
  32 #include "cstrdup.h"
  33 #include "fonts.h"
  34 #include "language.h"
  35 #include "vframe.h"
  36
  37 #include <string.h>
  38 #include <iconv.h>
  39 #include <sys/ipc.h>
  40 #include <sys/shm.h>
  41 #include <X11/extensions/XShm.h>
  42 #include <fontconfig/fontconfig.h>
  43 #include <fontconfig/fcfreetype.h>
  44 #include <unistd.h>
  45
  46
  47
  48
  49
  50 int BC_Resources::error = 0;
  51
  52 VFrame* BC_Resources::bg_image = 0;
  53 VFrame* BC_Resources::menu_bg = 0;
  54
  55 int BC_Resources::locale_utf8 = 0;
  56 int BC_Resources::little_endian = 0;
  57 char BC_Resources::language[LEN_LANG] = {0};
  58 char BC_Resources::region[LEN_LANG] = {0};
  59 char BC_Resources::encoding[LEN_ENCOD] = {0};
  60 const char *BC_Resources::wide_encoding = 0;
  61 ArrayList<BC_FontEntry*> *BC_Resources::fontlist = 0;
  62 const char *BC_Resources::fc_properties[] = { FC_SLANT, FC_WEIGHT, FC_WIDTH };
  63 #define LEN_FCPROP (sizeof(BC_Resources::fc_properties) / sizeof(const char*))
  64
  65 static const char *def_small_font = "-*-helvetica-medium-r-normal-*-%d-*";  // 10
  66 static const char *def_small_font2 = "-*-helvetica-medium-r-normal-*-%d-*"; // 11
  67 static const char *def_medium_font = "-*-helvetica-bold-r-normal-*-%d-*";   // 14
  68 static const char *def_medium_font2 = "-*-helvetica-bold-r-normal-*-%d-*";  // 14
  69 static const char *def_large_font = "-*-helvetica-bold-r-normal-*-%d-*";    // 18
  70 static const char *def_large_font2 = "-*-helvetica-bold-r-normal-*-%d-*";   // 20
  71 static const char *def_big_font =
  72   "-*-bitstream charter-bold-r-normal-*-*-0-%d-%d-p-0-iso8859-1"; // 160
  73 static const char *def_big_font2 =
  74   "-*-nimbus sans l-bold-r-normal-*-*-0-%d-%d-p-0-iso8859-1";     // 160
  75 static const char *def_small_fontset =  "-*-helvetica-medium-r-normal-*-%d-*";// 10
  76 static const char *def_medium_fontset = "-*-helvetica-bold-r-normal-*-%d-*";  // 14
  77 static const char *def_large_fontset =  "-*-helvetica-bold-r-normal-*-%d-*";  // 18
  78 static const char *def_big_fontset =    "-*-helvetica-bold-r-normal-*-%d-*";  // 24
  79 static const char *def_small_font_xft = "Sans:pixelsize=%.4f";           // 10.6667
  80 static const char *def_small_b_font_xft = "Sans:bold:pixelsize=%.4f";    // 10.6667
  81 static const char *def_medium_font_xft = "Sans:pixelsize=%.4f";          // 13.3333
  82 static const char *def_medium_b_font_xft = "Sans:bold:pixelsize=%.4f";   // 13.3333
  83 static const char *def_large_font_xft = "Sans:pixelsize=%.4f";           // 21.3333
  84 static const char *def_large_b_font_xft = "Sans:bold:pixelsize=%.4f";    // 21.3333
  85 static const char *def_big_font_xft = "Sans:pixelsize=37.3333";          // 37.3333
  86 static const char *def_big_b_font_xft = "Sans:bold:pixelsize=37.33333";  // 37.3333
  87
  88 #define default_font_xft2 "-microsoft-verdana-*-*-*-*-*-*-*-*-*-*-*-*"
  89
  90 const char* BC_Resources::small_font = 0;
  91 const char* BC_Resources::small_font2 = 0;
  92 const char* BC_Resources::medium_font = 0;
  93 const char* BC_Resources::medium_font2 = 0;
  94 const char* BC_Resources::large_font = 0;
  95 const char* BC_Resources::large_font2 = 0;
  96 const char* BC_Resources::big_font = 0;
  97 const char* BC_Resources::big_font2 = 0;
  98 const char* BC_Resources::small_fontset = 0;
  99 const char* BC_Resources::medium_fontset = 0;
 100 const char* BC_Resources::large_fontset = 0;
 101 const char* BC_Resources::big_fontset = 0;
 102 const char* BC_Resources::small_font_xft = 0;
 103 const char* BC_Resources::small_font_xft2 = 0;
 104 const char* BC_Resources::small_b_font_xft = 0;
 105 const char* BC_Resources::medium_font_xft = 0;
 106 const char* BC_Resources::medium_font_xft2 = 0;
 107 const char* BC_Resources::medium_b_font_xft = 0;
 108 const char* BC_Resources::large_font_xft = 0;
 109 const char* BC_Resources::large_font_xft2 = 0;
 110 const char* BC_Resources::large_b_font_xft = 0;
 111 const char* BC_Resources::big_font_xft = 0;
 112 const char* BC_Resources::big_font_xft2 = 0;
 113 const char* BC_Resources::big_b_font_xft = 0;
 114
 115 #define def_font(v, s...) do { sprintf(string,def_##v,s); v = cstrdup(string); } while(0)
 116 #define set_font(v, s) do { sprintf(string, "%s", s); v = cstrdup(string); } while(0)
 117 #define iround(v) ((int)(v+0.5))
 118 void BC_Resources::init_font_defs(double scale)
 119 {
 120         char string[BCTEXTLEN];
 121         def_font(small_font,       iround(scale*11));
 122         def_font(small_font2,      iround(scale*11));
 123         def_font(medium_font,      iround(scale*14));
 124         def_font(medium_font2,     iround(scale*14));
 125         def_font(large_font,       iround(scale*18));
 126         def_font(large_font2,      iround(scale*20));
 127         def_font(big_font,         iround(scale*160), iround(scale*160));
 128         def_font(big_font2,        iround(scale*160), iround(scale*160));
 129         def_font(small_fontset,    iround(scale*10));
 130         def_font(medium_fontset,   iround(scale*14));
 131         def_font(large_fontset,    iround(scale*18));
 132         def_font(big_fontset,      iround(scale*24));
 133         def_font(small_font_xft,   (scale*10.6667));
 134         def_font(small_b_font_xft, (scale*10.6667));
 135         def_font(medium_font_xft,  (scale*13.3333));
 136         def_font(medium_b_font_xft,(scale*13.3333));
 137         def_font(large_font_xft,   (scale*21.3333));
 138         def_font(large_b_font_xft, (scale*21.3333));
 139         def_font(big_font_xft,     (scale*37.3333));
 140         def_font(big_b_font_xft,   (scale*37.3333));
 141
 142         set_font(small_font_xft2,  default_font_xft2);
 143         set_font(medium_font_xft2, default_font_xft2);
 144         set_font(large_font_xft2,  default_font_xft2);
 145         set_font(big_font_xft2,    default_font_xft2);
 146 }
 147 void BC_Resources::finit_font_defs()
 148 {
 149         delete [] small_font;
 150         delete [] small_font2;
 151         delete [] medium_font;
 152         delete [] medium_font2;
 153         delete [] large_font;
 154         delete [] large_font2;
 155         delete [] big_font;
 156         delete [] big_font2;
 157         delete [] small_fontset;
 158         delete [] medium_fontset;
 159         delete [] large_fontset;
 160         delete [] big_fontset;
 161         delete [] small_font_xft;
 162         delete [] small_b_font_xft;
 163         delete [] medium_font_xft;
 164         delete [] medium_b_font_xft;
 165         delete [] large_font_xft;
 166         delete [] large_b_font_xft;
 167         delete [] big_font_xft;
 168         delete [] big_b_font_xft;
 169
 170         delete [] small_font_xft2;
 171         delete [] medium_font_xft2;
 172         delete [] large_font_xft2;
 173         delete [] big_font_xft2;
 174 }
 175
 176
 177 suffix_to_type_t BC_Resources::suffix_to_type[] =
 178 {
 179     { "aac", ICON_SOUND },
 180     { "ac3", ICON_SOUND },
 181     { "dts", ICON_SOUND },
 182     { "flac", ICON_SOUND },
 183     { "mp2", ICON_SOUND },
 184     { "mp3", ICON_SOUND },
 185     { "wav", ICON_SOUND },
 186     { "wma", ICON_SOUND },
 187     { "wmv", ICON_SOUND },
 188     { "avi", ICON_FILM },
 189     { "bmp", ICON_FILM },
 190     { "cr2", ICON_FILM },
 191     { "dnxhd", ICON_FILM },
 192     { "dvd", ICON_FILM },
 193     { "dv", ICON_FILM },
 194     { "f4v", ICON_FILM },
 195     { "flv", ICON_FILM },
 196     { "gif", ICON_FILM },
 197     { "gxf", ICON_FILM },
 198     { "h264", ICON_FILM },
 199     { "h265", ICON_FILM },
 200     { "hevc", ICON_FILM },
 201     { "ifo", ICON_FILM },
 202     { "jpeg", ICON_FILM },
 203     { "jpg", ICON_FILM },
 204     { "m2t", ICON_FILM },
 205     { "m2ts", ICON_FILM },
 206     { "m2v", ICON_FILM },
 207     { "m4v", ICON_FILM },
 208     { "mkv", ICON_FILM },
 209     { "mov", ICON_FILM },
 210     { "mp4", ICON_FILM },
 211     { "mpeg", ICON_FILM },
 212     { "mpg", ICON_FILM },
 213     { "mts", ICON_FILM },
 214     { "mxf", ICON_FILM },
 215     { "ogg", ICON_FILM },
 216     { "ogv", ICON_FILM },
 217     { "pcm", ICON_FILM },
 218     { "pgm", ICON_FILM },
 219     { "png", ICON_FILM },
 220     { "ppm", ICON_FILM },
 221     { "qt", ICON_FILM },
 222     { "rm", ICON_FILM },
 223     { "swf", ICON_FILM },
 224     { "tiff", ICON_FILM },
 225     { "tif", ICON_FILM },
 226     { "ts",  ICON_FILM },
 227     { "vob", ICON_FILM },
 228     { "vts", ICON_FILM },
 229     { "webm", ICON_FILM },
 230     { "webp", ICON_FILM },
 231     { "xml", ICON_FILM },
 232     { "y4m", ICON_FILM },
 233     { 0, 0 },
 234 };
 235
 236 BC_Signals* BC_Resources::signal_handler = 0;
 237 Mutex BC_Resources::fontconfig_lock("BC_Resources::fonconfig_lock");
 238
 239 int BC_Resources::x_error_handler(Display *display, XErrorEvent *event)
 240 {
 241 #if defined(OUTPUT_X_ERROR)
 242         char string[1024];
 243         XGetErrorText(event->display, event->error_code, string, 1024);
 244         fprintf(stderr, "BC_Resources::x_error_handler: error_code=%d opcode=%d,%d %s\n",
 245                 event->error_code,
 246                 event->request_code,
 247                 event->minor_code,
 248                 string);
 249 #endif
 250
 251         BC_Resources::error = 1;
 252 // This bug only happens in 32 bit mode.
 253 //      if(sizeof(long) == 4)
 254 //              BC_WindowBase::get_resources()->use_xft = 0;
 255         return 0;
 256 }
 257
 258 int BC_Resources::machine_cpus = 1;
 259
 260 int BC_Resources::get_machine_cpus()
 261 {
 262         int cpus = 1;
 263         FILE *proc = fopen("/proc/cpuinfo", "r");
 264         if( proc ) {
 265                 char string[BCTEXTLEN], *cp;
 266                 while(!feof(proc) && fgets(string, sizeof(string), proc) ) {
 267                         if( !strncasecmp(string, "processor", 9) &&
 268                             (cp = strchr(string, ':')) != 0 ) {
 269                                 int n = atol(cp+1) + 1;
 270                                 if( n > cpus ) cpus = n;
 271                         }
 272                         else if( !strncasecmp(string, "cpus detected", 13) &&
 273                             (cp = strchr(string, ':')) != 0 )
 274                                 cpus = atol(cp+1);
 275                 }
 276                 fclose(proc);
 277         }
 278         return cpus;
 279 }
 280
 281 void BC_Resources::new_vframes(int n, VFrame *vframes[], ...)
 282 {
 283         va_list ap;
 284         va_start(ap, vframes);
 285         for( int i=0; i<n; ++i )
 286                 vframes[i] = va_arg(ap, VFrame *);
 287         va_end(ap);
 288 }
 289
 290 VFrame *BC_Resources::default_type_to_icon[6] = { 0, };
 291 VFrame *BC_Resources::default_bar = 0;
 292 VFrame *BC_Resources::default_cancel_images[3] = { 0, };
 293 VFrame *BC_Resources::default_ok_images[3] = { 0, };
 294 VFrame *BC_Resources::default_usethis_images[3] = { 0, };
 295 #if 0
 296 VFrame *BC_Resources::default_checkbox_images[5] = { 0, };
 297 VFrame *BC_Resources::default_radial_images[5] = { 0, };
 298 VFrame *BC_Resources::default_label_images[5] = { 0, };
 299 #endif
 300 VFrame *BC_Resources::default_menuitem_data[3] = { 0, };
 301 VFrame *BC_Resources::default_menubar_data[3] = { 0, };
 302 VFrame *BC_Resources::default_menu_popup_bg = 0;
 303 VFrame *BC_Resources::default_menu_bar_bg = 0;
 304 VFrame *BC_Resources::default_check_image = 0;
 305 VFrame *BC_Resources::default_filebox_text_images[3] = { 0, };
 306 VFrame *BC_Resources::default_filebox_icons_images[3] = { 0, };
 307 VFrame *BC_Resources::default_filebox_updir_images[3] = { 0, };
 308 VFrame *BC_Resources::default_filebox_newfolder_images[3] = { 0, };
 309 VFrame *BC_Resources::default_filebox_rename_images[3] = { 0, };
 310 VFrame *BC_Resources::default_filebox_delete_images[3] = { 0, };
 311 VFrame *BC_Resources::default_filebox_reload_images[3] = { 0, };
 312 VFrame *BC_Resources::default_listbox_button[4] = { 0, };
 313 VFrame *BC_Resources::default_listbox_bg = 0;
 314 VFrame *BC_Resources::default_listbox_expand[5] = { 0, };
 315 VFrame *BC_Resources::default_listbox_column[3] = { 0, };
 316 VFrame *BC_Resources::default_listbox_up = 0;
 317 VFrame *BC_Resources::default_listbox_dn = 0;
 318 VFrame *BC_Resources::default_pot_images[3] = { 0, };
 319 VFrame *BC_Resources::default_progress_images[2] = { 0, };
 320 VFrame *BC_Resources::default_medium_7segment[20] = { 0, };
 321
 322 BC_Resources::BC_Resources()
 323 {
 324         synchronous = 0;
 325         vframe_shm = 0;
 326         double default_scale = 1.0; // display_size/1000.;
 327         char *env = getenv("BC_FONT_SCALE");
 328         font_scale = env ? atof(env) : default_scale;
 329         if( font_scale <= 0 ) font_scale = 1;
 330         init_font_defs(font_scale);
 331         env = getenv("BC_ICON_SCALE");
 332         icon_scale = env ? atof(env) : default_scale;
 333         if( icon_scale <= 0 ) icon_scale = 1;
 334
 335         id_lock = new Mutex("BC_Resources::id_lock");
 336         create_window_lock = new Mutex("BC_Resources::create_window_lock", 1);
 337         id = 0;
 338         machine_cpus = get_machine_cpus();
 339
 340         for(int i = 0; i < FILEBOX_HISTORY_SIZE; i++)
 341                 filebox_history[i].path[0] = 0;
 342
 343 #ifdef HAVE_XFT
 344         XftInitFtLibrary();
 345 #endif
 346
 347         little_endian = (*(const u_int32_t*)"\01\0\0\0") & 1;
 348         wide_encoding = little_endian ?  "UTF32LE" : "UTF32BE";
 349         use_xvideo = 1;
 350
 351 #include "images/file_folder_png.h"
 352 #include "images/file_unknown_png.h"
 353 #include "images/file_film_png.h"
 354 #include "images/file_sound_png.h"
 355 #include "images/file_label_png.h"
 356 #include "images/file_column_png.h"
 357 new_vframes(6,default_type_to_icon,
 358         new VFramePng(file_folder_png),
 359         new VFramePng(file_unknown_png),
 360         new VFramePng(file_film_png),
 361         new VFramePng(file_sound_png),
 362         new VFramePng(file_label_png),
 363         new VFramePng(file_column_png));
 364
 365 #include "images/bar_png.h"
 366         default_bar = new VFramePng(bar_png);
 367
 368 #include "images/cancel_up_png.h"
 369 #include "images/cancel_hi_png.h"
 370 #include "images/cancel_dn_png.h"
 371 new_vframes(3,default_cancel_images,
 372         new VFramePng(cancel_up_png),
 373         new VFramePng(cancel_hi_png),
 374         new VFramePng(cancel_dn_png));
 375
 376 #include "images/ok_up_png.h"
 377 #include "images/ok_hi_png.h"
 378 #include "images/ok_dn_png.h"
 379 new_vframes(3,default_ok_images,
 380         new VFramePng(ok_up_png),
 381         new VFramePng(ok_hi_png),
 382         new VFramePng(ok_dn_png));
 383
 384 #include "images/usethis_up_png.h"
 385 #include "images/usethis_uphi_png.h"
 386 #include "images/usethis_dn_png.h"
 387 new_vframes(3,default_usethis_images,
 388         new VFramePng(usethis_up_png),
 389         new VFramePng(usethis_uphi_png),
 390         new VFramePng(usethis_dn_png));
 391
 392 #if 0
 393 #include "images/checkbox_checked_png.h"
 394 #include "images/checkbox_dn_png.h"
 395 #include "images/checkbox_checkedhi_png.h"
 396 #include "images/checkbox_up_png.h"
 397 #include "images/checkbox_hi_png.h"
 398 new_vframes(5,default_checkbox_images,
 399         new VFramePng(checkbox_up_png),
 400         new VFramePng(checkbox_hi_png),
 401         new VFramePng(checkbox_checked_png),
 402         new VFramePng(checkbox_dn_png),
 403         new VFramePng(checkbox_checkedhi_png));
 404
 405 #include "images/radial_checked_png.h"
 406 #include "images/radial_dn_png.h"
 407 #include "images/radial_checkedhi_png.h"
 408 #include "images/radial_up_png.h"
 409 #include "images/radial_hi_png.h"
 410 new_vframes(5,default_radial_images,
 411         new VFramePng(radial_up_png),
 412         new VFramePng(radial_hi_png),
 413         new VFramePng(radial_checked_png),
 414         new VFramePng(radial_dn_png),
 415         new VFramePng(radial_checkedhi_png));
 416
 417 new_vframes(5,default_label_images,
 418         new VFramePng(radial_up_png),
 419         new VFramePng(radial_hi_png),
 420         new VFramePng(radial_checked_png),
 421         new VFramePng(radial_dn_png),
 422         new VFramePng(radial_checkedhi_png));
 423 #endif
 424
 425 #include "images/menuitem_up_png.h"
 426 #include "images/menuitem_hi_png.h"
 427 #include "images/menuitem_dn_png.h"
 428 new_vframes(3,default_menuitem_data,
 429         new VFramePng(menuitem_up_png),
 430         new VFramePng(menuitem_hi_png),
 431         new VFramePng(menuitem_dn_png));
 432
 433 #include "images/menubar_up_png.h"
 434 #include "images/menubar_hi_png.h"
 435 #include "images/menubar_dn_png.h"
 436 new_vframes(3,default_menubar_data,
 437         new VFramePng(menubar_up_png),
 438         new VFramePng(menubar_hi_png),
 439         new VFramePng(menubar_dn_png));
 440
 441 #include "images/menu_popup_bg_png.h"
 442         default_menu_popup_bg = new VFramePng(menu_popup_bg_png);
 443
 444 #include "images/menubar_bg_png.h"
 445         default_menu_bar_bg = new VFramePng(menubar_bg_png);
 446
 447 #include "images/check_png.h"
 448         default_check_image = new VFramePng(check_png);
 449
 450 #include "images/file_text_up_png.h"
 451 #include "images/file_text_hi_png.h"
 452 #include "images/file_text_dn_png.h"
 453 #include "images/file_icons_up_png.h"
 454 #include "images/file_icons_hi_png.h"
 455 #include "images/file_icons_dn_png.h"
 456 #include "images/file_newfolder_up_png.h"
 457 #include "images/file_newfolder_hi_png.h"
 458 #include "images/file_newfolder_dn_png.h"
 459 #include "images/file_rename_up_png.h"
 460 #include "images/file_rename_hi_png.h"
 461 #include "images/file_rename_dn_png.h"
 462 #include "images/file_updir_up_png.h"
 463 #include "images/file_updir_hi_png.h"
 464 #include "images/file_updir_dn_png.h"
 465 #include "images/file_delete_up_png.h"
 466 #include "images/file_delete_hi_png.h"
 467 #include "images/file_delete_dn_png.h"
 468 #include "images/file_reload_up_png.h"
 469 #include "images/file_reload_hi_png.h"
 470 #include "images/file_reload_dn_png.h"
 471 new_vframes(3,default_filebox_text_images,
 472         new VFramePng(file_text_up_png),
 473         new VFramePng(file_text_hi_png),
 474         new VFramePng(file_text_dn_png));
 475
 476 new_vframes(3,default_filebox_icons_images,
 477         new VFramePng(file_icons_up_png),
 478         new VFramePng(file_icons_hi_png),
 479         new VFramePng(file_icons_dn_png));
 480
 481 new_vframes(3,default_filebox_updir_images,
 482         new VFramePng(file_updir_up_png),
 483         new VFramePng(file_updir_hi_png),
 484         new VFramePng(file_updir_dn_png));
 485
 486 new_vframes(3,default_filebox_newfolder_images,
 487         new VFramePng(file_newfolder_up_png),
 488         new VFramePng(file_newfolder_hi_png),
 489         new VFramePng(file_newfolder_dn_png));
 490
 491 new_vframes(3,default_filebox_rename_images,
 492         new VFramePng(file_rename_up_png),
 493         new VFramePng(file_rename_hi_png),
 494         new VFramePng(file_rename_dn_png));
 495
 496 new_vframes(3,default_filebox_delete_images,
 497         new VFramePng(file_delete_up_png),
 498         new VFramePng(file_delete_hi_png),
 499         new VFramePng(file_delete_dn_png));
 500
 501 new_vframes(3,default_filebox_reload_images,
 502         new VFramePng(file_reload_up_png),
 503         new VFramePng(file_reload_hi_png),
 504         new VFramePng(file_reload_dn_png));
 505
 506 #include "images/listbox_button_dn_png.h"
 507 #include "images/listbox_button_hi_png.h"
 508 #include "images/listbox_button_up_png.h"
 509 #include "images/listbox_button_disabled_png.h"
 510 new_vframes(4,default_listbox_button,
 511         new VFramePng(listbox_button_up_png),
 512         new VFramePng(listbox_button_hi_png),
 513         new VFramePng(listbox_button_dn_png),
 514         new VFramePng(listbox_button_disabled_png));
 515
 516 default_listbox_bg = 0;
 517
 518 #include "images/listbox_expandchecked_png.h"
 519 #include "images/listbox_expandcheckedhi_png.h"
 520 #include "images/listbox_expanddn_png.h"
 521 #include "images/listbox_expandup_png.h"
 522 #include "images/listbox_expanduphi_png.h"
 523 new_vframes(5,default_listbox_expand,
 524         new VFramePng(listbox_expandup_png),
 525         new VFramePng(listbox_expanduphi_png),
 526         new VFramePng(listbox_expandchecked_png),
 527         new VFramePng(listbox_expanddn_png),
 528         new VFramePng(listbox_expandcheckedhi_png));
 529
 530 #include "images/listbox_columnup_png.h"
 531 #include "images/listbox_columnhi_png.h"
 532 #include "images/listbox_columndn_png.h"
 533 new_vframes(3,default_listbox_column,
 534         new VFramePng(listbox_columnup_png),
 535         new VFramePng(listbox_columnhi_png),
 536         new VFramePng(listbox_columndn_png));
 537
 538 #include "images/listbox_up_png.h"
 539         default_listbox_up = new VFramePng(listbox_up_png);
 540
 541 #include "images/listbox_dn_png.h"
 542         default_listbox_dn = new VFramePng(listbox_dn_png);
 543
 544 #include "images/pot_hi_png.h"
 545 #include "images/pot_up_png.h"
 546 #include "images/pot_dn_png.h"
 547 new_vframes(3,default_pot_images,
 548         new VFramePng(pot_up_png),
 549         new VFramePng(pot_hi_png),
 550         new VFramePng(pot_dn_png));
 551
 552 #include "images/progress_up_png.h"
 553 #include "images/progress_hi_png.h"
 554 new_vframes(2,default_progress_images,
 555         new VFramePng(progress_up_png),
 556         new VFramePng(progress_hi_png));
 557
 558 #include "images/7seg_small/0_png.h"
 559 #include "images/7seg_small/1_png.h"
 560 #include "images/7seg_small/2_png.h"
 561 #include "images/7seg_small/3_png.h"
 562 #include "images/7seg_small/4_png.h"
 563 #include "images/7seg_small/5_png.h"
 564 #include "images/7seg_small/6_png.h"
 565 #include "images/7seg_small/7_png.h"
 566 #include "images/7seg_small/8_png.h"
 567 #include "images/7seg_small/9_png.h"
 568 #include "images/7seg_small/colon_png.h"
 569 #include "images/7seg_small/period_png.h"
 570 #include "images/7seg_small/a_png.h"
 571 #include "images/7seg_small/b_png.h"
 572 #include "images/7seg_small/c_png.h"
 573 #include "images/7seg_small/d_png.h"
 574 #include "images/7seg_small/e_png.h"
 575 #include "images/7seg_small/f_png.h"
 576 #include "images/7seg_small/space_png.h"
 577 #include "images/7seg_small/dash_png.h"
 578 new_vframes(20,default_medium_7segment,
 579         new VFramePng(_0_png),
 580         new VFramePng(_1_png),
 581         new VFramePng(_2_png),
 582         new VFramePng(_3_png),
 583         new VFramePng(_4_png),
 584         new VFramePng(_5_png),
 585         new VFramePng(_6_png),
 586         new VFramePng(_7_png),
 587         new VFramePng(_8_png),
 588         new VFramePng(_9_png),
 589         new VFramePng(colon_png),
 590         new VFramePng(period_png),
 591         new VFramePng(a_png),
 592         new VFramePng(b_png),
 593         new VFramePng(c_png),
 594         new VFramePng(d_png),
 595         new VFramePng(e_png),
 596         new VFramePng(f_png),
 597         new VFramePng(space_png),
 598         new VFramePng(dash_png));
 599
 600         type_to_icon = default_type_to_icon;
 601         bar_data = default_bar;
 602         check = default_check_image;
 603         listbox_button = default_listbox_button;
 604         listbox_bg = default_listbox_bg;
 605         listbox_expand = default_listbox_expand;
 606         listbox_column = default_listbox_column;
 607         listbox_up = default_listbox_up;
 608         listbox_dn = default_listbox_dn;
 609         listbox_title_overlap = 0;
 610         listbox_title_margin = 0;
 611         listbox_title_color = BLACK;
 612         listbox_title_hotspot = 5;
 613
 614         listbox_border1 = DKGREY;
 615         listbox_border2_hi = RED;
 616         listbox_border2 = BLACK;
 617         listbox_border3_hi = RED;
 618         listbox_border3 = MEGREY;
 619         listbox_border4 = WHITE;
 620         listbox_selected = BLUE;
 621         listbox_highlighted = LTGREY;
 622         listbox_inactive = WHITE;
 623         listbox_text = BLACK;
 624
 625         pan_data = 0;
 626         pan_text_color = YELLOW;
 627
 628         generic_button_margin = 15;
 629         draw_clock_background=1;
 630
 631         use_shm = -1;
 632         shm_reply = 1;
 633
 634 // Initialize
 635         bg_color = ORANGE;
 636         bg_shadow1 = DKGREY;
 637         bg_shadow2 = BLACK;
 638         bg_light1 = WHITE;
 639         bg_light2 = bg_color;
 640
 641
 642         border_light1 = bg_color;
 643         border_light2 = MEGREY;
 644         border_shadow1 = BLACK;
 645         border_shadow2 = bg_color;
 646
 647         default_text_color = BLACK;
 648         disabled_text_color = DMGREY;
 649
 650         button_light = MEGREY;           // bright corner
 651 //      button_highlighted = LTGREY;  // face when highlighted
 652         button_highlighted = 0xffe000;  // face when highlighted
 653         button_down = MDGREY;         // face when down
 654 //      button_up = MEGREY;           // face when up
 655         button_up = 0xffc000;           // face when up
 656         button_shadow = BLACK;       // dark corner
 657         button_uphighlighted = RED;   // upper side when highlighted
 658
 659         tumble_data = 0;
 660         tumble_duration = 150;
 661
 662         ok_images = default_ok_images;
 663         cancel_images = default_cancel_images;
 664         usethis_button_images = default_usethis_images;
 665         filebox_descend_images = default_ok_images;
 666
 667         menu_light = LTCYAN;
 668         menu_highlighted = LTBLUE;
 669         menu_down = MDCYAN;
 670         menu_up = MECYAN;
 671         menu_shadow = DKCYAN;
 672
 673         menu_title_bg = default_menubar_data;
 674         menu_popup_bg = default_menu_popup_bg;
 675         menu_bar_bg = default_menu_bar_bg;
 676
 677         popupmenu_images = 0;
 678
 679
 680         popupmenu_margin = 10;
 681         popupmenu_btnup = 1;
 682         popupmenu_triangle_margin = 10;
 683
 684         min_menu_w = 0;
 685         menu_title_text = BLACK;
 686         popup_title_text = BLACK;
 687         menu_item_text = BLACK;
 688         menu_highlighted_fontcolor = BLACK;
 689         progress_text = BLACK;
 690         grab_input_focus = 1;
 691
 692         text_default = BLACK;
 693         highlight_inverse = WHITE ^ BLUE;
 694         text_background = WHITE;
 695         text_background_hi = LTYELLOW;
 696         text_background_noborder_hi = LTGREY;
 697         text_background_noborder = -1;
 698         text_border1 = DKGREY;
 699         text_border2 = BLACK;
 700         text_border2_hi = RED;
 701         text_border3 = MEGREY;
 702         text_border3_hi = LTPINK;
 703         text_border4 = WHITE;
 704         text_highlight = BLUE;
 705         text_selected_highlight = SLBLUE;
 706         text_inactive_highlight = MEGREY;
 707
 708         toggle_highlight_bg = 0;
 709         toggle_text_margin = 0;
 710
 711 // Delays must all be different for repeaters
 712         double_click = 300;
 713         blink_rate = 250;
 714         scroll_repeat = 150;
 715         tooltip_delay = 1000;
 716         tooltip_bg_color = YELLOW;
 717         tooltips_enabled = 1;
 718         textbox_focus_policy = 0;
 719
 720         filebox_margin = 110;
 721         dirbox_margin = 90;
 722         filebox_mode = LISTBOX_TEXT;
 723         sprintf(filebox_filter, "*");
 724         filebox_w = 640;
 725         filebox_h = 480;
 726         filebox_columntype[0] = FILEBOX_NAME;
 727         filebox_columntype[1] = FILEBOX_SIZE;
 728         filebox_columntype[2] = FILEBOX_DATE;
 729         filebox_columntype[3] = FILEBOX_EXTENSION;
 730         filebox_columnwidth[0] = 200;
 731         filebox_columnwidth[1] = 100;
 732         filebox_columnwidth[2] = 100;
 733         filebox_columnwidth[3] = 100;
 734         dirbox_columntype[0] = FILEBOX_NAME;
 735         dirbox_columntype[1] = FILEBOX_DATE;
 736         dirbox_columnwidth[0] = 200;
 737         dirbox_columnwidth[1] = 100;
 738
 739         filebox_text_images = default_filebox_text_images;
 740         filebox_icons_images = default_filebox_icons_images;
 741         filebox_updir_images = default_filebox_updir_images;
 742         filebox_newfolder_images = default_filebox_newfolder_images;
 743         filebox_rename_images = default_filebox_rename_images;
 744         filebox_delete_images = default_filebox_delete_images;
 745         filebox_reload_images = default_filebox_reload_images;
 746         directory_color = BLUE;
 747         file_color = BLACK;
 748
 749         filebox_sortcolumn = 0;
 750         filebox_sortorder = BC_ListBox::SORT_ASCENDING;
 751         dirbox_sortcolumn = 0;
 752         dirbox_sortorder = BC_ListBox::SORT_ASCENDING;
 753
 754
 755         pot_images = default_pot_images;
 756         pot_offset = 2;
 757         pot_x1 = pot_images[0]->get_w() / 2 - pot_offset;
 758         pot_y1 = pot_images[0]->get_h() / 2 - pot_offset;
 759         pot_r = pot_x1;
 760         pot_needle_color = BLACK;
 761
 762         progress_images = default_progress_images;
 763
 764         xmeter_images = 0;
 765         ymeter_images = 0;
 766         meter_font = SMALLFONT_3D;
 767         meter_font_color = RED;
 768         meter_title_w = 20;
 769         meter_3d = 1;
 770         medium_7segment = default_medium_7segment;
 771
 772         audiovideo_color = RED;
 773
 774         use_fontset = 0;
 775
 776 // Xft has priority over font set
 777 #ifdef HAVE_XFT
 778 // But Xft dies in 32 bit mode after some amount of drawing.
 779         use_xft = 1;
 780 #else
 781         use_xft = 0;
 782 #endif
 783
 784
 785         drag_radius = 10;
 786         recursive_resizing = 1;
 787
 788
 789 }
 790
 791 void BC_Resources::del_vframes(VFrame *vframes[], int n)
 792 {
 793         while( --n >= 0 ) delete vframes[n];
 794 }
 795
 796 BC_Resources::~BC_Resources()
 797 {
 798         delete id_lock;
 799         delete create_window_lock;
 800         del_vframes(default_type_to_icon, 6);
 801         delete default_bar;
 802         del_vframes(default_cancel_images, 3);
 803         del_vframes(default_ok_images, 3);
 804         del_vframes(default_usethis_images, 3);
 805 #if 0
 806         del_vframes(default_checkbox_images, 5);
 807         del_vframes(default_radial_images, 5);
 808         del_vframes(default_label_images, 5);
 809 #endif
 810         del_vframes(default_menuitem_data, 3);
 811         del_vframes(default_menubar_data, 3);
 812         delete default_menu_popup_bg;
 813         delete default_menu_bar_bg;
 814         delete default_check_image;
 815         del_vframes(default_filebox_text_images, 3);
 816         del_vframes(default_filebox_icons_images, 3);
 817         del_vframes(default_filebox_updir_images, 3);
 818         del_vframes(default_filebox_newfolder_images, 3);
 819         del_vframes(default_filebox_rename_images, 3);
 820         del_vframes(default_filebox_delete_images, 3);
 821         del_vframes(default_filebox_reload_images, 3);
 822         del_vframes(default_listbox_button, 4);
 823         delete default_listbox_bg;
 824         del_vframes(default_listbox_expand, 5);
 825         del_vframes(default_listbox_column, 3);
 826         delete default_listbox_up;
 827         delete default_listbox_dn;
 828         del_vframes(default_pot_images, 3);
 829         del_vframes(default_progress_images, 2);
 830         del_vframes(default_medium_7segment, 20);
 831         if( fontlist ) {
 832                 fontlist->remove_all_objects();
 833                 delete fontlist;
 834         }
 835         finit_font_defs();
 836 }
 837
 838 int BC_Resources::initialize_display(BC_WindowBase *window)
 839 {
 840 // Set up IPC cleanup handlers
 841 //      bc_init_ipc();
 842
 843 // Test for shm.  Must come before yuv test
 844         init_shm(window);
 845         return 0;
 846 }
 847
 848
 849 void BC_Resources::init_shm(BC_WindowBase *window)
 850 {
 851         use_shm = 0;
 852         int (*old_handler)(Display *, XErrorEvent *) =
 853                 XSetErrorHandler(BC_Resources::x_error_handler);
 854
 855         if(XShmQueryExtension(window->display))
 856         {
 857                 XShmSegmentInfo test_shm;
 858                 memset(&test_shm,0,sizeof(test_shm));
 859                 XImage *test_image = XShmCreateImage(window->display, window->vis,
 860                         window->default_depth, ZPixmap, (char*)NULL, &test_shm, 5, 5);
 861                 BC_Resources::error = 0;
 862                 test_shm.shmid = shmget(IPC_PRIVATE, 5 * test_image->bytes_per_line, (IPC_CREAT | 0600));
 863                 if(test_shm.shmid != -1) {
 864                         char *data = (char *)shmat(test_shm.shmid, NULL, 0);
 865                         if(data != (void *)-1) {
 866                                 shmctl(test_shm.shmid, IPC_RMID, 0);
 867                                 test_shm.shmaddr = data;
 868                                 test_shm.readOnly = 0;
 869
 870                                 if(XShmAttach(window->display, &test_shm)) {
 871                                         XSync(window->display, False);
 872                                         use_shm = 1;
 873                                 }
 874                                 shmdt(data);
 875                         }
 876                 }
 877
 878                 XDestroyImage(test_image);
 879                 if(BC_Resources::error) use_shm = 0;
 880         }
 881         XSetErrorHandler(old_handler);
 882 }
 883
 884
 885
 886
 887 BC_Synchronous* BC_Resources::get_synchronous()
 888 {
 889         return synchronous;
 890 }
 891
 892 void BC_Resources::set_synchronous(BC_Synchronous *synchronous)
 893 {
 894         this->synchronous = synchronous;
 895 }
 896
 897
 898
 899
 900 int BC_Resources::get_bg_color() { return bg_color; }
 901
 902 int BC_Resources::get_bg_shadow1() { return bg_shadow1; }
 903
 904 int BC_Resources::get_bg_shadow2() { return bg_shadow2; }
 905
 906 int BC_Resources::get_bg_light1() { return bg_light1; }
 907
 908 int BC_Resources::get_bg_light2() { return bg_light2; }
 909
 910
 911 int BC_Resources::get_id()
 912 {
 913         id_lock->lock("BC_Resources::get_id");
 914         int result = id++;
 915         id_lock->unlock();
 916         return result;
 917 }
 918
 919 int BC_Resources::get_filebox_id()
 920 {
 921         id_lock->lock("BC_Resources::get_filebox_id");
 922         int result = filebox_id++;
 923         id_lock->unlock();
 924         return result;
 925 }
 926
 927
 928 void BC_Resources::set_signals(BC_Signals *signal_handler)
 929 {
 930         BC_Resources::signal_handler = signal_handler;
 931 }
 932
 933 int BC_Resources::init_fontconfig(const char *search_path)
 934 {
 935         if( fontlist ) return 0;
 936         fontlist = new ArrayList<BC_FontEntry*>;
 937
 938 #define get_str(str,sep,ptr,cond) do { char *out = str; \
 939   while( *ptr && !strchr(sep,*ptr) && (cond) ) *out++ = *ptr++; \
 940   *out = 0; \
 941 } while(0)
 942
 943 #define skip_str(sep, ptr) do { \
 944   while( *ptr && strchr(sep,*ptr) ) ++ptr; \
 945 } while(0)
 946
 947         char find_command[BCTEXTLEN];
 948         char *fp = find_command, *ep = fp+sizeof(find_command)-1;
 949         fp += snprintf(fp, ep-fp, "find '%s'", search_path);
 950         const char *bc_font_path = getenv("BC_FONT_PATH");
 951         if( bc_font_path ) {
 952                 const char *path = bc_font_path;
 953                 for( int len=0; *path; path+=len ) {
 954                         const char *cp = strchr(path,':');
 955                         len = !cp ? strlen(path) : cp-path;
 956                         char font_path[BCTEXTLEN];
 957                         memcpy(font_path, path, len);  font_path[len] = 0;
 958                         if( cp ) ++len;
 959                         fp += snprintf(fp, ep-fp, " '%s'", font_path);
 960                 }
 961         }
 962         fp += snprintf(fp, ep-fp, " -name 'fonts.scale' -print -exec cat {} \\;");
 963         FILE *in = popen(find_command, "r");
 964
 965         FT_Library freetype_library = 0;
 966 //      FT_Face freetype_face = 0;
 967 //      FT_Init_FreeType(&freetype_library);
 968
 969         char line[BCTEXTLEN], current_dir[BCTEXTLEN];
 970         current_dir[0] = 0;
 971
 972         while( !feof(in) && fgets(line, BCTEXTLEN, in) ) {
 973                 if(!strlen(line)) break;
 974
 975                 char *in_ptr = line;
 976
 977 // Get current directory
 978                 if(line[0] == '/') {
 979                         get_str(current_dir, "\n", in_ptr,1);
 980                         for( int i=strlen(current_dir); --i>=0 && current_dir[i]!='/'; )
 981                                 current_dir[i] = 0;
 982                         continue;
 983                 }
 984
 985 //printf("TitleMain::build_fonts %s\n", line);
 986                 BC_FontEntry *entry = new BC_FontEntry;
 987                 char string[BCTEXTLEN];
 988 // Path
 989                 get_str(string, "\n", in_ptr, in_ptr[0]!=' ' || in_ptr[1]!='-');
 990                 entry->path = cstrcat(2, current_dir, string);
 991 // Foundary
 992                 skip_str(" -", in_ptr);
 993                 get_str(string, "-\n", in_ptr, 1);
 994                 if( !string[0] ) { delete entry;  continue; }
 995                 entry->foundry = cstrdup(string);
 996                 if(*in_ptr == '-') in_ptr++;
 997 // Family
 998                 get_str(string, "-\n", in_ptr, 1);
 999                 if( !string[0] ) { delete entry;  continue; }
1000                 entry->family = cstrdup(string);
1001                 if(*in_ptr == '-') in_ptr++;
1002 // Weight
1003                 get_str(string, "-\n", in_ptr, 1);
1004                 entry->weight = cstrdup(string);
1005                 if(*in_ptr == '-') in_ptr++;
1006 // Slant
1007                 get_str(string, "-\n", in_ptr, 1);
1008                 entry->slant = cstrdup(string);
1009                 if(*in_ptr == '-') in_ptr++;
1010 // SWidth
1011                 get_str(string, "-\n", in_ptr, 1);
1012                 entry->swidth = cstrdup(string);
1013                 if(*in_ptr == '-') in_ptr++;
1014 // Adstyle
1015                 get_str(string, "-\n", in_ptr, 1);
1016                 entry->adstyle = cstrdup(string);
1017                 if(*in_ptr == '-') in_ptr++;
1018 // pixelsize
1019                 get_str(string, "-\n", in_ptr, 1);
1020                 entry->pixelsize = atol(string);
1021                 if(*in_ptr == '-') in_ptr++;
1022 // pointsize
1023                 get_str(string, "-\n", in_ptr, 1);
1024                 entry->pointsize = atol(string);
1025                 if(*in_ptr == '-') in_ptr++;
1026 // xres
1027                 get_str(string, "-\n", in_ptr, 1);
1028                 entry->xres = atol(string);
1029                 if(*in_ptr == '-') in_ptr++;
1030 // yres
1031                 get_str(string, "-\n", in_ptr, 1);
1032                 entry->yres = atol(string);
1033                 if(*in_ptr == '-') in_ptr++;
1034 // spacing
1035                 get_str(string, "-\n", in_ptr, 1);
1036                 entry->spacing = cstrdup(string);
1037                 if(*in_ptr == '-') in_ptr++;
1038 // avg_width
1039                 get_str(string, "-\n", in_ptr, 1);
1040                 entry->avg_width = atol(string);
1041                 if(*in_ptr == '-') in_ptr++;
1042 // registry
1043                 get_str(string, "-\n", in_ptr, 1);
1044                 entry->registry = cstrdup(string);
1045                 if(*in_ptr == '-') in_ptr++;
1046 // encoding
1047                 get_str(string, "-\n", in_ptr, 1);
1048                 entry->encoding = cstrdup(string);
1049                 if(*in_ptr == '-') in_ptr++;
1050
1051 // Add to list
1052 //printf("TitleMain::build_fonts 1 %s\n", entry->path);
1053 // This takes a real long time to do.  Instead just take all fonts
1054 //              if(!load_freetype_face(freetype_library,
1055 //                      freetype_face, entry->path) )
1056 // Fix parameters
1057                 sprintf(line, "%s (%s)", entry->family, entry->foundry);
1058                 entry->displayname = cstrdup(line);
1059
1060                 if(!strcasecmp(entry->weight, "demibold")) {
1061                         entry->fixed_style |= BC_FONT_BOLD;
1062                         entry->style |= FL_WEIGHT_DEMIBOLD;
1063                 }
1064                 else if(!strcasecmp(entry->weight, "bold")) {
1065                         entry->fixed_style |= BC_FONT_BOLD;
1066                         entry->style |= FL_WEIGHT_BOLD;
1067                 }
1068                 else {
1069                         entry->style |= FL_WEIGHT_NORMAL;
1070                 }
1071
1072                 if(!strcasecmp(entry->slant, "r")) {
1073                         entry->style |= FL_SLANT_ROMAN;
1074                 }
1075                 else if(!strcasecmp(entry->slant, "i")) {
1076                         entry->style |= FL_SLANT_ITALIC;
1077                         entry->fixed_style |= BC_FONT_ITALIC;
1078                 }
1079                 else if(!strcasecmp(entry->slant, "o")) {
1080                         entry->style |= FL_SLANT_OBLIQUE;
1081                         entry->fixed_style |= BC_FONT_ITALIC;
1082                 }
1083
1084                 if(!strcasecmp(entry->swidth, "normal"))
1085                         entry->style |= FL_WIDTH_NORMAL;
1086                 else if(!strcasecmp(entry->swidth, "ultracondensed"))
1087                         entry->style |= FL_WIDTH_ULTRACONDENSED;
1088                 else if(!strcasecmp(entry->swidth, "extracondensed"))
1089                         entry->style |= FL_WIDTH_EXTRACONDENSED;
1090                 else if(!strcasecmp(entry->swidth, "condensed"))
1091                         entry->style |= FL_WIDTH_CONDENSED;
1092                 else if(!strcasecmp(entry->swidth, "semicondensed"))
1093                         entry->style |= FL_WIDTH_SEMICONDENSED;
1094                 else if(!strcasecmp(entry->swidth, "semiexpanded"))
1095                         entry->style |= FL_WIDTH_SEMIEXPANDED;
1096                 else if(!strcasecmp(entry->swidth, "expanded"))
1097                         entry->style |= FL_WIDTH_EXPANDED;
1098                 else if(!strcasecmp(entry->swidth, "extraexpanded"))
1099                         entry->style |= FL_WIDTH_EXTRAEXPANDED;
1100                 else if(!strcasecmp(entry->swidth, "ultraexpanded"))
1101                         entry->style |= FL_WIDTH_ULTRAEXPANDED;
1102                 else
1103                         entry->style |= FL_WIDTH_NORMAL;
1104
1105                 fontlist->append(entry);
1106 //              printf("TitleMain::build_fonts %s: success\n",  entry->path);
1107 //printf("TitleMain::build_fonts 2\n");
1108         }
1109         pclose(in);
1110
1111
1112 // Load all the fonts from fontconfig
1113         FcPattern *pat;
1114         FcFontSet *fs;
1115         FcObjectSet *os;
1116         FcChar8 *family, *file, *foundry, *style, *format;
1117         int slant, spacing, width, weight;
1118         int force_style = 0;
1119 // if you want limit search to TrueType put 1
1120         int limit_to_trutype = 1;
1121         FcConfig *config;
1122         int i;
1123         char tmpstring[BCTEXTLEN];
1124         if(!FcInit())
1125                 return 1;
1126         config = FcConfigGetCurrent();
1127         FcConfigSetRescanInterval(config, 0);
1128
1129         pat = FcPatternCreate();
1130         os = FcObjectSetBuild ( FC_FAMILY, FC_FILE, FC_FOUNDRY, FC_WEIGHT,
1131                 FC_WIDTH, FC_SLANT, FC_FONTFORMAT, FC_SPACING, FC_STYLE, (char *) 0);
1132         FcPatternAddBool(pat, FC_SCALABLE, true);
1133
1134         if(language[0]) {
1135                 char langstr[LEN_LANG * 3];
1136                 strcpy(langstr, language);
1137
1138                 if(region[0]) {
1139                         strcat(langstr, "-");
1140                         strcat(langstr, region);
1141                 }
1142
1143                 FcLangSet *ls =  FcLangSetCreate();
1144                 if(FcLangSetAdd(ls, (const FcChar8*)langstr))
1145                 if(FcPatternAddLangSet(pat, FC_LANG, ls))
1146                 FcLangSetDestroy(ls);
1147         }
1148
1149         fs = FcFontList(config, pat, os);
1150         FcPatternDestroy(pat);
1151         FcObjectSetDestroy(os);
1152
1153         for (i = 0; fs && i < fs->nfont; i++) {
1154                 FcPattern *font = fs->fonts[i];
1155                 force_style = 0;
1156                 FcPatternGetString(font, FC_FONTFORMAT, 0, &format);
1157                 //on this point you can limit font search
1158                 if(limit_to_trutype && strcmp((char *)format, "TrueType"))
1159                         continue;
1160
1161                 sprintf(tmpstring, "%s", format);
1162                 BC_FontEntry *entry = new BC_FontEntry;
1163                 if(FcPatternGetString(font, FC_FILE, 0, &file) == FcResultMatch) {
1164                         entry->path = cstrdup((char*)file);
1165                 }
1166
1167                 if(FcPatternGetString(font, FC_FOUNDRY, 0, &foundry) == FcResultMatch) {
1168                         entry->foundry = cstrdup((char*)foundry);
1169                 }
1170
1171                 if(FcPatternGetInteger(font, FC_WEIGHT, 0, &weight) == FcResultMatch) {
1172                         switch(weight) {
1173                         case FC_WEIGHT_THIN:
1174                         case FC_WEIGHT_EXTRALIGHT:
1175                         case FC_WEIGHT_LIGHT:
1176                         case FC_WEIGHT_BOOK:
1177                                 force_style = 1;
1178                                 entry->weight = cstrdup("medium");
1179                                 break;
1180
1181                         case FC_WEIGHT_NORMAL:
1182                         case FC_WEIGHT_MEDIUM:
1183                         default:
1184                                 entry->weight = cstrdup("medium");
1185                                 break;
1186
1187                         case FC_WEIGHT_BLACK:
1188                         case FC_WEIGHT_SEMIBOLD:
1189                         case FC_WEIGHT_BOLD:
1190                                 entry->weight = cstrdup("bold");
1191                                 entry->fixed_style |= BC_FONT_BOLD;
1192                                 break;
1193
1194                         case FC_WEIGHT_EXTRABOLD:
1195                         case FC_WEIGHT_EXTRABLACK:
1196                                 force_style = 1;
1197                                 entry->weight = cstrdup("bold");
1198                                 entry->fixed_style |= BC_FONT_BOLD;
1199                                 break;
1200                         }
1201                 }
1202
1203                 if(FcPatternGetString(font, FC_FAMILY, 0, &family) == FcResultMatch)
1204                         entry->family = cstrdup((char*)family);
1205
1206                 if(FcPatternGetInteger(font, FC_SLANT, 0, &slant) == FcResultMatch) {
1207                         switch(slant) {
1208                         case FC_SLANT_ROMAN:
1209                         default:
1210                                 entry->slant = cstrdup("r");
1211                                 entry->style |= FL_SLANT_ROMAN;
1212                                 break;
1213                         case FC_SLANT_ITALIC:
1214                                 entry->slant = cstrdup("i");
1215                                 entry->style |= FL_SLANT_ITALIC;
1216                                 entry->fixed_style |= BC_FONT_ITALIC;
1217                                 break;
1218                         case FC_SLANT_OBLIQUE:
1219                                 entry->slant = cstrdup("o");
1220                                 entry->style |= FL_SLANT_OBLIQUE;
1221                                 entry->fixed_style |= BC_FONT_ITALIC;
1222                                 break;
1223                         }
1224                 }
1225
1226                 if(FcPatternGetInteger(font, FC_WIDTH, 0, &width) == FcResultMatch) {
1227                         switch(width) {
1228                         case FC_WIDTH_ULTRACONDENSED:
1229                                 entry->swidth = cstrdup("ultracondensed");
1230                                 break;
1231
1232                         case FC_WIDTH_EXTRACONDENSED:
1233                                 entry->swidth = cstrdup("extracondensed");
1234                                 break;
1235
1236                         case FC_WIDTH_CONDENSED:
1237                                 entry->swidth = cstrdup("condensed");
1238                                 break;
1239                         case FC_WIDTH_SEMICONDENSED:
1240                                 entry->swidth = cstrdup("semicondensed");
1241                                 break;
1242
1243                         case FC_WIDTH_NORMAL:
1244                         default:
1245                                 entry->swidth = cstrdup("normal");
1246                                 break;
1247
1248                         case FC_WIDTH_SEMIEXPANDED:
1249                                 entry->swidth = cstrdup("semiexpanded");
1250                                 break;
1251
1252                         case FC_WIDTH_EXPANDED:
1253                                 entry->swidth = cstrdup("expanded");
1254                                 break;
1255
1256                         case FC_WIDTH_EXTRAEXPANDED:
1257                                 entry->swidth = cstrdup("extraexpanded");
1258                                 break;
1259
1260                         case FC_WIDTH_ULTRAEXPANDED:
1261                                 entry->swidth = cstrdup("ultraexpanded");
1262                                 break;
1263                         }
1264                 }
1265
1266                 if(FcPatternGetInteger(font, FC_SPACING, 0, &spacing) == FcResultMatch) {
1267                         switch(spacing) {
1268                         case 0:
1269                         default:
1270                                 entry->spacing = cstrdup("p");
1271                                 break;
1272
1273                         case 90:
1274                                 entry->spacing = cstrdup("d");
1275                                 break;
1276
1277                         case 100:
1278                                 entry->spacing = cstrdup("m");
1279                                 break;
1280
1281                         case 110:
1282                                 entry->spacing = cstrdup("c");
1283                                 break;
1284                         }
1285                 }
1286
1287                 // Add fake stuff for compatibility
1288                 entry->adstyle = cstrdup(" ");
1289                 entry->pixelsize = 0;
1290                 entry->pointsize = 0;
1291                 entry->xres = 0;
1292                 entry->yres = 0;
1293                 entry->avg_width = 0;
1294                 entry->registry = cstrdup("utf");
1295                 entry->encoding = cstrdup("8");
1296
1297                 if(!FcPatternGetString(font, FC_STYLE, 0, &style) == FcResultMatch)
1298                         force_style = 0;
1299
1300                 // If font has a style unmanaged by titler plugin, force style to be displayed on name
1301                 // in this way we can shown all available fonts styles.
1302                 if(force_style) {
1303                         sprintf(tmpstring, "%s (%s)", entry->family, style);
1304                         entry->displayname = cstrdup(tmpstring);
1305                 }
1306                 else {
1307                         if(strcmp(entry->foundry, "unknown")) {
1308                                 sprintf(tmpstring, "%s (%s)", entry->family, entry->foundry);
1309                                 entry->displayname = cstrdup(tmpstring);
1310                         }
1311                         else {
1312                                 sprintf(tmpstring, "%s", entry->family);
1313                                 entry->displayname = cstrdup(tmpstring);
1314                         }
1315
1316                 }
1317                 fontlist->append(entry);
1318         }
1319
1320         FcFontSetDestroy(fs);
1321         if(freetype_library)
1322                 FT_Done_FreeType(freetype_library);
1323 // for(int i = 0; i < fonts->total; i++)
1324 //      fonts->values[i]->dump();
1325
1326         FcConfigAppFontAddDir(0, (const FcChar8*)search_path);
1327         FcConfigSetRescanInterval(0, 0);
1328
1329         os = FcObjectSetBuild(FC_FAMILY, FC_FILE, FC_FOUNDRY, FC_WEIGHT,
1330                 FC_WIDTH, FC_SLANT, FC_SPACING, FC_STYLE, (char *)0);
1331         pat = FcPatternCreate();
1332         FcPatternAddBool(pat, FC_SCALABLE, true);
1333
1334         if(language[0])
1335         {
1336                 char langstr[LEN_LANG * 3];
1337                 strcpy(langstr, language);
1338
1339                 if(region[0])
1340                 {
1341                         strcat(langstr, "-");
1342                         strcat(langstr, region);
1343                 }
1344
1345                 FcLangSet *ls =  FcLangSetCreate();
1346                 if(FcLangSetAdd(ls, (const FcChar8*)langstr))
1347                         if(FcPatternAddLangSet(pat, FC_LANG, ls))
1348                 FcLangSetDestroy(ls);
1349         }
1350
1351         fs = FcFontList(0, pat, os);
1352         FcPatternDestroy(pat);
1353         FcObjectSetDestroy(os);
1354
1355         for(int i = 0; i < fs->nfont; i++)
1356         {
1357                 FcPattern *font = fs->fonts[i];
1358                 BC_FontEntry *entry = new BC_FontEntry;
1359
1360                 FcChar8 *strvalue;
1361                 if(FcPatternGetString(font, FC_FILE, 0, &strvalue) == FcResultMatch)
1362                 {
1363                         entry->path = new char[strlen((char*)strvalue) + 1];
1364                         strcpy(entry->path, (char*)strvalue);
1365                 }
1366
1367                 if(FcPatternGetString(font, FC_FOUNDRY, 0, &strvalue) == FcResultMatch)
1368                 {
1369                         entry->foundry = new char[strlen((char*)strvalue) + 1];
1370                         strcpy(entry->foundry, (char *)strvalue);
1371                 }
1372
1373                 if(FcPatternGetString(font, FC_FAMILY, 0, &strvalue) == FcResultMatch)
1374                 {
1375                         entry->family = new char[strlen((char*)strvalue) + 2];
1376                         strcpy(entry->family, (char*)strvalue);
1377                 }
1378
1379                 int intvalue;
1380                 if(FcPatternGetInteger(font, FC_SLANT, 0, &intvalue) == FcResultMatch)
1381                 {
1382                         switch(intvalue)
1383                         {
1384                         case FC_SLANT_ROMAN:
1385                         default:
1386                                 entry->style |= FL_SLANT_ROMAN;
1387                                 break;
1388
1389                         case FC_SLANT_ITALIC:
1390                                 entry->style |= FL_SLANT_ITALIC;
1391                                 break;
1392
1393                         case FC_SLANT_OBLIQUE:
1394                                 entry->style |= FL_SLANT_OBLIQUE;
1395                                 break;
1396                         }
1397                 }
1398
1399                 if(FcPatternGetInteger(font, FC_WEIGHT, 0, &intvalue) == FcResultMatch)
1400                 {
1401                         switch(intvalue)
1402                         {
1403                         case FC_WEIGHT_THIN:
1404                                 entry->style |= FL_WEIGHT_THIN;
1405                                 break;
1406
1407                         case FC_WEIGHT_EXTRALIGHT:
1408                                 entry->style |= FL_WEIGHT_EXTRALIGHT;
1409                                 break;
1410
1411                         case FC_WEIGHT_LIGHT:
1412                                 entry->style |= FL_WEIGHT_LIGHT;
1413                                 break;
1414
1415                         case FC_WEIGHT_BOOK:
1416                                 entry->style |= FL_WEIGHT_BOOK;
1417                                 break;
1418
1419                         case FC_WEIGHT_NORMAL:
1420                         default:
1421                                 entry->style |= FL_WEIGHT_NORMAL;
1422                                 break;
1423
1424                         case FC_WEIGHT_MEDIUM:
1425                                 entry->style |= FL_WEIGHT_MEDIUM;
1426                                 break;
1427
1428                         case FC_WEIGHT_DEMIBOLD:
1429                                 entry->style |= FL_WEIGHT_DEMIBOLD;
1430                                 break;
1431
1432                         case FC_WEIGHT_BOLD:
1433                                 entry->style |= FL_WEIGHT_BOLD;
1434                                 break;
1435
1436                         case FC_WEIGHT_EXTRABOLD:
1437                                 entry->style |= FL_WEIGHT_EXTRABOLD;
1438                                 break;
1439
1440                         case FC_WEIGHT_BLACK:
1441                                 entry->style |= FL_WEIGHT_BLACK;
1442                                 break;
1443
1444                         case FC_WEIGHT_EXTRABLACK:
1445                                 entry->style |= FL_WEIGHT_EXTRABLACK;
1446                                 break;
1447                         }
1448                 }
1449
1450                 if(FcPatternGetInteger(font, FC_WIDTH, 0, &intvalue) == FcResultMatch)
1451                 {
1452                         switch(intvalue)
1453                         {
1454                         case FC_WIDTH_ULTRACONDENSED:
1455                                 entry->style |= FL_WIDTH_ULTRACONDENSED;
1456                                 break;
1457
1458                         case FC_WIDTH_EXTRACONDENSED:
1459                                 entry->style |= FL_WIDTH_EXTRACONDENSED;
1460                                 break;
1461
1462                         case FC_WIDTH_CONDENSED:
1463                                 entry->style |= FL_WIDTH_CONDENSED;
1464                                 break;
1465
1466                         case FC_WIDTH_SEMICONDENSED:
1467                                 entry->style = FL_WIDTH_SEMICONDENSED;
1468                                 break;
1469
1470                         case FC_WIDTH_NORMAL:
1471                         default:
1472                                 entry->style |= FL_WIDTH_NORMAL;
1473                                 break;
1474
1475                         case FC_WIDTH_SEMIEXPANDED:
1476                                 entry->style |= FL_WIDTH_SEMIEXPANDED;
1477                                 break;
1478
1479                         case FC_WIDTH_EXPANDED:
1480                                 entry->style |= FL_WIDTH_EXPANDED;
1481                                 break;
1482
1483                         case FC_WIDTH_EXTRAEXPANDED:
1484                                 entry->style |= FL_WIDTH_EXTRAEXPANDED;
1485                                 break;
1486
1487                         case FC_WIDTH_ULTRAEXPANDED:
1488                                 entry->style |= FL_WIDTH_ULTRAEXPANDED;
1489                                 break;
1490                         }
1491                 }
1492                 if(FcPatternGetInteger(font, FC_SPACING, 0, &intvalue) == FcResultMatch)
1493                 {
1494                         switch(intvalue)
1495                         {
1496                         case FC_PROPORTIONAL:
1497                         default:
1498                                 entry->style |= FL_PROPORTIONAL;
1499                                 break;
1500
1501                         case FC_DUAL:
1502                                 entry->style |= FL_DUAL;
1503                                 break;
1504
1505                         case FC_MONO:
1506                                 entry->style |= FL_MONO;
1507                                 break;
1508
1509                         case FC_CHARCELL:
1510                                 entry->style |= FL_CHARCELL;
1511                                 break;
1512                         }
1513                 }
1514                 if(entry->foundry && strcmp(entry->foundry, "unknown"))
1515                 {
1516                         char tempstr[BCTEXTLEN];
1517                         sprintf(tempstr, "%s (%s)", entry->family, entry->foundry);
1518                         entry->displayname = new char[strlen(tempstr) + 1];
1519                         strcpy(entry->displayname, tempstr);
1520                 }
1521                 else
1522                 {
1523                         entry->displayname = new char[strlen(entry->family) + 1];
1524                         strcpy(entry->displayname, entry->family);
1525                 }
1526                 fontlist->append(entry);
1527         }
1528         FcFontSetDestroy(fs);
1529         return 0;
1530 }
1531
1532 #define STYLE_MATCH(fst, stl, msk) ((fst) & (msk) & (stl)) && \
1533        !((fst) & ~(style) & (msk))
1534
1535 BC_FontEntry *BC_Resources::find_fontentry(const char *displayname, int style,
1536         int mask, int preferred)
1537 {
1538         BC_FontEntry *entry, *style_match, *preferred_match;
1539
1540         if(!fontlist)
1541                 return 0;
1542
1543         style_match = 0;
1544         preferred_match = 0;
1545
1546         if(displayname)
1547         {
1548                 for(int i = 0; i < fontlist->total; i++)
1549                 {
1550                         entry = fontlist->values[i];
1551
1552                         if(strcmp(entry->displayname, displayname) == 0 &&
1553                                         STYLE_MATCH(entry->style, style, mask))
1554                         {
1555                                 if(!style_match)
1556                                         style_match = entry;
1557                                 if(!preferred_match && entry->fixed_style == preferred)
1558                                         preferred_match = entry;
1559                         }
1560                 }
1561                 if(preferred_match)
1562                         return preferred_match;
1563
1564                 if(style_match)
1565                         return style_match;
1566         }
1567
1568 // No exact match - assume normal width font
1569         style |= FL_WIDTH_NORMAL;
1570         mask |= FL_WIDTH_MASK;
1571         style_match = 0;
1572         preferred_match = 0;
1573
1574         for(int i = 0; i < fontlist->total; i++)
1575         {
1576                 entry = fontlist->values[i];
1577
1578                 if(STYLE_MATCH(entry->style, style, mask))
1579                 {
1580                         if(!style_match)
1581                                 style_match = entry;
1582
1583                         if(!preferred_match && (entry->style & preferred))
1584                                 preferred_match = entry;
1585
1586                         if(!strncasecmp(displayname, entry->family,
1587                                         strlen(entry->family)))
1588                         return entry;
1589                 }
1590         }
1591
1592         if(preferred_match)
1593                 return preferred_match;
1594
1595         return style_match;
1596 }
1597
1598 size_t BC_Resources::encode(const char *from_enc, const char *to_enc,
1599         char *input, int input_length, char *output, int output_length)
1600 {
1601         size_t inbytes, outbytes = 0;
1602         iconv_t cd;
1603         char *outbase = output;
1604
1605         if(!from_enc || *from_enc == 0)
1606                 from_enc = "UTF-8";
1607
1608         if(!to_enc || *to_enc == 0)
1609                 to_enc = "UTF-8";
1610
1611         if(input_length < 0)
1612                 inbytes = strlen(input);
1613         else
1614                 inbytes = input_length;
1615
1616         if(strcmp(from_enc, to_enc) && inbytes)
1617         {
1618                 if((cd = iconv_open(to_enc, from_enc)) == (iconv_t)-1)
1619                 {
1620                         printf(_("Conversion from %s to %s is not available\n"),
1621                                 from_enc, to_enc);
1622                         return 0;
1623                 }
1624
1625                 outbytes = output_length - 1;
1626
1627                 iconv(cd, &input, &inbytes, &output, &outbytes);
1628
1629                 iconv_close(cd);
1630                 inbytes = output - outbase;
1631         }
1632         else if(inbytes)
1633         {
1634                 memcpy(output,  input, inbytes);
1635                 outbytes -= inbytes;
1636         }
1637         for(int i = 0; i < 4; i++)
1638         {
1639                 output[i] = 0;
1640                 if(outbytes-- == 0)
1641                         break;
1642         }
1643         return inbytes;
1644 }
1645
1646 void BC_Resources::encode_to_utf8(char *buffer, int buflen)
1647 {
1648         if(BC_Resources::locale_utf8) return;
1649         char lbuf[buflen];
1650         encode(encoding, 0, buffer, buflen, lbuf, buflen);
1651         strcpy(buffer, lbuf);
1652 }
1653
1654 int BC_Resources::find_font_by_char(FT_ULong char_code, char *path_new, const FT_Face oldface)
1655 {
1656         FcPattern *font, *ofont;
1657         FcChar8 *file;
1658         int result = 0;
1659
1660         *path_new = 0;
1661
1662         // Do not search control codes
1663         if(char_code < ' ')
1664                 return 0;
1665
1666         if( (ofont = FcFreeTypeQueryFace(oldface, (const FcChar8*)"", 4097, 0)) != 0 ) {
1667                 if( (font = find_similar_font(char_code, ofont)) != 0 ) {
1668                         if(FcPatternGetString(font, FC_FILE, 0, &file) == FcResultMatch) {
1669                                 strcpy(path_new, (char*)file);
1670                                 result = 1;
1671                         }
1672                         FcPatternDestroy(font);
1673                 }
1674                 FcPatternDestroy(ofont);
1675         }
1676         return result;
1677 }
1678
1679 FcPattern* BC_Resources::find_similar_font(FT_ULong char_code, FcPattern *oldfont)
1680 {
1681         FcPattern *pat, *font;
1682         FcFontSet *fs;
1683         FcObjectSet *os;
1684         FcCharSet *fcs;
1685         int ival;
1686
1687         // Do not search control codes
1688         if(char_code < ' ')
1689                 return 0;
1690
1691         fontconfig_lock.lock("BC_Resources::find_similar_font");
1692         pat = FcPatternCreate();
1693         os = FcObjectSetBuild(FC_FILE, FC_CHARSET, FC_SCALABLE, FC_FAMILY,
1694                 FC_SLANT, FC_WEIGHT, FC_WIDTH, (char *)0);
1695
1696         FcPatternAddBool(pat, FC_SCALABLE, true);
1697         fcs = FcCharSetCreate();
1698         if(FcCharSetAddChar(fcs, char_code))
1699                 FcPatternAddCharSet(pat, FC_CHARSET, fcs);
1700         FcCharSetDestroy(fcs);
1701         for( int i=0; i<(int)LEN_FCPROP; ++i ) {
1702                 if(FcPatternGetInteger(oldfont, fc_properties[i], 0, &ival) == FcResultMatch)
1703                         FcPatternAddInteger(pat, fc_properties[i], ival);
1704         }
1705         fs = FcFontList(0, pat, os);
1706         for( int i=LEN_FCPROP; --i>=0 && !fs->nfont; ) {
1707                 FcFontSetDestroy(fs);
1708                 FcPatternDel(pat, fc_properties[i]);
1709                 fs = FcFontList(0, pat, os);
1710         }
1711         FcPatternDestroy(pat);
1712         FcObjectSetDestroy(os);
1713
1714         pat = 0;
1715
1716         for (int i = 0; i < fs->nfont; i++)
1717         {
1718                 font = fs->fonts[i];
1719                 if(FcPatternGetCharSet(font, FC_CHARSET, 0, &fcs) == FcResultMatch)
1720                 {
1721                         if(FcCharSetHasChar(fcs, char_code))
1722                         {
1723                                 pat =  FcPatternDuplicate(font);
1724                                 break;
1725                         }
1726                 }
1727         }
1728         FcFontSetDestroy(fs);
1729         fontconfig_lock.unlock();
1730
1731         return pat;
1732 }
1733
1734 void BC_Resources::dump_fonts(FILE *fp)
1735 {
1736         for( int i=0; i<fontlist->total; ++i ) {
1737                 BC_FontEntry *ep = fontlist->values[i];
1738                 fprintf(fp,"%s = %s\n",ep->displayname,ep->path);
1739                 fprintf(fp,"  %s:%s:%s:%s:%s:%s:%d:%d:%d:%d:%d:%s:%d:%s:%s:%d\n",
1740                         ep->foundry, ep->family, ep->weight, ep->slant, ep->swidth, ep->adstyle,
1741                         ep->pixelsize, ep->pointsize, ep->xres, ep->yres, ep->style, ep->spacing,
1742                         ep->avg_width, ep->registry, ep->encoding, ep->fixed_style);
1743         }
1744 }
1745