static int GroupSBSizes(struct groupdlg *grp) {
int lpos;
grp->maxl = 0;
GDrawSetFont(grp->v,grp->font);
lpos = _GroupSBSizes(grp,grp->root,0,0);
grp->maxl += 5; /* margin */
GScrollBarSetBounds(grp->vsb,0,lpos,grp->lines_page);
GScrollBarSetBounds(grp->hsb,0,grp->maxl,grp->page_width);
grp->open_cnt = lpos;
return( lpos );
}
static void SVDraw(SearchView *sv, GWindow pixmap, GEvent *event) {
GRect r;
GDrawSetLineWidth(pixmap,0);
if ( sv->cv_srch.inactive )
GDrawSetFont(pixmap,sv->plain);
else
GDrawSetFont(pixmap,sv->bold);
GDrawDrawBiText8(pixmap,10,sv->mbh+5+sv->as,
_("Search Pattern:"),-1,NULL,0);
if ( sv->cv_rpl.inactive )
GDrawSetFont(pixmap,sv->plain);
else
GDrawSetFont(pixmap,sv->bold);
GDrawDrawBiText8(pixmap,sv->rpl_x,sv->mbh+5+sv->as,
_("Replace Pattern:"),-1,NULL,0);
r.x = 10-1; r.y=sv->cv_y-1;
r.width = sv->cv_width+1; r.height = sv->cv_height+1;
GDrawDrawRect(pixmap,&r,0);
r.x = sv->rpl_x-1;
GDrawDrawRect(pixmap,&r,0);
}
static void MouseToPos(GEvent *event,int *_l, int *_c) {
int l,c=0;
GDrawSetFont(errdata.v,errdata.font);
l = event->u.mouse.y/errdata.fh + errdata.offtop;
if ( l>=errdata.cnt ) {
l = errdata.cnt-1;
if ( l>=0 )
c = strlen(errdata.errlines[l]);
} else if ( l>=0 ) {
GDrawLayoutInit(errdata.v,errdata.errlines[l],-1,NULL);
c = GDrawLayoutXYToIndex(errdata.v,event->u.mouse.x-3,4);
}
*_l = l;
*_c = c;
}
static void MouseToPos(GEvent *event,int *_l, int *_c) {
int l,c=0;
char *end;
GDrawSetFont(errdata.v,errdata.font);
l = event->u.mouse.y/errdata.fh + errdata.offtop;
if ( l>=errdata.cnt ) {
l = errdata.cnt-1;
if ( l>=0 )
c = strlen(errdata.errlines[l]);
} else if ( (GDrawHasCairo(errdata.v)&gc_pango) && l>=0 ) {
GDrawLayoutInit(errdata.v,errdata.errlines[l],-1,NULL);
c = GDrawLayoutXYToIndex(errdata.v,event->u.mouse.x-3,4);
} else if ( l>=0 ) {
GDrawGetText8PtFromPos(errdata.v,errdata.errlines[l],-1,NULL,event->u.mouse.x-3,&end);
c = end - errdata.errlines[l];
}
*_l = l;
*_c = c;
}
static int ruler_e_h(GWindow gw, GEvent *event) {
CharView *cv = (CharView *) GDrawGetUserData(gw);
unichar_t ubuf[80];
int line;
switch ( event->type ) {
case et_expose:
GDrawSetFont(gw,cv->rfont);
/*GDrawFillRect(gw,NULL,0xe0e0c0);*/
for ( line=0; RulerText(cv,ubuf,line); ++line )
GDrawDrawBiText(gw,2,line*cv->rfh+cv->ras+1,ubuf,-1,NULL,0x000000);
break;
case et_mousedown:
cv->autonomous_ruler_w = false;
GDrawDestroyWindow(gw);
cv->ruler_w = NULL;
break;
}
return( true );
}
static int cpinfo_e_h(GWindow gw, GEvent *event) {
CharView *cv = (CharView *) GDrawGetUserData(gw);
char buf[100];
int line, which, y;
switch ( event->type ) {
case et_expose:
y = cv->ras+1;
GDrawSetFont(gw,cv->rfont);
for ( which = 1; which>=0; --which ) {
for ( line=0; PtInfoText(cv,line,which,buf,sizeof(buf))!=NULL; ++line ) {
GDrawDrawBiText8(gw,2,y,buf,-1,NULL,0x000000);
y += cv->rfh+1;
}
GDrawDrawLine(gw,0,y+2-cv->ras,2000,y+2-cv->ras,0x000000);
y += 4;
}
if ( PtInfoText(cv,0,-1,buf,sizeof(buf))!=NULL )
GDrawDrawBiText8(gw,2,y,buf,-1,NULL,0x000000);
break;
}
return( true );
}
static int gradio_expose(GWindow pixmap, GGadget *g, GEvent *event) {
GRadio *gr = (GRadio *) g;
int x;
GImage *img = gr->image;
GResImage *mark;
GRect old1, old2, old3;
int yoff = (g->inner.height-(gr->fh))/2;
if ( g->state == gs_invisible )
return( false );
GDrawPushClip(pixmap,&g->r,&old1);
GBoxDrawBackground(pixmap,&g->r,g->box,
g->state==gs_enabled? gs_pressedactive: g->state,false);
GBoxDrawBorder(pixmap,&g->r,g->box,g->state,false);
GDrawPushClip(pixmap,&gr->onoffrect,&old2);
GBoxDrawBackground(pixmap,&gr->onoffrect,gr->ison?gr->onbox:gr->offbox,
gs_pressedactive,false);
GBoxDrawBorder(pixmap,&gr->onoffrect,gr->ison?gr->onbox:gr->offbox,
gs_pressedactive,false);
mark = NULL;
if ( g->state == gs_disabled )
mark = gr->ison ? gr->ondis : gr->offdis;
if ( mark==NULL || mark->image==NULL )
mark = gr->ison ? gr->on : gr->off;
if ( mark!=NULL && mark->image==NULL )
mark = NULL;
if ( mark!=NULL ) {
GDrawPushClip(pixmap,&gr->onoffinner,&old3);
GDrawDrawScaledImage(pixmap,mark->image,
gr->onoffinner.x,gr->onoffinner.y);
GDrawPopClip(pixmap,&old3);
} else if ( gr->ison && gr->onbox == &checkbox_on_box ) {
Color fg = g->state==gs_disabled?g->box->disabled_foreground:
g->box->main_foreground==COLOR_DEFAULT?GDrawGetDefaultForeground(GDrawGetDisplayOfWindow(pixmap)):
g->box->main_foreground;
int bp = GDrawPointsToPixels(pixmap,gr->onbox->border_width);
GDrawDrawLine(pixmap, gr->onoffrect.x+bp,gr->onoffrect.y+bp,
gr->onoffrect.x+gr->onoffrect.width-1-bp,gr->onoffrect.y+gr->onoffrect.height-1-bp,
fg);
GDrawDrawLine(pixmap, gr->onoffrect.x+gr->onoffrect.width-1-bp,gr->onoffrect.y+bp,
gr->onoffrect.x+bp,gr->onoffrect.y+gr->onoffrect.height-1-bp,
fg);
}
GDrawPopClip(pixmap,&old2);
x = gr->onoffrect.x + gr->onoffrect.width + GDrawPointsToPixels(pixmap,4);
GDrawPushClip(pixmap,&g->inner,&old2);
if ( gr->font!=NULL )
GDrawSetFont(pixmap,gr->font);
if ( gr->image_precedes && img!=NULL ) {
GDrawDrawScaledImage(pixmap,img,x,g->inner.y);
x += GImageGetScaledWidth(pixmap,img) + GDrawPointsToPixels(pixmap,_GGadget_TextImageSkip);
}
if ( gr->label!=NULL ) {
Color fg = g->state==gs_disabled?g->box->disabled_foreground:
g->box->main_foreground==COLOR_DEFAULT?GDrawGetDefaultForeground(GDrawGetDisplayOfWindow(pixmap)):
g->box->main_foreground;
int lcnt = gradio_linecount(gr);
if ( lcnt>1 )
yoff = (g->inner.height-lcnt*gr->fh)/2;
_ggadget_underlineMnemonic(pixmap,x,g->inner.y + gr->as + yoff,gr->label,
g->mnemonic,fg,g->inner.y+g->inner.height);
x += GDrawDrawBiText(pixmap,x,g->inner.y + gr->as + yoff,gr->label,-1,NULL,
fg );
x += GDrawPointsToPixels(pixmap,_GGadget_TextImageSkip);
}
if ( !gr->image_precedes && img!=NULL )
GDrawDrawScaledImage(pixmap,img,x,g->inner.y);
GDrawPopClip(pixmap,&old2);
GDrawPopClip(pixmap,&old1);
return( true );
}
static int warningsv_e_h(GWindow gw, GEvent *event) {
int i;
extern GBox _ggadget_Default_Box;
if (( event->type==et_mouseup || event->type==et_mousedown ) &&
(event->u.mouse.button>=4 && event->u.mouse.button<=7) ) {
return( GGadgetDispatchEvent(errdata.vsb,event));
}
switch ( event->type ) {
case et_expose:
/*GDrawFillRect(gw,&event->u.expose.rect,GDrawGetDefaultBackground(NULL));*/
GDrawSetFont(gw,errdata.font);
for ( i=0; i<errdata.linecnt && i+errdata.offtop<errdata.cnt; ++i ) {
int xs, xe;
int s_l = errdata.start_l, s_c = errdata.start_c, e_l = errdata.end_l, e_c = errdata.end_c;
GRect r;
if ( s_l>e_l ) {
s_l = e_l; s_c = e_c; e_l = errdata.start_l; e_c = errdata.start_c;
}
if ( GDrawHasCairo(gw)&gc_pango )
GDrawLayoutInit(gw,errdata.errlines[i+errdata.offtop],-1,NULL);
if ( i+errdata.offtop >= s_l && i+errdata.offtop <= e_l ) {
if ( i+errdata.offtop > s_l )
xs = 0;
else if ( GDrawHasCairo(gw)&gc_pango ) {
GRect pos;
GDrawLayoutIndexToPos(gw,s_c,&pos);
xs = pos.x+3;
} else
xs = GDrawGetText8Width(gw,errdata.errlines[i+errdata.offtop],s_c,NULL);
if ( i+errdata.offtop < e_l )
xe = 3000;
else if ( GDrawHasCairo(gw)&gc_pango ) {
GRect pos;
GDrawLayoutIndexToPos(gw,s_c,&pos);
xe = pos.x+pos.width+3;
} else
xe = GDrawGetText8Width(gw,errdata.errlines[i+errdata.offtop],e_c,NULL);
r.x = xs+3; r.width = xe-xs;
r.y = i*errdata.fh; r.height = errdata.fh;
GDrawFillRect(gw,&r,ACTIVE_BORDER);
}
if ( GDrawHasCairo(gw)&gc_pango )
GDrawLayoutDraw(gw,3,i*errdata.fh+errdata.as,MAIN_FOREGROUND);
else
GDrawDrawBiText8(gw,3,i*errdata.fh+errdata.as,errdata.errlines[i+errdata.offtop],-1,NULL,MAIN_FOREGROUND);
}
break;
case et_char:
return( ErrChar(event));
break;
case et_mousedown:
if ( event->u.mouse.button==3 ) {
warnpopupmenu[1].ti.disabled = errdata.start_l == -1;
warnpopupmenu[3].ti.disabled = errdata.cnt == 0;
GMenuCreatePopupMenu(gw,event, warnpopupmenu);
} else {
if ( errdata.down )
return( true );
MouseToPos(event,&errdata.start_l,&errdata.start_c);
errdata.down = true;
}
case et_mousemove:
case et_mouseup:
if ( !errdata.down )
return( true );
MouseToPos(event,&errdata.end_l,&errdata.end_c);
GDrawRequestExpose(gw,NULL,false);
if ( event->type==et_mouseup ) {
errdata.down = false;
if ( errdata.start_l == errdata.end_l && errdata.start_c == errdata.end_c ) {
errdata.start_l = errdata.end_l = -1;
} else {
GDrawGrabSelection(gw,sn_primary);
GDrawAddSelectionType(gw,sn_primary,"UTF8_STRING",&errdata,1,
sizeof(char),
genutf8data,noop);
GDrawAddSelectionType(gw,sn_primary,"STRING",&errdata,1,
sizeof(char),
genutf8data,noop);
}
}
break;
case et_selclear:
errdata.start_l = errdata.end_l = -1;
GDrawRequestExpose(gw,NULL,false);
break;
case et_timer:
break;
case et_focus:
break;
}
return( true );
}
int fontforge_main( int argc, char **argv ) {
extern const char *source_modtime_str;
extern const char *source_version_str;
const char *load_prefs = getenv("FONTFORGE_LOADPREFS");
int i;
int recover=2;
int any;
int next_recent=0;
GRect pos;
GWindowAttrs wattrs;
char *display = NULL;
FontRequest rq;
int ds, ld;
int openflags=0;
int doopen=0, quit_request=0;
bool use_cairo = true;
#if !(GLIB_CHECK_VERSION(2, 35, 0))
g_type_init();
#endif
/* Must be done before we cache the current directory */
/* Change to HOME dir if specified on the commandline */
for ( i=1; i<argc; ++i ) {
char *pt = argv[i];
if ( pt[0]=='-' && pt[1]=='-' ) ++pt;
if (strcmp(pt,"-home")==0 || strncmp(pt,"-psn_",5)==0) {
/* OK, I don't know what _-psn_ means, but to GW it means */
/* we've been started on the mac from the FontForge.app */
/* structure, and the current directory is (shudder) "/" */
if (getenv("HOME")!=NULL) chdir(getenv("HOME"));
break; /* Done - Unnecessary to check more arguments */
}
if (strcmp(pt,"-quiet")==0)
quiet = 1;
}
if (!quiet) {
fprintf( stderr, "Copyright (c) 2000-2014 by George Williams. See AUTHORS for Contributors.\n" );
fprintf( stderr, " License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>\n" );
fprintf( stderr, " with many parts BSD <http://fontforge.org/license.html>. Please read LICENSE.\n" );
fprintf( stderr, " Based on sources from %s"
"-ML"
#ifdef FREETYPE_HAS_DEBUGGER
"-TtfDb"
#endif
#ifdef _NO_PYTHON
"-NoPython"
#endif
#ifdef FONTFORGE_CONFIG_USE_DOUBLE
"-D"
#endif
".\n",
FONTFORGE_MODTIME_STR );
fprintf( stderr, " Based on source from git with hash: %s\n", FONTFORGE_GIT_VERSION );
}
#if defined(__Mac)
/* Start X if they haven't already done so. Well... try anyway */
/* Must be before we change DYLD_LIBRARY_PATH or X won't start */
/* (osascript depends on a libjpeg which isn't found if we look in /sw/lib first */
int local_x = uses_local_x(argc,argv);
if ( local_x==1 && getenv("DISPLAY")==NULL ) {
/* Don't start X if we're just going to quit. */
/* if X exists, it isn't needed. If X doesn't exist it's wrong */
if ( !hasquit(argc,argv)) {
/* This sequence is supposed to bring up an app without a window */
/* but X still opens an xterm */
system( "osascript -e 'tell application \"X11\" to launch'" );
system( "osascript -e 'tell application \"X11\" to activate'" );
}
setenv("DISPLAY",":0.0",0);
} else if ( local_x==1 && *getenv("DISPLAY")!='/' && strcmp(getenv("DISPLAY"),":0.0")!=0 && strcmp(getenv("DISPLAY"),":0")!=0 )
/* 10.5.7 uses a named socket or something "/tmp/launch-01ftWX:0" */
local_x = 0;
#endif
#if defined(__MINGW32__)
if( getenv("DISPLAY")==NULL ) {
putenv("DISPLAY=127.0.0.1:0.0");
}
if( getenv("LC_ALL")==NULL ){
char lang[8];
char env[32];
if( GetLocaleInfoA(LOCALE_USER_DEFAULT, LOCALE_SISO639LANGNAME, lang, 8) > 0 ){
strcpy(env, "LC_ALL=");
strcat(env, lang);
putenv(env);
}
}
#endif
FF_SetUiInterface(&gdraw_ui_interface);
FF_SetPrefsInterface(&gdraw_prefs_interface);
FF_SetSCInterface(&gdraw_sc_interface);
FF_SetCVInterface(&gdraw_cv_interface);
FF_SetBCInterface(&gdraw_bc_interface);
FF_SetFVInterface(&gdraw_fv_interface);
FF_SetFIInterface(&gdraw_fi_interface);
FF_SetMVInterface(&gdraw_mv_interface);
FF_SetClipInterface(&gdraw_clip_interface);
#ifndef _NO_PYTHON
PythonUI_Init();
#endif
FindProgDir(argv[0]);
InitSimpleStuff();
#if defined(__MINGW32__)
{
char path[MAX_PATH];
unsigned int len = GetModuleFileNameA(NULL, path, MAX_PATH);
path[len] = '\0';
//The '.exe' must be removed as resources presumes it's not there.
GResourceSetProg(GFileRemoveExtension(GFileNormalizePath(path)));
}
#else
GResourceSetProg(argv[0]);
#endif
#if defined(__Mac)
/* The mac seems to default to the "C" locale, LANG and LC_MESSAGES are not*/
/* defined. This means that gettext will not bother to look up any message*/
/* files -- even if we have a "C" or "POSIX" entry in the locale diretory */
/* Now if X11 gives us the command key, I want to force a rebinding to use */
/* Cmd rather than Control key -- more mac-like. But I can't do that if */
/* there is no locale. So I force a locale if there is none specified */
/* I force the US English locale, because that's the what the messages are */
/* by default so I'm changing as little as I can. I think. */
/* Now the locale command will treat a LANG which is "" as undefined, but */
/* gettext will not. So I don't bother to check for null strings or "C" */
/* or "POSIX". If they've mucked with the locale perhaps they know what */
/* they are doing */
{
int did_keybindings = 0;
int useCommandKey = get_mac_x11_prop("enable_key_equivalents") <= 0;
if ( local_x && useCommandKey ) {
hotkeySystemSetCanUseMacCommand( 1 );
/* Ok, we get the command key */
if ( getenv("LANG")==NULL && getenv("LC_MESSAGES")==NULL ) {
setenv("LC_MESSAGES","en_US.UTF-8",0);
}
/* Can we find a set of keybindings designed for the mac with cmd key? */
bind_textdomain_codeset("Mac-FontForge-MenuShortCuts","UTF-8");
bindtextdomain("Mac-FontForge-MenuShortCuts", getLocaleDir());
if ( *dgettext("Mac-FontForge-MenuShortCuts","Flag0x10+")!='F' ) {
GMenuSetShortcutDomain("Mac-FontForge-MenuShortCuts");
did_keybindings = 1;
}
}
if ( !did_keybindings ) {
/* Nope. we can't. Fall back to the normal stuff */
#endif
GMenuSetShortcutDomain("FontForge-MenuShortCuts");
bind_textdomain_codeset("FontForge-MenuShortCuts","UTF-8");
bindtextdomain("FontForge-MenuShortCuts", getLocaleDir());
#if defined(__Mac)
}
}
#endif
bind_textdomain_codeset("FontForge","UTF-8");
bindtextdomain("FontForge", getLocaleDir());
textdomain("FontForge");
GResourceUseGetText();
{
char shareDir[PATH_MAX];
char* sd = getShareDir();
strncpy( shareDir, sd, PATH_MAX );
shareDir[PATH_MAX-1] = '\0';
if(!sd) {
strcpy( shareDir, SHAREDIR );
}
char path[PATH_MAX];
snprintf(path, PATH_MAX, "%s%s", shareDir, "/pixmaps" );
GGadgetSetImageDir( path );
snprintf(path, PATH_MAX, "%s%s", shareDir, "/resources/fontforge.resource" );
GResourceAddResourceFile(path, GResourceProgramName,false);
}
hotkeysLoad();
// loadPrefsFiles();
Prefs_LoadDefaultPreferences();
if ( load_prefs!=NULL && strcasecmp(load_prefs,"Always")==0 )
LoadPrefs();
if ( default_encoding==NULL )
default_encoding=FindOrMakeEncoding("ISO8859-1");
if ( default_encoding==NULL )
default_encoding=&custom; /* In case iconv is broken */
// This no longer starts embedded Python unless control passes to the Python executors,
// which exit independently rather than returning here.
CheckIsScript(argc,argv); /* Will run the script and exit if it is a script */
/* If there is no UI, there is always a script */
/* and we will never return from the above */
if ( load_prefs==NULL ||
(strcasecmp(load_prefs,"Always")!=0 && /* Already loaded */
strcasecmp(load_prefs,"Never")!=0 ))
LoadPrefs();
GrokNavigationMask();
for ( i=1; i<argc; ++i ) {
char *pt = argv[i];
if ( pt[0]=='-' && pt[1]=='-' )
++pt;
if ( strcmp(pt,"-sync")==0 )
GResourceAddResourceString("Gdraw.Synchronize: true",argv[0]);
else if ( strcmp(pt,"-depth")==0 && i<argc-1 )
AddR(argv[0],"Gdraw.Depth", argv[++i]);
else if ( strcmp(pt,"-vc")==0 && i<argc-1 )
AddR(argv[0],"Gdraw.VisualClass", argv[++i]);
else if ( (strcmp(pt,"-cmap")==0 || strcmp(pt,"-colormap")==0) && i<argc-1 )
AddR(argv[0],"Gdraw.Colormap", argv[++i]);
else if ( (strcmp(pt,"-dontopenxdevices")==0) )
AddR(argv[0],"Gdraw.DontOpenXDevices", "true");
else if ( strcmp(pt,"-keyboard")==0 && i<argc-1 )
AddR(argv[0],"Gdraw.Keyboard", argv[++i]);
else if ( strcmp(pt,"-display")==0 && i<argc-1 )
display = argv[++i];
# if MyMemory
else if ( strcmp(pt,"-memory")==0 )
__malloc_debug(5);
# endif
else if ( strncmp(pt,"-usecairo",strlen("-usecairo"))==0 ) {
if ( strcmp(pt,"-usecairo=no")==0 )
use_cairo = false;
else
use_cairo = true;
GDrawEnableCairo(use_cairo);
} else if ( strcmp(pt,"-nosplash")==0 )
splash = 0;
else if ( strcmp(pt,"-quiet")==0 )
/* already checked for this earlier, no need to do it again */;
else if ( strcmp(pt,"-unique")==0 )
unique = 1;
else if ( strcmp(pt,"-forceuihidden")==0 )
cmdlinearg_forceUIHidden = 0;
else if ( strcmp(pt,"-recover")==0 && i<argc-1 ) {
++i;
if ( strcmp(argv[i],"none")==0 )
recover=0;
else if ( strcmp(argv[i],"clean")==0 )
recover= -1;
else if ( strcmp(argv[i],"auto")==0 )
recover= 1;
else if ( strcmp(argv[i],"inquire")==0 )
recover= 2;
else {
fprintf( stderr, "Invalid argument to -recover, must be none, auto, inquire or clean\n" );
dousage();
}
} else if ( strcmp(pt,"-recover=none")==0 ) {
recover = 0;
} else if ( strcmp(pt,"-recover=clean")==0 ) {
recover = -1;
} else if ( strcmp(pt,"-recover=auto")==0 ) {
recover = 1;
} else if ( strcmp(pt,"-recover=inquire")==0 ) {
recover = 2;
} else if ( strcmp(pt,"-docs")==0 )
dohelp();
else if ( strcmp(pt,"-help")==0 )
dousage();
else if ( strcmp(pt,"-version")==0 || strcmp(pt,"-v")==0 || strcmp(pt,"-V")==0 )
doversion(FONTFORGE_MODTIME_STR);
else if ( strcmp(pt,"-quit")==0 )
quit_request = true;
else if ( strcmp(pt,"-home")==0 )
/* already did a chdir earlier, don't need to do it again */;
#if defined(__Mac)
else if ( strncmp(pt,"-psn_",5)==0 ) {
/* OK, I don't know what _-psn_ means, but to GW it means */
/* we've been started on the mac from the FontForge.app */
/* structure, and the current directory was (shudder) "/" */
/* (however, we changed to HOME earlier in main routine). */
unique = 1;
listen_to_apple_events = true; // This has been problematic on Mavericks and later.
}
#endif
}
ensureDotFontForgeIsSetup();
#if defined(__MINGW32__) && !defined(_NO_LIBCAIRO)
//Load any custom fonts for the user interface
if (use_cairo) {
char *system_load = getGResourceProgramDir();
char *user_load = getFontForgeUserDir(Data);
char lbuf[MAX_PATH];
int lret;
if (system_load != NULL) {
//Follow the FontConfig APPSHAREFONTDIR location
lret = snprintf(lbuf, MAX_PATH, "%s/../share/fonts", system_load);
if (lret > 0 && lret < MAX_PATH) {
WinLoadUserFonts(lbuf);
}
}
if (user_load != NULL) {
lret = snprintf(lbuf, MAX_PATH, "%s/%s", user_load, "ui-fonts");
if (lret > 0 && lret < MAX_PATH) {
WinLoadUserFonts(lbuf);
}
free(user_load);
}
}
#endif
InitImageCache(); // This is in gtextinfo.c. It zeroes imagecache for us.
atexit(&ClearImageCache); // We register the destructor, which is also in gtextinfo.c.
GDrawCreateDisplays(display,argv[0]);
atexit(&GDrawDestroyDisplays); // We register the destructor so that it runs even if we call exit without finishing this function.
default_background = GDrawGetDefaultBackground(screen_display);
InitToolIconClut(default_background);
InitToolIcons();
InitCursors();
/**
* we have to do a quick sniff of argv[] here to see if the user
* wanted to skip loading these python init files.
*/
for ( i=1; i<argc; ++i ) {
char *pt = argv[i];
if ( !strcmp(pt,"-SkipPythonInitFiles")) {
ProcessPythonInitFiles = 0;
}
}
#ifndef _NO_PYTHON
/*# ifndef GWW_TEST*/
FontForge_InitializeEmbeddedPython(); /* !!!!!! debug (valgrind doesn't like python) */
/*# endif*/
#endif
#ifndef _NO_PYTHON
if( ProcessPythonInitFiles )
PyFF_ProcessInitFiles();
#endif
/* the splash screen used not to have a title bar (wam_nodecor) */
/* but I found I needed to know how much the window manager moved */
/* the window around, which I can determine if I have a positioned */
/* decorated window created at the begining */
/* Actually I don't care any more */
wattrs.mask = wam_events|wam_cursor|wam_bordwidth|wam_backcol|wam_positioned|wam_utf8_wtitle|wam_isdlg;
wattrs.event_masks = ~(1<<et_charup);
wattrs.positioned = 1;
wattrs.cursor = ct_pointer;
wattrs.utf8_window_title = "FontForge";
wattrs.border_width = 2;
wattrs.background_color = 0xffffff;
wattrs.is_dlg = !listen_to_apple_events;
pos.x = pos.y = 200;
pos.width = splashimage.u.image->width;
pos.height = splashimage.u.image->height-56; /* 54 */
GDrawBindSelection(NULL,sn_user1,"FontForge");
if ( unique && GDrawSelectionOwned(NULL,sn_user1)) {
/* Different event handler, not a dialog */
wattrs.is_dlg = false;
splashw = GDrawCreateTopWindow(NULL,&pos,request_e_h,NULL,&wattrs);
PingOtherFontForge(argc,argv);
} else {
if ( quit_request )
exit( 0 );
splashw = GDrawCreateTopWindow(NULL,&pos,splash_e_h,NULL,&wattrs);
}
memset(&rq,0,sizeof(rq));
rq.utf8_family_name = SERIF_UI_FAMILIES;
rq.point_size = 12;
rq.weight = 400;
splash_font = GDrawInstanciateFont(NULL,&rq);
splash_font = GResourceFindFont("Splash.Font",splash_font);
GDrawDecomposeFont(splash_font, &rq);
rq.style = fs_italic;
splash_italic = GDrawInstanciateFont(NULL,&rq);
splash_italic = GResourceFindFont("Splash.ItalicFont",splash_italic);
GDrawSetFont(splashw,splash_font);
SplashLayout();
localsplash = splash;
if ( localsplash && !listen_to_apple_events )
start_splash_screen();
//
// The below call will initialize the fontconfig cache if required.
// That can take a while the first time it happens.
//
GDrawWindowFontMetrics(splashw,splash_font,&as,&ds,&ld);
fh = as+ds+ld;
if ( AutoSaveFrequency>0 )
autosave_timer=GDrawRequestTimer(splashw,2*AutoSaveFrequency*1000,AutoSaveFrequency*1000,NULL);
GDrawProcessPendingEvents(NULL);
GDrawSetBuildCharHooks(BuildCharHook,InsCharHook);
any = 0;
if ( recover==-1 )
CleanAutoRecovery();
else if ( recover )
any = DoAutoRecoveryExtended( recover-1 );
openflags = 0;
for ( i=1; i<argc; ++i ) {
char buffer[1025];
char *pt = argv[i];
GDrawProcessPendingEvents(NULL);
if ( pt[0]=='-' && pt[1]=='-' && pt[2]!='\0')
++pt;
if ( strcmp(pt,"-new")==0 ) {
FontNew();
any = 1;
# if HANYANG
} else if ( strcmp(pt,"-newkorean")==0 ) {
MenuNewComposition(NULL,NULL,NULL);
any = 1;
# endif
} else if ( !strcmp(pt,"-SkipPythonInitFiles")) {
// already handled above.
} else if ( strcmp(pt,"-last")==0 ) {
if ( next_recent<RECENT_MAX && RecentFiles[next_recent]!=NULL )
if ( ViewPostScriptFont(RecentFiles[next_recent++],openflags))
any = 1;
} else if ( strcmp(pt,"-sync")==0 || strcmp(pt,"-memory")==0 ||
strcmp(pt,"-nosplash")==0 || strcmp(pt,"-recover=none")==0 ||
strcmp(pt,"-recover=clean")==0 || strcmp(pt,"-recover=auto")==0 ||
strcmp(pt,"-dontopenxdevices")==0 || strcmp(pt,"-unique")==0 ||
strncmp(pt,"-usecairo",strlen("-usecairo"))==0 ||
strcmp(pt,"-home")==0 || strcmp(pt,"-quiet")==0
|| strcmp(pt,"-forceuihidden")==0 )
/* Already done, needed to be before display opened */;
else if ( strncmp(pt,"-psn_",5)==0 )
/* Already done */;
else if ( (strcmp(pt,"-depth")==0 || strcmp(pt,"-vc")==0 ||
strcmp(pt,"-cmap")==0 || strcmp(pt,"-colormap")==0 ||
strcmp(pt,"-keyboard")==0 ||
strcmp(pt,"-display")==0 || strcmp(pt,"-recover")==0 ) &&
i<argc-1 )
++i; /* Already done, needed to be before display opened */
else if ( strcmp(pt,"-allglyphs")==0 )
openflags |= of_all_glyphs_in_ttc;
else if ( strcmp(pt,"-open")==0 )
doopen = true;
else {
printf("else argv[i]:%s\n", argv[i] );
if ( strstr(argv[i],"://")!=NULL ) { /* Assume an absolute URL */
strncpy(buffer,argv[i],sizeof(buffer));
buffer[sizeof(buffer)-1]= '\0';
} else
GFileGetAbsoluteName(argv[i],buffer,sizeof(buffer));
if ( GFileIsDir(buffer) || (strstr(buffer,"://")!=NULL && buffer[strlen(buffer)-1]=='/')) {
char *fname;
fname = malloc(strlen(buffer)+strlen("/glyphs/contents.plist")+1);
strcpy(fname,buffer); strcat(fname,"/glyphs/contents.plist");
if ( GFileExists(fname)) {
/* It's probably a Unified Font Object directory */
free(fname);
if ( ViewPostScriptFont(buffer,openflags) )
any = 1;
} else {
strcpy(fname,buffer); strcat(fname,"/font.props");
if ( GFileExists(fname)) {
/* It's probably a sf dir collection */
free(fname);
if ( ViewPostScriptFont(buffer,openflags) )
any = 1;
} else {
free(fname);
if ( buffer[strlen(buffer)-1]!='/' ) {
/* If dirname doesn't end in "/" we'll be looking in parent dir */
buffer[strlen(buffer)+1]='\0';
buffer[strlen(buffer)] = '/';
}
fname = GetPostScriptFontName(buffer,false);
if ( fname!=NULL )
ViewPostScriptFont(fname,openflags);
any = 1; /* Even if we didn't get a font, don't bring up dlg again */
free(fname);
}
}
} else if ( ViewPostScriptFont(buffer,openflags)!=0 )
any = 1;
}
}
if ( !any && !doopen )
any = ReopenLastFonts();
collabclient_ensureClientBeacon();
collabclient_sniffForLocalServer();
#ifndef _NO_PYTHON
PythonUI_namedpipe_Init();
#endif
#if defined(__Mac)
if ( listen_to_apple_events ) {
install_apple_event_handlers();
install_mac_timer();
setup_cocoa_app();
// WARNING: See declaration of RunApplicationEventLoop() above as to
// why you might not want to call that function anymore.
// RunApplicationEventLoop();
} else
#endif
if ( doopen || !any )
_FVMenuOpen(NULL);
GDrawEventLoop(NULL);
GDrawDestroyDisplays();
#ifndef _NO_PYTHON
/*# ifndef GWW_TEST*/
FontForge_FinalizeEmbeddedPython(); /* !!!!!! debug (valgrind doesn't like python) */
/*# endif*/
#endif
// These free menu translations, mostly.
BitmapViewFinishNonStatic();
MetricsViewFinishNonStatic();
CharViewFinishNonStatic();
FontViewFinishNonStatic();
ClearImageCache(); // This frees the contents of imagecache.
hotkeysSave();
LastFonts_Save();
#ifndef _NO_LIBUNICODENAMES
uninm_names_db_close(names_db); /* close this database before exiting */
uninm_blocks_db_close(blocks_db);
#endif
lt_dlexit();
return( 0 );
}
static int splash_e_h(GWindow gw, GEvent *event) {
static int splash_cnt;
GRect old;
int i, y, x;
static char *foolishness[] = {
/* GT: These strings are for fun. If they are offensive or incomprehensible */
/* GT: simply translate them as something dull like: "FontForge" */
/* GT: This is a spoof of political slogans, designed to point out how foolish they are */
N_("A free press discriminates\nagainst the illiterate."),
N_("A free press discriminates\nagainst the illiterate."),
/* GT: This is a pun on the old latin drinking song "Gaudeamus igature!" */
N_("Gaudeamus Ligature!"),
N_("Gaudeamus Ligature!"),
/* GT: Spoof on the bible */
N_("In the beginning was the letter..."),
/* GT: Some wit at MIT came up with this ("ontology recapitulates phylogony" is the original) */
N_("fontology recapitulates file-ogeny")
};
switch ( event->type ) {
case et_create:
GDrawGrabSelection(gw,sn_user1);
break;
case et_expose:
GDrawPushClip(gw,&event->u.expose.rect,&old);
GDrawDrawImage(gw,&splashimage,NULL,0,0);
GDrawSetFont(gw,splash_font);
y = splashimage.u.image->height + as + fh/2;
for ( i=1; i<linecnt; ++i ) {
if ( is>=lines[i-1]+1 && is<lines[i] ) {
x = 8+GDrawDrawText(gw,8,y,lines[i-1]+1,is-lines[i-1]-1,0x000000);
GDrawSetFont(gw,splash_italic);
GDrawDrawText(gw,x,y,is,lines[i]-is,0x000000);
} else if ( ie>=lines[i-1]+1 && ie<lines[i] ) {
x = 8+GDrawDrawText(gw,8,y,lines[i-1]+1,ie-lines[i-1]-1,0x000000);
GDrawSetFont(gw,splash_font);
GDrawDrawText(gw,x,y,ie,lines[i]-ie,0x000000);
} else
GDrawDrawText(gw,8,y,lines[i-1]+1,lines[i]-lines[i-1]-1,0x000000);
y += fh;
}
GDrawPopClip(gw,&old);
break;
case et_map:
splash_cnt = 0;
break;
case et_timer:
if ( event->u.timer.timer==autosave_timer ) {
DoAutoSaves();
} else if ( event->u.timer.timer==splasht ) {
if ( ++splash_cnt==1 )
GDrawResize(gw,splashimage.u.image->width,splashimage.u.image->height-30);
else if ( splash_cnt==2 )
GDrawResize(gw,splashimage.u.image->width,splashimage.u.image->height);
else if ( splash_cnt>=7 ) {
GGadgetEndPopup();
GDrawSetVisible(gw,false);
GDrawCancelTimer(splasht);
splasht = NULL;
}
} else {
DoDelayedEvents(event);
}
break;
case et_char:
case et_mousedown:
case et_close:
GGadgetEndPopup();
GDrawSetVisible(gw,false);
break;
case et_mousemove:
GGadgetPreparePopup8(gw,_(foolishness[rand()%(sizeof(foolishness)/sizeof(foolishness[0]))]) );
break;
case et_selclear:
/* If this happens, it means someone wants to send us a message with a*/
/* filename to open. So we need to ask for it, process it, and then */
/* take the selection back again */
if ( event->u.selclear.sel == sn_user1 ) {
int len;
char *arg;
arg = GDrawRequestSelection(splashw,sn_user1,"STRING",&len);
if ( arg==NULL )
return( true );
if ( strcmp(arg,"-new")==0 || strcmp(arg,"--new")==0 )
FontNew();
else if ( strcmp(arg,"-open")==0 || strcmp(arg,"--open")==0 )
_FVMenuOpen(NULL);
else if ( strcmp(arg,"-quit")==0 || strcmp(arg,"--quit")==0 )
MenuExit(NULL,NULL,NULL);
else
ViewPostScriptFont(arg,0);
free(arg);
GDrawGrabSelection(splashw,sn_user1);
}
break;
case et_destroy:
IError("Who killed the splash screen?");
break;
}
return( true );
}
static void SplashLayout() {
unichar_t *start, *pt, *lastspace;
extern const char *source_modtime_str;
extern const char *source_version_str;
uc_strcpy(msg, "When my father finished his book on Renaissance printing (The Craft of Printing and the Publication of Shakespeare's Works) he told me that I would have to write the chapter on computer typography. This is my attempt to do so.");
GDrawSetFont(splashw,splash_font);
linecnt = 0;
lines[linecnt++] = msg-1;
for ( start = msg; *start!='\0'; start = pt ) {
lastspace = NULL;
for ( pt=start; ; ++pt ) {
if ( *pt==' ' || *pt=='\0' ) {
if ( GDrawGetTextWidth(splashw,start,pt-start)<splashimage.u.image->width-10 )
lastspace = pt;
else
break;
if ( *pt=='\0' )
break;
}
}
if ( lastspace!=NULL )
pt = lastspace;
lines[linecnt++] = pt;
if ( *pt ) ++pt;
}
uc_strcpy(pt, " FontForge used to be named PfaEdit.");
pt += u_strlen(pt);
lines[linecnt++] = pt;
uc_strcpy(pt," git hash: ");
pt += u_strlen(pt);
lines[linecnt++] = pt;
uc_strcat(pt, " ");
uc_strcat(pt, FONTFORGE_GIT_VERSION);
pt += u_strlen(pt);
lines[linecnt++] = pt;
uc_strcpy(pt," Version: ");
uc_strcat(pt,FONTFORGE_MODTIME_STR);
pt += u_strlen(pt);
lines[linecnt++] = pt;
uc_strcat(pt," (");
uc_strcat(pt,FONTFORGE_MODTIME_STR);
uc_strcat(pt,"-ML");
#ifdef FREETYPE_HAS_DEBUGGER
uc_strcat(pt,"-TtfDb");
#endif
#ifdef _NO_PYTHON
uc_strcat(pt,"-NoPython");
#endif
#ifdef FONTFORGE_CONFIG_USE_DOUBLE
uc_strcat(pt,"-D");
#endif
uc_strcat(pt,")");
pt += u_strlen(pt);
lines[linecnt++] = pt;
uc_strcpy(pt," Lib Version: ");
uc_strcat(pt,FONTFORGE_MODTIME_STR);
lines[linecnt++] = pt+u_strlen(pt);
lines[linecnt] = NULL;
is = u_strchr(msg,'(');
ie = u_strchr(msg,')');
}
/* between those rows, and then the widths of each tab */
static void GTabSet_Remetric(GTabSet *gts) {
int bbp = GBoxBorderWidth(gts->g.base,gts->g.box);
int bp = bbp + GDrawPointsToPixels(gts->g.base,5);
int r, r2, width, i;
int as, ds, ld;
int ni = GDrawPointsToPixels(gts->g.base,NEST_INDENT), in;
GDrawSetFont(gts->g.base,gts->font);
GDrawWindowFontMetrics(gts->g.base,gts->font,&as,&ds,&ld);
gts->as = as; gts->fh = as+ds;
gts->rowh = as+ds + bbp+GDrawPointsToPixels(gts->g.base,3);
gts->ds = ds + bbp+GDrawPointsToPixels(gts->g.base,1);
gts->arrow_size = as+ds;
gts->arrow_width = gts->arrow_size + 2*GBoxBorderWidth(gts->g.base,gts->g.box);
gts->vert_list_width = 0;
for ( i=0; i<gts->tabcnt; ++i ) {
gts->tabs[i].tw = GDrawGetTextWidth(gts->g.base,gts->tabs[i].name,-1);
gts->tabs[i].width = gts->tabs[i].tw + 2*bp;
in = gts->tabs[i].nesting*ni;
if ( gts->tabs[i].tw+in > gts->vert_list_width )
gts->vert_list_width = gts->tabs[i].tw+in;
}
if ( gts->vsb ) {
gts->vert_list_width += gts->vsb->r.width;
if ( gts->g.inner.height>26 ) {
int bp = GBoxBorderWidth(gts->g.base,gts->g.box);
GScrollBarSetBounds(gts->vsb,0,gts->tabcnt,(gts->g.r.height-2*bp-6)/gts->fh);
}
}
gts->vert_list_width += 8;
if ( gts->vertical ) {
/* Nothing much to do */
} else if ( gts->scrolled ) {
free(gts->rowstarts);
gts->rowstarts = malloc(2*sizeof(16));
gts->rowstarts[0] = 0; gts->rowstarts[1] = gts->tabcnt;
gts->rcnt = 1;
} else {
width = gts->g.r.width-2*GBoxBorderWidth(gts->g.base,gts->g.box);
r = GTabSetRCnt(gts,width);
if ( gts->offset_per_row!=0 && r>1 )
while ( (r2 = GTabSetRCnt(gts,width-(r-1)*gts->offset_per_row))!=r )
r = r2;
free(gts->rowstarts);
gts->rowstarts = malloc((r+1)*sizeof(int16));
gts->rcnt = r;
gts->rowstarts[r] = gts->tabcnt;
for ( i=r=0; i<gts->tabcnt; ++i ) {
if ( gts->tabs[i].x==0 )
gts->rowstarts[r++] = i;
}
/* if there is a single tab on the last line and there are more on */
/* the previous line, then things look nicer if we move one of the */
/* tabs from the previous line onto the last line */
/* Providing it fits, of course */
if ( gts->rowstarts[r]-gts->rowstarts[r-1]==1 && r>1 &&
gts->rowstarts[r-1]-gts->rowstarts[r-2]>1 &&
gts->tabs[i-1].width+gts->tabs[i-2].width < width-(r-1)*gts->offset_per_row )
--gts->rowstarts[r-1];
GTabSetFigureWidths(gts);
}
}
static int gtabset_expose(GWindow pixmap, GGadget *g, GEvent *event) {
GTabSet *gts = (GTabSet *) g;
int x,y,i,rd, dsel;
GRect old1, bounds;
int bw = GBoxBorderWidth(pixmap,g->box);
int yoff = ( gts->rcnt==1 ? bw : 0 );
Color fg;
int ni = GDrawPointsToPixels(pixmap,NEST_INDENT);
if ( g->state == gs_invisible )
return( false );
GDrawPushClip(pixmap,&g->r,&old1);
GBoxDrawBackground(pixmap,&g->r,g->box,g->state,false);
bounds = g->r;
if ( !gts->vertical ) {
/* make room for tabs */
bounds.y += gts->rcnt*gts->rowh+yoff-1;
bounds.height -= gts->rcnt*gts->rowh+yoff-1;
/* draw border around horizontal tabs only */
GBoxDrawBorder(pixmap,&bounds,g->box,g->state,false);
}
else if ( g->state==gs_enabled ) {
/* background for labels */
GRect old2, vertListRect = g->r;
vertListRect.width = gts->vert_list_width+bw-1;
GDrawPushClip(pixmap,&vertListRect,&old2);
GBoxDrawBackground(pixmap,&g->r,g->box,gs_pressedactive,false);
GDrawPopClip(pixmap,&old2);
}
GDrawSetFont(pixmap,gts->font);
if ( gts->vertical ) {
x = g->r.x + bw + 3;
y = g->r.y + bw + 3;
for ( i=gts->offtop; i<gts->tabcnt; ++i ) {
fg = gts->tabs[i].disabled?gts->g.box->disabled_foreground:gts->g.box->main_foreground;
if ( fg==COLOR_DEFAULT ) fg = GDrawGetDefaultForeground(GDrawGetDisplayOfWindow(pixmap));
if ( i==gts->sel ) {
GRect r;
r.x = x; r.y = y;
r.width = gts->vert_list_width-10; r.height = gts->fh;
GDrawFillRect(pixmap,&r,gts->g.box->active_border);
}
GDrawDrawText(pixmap,x+gts->tabs[i].nesting*ni,y + gts->as,gts->tabs[i].name,-1,fg);
y += gts->fh;
}
fg = gts->g.box->main_foreground;
if ( fg==COLOR_DEFAULT ) fg = GDrawGetDefaultForeground(GDrawGetDisplayOfWindow(pixmap));
GDrawDrawLine(pixmap,x + gts->vert_list_width-4, g->r.y + bw,
x + gts->vert_list_width-4, g->r.y + g->r.height - (bw+1),
fg);
if ( gts->vsb != NULL )
gts->vsb->funcs->handle_expose(pixmap,gts->vsb,event);
} else {
gts->haslarrow = gts->hasrarrow = false;
if ( gts->scrolled ) {
x = g->r.x + GBoxBorderWidth(pixmap,gts->g.box);
y = g->r.y+yoff;
dsel = 0;
if ( gts->toff!=0 )
x = DrawLeftArrowTab(pixmap,gts,x,y);
for ( i=gts->toff;
(i==gts->tabcnt-1 && x+gts->tabs[i].width < g->r.width) ||
(i<gts->tabcnt-1 && x+gts->tabs[i].width < g->r.width-gts->arrow_width ) ;
++i ) {
if ( i!=gts->sel )
x = DrawTab(pixmap,gts,i,x,y);
else {
gts->tabs[i].x = x;
x += gts->tabs[i].width;
dsel = 1;
}
}
if ( i!=gts->tabcnt ) {
int p = gts->g.inner.x+gts->g.inner.width - gts->arrow_width;
if ( p>x ) x=p;
x = DrawRightArrowTab(pixmap,gts,x,y);
gts->tabs[i].x = 0x7fff;
}
/* This one draws on top of the others, must come last */
if ( dsel )
DrawTab(pixmap,gts,gts->sel,gts->tabs[gts->sel].x, g->r.y + (gts->rcnt-1) * gts->rowh + yoff );
} else {
/* r is real row, rd is drawn pos */
/* rd is 0 at the top of the ggadget */
/* r is 0 when it contains tabs[0], (the index in the rowstarts array) */
for ( rd = 0; rd<gts->rcnt; ++rd ) {
int r = (gts->rcnt-1-rd+gts->active_row)%gts->rcnt;
y = g->r.y + rd * gts->rowh + yoff;
x = g->r.x + (gts->rcnt-1-rd) * gts->offset_per_row + GBoxBorderWidth(pixmap,gts->g.box);
for ( i = gts->rowstarts[r]; i<gts->rowstarts[r+1]; ++i )
if ( i==gts->sel ) {
gts->tabs[i].x = x;
x += gts->tabs[i].width;
} else
x = DrawTab(pixmap,gts,i,x,y);
}
/* This one draws on top of the others, must come last */
DrawTab(pixmap,gts,gts->sel,gts->tabs[gts->sel].x, g->r.y + (gts->rcnt-1) * gts->rowh + yoff );
}
}
if ( gts->nested_expose )
(gts->nested_expose)(pixmap,g,event);
GDrawPopClip(pixmap,&old1);
return( true );
}
static void KP_ExposeKerns(KPData *kpd,GWindow pixmap,GRect *rect) {
GRect old, subclip, subold, sel;
struct _GImage base;
GImage gi;
int index1, index2;
BDFChar *bdfc1, *bdfc2;
int i, as, x, em = kpd->sf->ascent+kpd->sf->descent, yoff;
int first, last;
struct kerns *kern;
char buffer[140];
first = rect->y/kpd->uh;
last = (rect->y+rect->height+kpd->uh-1)/kpd->uh;
for ( i=first; i<=last && i+kpd->off_top<kpd->kcnt; ++i ) {
kern = &kpd->kerns[i+kpd->off_top];
index1 = kern->first->orig_pos;
if ( kpd->bdf->glyphs[index1]==NULL )
BDFPieceMeal(kpd->bdf,index1);
index2 = kern->second->orig_pos;
if ( kpd->bdf->glyphs[index2]==NULL )
BDFPieceMeal(kpd->bdf,index2);
}
as = kpd->vpad + kpd->sf->ascent * kpd->bdf->pixelsize / em;
memset(&gi,'\0',sizeof(gi));
memset(&base,'\0',sizeof(base));
gi.u.image = &base;
base.image_type = it_index;
base.clut = kpd->bdf->clut;
GDrawSetDither(NULL, false);
GDrawPushClip(pixmap,rect,&old);
GDrawSetFont(pixmap,kpd->font);
GDrawSetLineWidth(pixmap,0);
GDrawFillRect(pixmap,rect,GDrawGetDefaultBackground(NULL));
subclip = *rect;
for ( i=first; i<=last && i+kpd->off_top<kpd->kcnt; ++i ) {
subclip.y = i*kpd->uh; subclip.height = kpd->uh;
GDrawPushClip(pixmap,&subclip,&subold);
kern = &kpd->kerns[i+kpd->off_top];
index1 = kern->first->orig_pos;
index2 = kern->second->orig_pos;
bdfc1 = kpd->bdf->glyphs[index1];
bdfc2 = kpd->bdf->glyphs[index2];
BaseFillFromBDFC(&base,bdfc1);
base.trans = base.clut->trans_index = -1;
/* the peculiar behavior concerning xmin/xmax is because the bitmaps */
/* don't contain the side-bearings, we have to add that spacing manually */
if ( !kern->r2l ) {
GDrawDrawImage(pixmap,&gi,NULL, 10,subclip.y+as-bdfc1->ymax);
x = 10 + (bdfc1->width-bdfc1->xmin) + bdfc2->xmin +
(kern->newoff*kpd->bdf->pixelsize/em);
} else {
x = kpd->vwidth-10-(bdfc1->xmax-bdfc1->xmin);
GDrawDrawImage(pixmap,&gi,NULL, x,subclip.y+as-bdfc1->ymax);
x -= bdfc1->xmin + (bdfc2->width-bdfc2->xmin) +
(kern->newoff*kpd->bdf->pixelsize/em);
}
BaseFillFromBDFC(&base,bdfc2);
#ifndef _BrokenBitmapImages
base.trans = base.clut->trans_index = 0;
#endif
yoff = (kern->newyoff*kpd->bdf->pixelsize/em);
GDrawDrawImage(pixmap,&gi,NULL, x,subclip.y+as-bdfc2->ymax-yoff);
GDrawDrawLine(pixmap,0,subclip.y+kpd->uh-1,
subclip.x+subclip.width,subclip.y+kpd->uh-1,0x000000);
if ( kern->kp!=NULL )
sprintf( buffer, "%d ", kern->newoff);
else
sprintf( buffer, "%d,%d ", kern->newoff, kern->newyoff );
if ( kern->ac!=NULL )
strncat(buffer,kern->ac->name,sizeof(buffer)-strlen(buffer)-1);
GDrawDrawBiText8(pixmap,15,subclip.y+kpd->uh-kpd->fh+kpd->as,buffer,-1,NULL,
kern->kp!=NULL && kern->newoff!=kern->kp->off ? 0xff0000 : 0x000000 );
if ( i+kpd->off_top==kpd->selected ) {
sel.x = 0; sel.width = kpd->vwidth-1;
sel.y = subclip.y; sel.height = kpd->uh-2;
GDrawDrawRect(pixmap,&sel,0x000000);
}
GDrawPopClip(pixmap,&subold);
}
#ifndef _BrokenBitmapImages
base.clut->trans_index = -1;
#endif
GDrawPopClip(pixmap,&old);
GDrawSetDither(NULL, true);
}
int fontforge_main( int argc, char **argv ) {
extern const char *source_modtime_str;
extern const char *source_version_str;
const char *load_prefs = getenv("FONTFORGE_LOADPREFS");
int i;
int recover=2;
int any;
int next_recent=0;
GRect pos;
GWindowAttrs wattrs;
char *display = NULL;
FontRequest rq;
int ds, ld;
int openflags=0;
int doopen=0, quit_request=0;
#if defined(__Mac)
int local_x;
#endif
fprintf( stderr, "Copyright (c) 2000-2012 by George Williams.\n Executable based on sources from %s"
"-ML"
#ifdef FREETYPE_HAS_DEBUGGER
"-TtfDb"
#endif
#ifdef _NO_PYTHON
"-NoPython"
#endif
#ifdef FONTFORGE_CONFIG_USE_DOUBLE
"-D"
#endif
".\n",
source_modtime_str );
fprintf( stderr, " Library based on sources from %s.\n", library_version_configuration.library_source_modtime_string );
/* Must be done before we cache the current directory */
/* Change to HOME dir if specified on the commandline */
for ( i=1; i<argc; ++i ) {
char *pt = argv[i];
if ( pt[0]=='-' && pt[1]=='-' ) ++pt;
#ifndef __Mac
if (strcmp(pt,"-home")==0) {
#else
if (strcmp(pt,"-home")==0 || strncmp(pt,"-psn_",5)==0) {
/* OK, I don't know what _-psn_ means, but to GW it means */
/* we've been started on the mac from the FontForge.app */
/* structure, and the current directory is (shudder) "/" */
#endif
if (getenv("HOME")!=NULL) chdir(getenv("HOME"));
break; /* Done - Unnecessary to check more arguments */
}
}
#if defined(__Mac)
/* Start X if they haven't already done so. Well... try anyway */
/* Must be before we change DYLD_LIBRARY_PATH or X won't start */
/* (osascript depends on a libjpeg which isn't found if we look in /sw/lib first */
local_x = uses_local_x(argc,argv);
if ( local_x==1 && getenv("DISPLAY")==NULL ) {
/* Don't start X if we're just going to quit. */
/* if X exists, it isn't needed. If X doesn't exist it's wrong */
if ( !hasquit(argc,argv)) {
#if 1
/* This sequence is supposed to bring up an app without a window */
/* but X still opens an xterm */
system( "osascript -e 'tell application \"X11\" to launch'" );
system( "osascript -e 'tell application \"X11\" to activate'" );
#else
system( "open /Applications/Utilities/X11.app/" );
#endif
}
setenv("DISPLAY",":0.0",0);
} else if ( local_x==1 && *getenv("DISPLAY")!='/' && strcmp(getenv("DISPLAY"),":0.0")!=0 && strcmp(getenv("DISPLAY"),":0")!=0 )
/* 10.5.7 uses a named socket or something "/tmp/launch-01ftWX:0" */
local_x = 0;
#endif
#if defined(__MINGW32__)
if( getenv("DISPLAY")==NULL ) {
putenv("DISPLAY=127.0.0.1:0.0");
}
if( getenv("LC_ALL")==NULL ){
char lang[8];
char env[32];
if( GetLocaleInfoA(LOCALE_USER_DEFAULT, LOCALE_SISO639LANGNAME, lang, 8) > 0 ){
strcpy(env, "LC_ALL=");
strcat(env, lang);
putenv(env);
}
}
#endif
FF_SetUiInterface(&gdraw_ui_interface);
FF_SetPrefsInterface(&gdraw_prefs_interface);
FF_SetSCInterface(&gdraw_sc_interface);
FF_SetCVInterface(&gdraw_cv_interface);
FF_SetBCInterface(&gdraw_bc_interface);
FF_SetFVInterface(&gdraw_fv_interface);
FF_SetFIInterface(&gdraw_fi_interface);
FF_SetMVInterface(&gdraw_mv_interface);
FF_SetClipInterface(&gdraw_clip_interface);
#ifndef _NO_PYTHON
PythonUI_Init();
#endif
InitSimpleStuff();
FindProgDir(argv[0]);
#if defined(__MINGW32__)
{
char path[MAX_PATH+4];
char *c = path;
unsigned int len = GetModuleFileNameA(NULL, path, MAX_PATH);
path[len] = '\0';
for(; *c; *c++) /* backslash to slash */
if(*c == '\\')
*c = '/';
GResourceSetProg(path);
}
#else
GResourceSetProg(argv[0]);
#endif
#if defined(__Mac)
/* The mac seems to default to the "C" locale, LANG and LC_MESSAGES are not*/
/* defined. This means that gettext will not bother to look up any message*/
/* files -- even if we have a "C" or "POSIX" entry in the locale diretory */
/* Now if X11 gives us the command key, I want to force a rebinding to use */
/* Cmd rather than Control key -- more mac-like. But I can't do that if */
/* there is no locale. So I force a locale if there is none specified */
/* I force the US English locale, because that's the what the messages are */
/* by default so I'm changing as little as I can. I think. */
/* Now the locale command will treat a LANG which is "" as undefined, but */
/* gettext will not. So I don't bother to check for null strings or "C" */
/* or "POSIX". If they've mucked with the locale perhaps they know what */
/* they are doing */
{ int did_keybindings = 0;
if ( local_x && !get_mac_x11_prop("enable_key_equivalents") ) {
/* Ok, we get the command key */
if ( getenv("LANG")==NULL && getenv("LC_MESSAGES")==NULL ) {
setenv("LC_MESSAGES","en_US.UTF-8",0);
}
/* Can we find a set of keybindings designed for the mac with cmd key? */
bind_textdomain_codeset("Mac-FontForge-MenuShortCuts","UTF-8");
bindtextdomain("Mac-FontForge-MenuShortCuts", getLocaleDir());
if ( *dgettext("Mac-FontForge-MenuShortCuts","Flag0x10+")!='F' ) {
GMenuSetShortcutDomain("Mac-FontForge-MenuShortCuts");
did_keybindings = 1;
}
}
if ( !did_keybindings ) {
/* Nope. we can't. Fall back to the normal stuff */
#endif
GMenuSetShortcutDomain("FontForge-MenuShortCuts");
bind_textdomain_codeset("FontForge-MenuShortCuts","UTF-8");
bindtextdomain("FontForge-MenuShortCuts", getLocaleDir());
#if defined(__Mac)
}}
#endif
bind_textdomain_codeset("FontForge","UTF-8");
bindtextdomain("FontForge", getLocaleDir());
textdomain("FontForge");
GResourceUseGetText();
#if defined(__MINGW32__)
{
size_t len = strlen(GResourceProgramDir);
char* path = galloc(len + 64);
strcpy(path, GResourceProgramDir);
strcpy(path+len, "/share/fontforge/pixmaps"); /* PixmapDir */
GGadgetSetImageDir(path);
strcpy(path+len, "/share/fontforge/resources/fontforge.resource"); /* Resource File */
GResourceAddResourceFile(path, GResourceProgramName, false);
gfree(path);
}
#elif defined(SHAREDIR)
GGadgetSetImageDir(SHAREDIR "/pixmaps");
GResourceAddResourceFile(SHAREDIR "/resources/fontforge.resource",GResourceProgramName,false);
#endif
hotkeysLoad();
if ( load_prefs!=NULL && strcasecmp(load_prefs,"Always")==0 )
LoadPrefs();
if ( default_encoding==NULL )
default_encoding=FindOrMakeEncoding("ISO8859-1");
if ( default_encoding==NULL )
default_encoding=&custom; /* In case iconv is broken */
CheckIsScript(argc,argv); /* Will run the script and exit if it is a script */
/* If there is no UI, there is always a script */
/* and we will never return from the above */
if ( load_prefs==NULL ||
(strcasecmp(load_prefs,"Always")!=0 && /* Already loaded */
strcasecmp(load_prefs,"Never")!=0 ))
LoadPrefs();
GrokNavigationMask();
for ( i=1; i<argc; ++i ) {
char *pt = argv[i];
if ( pt[0]=='-' && pt[1]=='-' )
++pt;
if ( strcmp(pt,"-sync")==0 )
GResourceAddResourceString("Gdraw.Synchronize: true",argv[0]);
else if ( strcmp(pt,"-depth")==0 && i<argc-1 )
AddR(argv[0],"Gdraw.Depth", argv[++i]);
else if ( strcmp(pt,"-vc")==0 && i<argc-1 )
AddR(argv[0],"Gdraw.VisualClass", argv[++i]);
else if ( (strcmp(pt,"-cmap")==0 || strcmp(pt,"-colormap")==0) && i<argc-1 )
AddR(argv[0],"Gdraw.Colormap", argv[++i]);
else if ( (strcmp(pt,"-dontopenxdevices")==0) )
AddR(argv[0],"Gdraw.DontOpenXDevices", "true");
else if ( strcmp(pt,"-keyboard")==0 && i<argc-1 )
AddR(argv[0],"Gdraw.Keyboard", argv[++i]);
else if ( strcmp(pt,"-display")==0 && i<argc-1 )
display = argv[++i];
# if MyMemory
else if ( strcmp(pt,"-memory")==0 )
__malloc_debug(5);
# endif
else if ( strncmp(pt,"-usecairo",strlen("-usecairo"))==0 ) {
if ( strcmp(pt,"-usecairo=no")==0 )
GDrawEnableCairo(false);
else
GDrawEnableCairo(true);
} else if ( strcmp(pt,"-nosplash")==0 )
splash = 0;
else if ( strcmp(pt,"-unique")==0 )
unique = 1;
else if ( strcmp(pt,"-recover")==0 && i<argc-1 ) {
++i;
if ( strcmp(argv[i],"none")==0 )
recover=0;
else if ( strcmp(argv[i],"clean")==0 )
recover= -1;
else if ( strcmp(argv[i],"auto")==0 )
recover= 1;
else if ( strcmp(argv[i],"inquire")==0 )
recover= 2;
else {
fprintf( stderr, "Invalid argument to -recover, must be none, auto, inquire or clean\n" );
dousage();
}
} else if ( strcmp(pt,"-recover=none")==0 ) {
recover = 0;
} else if ( strcmp(pt,"-recover=clean")==0 ) {
recover = -1;
} else if ( strcmp(pt,"-recover=auto")==0 ) {
recover = 1;
} else if ( strcmp(pt,"-recover=inquire")==0 ) {
recover = 2;
} else if ( strcmp(pt,"-docs")==0 )
dohelp();
else if ( strcmp(pt,"-help")==0 )
dousage();
else if ( strcmp(pt,"-version")==0 )
doversion(source_version_str);
else if ( strcmp(pt,"-quit")==0 )
quit_request = true;
else if ( strcmp(pt,"-home")==0 )
/* already did a chdir earlier, don't need to do it again */;
#if defined(__Mac)
else if ( strncmp(pt,"-psn_",5)==0 ) {
/* OK, I don't know what _-psn_ means, but to GW it means */
/* we've been started on the mac from the FontForge.app */
/* structure, and the current directory was (shudder) "/" */
/* (however, we changed to HOME earlier in main routine). */
unique = 1;
listen_to_apple_events = true;
}
#endif
}
ensureDotFontForgeIsSetup();
GDrawCreateDisplays(display,argv[0]);
default_background = GDrawGetDefaultBackground(screen_display);
InitToolIconClut(default_background);
InitToolIcons();
InitCursors();
#ifndef _NO_PYTHON
PyFF_ProcessInitFiles();
#endif
/* Wait until the UI has started, otherwise people who don't have consoles*/
/* open won't get our error messages, and it's an important one */
/* Scripting doesn't care about a mismatch, because scripting interpretation */
/* all lives in the library */
check_library_version(&exe_library_version_configuration,true,false);
/* the splash screen used not to have a title bar (wam_nodecor) */
/* but I found I needed to know how much the window manager moved */
/* the window around, which I can determine if I have a positioned */
/* decorated window created at the begining */
/* Actually I don't care any more */
wattrs.mask = wam_events|wam_cursor|wam_bordwidth|wam_backcol|wam_positioned|wam_utf8_wtitle|wam_isdlg;
wattrs.event_masks = ~(1<<et_charup);
wattrs.positioned = 1;
wattrs.cursor = ct_pointer;
wattrs.utf8_window_title = "FontForge";
wattrs.border_width = 2;
wattrs.background_color = 0xffffff;
wattrs.is_dlg = !listen_to_apple_events;
pos.x = pos.y = 200;
pos.width = splashimage.u.image->width;
pos.height = splashimage.u.image->height-56; /* 54 */
GDrawBindSelection(NULL,sn_user1,"FontForge");
if ( unique && GDrawSelectionOwned(NULL,sn_user1)) {
/* Different event handler, not a dialog */
wattrs.is_dlg = false;
splashw = GDrawCreateTopWindow(NULL,&pos,request_e_h,NULL,&wattrs);
PingOtherFontForge(argc,argv);
} else {
if ( quit_request )
exit( 0 );
splashw = GDrawCreateTopWindow(NULL,&pos,splash_e_h,NULL,&wattrs);
}
memset(&rq,0,sizeof(rq));
rq.utf8_family_name = SERIF_UI_FAMILIES;
rq.point_size = 12;
rq.weight = 400;
splash_font = GDrawInstanciateFont(NULL,&rq);
splash_font = GResourceFindFont("Splash.Font",splash_font);
GDrawDecomposeFont(splash_font, &rq);
rq.style = fs_italic;
splash_italic = GDrawInstanciateFont(NULL,&rq);
splash_italic = GResourceFindFont("Splash.ItalicFont",splash_italic);
GDrawSetFont(splashw,splash_font);
GDrawWindowFontMetrics(splashw,splash_font,&as,&ds,&ld);
fh = as+ds+ld;
SplashLayout();
localsplash = splash;
if ( localsplash && !listen_to_apple_events )
start_splash_screen();
if ( AutoSaveFrequency>0 )
autosave_timer=GDrawRequestTimer(splashw,2*AutoSaveFrequency*1000,AutoSaveFrequency*1000,NULL);
GDrawProcessPendingEvents(NULL);
GDrawSetBuildCharHooks(BuildCharHook,InsCharHook);
any = 0;
if ( recover==-1 )
CleanAutoRecovery();
else if ( recover )
any = DoAutoRecovery(recover-1);
openflags = 0;
for ( i=1; i<argc; ++i ) {
char buffer[1025];
char *pt = argv[i];
GDrawProcessPendingEvents(NULL);
if ( pt[0]=='-' && pt[1]=='-' )
++pt;
if ( strcmp(pt,"-new")==0 ) {
FontNew();
any = 1;
# if HANYANG
} else if ( strcmp(pt,"-newkorean")==0 ) {
MenuNewComposition(NULL,NULL,NULL);
any = 1;
# endif
} else if ( strcmp(pt,"-last")==0 ) {
if ( next_recent<RECENT_MAX && RecentFiles[next_recent]!=NULL )
if ( ViewPostScriptFont(RecentFiles[next_recent++],openflags))
any = 1;
} else if ( strcmp(pt,"-sync")==0 || strcmp(pt,"-memory")==0 ||
strcmp(pt,"-nosplash")==0 || strcmp(pt,"-recover=none")==0 ||
strcmp(pt,"-recover=clean")==0 || strcmp(pt,"-recover=auto")==0 ||
strcmp(pt,"-dontopenxdevices")==0 || strcmp(pt,"-unique")==0 ||
strncmp(pt,"-usecairo",strlen("-usecairo"))==0 ||
strcmp(pt,"-home")==0 )
/* Already done, needed to be before display opened */;
else if ( strncmp(pt,"-psn_",5)==0 )
/* Already done */;
else if ( (strcmp(pt,"-depth")==0 || strcmp(pt,"-vc")==0 ||
strcmp(pt,"-cmap")==0 || strcmp(pt,"-colormap")==0 ||
strcmp(pt,"-keyboard")==0 ||
strcmp(pt,"-display")==0 || strcmp(pt,"-recover")==0 ) &&
i<argc-1 )
++i; /* Already done, needed to be before display opened */
else if ( strcmp(pt,"-allglyphs")==0 )
openflags |= of_all_glyphs_in_ttc;
else if ( strcmp(pt,"-open")==0 )
doopen = true;
else {
if ( strstr(argv[i],"://")!=NULL ) { /* Assume an absolute URL */
strncpy(buffer,argv[i],sizeof(buffer));
buffer[sizeof(buffer)-1]= '\0';
} else
GFileGetAbsoluteName(argv[i],buffer,sizeof(buffer));
if ( GFileIsDir(buffer) || (strstr(buffer,"://")!=NULL && buffer[strlen(buffer)-1]=='/')) {
char *fname;
fname = galloc(strlen(buffer)+strlen("/glyphs/contents.plist")+1);
strcpy(fname,buffer); strcat(fname,"/glyphs/contents.plist");
if ( GFileExists(fname)) {
/* It's probably a Unified Font Object directory */
free(fname);
if ( ViewPostScriptFont(buffer,openflags) )
any = 1;
} else {
strcpy(fname,buffer); strcat(fname,"/font.props");
if ( GFileExists(fname)) {
/* It's probably a sf dir collection */
free(fname);
if ( ViewPostScriptFont(buffer,openflags) )
any = 1;
} else {
free(fname);
if ( buffer[strlen(buffer)-1]!='/' ) {
/* If dirname doesn't end in "/" we'll be looking in parent dir */
buffer[strlen(buffer)+1]='\0';
buffer[strlen(buffer)] = '/';
}
fname = GetPostScriptFontName(buffer,false);
if ( fname!=NULL )
ViewPostScriptFont(fname,openflags);
any = 1; /* Even if we didn't get a font, don't bring up dlg again */
free(fname);
}
}
} else if ( ViewPostScriptFont(buffer,openflags)!=0 )
any = 1;
}
}
if ( !any && !doopen )
any = ReopenLastFonts();
#if defined(__Mac)
if ( listen_to_apple_events ) {
install_apple_event_handlers();
install_mac_timer();
RunApplicationEventLoop();
} else
#endif
if ( doopen || !any )
MenuOpen(NULL,NULL,NULL);
GDrawEventLoop(NULL);
hotkeysSave();
uninm_names_db_close(names_db);
lt_dlexit();
return( 0 );
}
/* Called on expose events, this renders the button. */
static int gradio_expose(GWindow pixmap, GGadget *g, GEvent *event) {
GRadio *gr = (GRadio *) g;
int x;
GImage *img = gr->image; /* the optional image tied to the label */
GResImage *mark;
GRect old1, old2, old3;
int yoff = (g->inner.height-(gr->fh))/2;
if ( g->state == gs_invisible )
return( false );
/* First blank out the button area. */
GDrawPushClip(pixmap,&g->r,&old1);
GBoxDrawBackground(pixmap,&g->r,g->box,
g->state==gs_enabled? gs_pressedactive: g->state,false);
GBoxDrawBorder(pixmap,&g->r,g->box,g->state,false);
GDrawPushClip(pixmap,&gr->onoffrect,&old2);
GBoxDrawBackground(pixmap,&gr->onoffrect,gr->ison?gr->onbox:gr->offbox,
gs_pressedactive,false);
if (gr->ison && gr->onbox->border_type!=bt_none)
GBoxDrawBorder(pixmap,&gr->onoffrect,gr->onbox, gs_pressedactive,false);
else if (!gr->ison && gr->offbox->border_type!=bt_none)
GBoxDrawBorder(pixmap,&gr->onoffrect,gr->offbox,gs_pressedactive,false);
/* Next draw either the right image or draw in an on or off indicator. */
mark = NULL;
if ( g->state == gs_disabled )
mark = gr->ison ? gr->ondis : gr->offdis; /* note: ondis or offdis may be NULL! */
if ( mark==NULL || mark->image==NULL )
mark = gr->ison ? gr->on : gr->off; /* note: on or off may be NULL! */
if ( mark!=NULL && mark->image==NULL ) /* when there's a reference to a special image, but no actual image */
mark = NULL;
if ( mark!=NULL ) {
GDrawPushClip(pixmap,&gr->onoffinner,&old3);
GDrawDrawScaledImage(pixmap,mark->image,
gr->onoffinner.x,gr->onoffinner.y);
GDrawPopClip(pixmap,&old3);
} else if ( gr->ison && gr->onbox == &checkbox_on_box ) {
/* for radio buttons where the on is a checkbox style, draw an X */
Color fg = g->state==gs_disabled?g->box->disabled_foreground:
g->box->main_foreground==COLOR_DEFAULT?GDrawGetDefaultForeground(GDrawGetDisplayOfWindow(pixmap)):
g->box->main_foreground;
int bp = GDrawPointsToPixels(pixmap,gr->onbox->border_width);
GDrawDrawLine(pixmap, gr->onoffrect.x+bp,gr->onoffrect.y+bp,
gr->onoffrect.x+gr->onoffrect.width-1-bp,gr->onoffrect.y+gr->onoffrect.height-1-bp,
fg);
GDrawDrawLine(pixmap, gr->onoffrect.x+gr->onoffrect.width-1-bp,gr->onoffrect.y+bp,
gr->onoffrect.x+bp,gr->onoffrect.y+gr->onoffrect.height-1-bp,
fg);
} else if ( gr->ison && gr->onbox == &visibility_on_box ) {
/* draw open white of eye */
GPoint pts[15];
Color fg;
double angle;
int c,i;
int bp = gr->onbox->border_type==bt_none ? 0 : GDrawPointsToPixels(pixmap,gr->onbox->border_width);
int x=gr->onoffrect.x+bp;
int y=gr->onoffrect.y+bp;
int w=gr->onoffrect.width -1-2*bp;
int h=gr->onoffrect.height-1-2*bp;
GRect rect;
for (c=0, i=0; c<7; c++) {
angle=(30+c/6.*120)*M_PI/180;
pts[i].x=.5*w*cos(angle)+x+w/2;
pts[i].y=.5*h*sin(angle)+y+h/4;
++i;
}
for (c=1; c<6; c++) {
angle=(180+30+c/6.*120)*M_PI/180;
pts[i].x=.5*w*cos(angle)+x+w/2;
pts[i].y=.5*h*sin(angle)+y+h*3/4;
++i;
}
pts[i].x=pts[0].x;
pts[i].y=pts[0].y;
++i;
fg=0x00ffffff; /* white */
GDrawFillPoly(pixmap, pts, i, fg);
fg = g->state==gs_disabled?g->box->disabled_foreground:
g->box->main_foreground==COLOR_DEFAULT?GDrawGetDefaultForeground(GDrawGetDisplayOfWindow(pixmap)):
g->box->main_foreground;
GDrawDrawPoly(pixmap, pts, i, fg);
/* draw pupil */
rect.x=gr->onoffrect.x+bp+w*.3;
rect.y=gr->onoffrect.y+bp+h*.3;
rect.width =.4*w;
rect.height=.4*h;
fg=0; /* black */
GDrawFillElipse(pixmap, &rect, fg);
} else if ( (!gr->ison) && gr->onbox == &visibility_on_box ) {
/* draw closed eye */
GPoint pts[6];
int c,i;
double angle;
int bp = gr->onbox->border_type==bt_none ? 0 : GDrawPointsToPixels(pixmap,gr->onbox->border_width);
int x=gr->onoffrect.x+bp;
int y=gr->onoffrect.y+bp;
int w=gr->onoffrect.width -1-2*bp;
int h=gr->onoffrect.height-1-2*bp;
Color fg = g->state==gs_disabled?g->box->disabled_foreground:
g->box->main_foreground==COLOR_DEFAULT?GDrawGetDefaultForeground(GDrawGetDisplayOfWindow(pixmap)):
g->box->main_foreground;
for (c=0, i=0; c<=6; c++) {
angle=(30+c/6.*120)*M_PI/180;
pts[i].x=.5*w*cos(angle)+x+w/2;
pts[i].y=.5*h*sin(angle)+y+h/4;
/* draw lashes */
if (i>0 && i<5) GDrawDrawLine(pixmap, pts[i].x,pts[i].y, .75*w*cos(angle)+x+w/2, .75*h*sin(angle)+y+h/4, fg);
++i;
}
GDrawDrawPoly(pixmap, pts, i, fg);
}
GDrawPopClip(pixmap,&old2);
x = gr->onoffrect.x + gr->onoffrect.width + GDrawPointsToPixels(pixmap,4);
/* Finally write out the label if any. */
GDrawPushClip(pixmap,&g->inner,&old2);
if ( gr->font!=NULL )
GDrawSetFont(pixmap,gr->font);
if ( gr->image_precedes && img!=NULL ) {
GDrawDrawScaledImage(pixmap,img,x,g->inner.y);
x += GImageGetScaledWidth(pixmap,img) + GDrawPointsToPixels(pixmap,_GGadget_TextImageSkip);
}
if ( gr->label!=NULL ) {
Color fg = g->state==gs_disabled?g->box->disabled_foreground:
g->box->main_foreground==COLOR_DEFAULT?GDrawGetDefaultForeground(GDrawGetDisplayOfWindow(pixmap)):
g->box->main_foreground;
int lcnt = gradio_linecount(gr);
if ( lcnt>1 )
yoff = (g->inner.height-lcnt*gr->fh)/2;
_ggadget_underlineMnemonic(pixmap,x,g->inner.y + gr->as + yoff,gr->label,
g->mnemonic,fg,g->inner.y+g->inner.height);
x += GDrawDrawText(pixmap,x,g->inner.y + gr->as + yoff,gr->label,-1,fg);
x += GDrawPointsToPixels(pixmap,_GGadget_TextImageSkip);
}
if ( !gr->image_precedes && img!=NULL )
GDrawDrawScaledImage(pixmap,img,x,g->inner.y);
GDrawPopClip(pixmap,&old2);
GDrawPopClip(pixmap,&old1);
return( true );
}
static void CpInfoPlace(CharView *cv, GEvent *event) {
char buf[100];
int line, which;
int width, x, y;
GRect size;
GPoint pt, pt2;
int h,w;
GWindowAttrs wattrs;
GRect pos;
FontRequest rq;
int as, ds, ld;
SplinePoint *sp;
if ( cv->ruler_w==NULL ) {
memset(&wattrs,0,sizeof(wattrs));
wattrs.mask = wam_events|wam_cursor|wam_positioned|wam_nodecor|wam_backcol|wam_bordwidth;
wattrs.event_masks = (1<<et_expose)|(1<<et_resize)|(1<<et_mousedown);
wattrs.cursor = ct_mypointer;
wattrs.background_color = 0xe0e0c0;
wattrs.nodecoration = 1;
wattrs.border_width = 1;
pos.x = pos.y = 0; pos.width=pos.height = 20;
cv->ruler_w = GWidgetCreateTopWindow(NULL,&pos,cpinfo_e_h,cv,&wattrs);
if ( rvfont==NULL ) {
memset(&rq,0,sizeof(rq));
rq.utf8_family_name = FIXED_UI_FAMILIES;
rq.point_size = -12;
rq.weight = 400;
rvfont = GDrawInstanciateFont(GDrawGetDisplayOfWindow(cv->ruler_w),&rq);
rvfont = GResourceFindFont("CharView.Measure.Font",rvfont);
}
cv->rfont = rvfont;
GDrawFontMetrics(cv->rfont,&as,&ds,&ld);
cv->rfh = as+ds; cv->ras = as;
} else
GDrawRaise(cv->ruler_w);
GDrawSetFont(cv->ruler_w,cv->rfont);
h = 0; width = 0;
for ( which = 0; which<2; ++which ) {
for ( line=0; PtInfoText(cv,line,which,buf,sizeof(buf))!=NULL; ++line ) {
w = GDrawGetBiText8Width(cv->ruler_w,buf,-1,-1,NULL);
if ( w>width ) width = w;
h += cv->rfh+1;
}
h += 4;
}
if ( PtInfoText(cv,0,-1,buf,sizeof(buf))!=NULL ) {
w = GDrawGetBiText8Width(cv->ruler_w,buf,-1,-1,NULL);
if ( w>width ) width = w;
h += cv->rfh+1;
}
GDrawGetSize(GDrawGetRoot(NULL),&size);
pt.x = event->u.mouse.x; pt.y = event->u.mouse.y; /* Address of cp */
GDrawTranslateCoordinates(cv->v,GDrawGetRoot(NULL),&pt);
sp = cv->p.sp;
if ( !cv->p.prevcp && !cv->p.nextcp )
sp = cv->active_sp;
if ( sp!=NULL ) {
x = cv->xoff + rint(sp->me.x*cv->scale);
y = -cv->yoff + cv->height - rint(sp->me.y*cv->scale);
if ( x>=0 && y>=0 && x<cv->width && y<cv->height ) {
pt2.x = x; pt2.y = y;
GDrawTranslateCoordinates(cv->v,GDrawGetRoot(NULL),&pt2);
} else
sp = NULL;
}
x = pt.x + infowindowdistance;
y = pt.y - cv->ras-2;
if ( sp!=NULL && x<=pt2.x-4 && x+width>=pt2.x+4 && y<=pt2.y-4 && y+h>=pt2.y+4 )
x = pt2.x + 4;
if ( x+width > size.width ) {
x = pt.x - width-30;
if ( sp!=NULL && x<=pt2.x-4 && x+width>=pt2.x+4 && y<=pt2.y-4 && y+h>=pt2.y+4 )
x = pt2.x - width - 4;
if ( x<0 ) {
x = pt.x + 10;
y = pt.y - h - infowindowdistance;
if ( sp!=NULL && x<=pt2.x-4 && x+width>=pt2.x+4 && y<=pt2.y-4 && y+h>=pt2.y+4 )
y = pt2.y - h - 4;
if ( y<0 )
y = pt.y+infowindowdistance; /* If this doesn't work we have nowhere else to */
/* try so don't check */
}
}
if ( y+h > size.height )
y = pt.y - h - cv->ras - 10;
GDrawMoveResize(cv->ruler_w,x,y,width+4,h+4);
}