Roxen.git / server / font_handlers / imagedir.pike

version» Context lines:

Roxen.git/server/font_handlers/imagedir.pike:1: + #include <config.h> + #include <stat.h> + constant cvs_version = "$Id: imagedir.pike,v 1.1 2000/09/04 05:09:13 per Exp $";    -  + constant name = "Image directory fonts"; + constant doc = ("Handles a directory with images (in almost any format), each " +  "named after the character they will represent (encoded with " +  "UTF8, and . replaced with 0x2e and / replaced with 0x2f)"); +  + inherit FontHandler; +  + class myFont + { +  inherit Font; +  static string path; +  static int size, rsize; +  static mapping nullchar = ([ "image":Image.Image(1,1), +  "alpha":Image.Image(1,1) ]); +  static array files; +  +  +  static string _sprintf() +  { +  return sprintf( "FontDir(%O,%d)", path, height() ); +  } +  +  static string encode_char( string c ) +  { +  return replace( string_to_utf8( c ), +  ({ ".", "/" }), +  ({ "0x2e", "0x2f" }) ); +  } +  +  static mapping(string:Image.Image) load_char( string c ) +  { +  if(!files) +  files = get_dir( path ) - ({ "fontname" }); +  +  array possible = glob(encode_char( c )+"*", files); +  foreach( possible, string pf ) +  if( mapping r = Image._load( path+pf ) ) +  return r; +  return nullchar; +  } +  mapping(string:mapping(string:Image.Image)) char_cache = ([]); +  static mapping(string:Image.Image) write_char( string c ) +  { +  if( char_cache[ c ] ) return char_cache[ c ]; +  return char_cache[ c ] = load_char( c ); +  } +  +  static Image.Image write_row( string text ) +  { +  array(mapping(string:Image.Image)) res = map( text/"", write_char ); +  +  Image.Image rr=Image.Image((int)abs(`+(0,@res->image->xsize())*x_spacing), +  max(0,@res->image->ysize())); +  +  float start; +  if( x_spacing < 0 ) start = (float)rr->xsize()-res[0]->image->xsize(); +  +  foreach( res, mapping(string:Image.Image) r ) +  { +  if( !r->image ) continue; +  if( r->alpha ) +  rr->paste_mask(r->image,r->alpha, +  (int)start,rr->ysize()-r->image->ysize() ); +  else +  rr->paste(r->image,(int)start,rr->ysize()-r->image->ysize()); +  start += r->image->xsize()*x_spacing; +  } +  return rr; +  } +  +  int height() +  { +  return rsize ? rsize : (rsize = text_extents("0WjI|9")[1] ); +  } +  +  Image.Image write( string ... what ) +  { +  array(Image.Image) res = map( what, write_row ); +  Image.Image rr = Image.Image( max(0,@res->xsize()), +  (int)abs(`+(0,@res->ysize())*y_spacing) ); +  +  float start; +  if( y_spacing < 0 ) start = (float)rr->ysize()-res[0]->ysize(); +  +  foreach( res, object r ) +  { +  if( j_right ) rr->paste(r,rr->xsize()-r->xsize(),(int)start); +  else if( j_center ) rr->paste(r,(rr->xsize()-r->xsize())/2,(int)start); +  else rr->paste( r, 0, (int)start ); +  start += r->ysize()*y_spacing; +  } +  return rr; +  } +  +  array text_extents( string what ) +  { +  Image.Image o = write( what ); +  return ({ o->xsize(), o->ysize() }); +  } +  +  void create( string _path, int _size ) +  { +  path = _path; +  size = _size; +  } + } +  + mapping font_list; + static string font_name( string what ) + { +  return (lower_case( replace(what," ","_") )/"\n")[0]-"\r"; + } +  + void update_font_list() + { +  font_list = ([]); +  foreach(roxen->query("font_dirs"), string dir) +  foreach( (get_dir( dir )||({})), string d ) +  if( file_stat( dir+d )[ ST_SIZE ] == -2 ) // isdir +  if( file_stat( dir+d+"/fontname" ) ) +  font_list[font_name(Stdio.read_bytes(dir+d+"/fontname"))]=dir+d+"/"; + } +  + array available_fonts() + { +  array res = ({}); +  if( !font_list ) update_font_list(); +  return indices( font_list ); + } +  + array(mapping) font_information( string fnt ) + { +  if( !font_list ) update_font_list(); +  if( font_list[ fnt ] ) +  return ({ ([ +  "name":fnt, +  "family":fnt, +  "path":font_list[fnt], +  "format":"imagedir", +  ]) +  }); +  return ({}); + } +  + array has_font( string name, int size ) + { +  if( !font_list ) update_font_list(); +  if( font_list[ name ] ) +  return ({ "nn" }); + } +  + Font open( string name, int size, int bold, int italic ) + { +  if( !font_list ) update_font_list(); +  if( font_list[ name ] ) +  return myFont( font_list[name], size ); + } +  +  + void create() + { +  roxen.getvar( "font_dirs" ) +  ->add_changed_callback( lambda(Variable.Variable v){ +  font_list = 0; +  } ); + }   Newline at end of file added.