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