/* $Xorg: Clock.c,v 1.4 2001/02/09 02:05:39 xorgcvs Exp $ */ /* $XdotOrg: xc/programs/xclock/Clock.c,v 1.3 2004/10/30 20:33:44 alanc Exp $ */ /*********************************************************** Copyright 1987, 1988, 1998 The Open Group Permission to use, copy, modify, distribute, and sell this software and its documentation for any purpose is hereby granted without fee, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation. The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. Except as contained in this notice, the name of The Open Group shall not be used in advertising or otherwise to promote the sale, use or other dealings in this Software without prior written authorization from The Open Group. Copyright 1987, 1988 by Digital Equipment Corporation, Maynard, Massachusetts. All Rights Reserved Permission to use, copy, modify, and distribute this software and its documentation for any purpose and without fee is hereby granted, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation, and that the name of Digital not be used in advertising or publicity pertaining to distribution of the software without specific, written prior permission. DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ******************************************************************/ /* * Copyright (c) 2004, Oracle and/or its affiliates. * * Permission is hereby granted, free of charge, to any person obtaining a * copy of this software and associated documentation files (the "Software"), * to deal in the Software without restriction, including without limitation * the rights to use, copy, modify, merge, publish, distribute, sublicense, * and/or sell copies of the Software, and to permit persons to whom the * Software is furnished to do so, subject to the following conditions: * * The above copyright notice and this permission notice (including the next * paragraph) shall be included in all copies or substantial portions of the * Software. * * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER * DEALINGS IN THE SOFTWARE. */ /* * Authors: I18N - Steve Swales - March 2000 * bgpixmap - Alan Coopersmith (as part of STSF project) - Sept. 2001 */ /* $XFree86: xc/programs/xclock/Clock.c,v 3.25 2003/07/04 16:24:30 eich Exp $ */ #ifdef HAVE_CONFIG_H #include "config.h" #endif #define _GNU_SOURCE #include #include #include #include "ClockP.h" #include #include #include #include #include #include #if !defined(NO_I18N) && defined(HAVE_ICONV) && defined(HAVE_NL_LANGINFO) #include #include #include #include #endif #if defined(XawVersion) && (XawVersion >= 7000002L) #define USE_XAW_PIXMAP_CVT #else #include #endif #include #define Time_t time_t #ifdef XKB #include #endif #ifndef NO_I18N #include /* for getenv() */ #include #if defined(HAVE_XLOCALE_H) #include #endif extern Boolean no_locale; /* if True, use old (unlocalized) behaviour */ #endif /* Private Definitions */ #define VERTICES_IN_HANDS 6 /* to draw triangle */ #define MINOR_TICK_FRACT 95 #define SECOND_HAND_FRACT 90 #define MINUTE_HAND_FRACT 70 #define HOUR_HAND_FRACT 40 #define HAND_WIDTH_FRACT 7 #define SECOND_WIDTH_FRACT 5 #define SECOND_HAND_TIME 30 #define ANALOG_SIZE_DEFAULT 164 #define LINE_WIDTH 0.01 #define max(a, b) ((a) > (b) ? (a) : (b)) #define min(a, b) ((a) < (b) ? (a) : (b)) /* #define abs(a) ((a) < 0 ? -(a) : (a)) */ /* Initialization of defaults */ #define offset(field) XtOffsetOf(ClockRec, clock.field) #define goffset(field) XtOffsetOf(WidgetRec, core.field) #ifdef XRENDER #define x1 (LINE_WIDTH / 2.0) #define x2 LINE_WIDTH #define x3 (SECOND_WIDTH_FRACT / 100.0) #define x4 (HAND_WIDTH_FRACT / 100.0) #define y1 (MINUTE_HAND_FRACT / 100.0) #define y2 ((SECOND_HAND_FRACT + MINUTE_HAND_FRACT) / 200.0) #define y3 (SECOND_HAND_FRACT / 100.0) #define y4 (MINOR_TICK_FRACT / 100.0) static XftShape default_hour_shape = {3, (XPointDouble[]) { { x4, -x4 }, { 0, HOUR_HAND_FRACT / 100.0 }, { -x4, -x4 } } }; static XftShape default_min_shape = {3, (XPointDouble[]) { { x4, -x4 }, { 0, y1 }, { -x4, -x4 } } }; static XftShape default_sec_shape = {12, (XPointDouble[]) { /* * Order of triangles when drawing the hand. * * 1,2 _ 2 * | | * 4 | | 3 * / \ * / \ * 4< >3 * \ / * \ / * 4 | | 3 * | | * | | * |_| * 1 1,2 */ { x2, -x2 }, { -x2, y4 }, { x2, y4 }, { x2, -x2 }, { -x2, y4 }, { -x2, -x2 }, { x2, y1 }, { x3, y2 }, { x2, y3 }, { -x2, y1 }, { -x3, y2 }, { -x2, y3 }, } }; static XftShape default_major_shape = {6, (XPointDouble[]) { { x1, y3 }, { -x1, 1 }, { x1, 1 }, { x1, y3 }, { -x1, 1 }, { -x1, y3 }, } }; static XftShape default_minor_shape = {6, (XPointDouble[]) { { x1, y4 }, { -x1, 1 }, { x1, 1 }, { x1, y4 }, { -x1, 1 }, { -x1, y4 }, } }; static XftShape default_am_shape = {0, NULL }; static XftShape default_pm_shape = {0, NULL }; static XftShape default_fixed_shape = {0, NULL }; #undef x1 #undef x2 #undef x3 #undef x4 #undef y1 #undef y2 #undef y3 #undef y4 static XftZOrder default_z_order = { {'T', 't', '1', '2', '3', 'a', 'p', 'h', 'm', 's', '\0'} }; #endif static XtResource resources[] = { {XtNwidth, XtCWidth, XtRDimension, sizeof(Dimension), goffset(width), XtRImmediate, (XtPointer) 0}, {XtNheight, XtCHeight, XtRDimension, sizeof(Dimension), goffset(height), XtRImmediate, (XtPointer) 0}, {XtNupdate, XtCInterval, XtRFloat, sizeof(float), offset(update), XtRString, "60.0"}, #ifndef XRENDER {XtNforeground, XtCForeground, XtRPixel, sizeof(Pixel), offset(fgpixel), XtRString, XtDefaultForeground}, #endif {XtNhand, XtCForeground, XtRPixel, sizeof(Pixel), offset(Hdpixel), XtRString, XtDefaultForeground}, {XtNhighlight, XtCForeground, XtRPixel, sizeof(Pixel), offset(Hipixel), XtRString, XtDefaultForeground}, {XtNutime, XtCBoolean, XtRBoolean, sizeof(Boolean), offset(utime), XtRImmediate, (XtPointer) FALSE}, {XtNanalog, XtCBoolean, XtRBoolean, sizeof(Boolean), offset(analog), XtRImmediate, (XtPointer) TRUE}, {XtNanalog24, XtCBoolean, XtRBoolean, sizeof(Boolean), offset(analog24), XtRImmediate, (XtPointer) FALSE}, {XtNtwentyfour, XtCBoolean, XtRBoolean, sizeof(Boolean), offset(twentyfour), XtRImmediate, (XtPointer) TRUE}, {XtNbrief, XtCBoolean, XtRBoolean, sizeof(Boolean), offset(brief), XtRImmediate, (XtPointer) FALSE}, {XtNstrftime, XtCString, XtRString, sizeof(String), offset(strftime), XtRString, ""}, {XtNchime, XtCBoolean, XtRBoolean, sizeof(Boolean), offset(chime), XtRImmediate, (XtPointer) FALSE}, {XtNpadding, XtCMargin, XtRInt, sizeof(int), offset(padding), XtRImmediate, (XtPointer) 8}, {XtNfont, XtCFont, XtRFontStruct, sizeof(XFontStruct *), offset(font), XtRString, XtDefaultFont}, #ifndef NO_I18N {XtNfontSet, XtCFontSet, XtRFontSet, sizeof(XFontSet), offset(fontSet), XtRString, XtDefaultFontSet}, #endif {XtNbackingStore, XtCBackingStore, XtRBackingStore, sizeof(int), offset(backing_store), XtRString, "default"}, #ifdef XRENDER {XtNrender, XtCBoolean, XtRBoolean, sizeof(Boolean), offset(render), XtRImmediate, (XtPointer) TRUE}, {XtNbuffer, XtCBoolean, XtRBoolean, sizeof(Boolean), offset(buffer), XtRImmediate, (XtPointer) TRUE}, {XtNsharp, XtCBoolean, XtRBoolean, sizeof(Boolean), offset(sharp), XtRImmediate, (XtPointer) FALSE}, {XtNforeground, XtCForeground, XtRXftColor, sizeof(XftColor), offset(fg_color), XtRString, XtDefaultForeground}, {XtNhourColor, XtCForeground, XtRXftColor, sizeof(XftColor), offset(hour_color), XtRString, XtDefaultForeground}, {XtNminuteColor, XtCForeground, XtRXftColor, sizeof(XftColor), offset(min_color), XtRString, XtDefaultForeground}, {XtNsecondColor, XtCForeground, XtRXftColor, sizeof(XftColor), offset(sec_color), XtRString, XtDefaultForeground}, {XtNmajorColor, XtCForeground, XtRXftColor, sizeof(XftColor), offset(major_color), XtRString, XtDefaultForeground}, {XtNminorColor, XtCForeground, XtRXftColor, sizeof(XftColor), offset(minor_color), XtRString, XtDefaultForeground}, {XtNamColor, XtCForeground, XtRXftColor, sizeof(XftColor), offset(am_color), XtRString, XtDefaultForeground}, {XtNpmColor, XtCForeground, XtRXftColor, sizeof(XftColor), offset(pm_color), XtRString, XtDefaultForeground}, {XtNfixed1Color, XtCForeground, XtRXftColor, sizeof(XftColor), offset(fixed_1_color), XtRString, XtDefaultForeground}, {XtNfixed2Color, XtCForeground, XtRXftColor, sizeof(XftColor), offset(fixed_2_color), XtRString, XtDefaultForeground}, {XtNfixed3Color, XtCForeground, XtRXftColor, sizeof(XftColor), offset(fixed_3_color), XtRString, XtDefaultForeground}, {XtNhourShape, XtCString, XtRXftShape, sizeof(XftShape), offset(hour_shape), XtRXftShape, (XtPointer) &default_hour_shape}, {XtNminuteShape, XtCString, XtRXftShape, sizeof(XftShape), offset(min_shape), XtRXftShape, (XtPointer) &default_min_shape}, {XtNsecondShape, XtCString, XtRXftShape, sizeof(XftShape), offset(sec_shape), XtRXftShape, (XtPointer) &default_sec_shape}, {XtNmajorShape, XtCString, XtRXftShape, sizeof(XftShape), offset(major_shape), XtRXftShape, (XtPointer) &default_major_shape}, {XtNminorShape, XtCString, XtRXftShape, sizeof(XftShape), offset(minor_shape), XtRXftShape, (XtPointer) &default_minor_shape}, {XtNamShape, XtCString, XtRXftShape, sizeof(XftShape), offset(am_shape), XtRXftShape, (XtPointer) &default_am_shape}, {XtNpmShape, XtCString, XtRXftShape, sizeof(XftShape), offset(pm_shape), XtRXftShape, (XtPointer) &default_pm_shape}, {XtNfixed1Shape, XtCString, XtRXftShape, sizeof(XftShape), offset(fixed_1_shape), XtRXftShape, (XtPointer) &default_fixed_shape}, {XtNfixed2Shape, XtCString, XtRXftShape, sizeof(XftShape), offset(fixed_2_shape), XtRXftShape, (XtPointer) &default_fixed_shape}, {XtNfixed3Shape, XtCString, XtRXftShape, sizeof(XftShape), offset(fixed_3_shape), XtRXftShape, (XtPointer) &default_fixed_shape}, {XtNrotateAmpm, XtCBoolean, XtRBoolean, sizeof(Boolean), offset(rotate_ampm), XtRImmediate, (XtPointer) FALSE}, {XtNzOrder, XtCString, XtRXftZOrder, sizeof(XftZOrder), offset(z_order), XtRXftZOrder, (XtPointer) &default_z_order}, {XtNproportional, XtCBoolean, XtRBoolean, sizeof(Boolean), offset(proportional), XtRImmediate, (XtPointer) FALSE}, {XtNface, XtCFace, XtRXftFont, sizeof(XftFont *), offset(face), XtRString, ""}, #endif }; #undef offset #undef goffset static void ClassInitialize(void); static void Initialize(Widget request, Widget new, ArgList args, Cardinal * num_args); static void Realize(Widget gw, XtValueMask * valueMask, XSetWindowAttributes * attrs); static void Destroy(Widget gw); static void Resize(Widget gw); static void Redisplay(Widget gw, XEvent * event, Region region); static void clock_tic(XtPointer client_data, XtIntervalId * id); static void erase_hands(ClockWidget w, const struct tm *tm); static void ClockAngle(double tick_units, double *sinp, double *cosp); static void DrawLine(ClockWidget w, Dimension blank_length, Dimension length, int tick_units); static void DrawHand(ClockWidget w, Dimension length, Dimension width, int tick_units); static void DrawSecond(ClockWidget w, Dimension length, Dimension width, Dimension offset, int tick_units); static void SetSeg(ClockWidget w, int x1, int y1, int x2, int y2); static void DrawClockFace(ClockWidget w); static int clock_round(double x); static Boolean SetValues(Widget gcurrent, Widget grequest, Widget gnew, ArgList args, Cardinal * num_args); #if !defined(NO_I18N) && defined(HAVE_ICONV) && defined(HAVE_NL_LANGINFO) static char *clock_to_utf8(const char *str, int in_len); #endif ClockClassRec clockClassRec = { { /* core fields */ /* superclass */ (WidgetClass) & simpleClassRec, /* class_name */ "Clock", /* widget_size */ sizeof(ClockRec), /* class_initialize */ ClassInitialize, /* class_part_initialize */ NULL, /* class_inited */ FALSE, /* initialize */ Initialize, /* initialize_hook */ NULL, /* realize */ Realize, /* actions */ NULL, /* num_actions */ 0, /* resources */ resources, /* resource_count */ XtNumber(resources), /* xrm_class */ NULLQUARK, /* compress_motion */ TRUE, /* compress_exposure */ XtExposeCompressMaximal, /* compress_enterleave */ TRUE, /* visible_interest */ FALSE, /* destroy */ Destroy, /* resize */ Resize, /* expose */ Redisplay, /* set_values */ SetValues, /* set_values_hook */ NULL, /* set_values_almost */ XtInheritSetValuesAlmost, /* get_values_hook */ NULL, /* accept_focus */ NULL, /* version */ XtVersion, /* callback_private */ NULL, /* tm_table */ NULL, /* query_geometry */ XtInheritQueryGeometry, /* display_accelerator */ XtInheritDisplayAccelerator, /* extension */ NULL }, { /* simple fields */ /* change_sensitive */ XtInheritChangeSensitive, /* extension */ NULL }, { /* clock fields */ /* ignore */ 0 } }; WidgetClass clockWidgetClass = (WidgetClass) & clockClassRec; /**************************************************************** * * Private Procedures * ****************************************************************/ #ifndef USE_XAW_PIXMAP_CVT static void CvtStringToPixmap(XrmValue * args, Cardinal * num_args, XrmValuePtr fromVal, XrmValuePtr toVal) { static Pixmap pmap; Pixmap shapemask; char *name = (char *) fromVal->addr; Screen *screen; Display *dpy; if (*num_args != 1) XtErrorMsg("wrongParameters", "cvtStringToPixmap", "XtToolkitError", "String to pixmap conversion needs screen argument", (String *) NULL, (Cardinal *) NULL); if (strcmp(name, "None") == 0) { pmap = None; } else { screen = *((Screen **) args[0].addr); dpy = DisplayOfScreen(screen); XpmReadFileToPixmap(dpy, RootWindowOfScreen(screen), name, &pmap, &shapemask, NULL); } (*toVal).size = sizeof(Pixmap); (*toVal).addr = (XPointer) & pmap; } #endif #ifdef XRENDER static XtConvertArgRec xftColorConvertArgs[] = { {XtWidgetBaseOffset, (XtPointer) XtOffsetOf(WidgetRec, core.screen), sizeof(Screen *)}, {XtWidgetBaseOffset, (XtPointer) XtOffsetOf(WidgetRec, core.colormap), sizeof(Colormap)} }; #define donestr(type, value, tstr) \ do { \ if (toVal->addr != NULL) { \ if (toVal->size < sizeof(type)) { \ toVal->size = sizeof(type); \ XtDisplayStringConversionWarning(dpy, \ (char*) fromVal->addr, tstr); \ return False; \ } \ *(type*)(toVal->addr) = (value); \ } \ else { \ static type static_val; \ static_val = (value); \ toVal->addr = (XPointer)&static_val; \ } \ toVal->size = sizeof(type); \ return True; \ } while (0) static void XmuFreeXftColor(XtAppContext app, XrmValuePtr toVal, XtPointer closure, XrmValuePtr args, Cardinal * num_args) { Screen *screen; Colormap colormap; XftColor *color; if (*num_args != 2) { XtAppErrorMsg(app, "freeXftColor", "wrongParameters", "XtToolkitError", "Freeing an XftColor requires screen and colormap arguments", (String *) NULL, (Cardinal *) NULL); return; } screen = *((Screen **) args[0].addr); colormap = *((Colormap *) args[1].addr); color = (XftColor *) toVal->addr; XftColorFree(DisplayOfScreen(screen), DefaultVisual(DisplayOfScreen(screen), XScreenNumberOfScreen(screen)), colormap, color); } static Boolean XmuCvtStringToXftColor(Display * dpy, XrmValue * args, Cardinal * num_args, XrmValue * fromVal, XrmValue * toVal, XtPointer * converter_data) { char *spec; XRenderColor renderColor; XftColor xftColor; Screen *screen; Colormap colormap; if (*num_args != 2) { XtAppErrorMsg(XtDisplayToApplicationContext(dpy), "cvtStringToXftColor", "wrongParameters", "XtToolkitError", "String to render color conversion needs screen and colormap arguments", (String *) NULL, (Cardinal *) NULL); return False; } screen = *((Screen **) args[0].addr); colormap = *((Colormap *) args[1].addr); spec = (char *) fromVal->addr; if (strcasecmp(spec, XtDefaultForeground) == 0) { renderColor.red = 0; renderColor.green = 0; renderColor.blue = 0; renderColor.alpha = 0xffff; } else if (strcasecmp(spec, XtDefaultBackground) == 0) { renderColor.red = 0xffff; renderColor.green = 0xffff; renderColor.blue = 0xffff; renderColor.alpha = 0xffff; } else if (!XRenderParseColor(dpy, spec, &renderColor)) return False; if (!XftColorAllocValue(dpy, DefaultVisual(dpy, XScreenNumberOfScreen(screen)), colormap, &renderColor, &xftColor)) return False; donestr(XftColor, xftColor, XtRXftColor); } static void XmuFreeXftFont(XtAppContext app, XrmValuePtr toVal, XtPointer closure, XrmValuePtr args, Cardinal * num_args) { Screen *screen; XftFont *font; if (*num_args != 1) { XtAppErrorMsg(app, "freeXftFont", "wrongParameters", "XtToolkitError", "Freeing an XftFont requires screen argument", (String *) NULL, (Cardinal *) NULL); return; } screen = *((Screen **) args[0].addr); font = *((XftFont **) toVal->addr); if (font) XftFontClose(DisplayOfScreen(screen), font); } static Boolean XmuCvtStringToXftFont(Display * dpy, XrmValue * args, Cardinal * num_args, XrmValue * fromVal, XrmValue * toVal, XtPointer * converter_data) { const char *name; XftFont *font; Screen *screen; if (*num_args != 1) { XtAppErrorMsg(XtDisplayToApplicationContext(dpy), "cvtStringToXftFont", "wrongParameters", "XtToolkitError", "String to XftFont conversion needs screen argument", (String *) NULL, (Cardinal *) NULL); return False; } screen = *((Screen **) args[0].addr); name = (char *) fromVal->addr; font = XftFontOpenName(dpy, XScreenNumberOfScreen(screen), name); if (font) { donestr(XftFont *, font, XtRXftFont); } XtDisplayStringConversionWarning(dpy, (char *) fromVal->addr, XtRXftFont); return False; } static XtConvertArgRec xftFontConvertArgs[] = { {XtWidgetBaseOffset, (XtPointer) XtOffsetOf(WidgetRec, core.screen), sizeof(Screen *)}, }; static void XmuFreeXftShape(XtAppContext app, XrmValuePtr toVal, XtPointer closure, XrmValuePtr args, Cardinal * num_args) { (void)app; (void)closure; (void)args; (void)num_args; free(((XftShape*)(toVal->addr))->points); } static void XmuFreeXftZOrder(XtAppContext app, XrmValuePtr toVal, XtPointer closure, XrmValuePtr args, Cardinal * num_args) { /* no heap allocations, so nothing to free */ (void)app; (void)toVal; (void)closure; (void)args; (void)num_args; } /* Parse a series of triangle coordinates on the form "(X1,Y1) (X2,Y2) (X3,Y3)", * while ignoring spaces. A point can also be an integer N, taken as the * zero-based index of a previous point, relative the start if positive or * relative the current point if negative. Coordinate transforms are supported * anywhere outside parentheses. */ static Boolean XmuCvtStringToXftShape(Display * dpy, XrmValue * args, Cardinal * num_args, XrmValue * fromVal, XrmValue * toVal, XtPointer * converter_data) { #define XmuCvtStringToXftShape_Assert(condition, msg) \ if(!(condition)) { errmsg = msg; break; } char *p = (char *)fromVal->addr; XftShape shape; int points_allocated = 0; int count = 0; #ifndef NO_I18N char saved_numeric[256] = ""; { const char *cur_numeric = setlocale(LC_NUMERIC, NULL); if (cur_numeric != NULL && strlen(cur_numeric) < sizeof(saved_numeric)) { strcpy(saved_numeric, cur_numeric); setlocale(LC_NUMERIC, "C"); } } #endif double t1 = .01, t2 = 0, t3 = 0, t4 = 0, t5 = .01, t6 = 0; const char* errmsg = NULL; shape.points = NULL; while (True) { int consumed, idx; double x, y, effX, effY; while (*p == 0x20) p++; if (*p == 0) { XmuCvtStringToXftShape_Assert(count % 3 == 0, "Number of points must be divisible by three"); shape.npoints = count; #ifndef NO_I18N if (saved_numeric[0]) setlocale(LC_NUMERIC, saved_numeric); #endif donestr(XftShape, shape, XtRXftShape); } XmuCvtStringToXftShape_Assert(count <= 3 * 40000, "Too many triangles"); if (points_allocated <= count) { void* new_mem; points_allocated++; new_mem = realloc(shape.points, sizeof(XPointDouble) * points_allocated); XmuCvtStringToXftShape_Assert(new_mem != NULL, "Out of memory in XmuCvtStringToXftShape"); shape.points = new_mem; } if (sscanf(p, "%d%n", &idx, &consumed) == 1) { XmuCvtStringToXftShape_Assert(idx < count, "Index too great"); XmuCvtStringToXftShape_Assert(0 <= idx + count, "Index too low"); if (idx < 0) idx += count; shape.points[count] = shape.points[idx]; p += consumed; count++; continue; } if (*p == 'r' || *p == 'h' || *p == 'w' || *p == 'x' || *p == 'y') { double param; XmuCvtStringToXftShape_Assert(sscanf(p + 1, "%lf%n", ¶m, &consumed) == 1, "Expected tranform parameter"); switch (*p) { case 'r': { double s, c, oldt1 = t1, oldt2 = t2, oldt4 = t4, oldt5 = t5; ClockAngle(param * 10.0, &s, &c); t1 = oldt1 * c - oldt2 * s; t2 = oldt1 * s + oldt2 * c; t4 = oldt4 * c - oldt5 * s; t5 = oldt4 * s + oldt5 * c; break; } case 'h': t2 *= param; t5 *= param; break; case 'w': t1 *= param; t4 *= param; break; case 'x': t3 += param * t1; t6 += param * t4; break; case 'y': t3 += param * t2; t6 += param * t5; break; } p += consumed + 1; continue; } XmuCvtStringToXftShape_Assert(*p == '(', "Expected opening parenthesis, integer" " index or coordinate transformation"); p++; XmuCvtStringToXftShape_Assert(sscanf(p, "%lf%n", &x, &consumed) == 1, "Expected floating point X value"); p += consumed; while (*p == 0x20) p++; XmuCvtStringToXftShape_Assert(*p == ',', "Expected comma character"); p++; while (*p == 0x20) p++; XmuCvtStringToXftShape_Assert(sscanf(p, "%lf%n", &y, &consumed) == 1, "Expected floating point Y value"); p += consumed; while (*p == 0x20) p++; XmuCvtStringToXftShape_Assert(*p == ')', "Expected closing parenthesis"); p++; effX = x*t1 + y*t2 + t3; effY = x*t4 + y*t5 + t6; XmuCvtStringToXftShape_Assert((effX * effX + effY * effY) <= 100.0, "Triangle points must be within 1000.0 units of the origin"); shape.points[count].x = effX; shape.points[count].y = effY; count++; } if (errmsg) { char msgout[1000]; ptrdiff_t errpos = p - fromVal->addr; int written = snprintf(msgout, 1000, "Error in shape at position %jd: %s.", (intmax_t)errpos + 1, errmsg); if (strlen(fromVal->addr) < 160) { snprintf(msgout + written, 1000 - written, "\n%s\n%*s^", fromVal->addr, (int) errpos, ""); } XtAppWarningMsg(XtDisplayToApplicationContext(dpy), "cvtStringToXftShape", "wrongParameters", "XtToolkitError", msgout, (String *) NULL, (Cardinal *) 0); if (shape.points) free(shape.points); #ifndef NO_I18N if (saved_numeric[0]) setlocale(LC_NUMERIC, saved_numeric); #endif return False; } XtAppErrorMsg(XtDisplayToApplicationContext(dpy), "cvtStringToXftShape", "unreachable", "XtToolkitError", "Internal error in XmuCvtStringToXftShape", (String *) NULL, (Cardinal *) NULL); #undef XmuCvtStringToXftShape_Assert } static Boolean XmuCvtStringToXftZOrder(Display * dpy, XrmValue * args, Cardinal * num_args, XrmValue * fromVal, XrmValue * toVal, XtPointer * converter_data) { const char* errmsg = NULL; char *p = (char *)fromVal->addr; int len = strlen(p); XftZOrder z_order; if(len == 0) errmsg = "ZOrder string must not be empty"; for (int i = 0; i < len; i++) { if(p[i] != 'T' && p[i] != 't' && p[i] != '1' && p[i] != '2' && p[i] != '3' && p[i] != 'a' && p[i] != 'p' && p[i] != 'h' && p[i] != 'm' && p[i] != 's') errmsg = "ZOrder string must only contain characters" " T, t, f, a, p, h, m, s"; for (int j = i + 1; j < len; j++) if(p[i] == p[j]) errmsg = "ZOrder string must not contain duplicate characters"; } if(errmsg) { XtAppWarningMsg(XtDisplayToApplicationContext(dpy), "cvtStringToXftZOrder", "wrongParameters", "XtToolkitError", errmsg, (String *) NULL, (Cardinal *) 0); return False; } for (int i = 0; i < CLOCK_ELEMENTS + 1; i++) z_order.elements[i] = i < len ? p[i] : 0; donestr(XftZOrder, z_order, XtRXftZOrder); } #endif static void ClassInitialize(void) { #ifdef USE_XAW_PIXMAP_CVT XawInitializeWidgetSet(); #else static XtConvertArgRec scrnConvertArg[] = { {XtBaseOffset, (XtPointer) XtOffset(Widget, core.screen), sizeof(Screen *)} }; XtAddConverter(XtRString, XtRPixmap, CvtStringToPixmap, scrnConvertArg, XtNumber(scrnConvertArg)); #endif XtAddConverter(XtRString, XtRBackingStore, XmuCvtStringToBackingStore, NULL, 0); #ifdef XRENDER XtSetTypeConverter(XtRString, XtRXftColor, XmuCvtStringToXftColor, xftColorConvertArgs, XtNumber(xftColorConvertArgs), XtCacheByDisplay, XmuFreeXftColor); XtSetTypeConverter(XtRString, XtRXftFont, XmuCvtStringToXftFont, xftFontConvertArgs, XtNumber(xftFontConvertArgs), XtCacheByDisplay, XmuFreeXftFont); XtSetTypeConverter(XtRString, XtRXftShape, XmuCvtStringToXftShape, NULL, 0, XtCacheNone, XmuFreeXftShape); XtSetTypeConverter(XtRString, XtRXftZOrder, XmuCvtStringToXftZOrder, NULL, 0, XtCacheNone, XmuFreeXftZOrder); #endif } static char * TimeString(ClockWidget w, struct tm *tm) { if (w->clock.brief) { if (w->clock.twentyfour) { static char brief[6]; snprintf(brief, sizeof(brief), "%02d:%02d", tm->tm_hour, tm->tm_min); return brief; } else { static char brief[9]; int hour = tm->tm_hour % 12; if (!hour) hour = 12; snprintf(brief, sizeof(brief), "%02d:%02d %cM", hour, tm->tm_min, tm->tm_hour >= 12 ? 'P' : 'A'); return brief; } } else if (w->clock.utime) { static char utime[35]; Time_t tsec; tsec = time(NULL); snprintf(utime, sizeof(utime), "%10lu seconds since Epoch", (unsigned long) tsec); return utime; } else if (*w->clock.strftime) { /*Note: this code is probably excessively paranoid about buffer overflow. The extra size 10 padding is also meant as a further guard against programmer error, although it is a little controversial */ static char ctime[STRFTIME_BUFF_SIZE + 10]; ctime[0] = ctime[STRFTIME_BUFF_SIZE] = '\0'; if (0 < strftime(ctime, STRFTIME_BUFF_SIZE - 1, w->clock.strftime, tm)) { ctime[STRFTIME_BUFF_SIZE - 1] = '\0'; return ctime; } else { return asctime(tm); } } else if (w->clock.twentyfour) return asctime(tm); else { static char long12[28]; strftime(long12, sizeof long12, "%a %b %d %I:%M:%S %p %Y", tm); return long12; } } /* ARGSUSED */ static void Initialize(Widget request, Widget new, ArgList args, Cardinal * num_args) { ClockWidget w = (ClockWidget) new; XtGCMask valuemask; XGCValues myXGCV; int min_height, min_width; valuemask = GCForeground | GCBackground | GCFont | GCLineWidth; if (w->clock.font != NULL) myXGCV.font = w->clock.font->fid; else valuemask &= ~GCFont; /* use server default font */ if (w->clock.analog24) w->clock.analog = True; min_width = min_height = ANALOG_SIZE_DEFAULT; if (!w->clock.analog) { char *str; struct tm tm; struct timeval tv; int len; #ifndef NO_I18N w->clock.utf8 = False; if (!no_locale) { const char *time_locale = setlocale(LC_CTYPE, NULL); if (strstr(time_locale, "UTF-8") || strstr(time_locale, "utf8")) { w->clock.utf8 = True; } /* * initialize time format from CFTIME if set, otherwise * default to "%c". This emulates ascftime, but we use * strftime so we can limit the string buffer size to * avoid possible buffer overflow. */ if ((w->clock.strftime == NULL) || (w->clock.strftime[0] == 0)) { w->clock.strftime = getenv("CFTIME"); if (w->clock.strftime == NULL) { w->clock.strftime = "%c"; } } } #endif /* NO_I18N */ X_GETTIMEOFDAY(&tv); tm = *localtime(&tv.tv_sec); str = TimeString(w, &tm); len = strlen(str); if (len && str[len - 1] == '\n') str[--len] = '\0'; #ifdef XRENDER if (w->clock.render) { XGlyphInfo extents; #ifndef NO_I18N #if defined(HAVE_ICONV) && defined(HAVE_NL_LANGINFO) char *utf8_str; #endif if (w->clock.utf8) XftTextExtentsUtf8(XtDisplay(w), w->clock.face, (FcChar8 *) str, len, &extents); #if defined(HAVE_ICONV) && defined(HAVE_NL_LANGINFO) else if ((utf8_str = clock_to_utf8(str, len)) != NULL) { XftTextExtentsUtf8(XtDisplay(w), w->clock.face, (FcChar8 *) utf8_str, strlen(utf8_str), &extents); free(utf8_str); } #endif else #endif XftTextExtents8(XtDisplay(w), w->clock.face, (FcChar8 *) str, len, &extents); min_width = extents.xOff + 2 * w->clock.padding; min_height = w->clock.face->ascent + w->clock.face->descent + 2 * w->clock.padding; /*fprintf(stderr, "render min_width %i\n", min_width); */ } else #endif { /* not XRENDER block */ #ifndef NO_I18N if (!no_locale) { XFontSetExtents *fse; if (w->clock.fontSet == NULL) { char **missing, *default_str; int n_missing; w->clock.fontSet = XCreateFontSet(XtDisplay(w), XtDefaultFontSet, &missing, &n_missing, &default_str); } if (w->clock.fontSet != NULL) { /* don't free this... it's freed with the XFontSet. */ fse = XExtentsOfFontSet(w->clock.fontSet); min_width = XmbTextEscapement(w->clock.fontSet, str, len) + 2 * w->clock.padding; min_height = fse->max_logical_extent.height + 3 * w->clock.padding; /*fprintf(stderr, "fontset min_width %i\n", min_width); */ } else { no_locale = True; } } if (no_locale) #endif /* NO_I18N */ { if (w->clock.font == NULL) w->clock.font = XQueryFont(XtDisplay(w), XGContextFromGC(DefaultGCOfScreen (XtScreen(w)))); min_width = XTextWidth(w->clock.font, str, len) + 2 * w->clock.padding; min_height = w->clock.font->ascent + w->clock.font->descent + 2 * w->clock.padding; /*fprintf(stderr, "font min_width %i\n", min_width); */ } } /* not XRENDER block */ } if (w->core.width == 0) w->core.width = min_width; if (w->core.height == 0) w->core.height = min_height; myXGCV.foreground = ClockFgPixel(w); myXGCV.background = w->core.background_pixel; if (w->clock.font != NULL) myXGCV.font = w->clock.font->fid; else valuemask &= ~GCFont; /* use server default font */ myXGCV.line_width = 0; w->clock.myGC = XtGetGC((Widget) w, valuemask, &myXGCV); valuemask = GCForeground | GCLineWidth | GCGraphicsExposures; myXGCV.foreground = w->core.background_pixel; if (w->core.background_pixmap != XtUnspecifiedPixmap) { myXGCV.tile = w->core.background_pixmap; myXGCV.fill_style = FillTiled; valuemask |= (GCTile | GCFillStyle); } myXGCV.graphics_exposures = False; w->clock.EraseGC = XtGetGC((Widget) w, valuemask, &myXGCV); valuemask &= ~(GCTile | GCFillStyle); myXGCV.foreground = w->clock.Hipixel; w->clock.HighGC = XtGetGC((Widget) w, valuemask, &myXGCV); valuemask = GCForeground; myXGCV.foreground = w->clock.Hdpixel; w->clock.HandGC = XtGetGC((Widget) w, valuemask, &myXGCV); /* make invalid updates use a default */ if (w->clock.update < 0.001) w->clock.update = 60; w->clock.show_second_hand = (w->clock.update <= SECOND_HAND_TIME); w->clock.numseg = 0; w->clock.interval_id = 0; memset(&w->clock.otm, '\0', sizeof(w->clock.otm)); #ifdef XRENDER { int major, minor; if (XRenderQueryVersion(XtDisplay(w), &major, &minor) && (major > 0 || (major == 0 && minor >= 4))) { w->clock.can_polygon = True; } else w->clock.can_polygon = False; } w->clock.pixmap = 0; w->clock.draw = NULL; w->clock.damage.x = 0; w->clock.damage.y = 0; w->clock.damage.height = 0; w->clock.damage.width = 0; #endif } #ifdef XRENDER static void RenderPrepare(ClockWidget w, const XftColor *color) { if (!w->clock.draw) { Drawable d = XtWindow(w); if (w->clock.buffer) { if (!w->clock.pixmap) { Arg arg[1]; w->clock.pixmap = XCreatePixmap(XtDisplay(w), d, w->core.width, w->core.height, w->core.depth); arg[0].name = XtNbackgroundPixmap; arg[0].value = 0; XtSetValues((Widget) w, arg, 1); } d = w->clock.pixmap; } w->clock.draw = XftDrawCreate(XtDisplay(w), d, DefaultVisual(XtDisplay(w), DefaultScreen(XtDisplay (w))), w->core.colormap); w->clock.picture = XftDrawPicture(w->clock.draw); } if (color) w->clock.fill_picture = XftDrawSrcPicture(w->clock.draw, color); } static void RenderClip(ClockWidget w) { Region r; Drawable d; RenderPrepare(w, NULL); if (w->clock.buffer) d = w->clock.pixmap; else d = XtWindow(w); XFillRectangle(XtDisplay(w), d, w->clock.EraseGC, w->clock.damage.x, w->clock.damage.y, w->clock.damage.width, w->clock.damage.height); r = XCreateRegion(); XUnionRectWithRegion(&w->clock.damage, r, r); XftDrawSetClip(w->clock.draw, r); XDestroyRegion(r); } static void RenderTextBounds(ClockWidget w, char *str, int off, int len, XRectangle * bounds, int *xp, int *yp) { XGlyphInfo head, tail; int x, y; #ifndef NO_I18N #if defined(HAVE_ICONV) && defined(HAVE_NL_LANGINFO) char *utf8_str; #endif if (w->clock.utf8) { XftTextExtentsUtf8(XtDisplay(w), w->clock.face, (FcChar8 *) str, off, &head); XftTextExtentsUtf8(XtDisplay(w), w->clock.face, (FcChar8 *) str + off, len - off, &tail); } #if defined(HAVE_ICONV) && defined(HAVE_NL_LANGINFO) else if ((utf8_str = clock_to_utf8(str, off)) != NULL) { XftTextExtentsUtf8(XtDisplay(w), w->clock.face, (FcChar8 *) utf8_str, strlen(utf8_str), &head); free(utf8_str); if ((utf8_str = clock_to_utf8(str + off, len - off)) != NULL) { XftTextExtentsUtf8(XtDisplay(w), w->clock.face, (FcChar8 *) utf8_str, strlen(utf8_str), &tail); free(utf8_str); } else goto fallback; } #endif else #endif { fallback: XftTextExtents8(XtDisplay(w), w->clock.face, (FcChar8 *) str, off, &head); XftTextExtents8(XtDisplay(w), w->clock.face, (FcChar8 *) str + off, len - off, &tail); } /* * Compute position of tail */ x = w->clock.padding + head.xOff; y = w->clock.face->ascent + w->clock.padding + head.yOff; /* * Compute bounds of tail, pad a bit as the bounds aren't exact */ bounds->x = x - tail.x - 1; bounds->y = y - tail.y - 1; bounds->width = tail.width + 2; bounds->height = tail.height + 2; if (xp) *xp = x; if (yp) *yp = y; } static void RenderUpdateRectBounds(const XRectangle *damage, XRectangle *bounds) { int x1 = bounds->x; int y1 = bounds->y; int x2 = bounds->x + bounds->width; int y2 = bounds->y + bounds->height; int d_x1 = damage->x; int d_y1 = damage->y; int d_x2 = damage->x + damage->width; int d_y2 = damage->y + damage->height; if (x1 == x2) { x1 = d_x1; x2 = d_x2; } else { if (d_x1 < x1) x1 = d_x1; if (d_x2 > x2) x2 = d_x2; } if (y1 == y2) { y1 = d_y1; y2 = d_y2; } else { if (d_y1 < y1) y1 = d_y1; if (d_y2 > y2) y2 = d_y2; } bounds->x = x1; bounds->y = y1; bounds->width = x2 - x1; bounds->height = y2 - y1; } static Boolean RenderRectIn(const XRectangle *rect, const XRectangle *bounds) { int x1 = bounds->x; int y1 = bounds->y; int x2 = bounds->x + bounds->width; int y2 = bounds->y + bounds->height; int r_x1 = rect->x; int r_y1 = rect->y; int r_x2 = rect->x + rect->width; int r_y2 = rect->y + rect->height; return r_x1 < x2 && x1 < r_x2 && r_y1 < y2 && y1 < r_y2; } #include static void RenderUpdateBounds(const XftShape *sh, XRectangle *bounds) { int x1 = bounds->x; int y1 = bounds->y; int x2 = bounds->x + bounds->width; int y2 = bounds->y + bounds->height; for (int i = 0; i < sh->npoints; i++) { int r_x1 = sh->points[i].x; int r_y1 = sh->points[i].y; int r_x2 = sh->points[i].x + 1; int r_y2 = sh->points[i].y + 1; if (x1 == x2) x2 = x1 = r_x1; if (y1 == y2) y2 = y1 = r_y1; if (r_x1 < x1) x1 = r_x1; if (r_y1 < y1) y1 = r_y1; if (r_x2 > x2) x2 = r_x2; if (r_y2 > y2) y2 = r_y2; } bounds->x = x1; bounds->y = y1; bounds->width = x2 - x1; bounds->height = y2 - y1; } static void RenderUpdate(ClockWidget w) { if (w->clock.buffer && w->clock.pixmap) { XCopyArea(XtDisplay(w), w->clock.pixmap, XtWindow(w), w->clock.EraseGC, w->clock.damage.x, w->clock.damage.y, w->clock.damage.width, w->clock.damage.height, w->clock.damage.x, w->clock.damage.y); } } static void RenderResetBounds(XRectangle * bounds) { bounds->x = 0; bounds->y = 0; bounds->width = 0; bounds->height = 0; } static Boolean RenderCheckBounds(const XftShape *sh, const XRectangle *bounds) { XRectangle sh_r; RenderResetBounds(&sh_r); RenderUpdateBounds(sh, &sh_r); return RenderRectIn(&sh_r, bounds); } static void RenderShape(ClockWidget w, double tick_units, XftShape* sh, const XftColor *color, Boolean draw) { double s, c; XftShape shr = *sh; XPointDouble shr_points[shr.npoints]; ClockAngle(tick_units, &s, &c); shr.points = shr_points; for (int i = 0; i < sh->npoints; i++) { double x = sh->points[i].x, y = sh->points[i].y; shr.points[i].x = (x*c + y*s) * w->clock.x_scale + w->clock.x_off; shr.points[i].y = (x*s - y*c) * w->clock.y_scale + w->clock.y_off; } if (draw) { if (RenderCheckBounds(&shr, &w->clock.damage)) { int ntris = shr.npoints / 3; XTriangle tris[ntris]; RenderPrepare(w, color); for (int i = 0; i < ntris; i++) { tris[i].p1.x = XDoubleToFixed(shr.points[3*i].x); tris[i].p1.y = XDoubleToFixed(shr.points[3*i].y); tris[i].p2.x = XDoubleToFixed(shr.points[3*i+1].x); tris[i].p2.y = XDoubleToFixed(shr.points[3*i+1].y); tris[i].p3.x = XDoubleToFixed(shr.points[3*i+2].x); tris[i].p3.y = XDoubleToFixed(shr.points[3*i+2].y); } XRenderCompositeTriangles(XtDisplay(w), PictOpOver, w->clock.fill_picture, w->clock.picture, w->clock.mask_format, 0, 0, tris, ntris); } } else { RenderUpdateBounds(&shr, &w->clock.damage); } } static void RenderClock(ClockWidget w, const struct tm *tm, const struct timeval *tv, Boolean draw, Boolean includeFace) { double sec, hour_hand_angle; sec = tm->tm_sec; if (w->clock.update < 1.0) sec += tv->tv_usec / 1000000.0; hour_hand_angle = tm->tm_hour * 300 + tm->tm_min * 5 + sec / 12.0; if (w->clock.analog24) hour_hand_angle /= 2.0; for (int zidx = 0; zidx < CLOCK_ELEMENTS; zidx++) { switch (w->clock.z_order.elements[zidx]) { case 'T': // render major ticks if (includeFace) for (int i = 0; i < (w->clock.analog24 ? 24 : 12); i++) RenderShape(w, i * (w->clock.analog24 ? 150 : 300), &w->clock.major_shape, &w->clock.major_color, draw); break; case 't': // render minor ticks if (includeFace) for (int i = 0; i < 60; i++) if (i % 5 != 0) RenderShape(w, i * 60, &w->clock.minor_shape, &w->clock.minor_color, draw); break; case '1': // render fixed 1 if (includeFace) RenderShape(w, 0, &w->clock.fixed_1_shape, &w->clock.fixed_1_color, draw); break; case '2': // render fixed 2 if (includeFace) RenderShape(w, 0, &w->clock.fixed_2_shape, &w->clock.fixed_2_color, draw); break; case '3': // render fixed 3 if (includeFace) RenderShape(w, 0, &w->clock.fixed_3_shape, &w->clock.fixed_3_color, draw); break; case 'a': // render AM marker if (tm->tm_hour < 12) RenderShape(w, w->clock.rotate_ampm ? hour_hand_angle : 0, &w->clock.am_shape, &w->clock.am_color, draw); break; case 'p': // render PM marker if (tm->tm_hour >= 12) RenderShape(w, w->clock.rotate_ampm ? hour_hand_angle : 0, &w->clock.pm_shape, &w->clock.pm_color, draw); break; case 'h': // render hour hand RenderShape(w, hour_hand_angle, &w->clock.hour_shape, &w->clock.hour_color, draw); break; case 'm': // render minute hand RenderShape(w, tm->tm_min * 60 + sec, &w->clock.min_shape, &w->clock.min_color, draw); break; case 's': // render second hand if (w->clock.show_second_hand == TRUE) RenderShape(w, sec * 60, &w->clock.sec_shape, &w->clock.sec_color, draw); } } } #endif static void Realize(Widget gw, XtValueMask * valueMask, XSetWindowAttributes * attrs) { ClockWidget w = (ClockWidget) gw; #ifdef notdef *valueMask |= CWBitGravity; attrs->bit_gravity = ForgetGravity; #endif switch (w->clock.backing_store) { case Always: case NotUseful: case WhenMapped: *valueMask |= CWBackingStore; attrs->backing_store = w->clock.backing_store; break; } (*clockWidgetClass->core_class.superclass->core_class.realize) (gw, valueMask, attrs); Resize(gw); } static void Destroy(Widget gw) { ClockWidget w = (ClockWidget) gw; if (w->clock.interval_id) XtRemoveTimeOut(w->clock.interval_id); #ifdef XRENDER if (w->clock.picture) XRenderFreePicture(XtDisplay(w), w->clock.picture); if (w->clock.fill_picture) XRenderFreePicture(XtDisplay(w), w->clock.fill_picture); #endif XtReleaseGC(gw, w->clock.myGC); XtReleaseGC(gw, w->clock.HighGC); XtReleaseGC(gw, w->clock.HandGC); XtReleaseGC(gw, w->clock.EraseGC); } static void Resize(Widget gw) { ClockWidget w = (ClockWidget) gw; /* don't do this computation if window hasn't been realized yet. */ if (XtIsRealized(gw) && w->clock.analog) { /* need signed value since Dimension is unsigned */ int radius = ((int) min(w->core.width, w->core.height) - (int) (2 * w->clock.padding)) / 2; w->clock.radius = (Dimension) max(radius, 1); w->clock.second_hand_length = (int) (SECOND_HAND_FRACT * w->clock.radius) / 100; w->clock.minute_hand_length = (int) (MINUTE_HAND_FRACT * w->clock.radius) / 100; w->clock.hour_hand_length = (int) (HOUR_HAND_FRACT * w->clock.radius) / 100; w->clock.hand_width = (int) (HAND_WIDTH_FRACT * w->clock.radius) / 100; w->clock.second_hand_width = (int) (SECOND_WIDTH_FRACT * w->clock.radius) / 100; w->clock.centerX = w->core.width / 2; w->clock.centerY = w->core.height / 2; } #ifdef XRENDER w->clock.x_scale = 0.45 * w->core.width; w->clock.y_scale = 0.45 * w->core.height; if (w->clock.proportional) w->clock.x_scale = w->clock.y_scale = min(w->clock.x_scale, w->clock.y_scale); w->clock.x_off = 0.5 * w->core.width; w->clock.y_off = 0.5 * w->core.height; if (w->clock.pixmap) { XFreePixmap(XtDisplay(w), w->clock.pixmap); w->clock.pixmap = 0; if (w->clock.draw) { XftDrawDestroy(w->clock.draw); w->clock.draw = NULL; } w->clock.picture = 0; } #endif } /* ARGSUSED */ static void Redisplay(Widget gw, XEvent * event, Region region) { ClockWidget w = (ClockWidget) gw; if (w->clock.analog) { #ifdef XRENDER if (w->clock.render && w->clock.can_polygon) XClipBox(region, &w->clock.damage); else #endif { if (w->clock.numseg != 0) erase_hands(w, (struct tm *) 0); DrawClockFace(w); } } else { #ifdef XRENDER if (w->clock.render) XClipBox(region, &w->clock.damage); #endif w->clock.prev_time_string[0] = '\0'; } clock_tic((XtPointer) w, (XtIntervalId *) NULL); } #define USEC_MILLIS(us) ((unsigned long) (us) / 1000) #define SEC_MILLIS(s) ((unsigned long) (s) * 1000) #define MIN_MILLIS(m) SEC_MILLIS((unsigned long) (m) * 60) #define HOUR_MILLIS(h) MIN_MILLIS((unsigned long) (h) * 60) #define DAY_MILLIS HOUR_MILLIS((unsigned long) 24) #define MIN_SECS(m) ((unsigned long) (m) * 60) #define HOUR_SECS(h) MIN_SECS((unsigned long) (h) * 60) /* Seconds since midnight */ static unsigned long time_seconds(const struct tm *tm) { return HOUR_SECS(tm->tm_hour) + MIN_SECS(tm->tm_min) + tm->tm_sec; } /* Milliseconds since midnight */ static unsigned long time_millis(const struct tm *tm, const struct timeval *tv) { return time_seconds(tm) * 1000 + USEC_MILLIS(tv->tv_usec); } /* Round milliseconds to number of intervals (measured in milliseconds) */ static unsigned long time_intervals(unsigned long millis, unsigned long interval) { return (millis + interval / 2) / interval; } /* * Round the current time to the nearest update interval using * milliseconds since midnight */ static void round_time(float _update, struct tm *tm, struct timeval *tv) { /* interval in milliseconds */ unsigned long update = (int) (_update * 1000.0 + 0.5); /* compute milliseconds since midnight */ unsigned long old_secs = time_seconds(tm); unsigned long old_millis = time_millis(tm, tv); /* Nearest number of intervals since midnight */ unsigned long intervals = time_intervals(old_millis, update); /* The number of milliseconds for that number of intervals */ unsigned long new_millis = intervals * update; time_t t; if (new_millis > DAY_MILLIS) new_millis = DAY_MILLIS; /* Compute the time_t of that interval by subtracting off the real * seconds and adding back in the desired second */ t = tv->tv_sec - old_secs + new_millis / 1000; *tm = *localtime(&t); tv->tv_usec = (new_millis % 1000) * 1000; } /* Choose the update times for well-defined clock states. * * For example, in HH:MM:SS notation the last number rolls over * every 60 seconds and has at most 60 display states. The sequence * depends on its initial value t0 and the update period u, e.g. * * u (s) d (s) ti (s) m (states) l (s) * 2 2 {0,2, .. 58} 30 60 * 7 1 {0,7, .. 56,3, .. 53} 60 420 * 15 15 {0,15,30,45} 4 60 * 45 15 {0,45,30,15} 4 180 * 53 1 {0,53,46, .. 4,57, .. 7} 60 3180 * 58 2 {0,58,56, .. 2} 30 1740 * 60 60 {0} 1 60 * * u= update period in seconds, * ti= time at update i from the reference, HH:MM:00 or HH:00:00, * n= the roll over time, the modulus, 60 s or 3600 s, * m= the sequence length, the order of u in the modulo n group Z/nZ, * l= the total sequence duration =m*u. * d= gcd(n,u) the greatest common divisor * * The time t(i) determines the clock state. It follows from * * t(i)=t(i-1)+u mod n <=> t(i)=t(0)+i*u mod n * * which defines a { t(0) .. t(m-1) } sequence of m unique elements. * Hence, u generates a subgroup U={k*u mod n : k in Z} of Z/nZ so * its order m divides n. This m satisfies * * t(m)=t(0) <=> m*u mod n = 0 <=> m*u = r*n <=> m=n/d, r=u/d * * where d divides n and u. Choosing * * d=gcd(n,u) <=> n/d and u/d are coprime => m=n/d is minimum * * thus gives the order. Furthermore, the greatest common divisor d is * also the minimum value generator of the set U. Assume a generator e * where * * e|{n,u} <=> Ai,Ej: i*u mod n = j*e <=> j=f(i)=(i*u mod n)/e * * such that f maps i to m=ord(u) unique values of j. Its properties are * * j=i*u/e mod n/e ==> 0<=j J={j=f(i)}, |J|=m * * ord(e)=n/gcd(n,e)=n/e * * from which follows * * e=d ==> f: I={0,..,m-1} -> J={0,..,m-1}: j=i*r mod m is bijective * ==> D={k*d mod n : k in Z} = U. * * Any value e below d is no generator since it yields a non contiguous * J such that an l=0..n/e-1 exists not in J with l*e not in U. * * The update sequence t(i) could be followed using the algorithm: * * 1. restore the expected value into t(i), * 2. calculate the next timeout t(i+1)=t(i)+u mod n, * 3. verify that the current tc(i) is between t(i)..t(i+1), * 4. calculate the time to wait w=t(i+1)-tc(i) mod n, * 5. store t(i+1), * * which implements state tracking. This approach doesn't work well * since the set timeout w does not guarantee a next call at time * t(i+1), e.g. due to program sleeps, time adjustments, and leap * seconds. A robust method should only rely on the current time * tc(i) to identify t(i). The derivation above shows 2 options: * * 1. n={60,3600} and round to a multiple of d, * but if d DAY_MILLIS) next_millis = DAY_MILLIS; result = next_millis - millis; return result; } // Return the number of bytes in the first code point in the string, or 0 if it // cannot be determined. static int firstchar_len(char* str, int len) { mbstate_t st = {0}; int clen = mbrlen(str, len, &st); if (clen == -1 || clen == -2) return 0; return clen; } // Return the number of bytes in the last code point in the string, or 0 if it // cannot be determined. static int lastchar_len(char* str, int len) { for (int i = len - 1; i >= 0; i--) { mbstate_t st = {0}; int clen = mbrlen(&str[i], len - i, &st); if (clen > 0 && i + clen == len) return clen; } return 0; } /* ARGSUSED */ static void clock_tic(XtPointer client_data, XtIntervalId * id) { ClockWidget w = (ClockWidget) client_data; struct tm tm; struct timeval tv; char *time_ptr; register Display *dpy = XtDisplay(w); register Window win = XtWindow(w); X_GETTIMEOFDAY(&tv); tm = *localtime(&tv.tv_sec); if (w->clock.update && (id || !w->clock.interval_id)) w->clock.interval_id = XtAppAddTimeOut(XtWidgetToApplicationContext((Widget) w), waittime(w->clock.update, &tv, &tm), clock_tic, (XtPointer) w); round_time(w->clock.update, &tm, &tv); /* * Beep on the half hour; double-beep on the hour. */ if (w->clock.chime == TRUE) { if (w->clock.beeped && (tm.tm_min != 30) && (tm.tm_min != 0)) w->clock.beeped = FALSE; if (((tm.tm_min == 30) || (tm.tm_min == 0)) && (!w->clock.beeped)) { w->clock.beeped = TRUE; #ifdef XKB if (tm.tm_min == 0) { XkbStdBell(dpy, win, 50, XkbBI_ClockChimeHour); XkbStdBell(dpy, win, 50, XkbBI_RepeatingLastBell); } else { XkbStdBell(dpy, win, 50, XkbBI_ClockChimeHalf); } #else XBell(dpy, 50); if (tm.tm_min == 0) XBell(dpy, 50); #endif } } if (w->clock.analog == FALSE) { int clear_from = w->core.width; int i, len, prev_len; time_ptr = TimeString(w, &tm); len = strlen(time_ptr); if (len && time_ptr[len - 1] == '\n') time_ptr[--len] = '\0'; prev_len = strlen(w->clock.prev_time_string); for (i = 0; (i < len) && (i < prev_len); ) { int clen = firstchar_len(&time_ptr[i], len - i); if (clen == 0 || i + clen > prev_len || memcmp(&w->clock.prev_time_string[i], &time_ptr[i], clen) != 0) break; i += clen; } #ifdef XRENDER if (w->clock.render) { XRectangle old_tail, new_tail, head; int x, y; #if !defined(NO_I18N) && defined(HAVE_ICONV) && defined(HAVE_NL_LANGINFO) char *utf8_str; #endif RenderTextBounds(w, w->clock.prev_time_string, i, prev_len, &old_tail, NULL, NULL); RenderUpdateRectBounds(&old_tail, &w->clock.damage); RenderTextBounds(w, time_ptr, i, len, &new_tail, NULL, NULL); RenderUpdateRectBounds(&new_tail, &w->clock.damage); while (i) { int clen; RenderTextBounds(w, time_ptr, 0, i, &head, NULL, NULL); if (!RenderRectIn(&head, &w->clock.damage)) break; clen = lastchar_len(time_ptr, i); if (clen) i -= clen; else i = 0; } RenderTextBounds(w, time_ptr, i, len, &new_tail, &x, &y); RenderClip(w); RenderPrepare(w, NULL); #ifndef NO_I18N if (w->clock.utf8) { XftDrawStringUtf8(w->clock.draw, &w->clock.fg_color, w->clock.face, x, y, (FcChar8 *) time_ptr + i, len - i); } #if defined(HAVE_ICONV) && defined(HAVE_NL_LANGINFO) else if ((utf8_str = clock_to_utf8(time_ptr + i, len - i)) != NULL) { XftDrawStringUtf8(w->clock.draw, &w->clock.fg_color, w->clock.face, x, y, (FcChar8 *) utf8_str, strlen(utf8_str)); free(utf8_str); } #endif else #endif { XftDrawString8(w->clock.draw, &w->clock.fg_color, w->clock.face, x, y, (FcChar8 *) time_ptr + i, len - i); } RenderUpdate(w); RenderResetBounds(&w->clock.damage); } else #endif #ifndef NO_I18N if (!no_locale) { if (0 < len) { const XFontSetExtents *fse = XExtentsOfFontSet(w->clock.fontSet); XmbDrawImageString(dpy, win, w->clock.fontSet, w->clock.myGC, (2 + w->clock.padding + (i ? XmbTextEscapement(w->clock.fontSet, time_ptr, i) : 0)), 2 + w->clock.padding + fse->max_logical_extent.height, time_ptr + i, len - i); /* * Clear any left over bits */ clear_from = XmbTextEscapement(w->clock.fontSet, time_ptr, len) + 2 + w->clock.padding; } } else #endif /* NO_I18N */ { XDrawImageString(dpy, win, w->clock.myGC, (1 + w->clock.padding + XTextWidth(w->clock.font, time_ptr, i)), w->clock.font->ascent + w->clock.padding, time_ptr + i, len - i); /* * Clear any left over bits */ clear_from = XTextWidth(w->clock.font, time_ptr, len) + 2 + w->clock.padding; } if (clear_from < (int) w->core.width) XClearArea(dpy, win, clear_from, 0, w->core.width - clear_from, w->core.height, False); #ifdef HAVE_STRLCPY strlcpy(w->clock.prev_time_string + i, time_ptr + i, sizeof(w->clock.prev_time_string) - i); #else strncpy(w->clock.prev_time_string + i, time_ptr + i, sizeof(w->clock.prev_time_string) - i); w->clock.prev_time_string[sizeof(w->clock.prev_time_string) - 1] = 0; #endif } else { /* * The second (or minute) hand is sec (or min) * sixtieths around the clock face. The hour hand is * (hour + min/60) twelfths of the way around the * clock-face. The derivation is left as an exercise * for the reader. */ #ifdef XRENDER if (w->clock.render && w->clock.can_polygon) { w->clock.mask_format = XRenderFindStandardFormat(XtDisplay(w), w->clock.sharp ? PictStandardA1 : PictStandardA8); /* * Compute repaint area */ if (tm.tm_min != w->clock.otm.tm_min || tm.tm_hour != w->clock.otm.tm_hour || tm.tm_sec != w->clock.otm.tm_sec || tv.tv_usec != w->clock.otv.tv_usec) { RenderClock(w, &w->clock.otm, &w->clock.otv, False, False); RenderClock(w, &tm, &tv, False, False); } if (w->clock.damage.width && w->clock.damage.height) { RenderClip(w); RenderClock(w, &tm, &tv, True, True); } w->clock.otm = tm; w->clock.otv = tv; RenderUpdate(w); RenderResetBounds(&w->clock.damage); return; } #endif erase_hands(w, &tm); if (w->clock.numseg == 0 || tm.tm_min != w->clock.otm.tm_min || tm.tm_hour != w->clock.otm.tm_hour || tm.tm_sec != w->clock.otm.tm_sec) { w->clock.segbuffptr = w->clock.segbuff; w->clock.numseg = 0; /* * Calculate the minute hand, fill it in with its * color and then outline it. Next, do the same * with the hour hand. This is a cheap hidden * line algorithm. */ DrawHand(w, w->clock.minute_hand_length, w->clock.hand_width, tm.tm_min * 60 + tm.tm_sec); if (w->clock.Hdpixel != w->core.background_pixel) XFillPolygon(dpy, win, w->clock.HandGC, w->clock.segbuff, VERTICES_IN_HANDS, Convex, CoordModeOrigin); XDrawLines(dpy, win, w->clock.HighGC, w->clock.segbuff, VERTICES_IN_HANDS, CoordModeOrigin); w->clock.hour = w->clock.segbuffptr; int hour_hand_angle = tm.tm_hour * 300 + tm.tm_min * 5; if (w->clock.analog24) hour_hand_angle /= 2; DrawHand(w, w->clock.hour_hand_length, w->clock.hand_width, hour_hand_angle); if (w->clock.Hdpixel != w->core.background_pixel) { XFillPolygon(dpy, win, w->clock.HandGC, w->clock.hour, VERTICES_IN_HANDS, Convex, CoordModeOrigin); } XDrawLines(dpy, win, w->clock.HighGC, w->clock.hour, VERTICES_IN_HANDS, CoordModeOrigin); w->clock.sec = w->clock.segbuffptr; } if (w->clock.show_second_hand == TRUE) { w->clock.segbuffptr = w->clock.sec; DrawSecond(w, w->clock.second_hand_length - 2, w->clock.second_hand_width, w->clock.minute_hand_length + 2, tm.tm_sec * 60 + tv.tv_usec * 60 / 1000000); if (w->clock.Hdpixel != w->core.background_pixel) XFillPolygon(dpy, win, w->clock.HandGC, w->clock.sec, VERTICES_IN_HANDS - 2, Convex, CoordModeOrigin); XDrawLines(dpy, win, w->clock.HighGC, w->clock.sec, VERTICES_IN_HANDS - 1, CoordModeOrigin); } w->clock.otm = tm; w->clock.otv = tv; } } static void erase_hands(ClockWidget w, const struct tm *tm) { /* * Erase old hands. */ if (w->clock.numseg > 0) { Display *dpy; Window win; dpy = XtDisplay(w); win = XtWindow(w); if (w->clock.show_second_hand == TRUE) { XDrawLines(dpy, win, w->clock.EraseGC, w->clock.sec, VERTICES_IN_HANDS - 1, CoordModeOrigin); if (w->clock.Hdpixel != w->core.background_pixel) { XFillPolygon(dpy, win, w->clock.EraseGC, w->clock.sec, VERTICES_IN_HANDS - 2, Convex, CoordModeOrigin); } } if (!tm || tm->tm_min != w->clock.otm.tm_min || tm->tm_hour != w->clock.otm.tm_hour || tm->tm_sec != w->clock.otm.tm_sec) { XDrawLines(dpy, win, w->clock.EraseGC, w->clock.segbuff, VERTICES_IN_HANDS, CoordModeOrigin); XDrawLines(dpy, win, w->clock.EraseGC, w->clock.hour, VERTICES_IN_HANDS, CoordModeOrigin); if (w->clock.Hdpixel != w->core.background_pixel) { XFillPolygon(dpy, win, w->clock.EraseGC, w->clock.segbuff, VERTICES_IN_HANDS, Convex, CoordModeOrigin); XFillPolygon(dpy, win, w->clock.EraseGC, w->clock.hour, VERTICES_IN_HANDS, Convex, CoordModeOrigin); } } } } static void ClockAngle(double tick_units, double *sinp, double *cosp) { double angle = tick_units * (M_PI / 180 / 10.0); #ifdef HAVE_SINCOS sincos(angle, sinp, cosp); #else *sinp = sin(angle); *cosp = cos(angle); #endif } /* * DrawLine - Draws a line. * * blank_length is the distance from the center which the line begins. * length is the maximum length of the hand. * Tick_units is a number between zero and 12*60 indicating * how far around the circle (clockwise) from high noon. * * The blank_length feature is because I wanted to draw tick-marks around the * circle (for seconds). The obvious means of drawing lines from the center * to the perimeter, then erasing all but the outside most pixels doesn't * work because of round-off error (sigh). */ static void DrawLine(ClockWidget w, Dimension blank_length, Dimension length, int tick_units) { double dblank_length = (double) blank_length, dlength = (double) length; double cosangle, sinangle; int cx = w->clock.centerX, cy = w->clock.centerY, x1, y1, x2, y2; /* * Angles are measured from 12 o'clock, clockwise increasing. * Since in X, +x is to the right and +y is downward: * * x = x0 + r * sin(theta) * y = y0 - r * cos(theta) * */ ClockAngle(tick_units, &sinangle, &cosangle); /* break this out so that stupid compilers can cope */ x1 = cx + (int) (dblank_length * sinangle); y1 = cy - (int) (dblank_length * cosangle); x2 = cx + (int) (dlength * sinangle); y2 = cy - (int) (dlength * cosangle); SetSeg(w, x1, y1, x2, y2); } /* * DrawHand - Draws a hand. * * length is the maximum length of the hand. * width is the half-width of the hand. * Tick_units is a number between zero and 12*60 indicating * how far around the circle (clockwise) from high noon. * */ static void DrawHand(ClockWidget w, Dimension length, Dimension width, int tick_units) { double cosangle, sinangle; register double ws, wc; Position x, y, x1, y1, x2, y2; /* * Angles are measured from 12 o'clock, clockwise increasing. * Since in X, +x is to the right and +y is downward: * * x = x0 + r * sin(theta) * y = y0 - r * cos(theta) * */ ClockAngle(tick_units, &sinangle, &cosangle); /* * Order of points when drawing the hand. * * 1,4 * / \ * / \ * / \ * 2 ------- 3 */ wc = width * cosangle; ws = width * sinangle; SetSeg(w, x = w->clock.centerX + clock_round(length * sinangle), y = w->clock.centerY - clock_round(length * cosangle), x1 = w->clock.centerX - clock_round(ws + wc), y1 = w->clock.centerY + clock_round(wc - ws)); /* 1 ---- 2 */ /* 2 */ SetSeg(w, x1, y1, x2 = w->clock.centerX - clock_round(ws - wc), y2 = w->clock.centerY + clock_round(wc + ws)); /* 2 ----- 3 */ SetSeg(w, x2, y2, x, y); /* 3 ----- 1(4) */ } /* * DrawSecond - Draws the second hand (diamond). * * length is the maximum length of the hand. * width is the half-width of the hand. * offset is direct distance from center to tail end. * Tick_units is a number between zero and 12*60 indicating * how far around the circle (clockwise) from high noon. * */ static void DrawSecond(ClockWidget w, Dimension length, Dimension width, Dimension offset, int tick_units) { double cosangle, sinangle; register double ms, mc, ws, wc; register int mid; Position x, y; /* * Angles are measured from 12 o'clock, clockwise increasing. * Since in X, +x is to the right and +y is downward: * * x = x0 + r * sin(theta) * y = y0 - r * cos(theta) * */ ClockAngle(tick_units, &sinangle, &cosangle); /* * Order of points when drawing the hand. * * 1,5 * / \ * / \ * / \ * 2< >4 * \ / * \ / * \ / * - 3 * | * | * offset * | * | * - + center */ mid = (int) (length + offset) / 2; mc = mid * cosangle; ms = mid * sinangle; wc = width * cosangle; ws = width * sinangle; /*1 ---- 2 */ SetSeg(w, x = w->clock.centerX + clock_round(length * sinangle), y = w->clock.centerY - clock_round(length * cosangle), w->clock.centerX + clock_round(ms - wc), w->clock.centerY - clock_round(mc + ws)); SetSeg(w, w->clock.centerX + clock_round(offset * sinangle), w->clock.centerY - clock_round(offset * cosangle), /* 2-----3 */ w->clock.centerX + clock_round(ms + wc), w->clock.centerY - clock_round(mc - ws)); if (w->clock.numseg + 1 >= SEG_BUFF_SIZE) XtErrorMsg("bug", "tooManySegments", "XtToolkitError", "SEG_BUFF_SIZE is too small", (String *) NULL, (Cardinal *) NULL); w->clock.segbuffptr->x = x; w->clock.segbuffptr++->y = y; w->clock.numseg++; } static void SetSeg(ClockWidget w, int x1, int y1, int x2, int y2) { if (w->clock.numseg + 2 >= SEG_BUFF_SIZE) XtErrorMsg("bug", "tooManySegments", "XtToolkitError", "SEG_BUFF_SIZE is too small", (String *) NULL, (Cardinal *) NULL); w->clock.segbuffptr->x = x1; w->clock.segbuffptr++->y = y1; w->clock.segbuffptr->x = x2; w->clock.segbuffptr++->y = y2; w->clock.numseg += 2; } /* * Draw the clock face. */ static void DrawClockFace(ClockWidget w) { register int i; register int delta = (int) (w->clock.radius - w->clock.second_hand_length) / 3; w->clock.segbuffptr = w->clock.segbuff; w->clock.numseg = 0; for (i = 0; i < (w->clock.analog24 ? 24 : 12); i++) DrawLine(w, w->clock.second_hand_length, w->clock.radius, i * (w->clock.analog24 ? 150 : 300)); for (i = 0; i < 60; i++) if ((i % 5) != 0) DrawLine(w, w->clock.radius - delta, w->clock.radius, i * 60); /* * Go ahead and draw it. */ XDrawSegments(XtDisplay(w), XtWindow(w), w->clock.myGC, (XSegment *) & (w->clock.segbuff[0]), w->clock.numseg / 2); w->clock.segbuffptr = w->clock.segbuff; w->clock.numseg = 0; } static int clock_round(double x) { return (x >= 0.0 ? (int) (x + .5) : (int) (x - .5)); } #ifdef XRENDER static Boolean sameColor(const XftColor *old, const XftColor *new) { if (old->color.red != new->color.red) return False; if (old->color.green != new->color.green) return False; if (old->color.blue != new->color.blue) return False; if (old->color.alpha != new->color.alpha) return False; return True; } static Boolean sameShape(const XftShape *old, const XftShape *new) { if (old->npoints != new->npoints) return False; for (int i = 0; i < old->npoints; i++) { if (old->points[i].x != new->points[i].x) return False; if (old->points[i].y != new->points[i].y) return False; } return True; } static Boolean sameZOrder(const XftZOrder *old, const XftZOrder *new) { for (int i = 0; i < CLOCK_ELEMENTS + 1; i++) { if (old->elements[i] != new->elements[i]) return False; } return True; } #endif /* ARGSUSED */ static Boolean SetValues(Widget gcurrent, Widget grequest, Widget gnew, ArgList args, Cardinal * num_args) { ClockWidget current = (ClockWidget) gcurrent; ClockWidget new = (ClockWidget) gnew; Boolean redisplay = FALSE; XtGCMask valuemask; XGCValues myXGCV; /* first check for changes to clock-specific resources. We'll accept all the changes, but may need to do some computations first. */ if (new->clock.update != current->clock.update) { if (current->clock.interval_id) XtRemoveTimeOut(current->clock.interval_id); if (new->clock.update && XtIsRealized((Widget) new)) new->clock.interval_id = XtAppAddTimeOut(XtWidgetToApplicationContext(gnew), fabsf(new->clock.update) * 1000, clock_tic, (XtPointer) gnew); new->clock.show_second_hand = (fabsf(new->clock.update) <= SECOND_HAND_TIME); if (new->clock.show_second_hand != current->clock.show_second_hand) redisplay = TRUE; } if (new->clock.padding != current->clock.padding) redisplay = TRUE; if (new->clock.analog24) new->clock.analog = TRUE; if (new->clock.analog != current->clock.analog) redisplay = TRUE; if (new->clock.analog24 != current->clock.analog24) redisplay = TRUE; if (new->clock.font != current->clock.font) redisplay = TRUE; #ifndef NO_I18N if (new->clock.fontSet != current->clock.fontSet) redisplay = TRUE; #endif if ((ClockFgPixel(new) != ClockFgPixel(current)) || (new->core.background_pixel != current->core.background_pixel)) { valuemask = GCForeground | GCBackground | GCFont | GCLineWidth; myXGCV.foreground = ClockFgPixel(new); myXGCV.background = new->core.background_pixel; myXGCV.font = new->clock.font->fid; myXGCV.line_width = 0; XtReleaseGC(gcurrent, current->clock.myGC); new->clock.myGC = XtGetGC(gcurrent, valuemask, &myXGCV); redisplay = TRUE; } if (new->clock.Hipixel != current->clock.Hipixel) { valuemask = GCForeground | GCLineWidth; myXGCV.foreground = new->clock.Hipixel; myXGCV.font = new->clock.font->fid; myXGCV.line_width = 0; XtReleaseGC(gcurrent, current->clock.HighGC); new->clock.HighGC = XtGetGC((Widget) gcurrent, valuemask, &myXGCV); redisplay = TRUE; } if (new->clock.Hdpixel != current->clock.Hdpixel) { valuemask = GCForeground; myXGCV.foreground = new->clock.Hdpixel; XtReleaseGC(gcurrent, current->clock.HandGC); new->clock.HandGC = XtGetGC((Widget) gcurrent, valuemask, &myXGCV); redisplay = TRUE; } if (new->core.background_pixel != current->core.background_pixel) { valuemask = GCForeground | GCLineWidth | GCGraphicsExposures; myXGCV.foreground = new->core.background_pixel; myXGCV.line_width = 0; myXGCV.graphics_exposures = False; XtReleaseGC(gcurrent, current->clock.EraseGC); new->clock.EraseGC = XtGetGC((Widget) gcurrent, valuemask, &myXGCV); redisplay = TRUE; } #ifdef XRENDER if (new->clock.face != current->clock.face) redisplay = TRUE; if (!sameColor(&new->clock.hour_color, ¤t->clock.fg_color) || !sameColor(&new->clock.hour_color, ¤t->clock.hour_color) || !sameColor(&new->clock.min_color, ¤t->clock.min_color) || !sameColor(&new->clock.sec_color, ¤t->clock.sec_color) || !sameColor(&new->clock.major_color, ¤t->clock.major_color) || !sameColor(&new->clock.minor_color, ¤t->clock.minor_color) || !sameColor(&new->clock.am_color, ¤t->clock.am_color) || !sameColor(&new->clock.pm_color, ¤t->clock.pm_color) || !sameColor(&new->clock.fixed_1_color, ¤t->clock.fixed_1_color) || !sameColor(&new->clock.fixed_2_color, ¤t->clock.fixed_2_color) || !sameColor(&new->clock.fixed_3_color, ¤t->clock.fixed_3_color)) redisplay = True; if (!sameShape(&new->clock.hour_shape, ¤t->clock.hour_shape) || !sameShape(&new->clock.min_shape, ¤t->clock.min_shape) || !sameShape(&new->clock.sec_shape, ¤t->clock.sec_shape) || !sameShape(&new->clock.major_shape, ¤t->clock.major_shape) || !sameShape(&new->clock.minor_shape, ¤t->clock.minor_shape) || !sameShape(&new->clock.am_shape, ¤t->clock.am_shape) || !sameShape(&new->clock.pm_shape, ¤t->clock.pm_shape) || !sameShape(&new->clock.fixed_1_shape, ¤t->clock.fixed_1_shape) || !sameShape(&new->clock.fixed_2_shape, ¤t->clock.fixed_2_shape) || !sameShape(&new->clock.fixed_3_shape, ¤t->clock.fixed_3_shape)) redisplay = True; if (new->clock.rotate_ampm != current->clock.rotate_ampm) redisplay = True; if (!sameZOrder(&new->clock.z_order, ¤t->clock.z_order)) redisplay = True; if (new->clock.sharp != current->clock.sharp) redisplay = True; if (new->clock.proportional != current->clock.proportional) redisplay = True; if (new->clock.render != current->clock.render) redisplay = True; if (new->clock.buffer != current->clock.buffer) { if (new->clock.pixmap) { XFreePixmap(XtDisplay(new), new->clock.pixmap); new->clock.pixmap = 0; } if (new->clock.draw) { XftDrawDestroy(new->clock.draw); new->clock.draw = NULL; } new->clock.picture = 0; } #endif return (redisplay); } #if !defined(NO_I18N) && defined(HAVE_ICONV) && defined(HAVE_NL_LANGINFO) static char * clock_to_utf8(const char *str, int in_len) { iconv_t cd; char *buf; size_t buf_size; size_t ileft, oleft; ICONV_CONST char *inptr; char *outptr; size_t ret; const char *code_set = nl_langinfo(CODESET); if (str == NULL || code_set == NULL || strcasecmp(code_set, "646") == 0) return NULL; if (strcasecmp(code_set, "UTF-8") == 0) return strdup(str); cd = iconv_open("UTF-8", code_set); if (cd == (iconv_t) - 1) return NULL; buf_size = MB_LEN_MAX * (in_len + 1); if ((buf = malloc(buf_size)) == NULL) { (void) iconv_close(cd); return NULL; } inptr = str; ileft = in_len; outptr = buf; oleft = buf_size; ret = iconv(cd, &inptr, &ileft, &outptr, &oleft); if (ret == (size_t) (-1) || oleft == 0) { free(buf); buf = NULL; } else *outptr = '\0'; (void) iconv_close(cd); return buf; } #endif