snow/dockapps
1
0
Fork 0
Code Issues Releases Activity
dockapps/wmCalClock/Src/wmCalClock.c

1030 lines
26 KiB
C
Raw Normal View History

Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
/*
*
* wmCalClock-1.25 (C) 1998, 1999 Mike Henderson (mghenderson@lanl.gov)
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* - Its a Calendar Clock....
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
*
*
*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2, or (at your option)
* any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program (see the file COPYING); if not, write to the
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
Mass update FSF address Signed-off-by: Alexey I. Froloff <raorn@raorn.name>
2012-06-05 17:20:27 +00:00
* Boston, MA 02110-1301 USA
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
*
*
* Changes:
*
* Version 1.25 - released July 2, 1999.
* Some optimization + ignores double click if no command set (patch from
* Robert Horn).
*
* Version 1.24 - released March 27, 1999.
* Added support for additional fonts for time field;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* -tekton for Tekton
* -arial for Arial (Helvetica) (this is the same font as usual)
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
* -luggerbug for LuggerBug
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* -comicsans for ComicSans
* -jazz for JazzPoster
*
* Different width fonts get used depending on whether or not seconds
* are displayed.
*
* Version 1.23 - released March 20, 1999.
* Switched from wmgeneral.c stuff to xutils.c (a more stripped down version
* of wmgeneral).
* Centered Calendar text better.
* Added command line options and code to change colors of the time
* field digits and the background of the time field. So now you can
* get things like darkblue on light grey or very dark color on an LCD-ish
* colored background (e.g. wmCalClock -bc #6e9e69 -tc #001100)..
* Rewrote the command line parsing routine.
*
* Version 1.21 - released February 4, 1999.
* cosmetic for AfterStep users. removed spurious black line at RHS edge of mask.
*
* Version 1.20 - released January 14, 1999.
* Changed support for LowColor Pixmap. Now, check for Depth
* automatically. If its <= 8, then use LowColor.
*
*
* Version 1.11 - released January 8, 1999.
* Fixed bug in 12-hour mode. Now displays 12:xx:xx AM instead
* of 0:xx:xx AM.
*
*
* Version 1.10 - released January 7, 1999.
* Added support for LowColor Pixmap. (21 colors may still be a
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
* bit high, but the poor saps with 8-bit displays can at least run
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* it now.)
*
* Version 1.02 - released January 7, 1999.
* Fixed bug in AM/PM determination...
*
* Version 1.01 - released January 3, 1999.
* Added "-S" option to inhibit drawing of seconds.
*
* Version 1.00 - released December 16, 1998.
*
*
*/
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
* Includes
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
*/
#include <stdio.h>
#include <unistd.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <X11/X.h>
#include <X11/xpm.h>
#include "xutils.h"
#include "wmCalClock_master.xpm"
#include "wmCalClock_master_LowColor.xpm"
#include "wmCalClock_mask.xbm"
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
* Delay between refreshes (in microseconds)
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
*/
#define DELAY 10000L
#define WMCALCLOCK_VERSION "1.25"
void ParseCMDLine(int argc, char *argv[]);
void ButtonPressEvent(XButtonEvent *);
void print_usage();
int xsMonth[12] = { 150, 170, 190, 212, 233, 256, 276, 294, 317, 337, 357, 380 };
int xeMonth[12] = { 168, 188, 210, 231, 254, 275, 292, 314, 335, 355, 377, 398 };
int xdMonth[12];
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
int yMonth = 80;
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
int ydMonth = 13;
int xsDayOfWeek[7] = { 293, 150, 177, 201, 228, 253, 271 };
int xeDayOfWeek[7] = { 314, 175, 199, 226, 250, 269, 290 };
int xdDayOfWeek[7];
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
int yDayOfWeek = 95;
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
int ydDayOfWeek = 13;
/*
* I think this is 28??-pixel high adobe-myriad-bold
*/
int xsDayOfMonth[31] = { 118, 161, 205, 248, 291, 335, 378, 421, 465,
75, 118, 162, 205, 248, 292, 335, 378, 422, 465,
75, 118, 162, 205, 248, 292, 335, 378, 422, 465,
75, 118 };
/*
* I think this is 16-pixel high adobe-myriad-bold?
*/
int xeDayOfMonth[31] = { 147, 193, 236, 282, 324, 368, 411, 454, 498,
107, 146, 192, 235, 281, 323, 367, 410, 453, 497,
108, 147, 193, 236, 282, 324, 368, 411, 454, 498,
108, 147 };
int xeDayOfMonth2[31] = { 144, 190, 234, 278, 320, 365, 407, 451, 494,
103, 143, 189, 233, 277, 319, 364, 406, 450, 493,
104, 144, 190, 234, 278, 320, 365, 407, 451, 494,
104, 144 };
/*
* I think this is 16-pixel high adobe-myriad-bold?
*/
int yDayOfMonth[31] = { 5, 5, 5, 5, 5, 5, 5, 5, 5,
30, 30, 30, 30, 30, 30, 30, 30, 30, 30,
55, 55, 55, 55, 55, 55, 55, 55, 55, 55,
80, 80 };
int xdDayOfMonth[31];
int xdDayOfMonth2[31];
int ydDayOfMonth = 23;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* Luggerbug Font Narrow - 13 pixels high.
*/
int xsDigits_Luggerbug13n[11] = { 75, 84, 92, 101, 110, 119, 127, 136, 143, 151, 159 };
int xeDigits_Luggerbug13n[11] = { 80, 89, 97, 106, 115, 123, 132, 139, 147, 156, 159 };
int xdDigits_Luggerbug13n[11];
int yDigits_Luggerbug13n = 150;
int ydDigits_Luggerbug13n = 13;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* Luggerbug Font - 13 pixels high.
*/
int xsDigits_Luggerbug13[11] = { 75, 89, 103, 117, 131, 146, 159, 172, 184, 197, 208 };
int xeDigits_Luggerbug13[11] = { 83, 97, 110, 125, 139, 153, 166, 178, 191, 205, 209 };
int xdDigits_Luggerbug13[11];
int yDigits_Luggerbug13 = 136;
int ydDigits_Luggerbug13 = 13;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* ComicSans Font - 12 pixels high.
*/
int xsDigits_ComicSans12n[11] = { 338, 349, 359, 370, 380, 390, 401, 411, 422, 432, 444 };
int xeDigits_ComicSans12n[11] = { 343, 353, 364, 374, 385, 396, 406, 417, 427, 438, 445 };
int xdDigits_ComicSans12n[11];
int yDigits_ComicSans12n = 123;
int ydDigits_ComicSans12n = 12;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* ComicSans Font - 11 pixels high.
*/
int xsDigits_ComicSans11[11] = { 338, 353, 366, 380, 392, 407, 420, 434, 448, 461, 471 };
int xeDigits_ComicSans11[11] = { 345, 357, 372, 386, 400, 413, 427, 441, 454, 468, 473 };
int xdDigits_ComicSans11[11];
int yDigits_ComicSans11 = 111;
int ydDigits_ComicSans11 = 11;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* JazzPoster Font Narrow - 12 pixels high.
*/
int xsDigits_JazzPoster12n[11] = { 211, 220, 226, 233, 241, 249, 256, 263, 271, 278, 286 };
int xeDigits_JazzPoster12n[11] = { 217, 223, 231, 238, 247, 253, 261, 268, 276, 284, 286 };
int xdDigits_JazzPoster12n[11];
int yDigits_JazzPoster12n = 122;
int ydDigits_JazzPoster12n = 12;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* JazzPoster Font - 12 pixels high.
*/
int xsDigits_JazzPoster12[11] = { 211, 225, 234, 246, 258, 271, 282, 293, 305, 317, 328 };
int xeDigits_JazzPoster12[11] = { 221, 230, 243, 254, 268, 278, 290, 301, 314, 325, 329 };
int xdDigits_JazzPoster12[11];
int yDigits_JazzPoster12 = 109;
int ydDigits_JazzPoster12 = 12;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* Tekton Font - 12 pixels high Narrow (13 pixels high actually).
*/
int xsDigits_Tekton12n[11] = { 75, 84, 90, 97, 105, 114, 122, 131, 138, 147, 156 };
int xeDigits_Tekton12n[11] = { 81, 86, 94, 103, 111, 119, 128, 135, 144, 152, 157 };
int xdDigits_Tekton12n[11];
int yDigits_Tekton12n = 122;
int ydDigits_Tekton12n = 13;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* Tekton Font - 12 pixels high.
*/
int xsDigits_Tekton12[11] = { 75, 89, 98, 111, 124, 137, 150, 164, 176, 191, 205 };
int xeDigits_Tekton12[11] = { 84, 92, 105, 119, 132, 145, 159, 171, 185, 199, 206 };
int xdDigits_Tekton12[11];
int yDigits_Tekton12 = 108;
int ydDigits_Tekton12 = 12;
/*
* Monotype-arial-bold-narrow - 10 pixels high.
*/
int xsDigits_Arial10[11] = { 320, 326, 333, 339, 346, 352, 358, 364, 371, 377, 384 };
int xeDigits_Arial10[11] = { 325, 331, 338, 344, 351, 357, 363, 369, 376, 382, 385 };
int xdDigits_Arial10[11];
int yDigits_Arial10 = 95;
int ydDigits_Arial10 = 10;
int xsDigits[11];
int xeDigits[11];
int xdDigits[11];
int yDigits;
int ydDigits;
int xsAMPM[2] = { 390, 396 };
int xeAMPM[2] = { 394, 400 };
int xdAMPM[2];
int yAMPM = 95;
int ydAMPM = 6;
int Show24HourTime = 0;
int ShowGreenwichTime = 0;
int ShowSiderealTime = 0;
double Longitude;
int Flag = 0;
int Beep = 0;
int Volume = 100;
int ShowSeconds = 1;
int UseLowColorPixmap = 0;
int UseArial = 0;
int UseComicSans = 0;
int UseTekton = 0;
int UseLuggerbug = 0;
int UseJazzPoster = 0;
int GotFirstClick1, GotDoubleClick1;
int GotFirstClick2, GotDoubleClick2;
int GotFirstClick3, GotDoubleClick3;
int DblClkDelay;
int HasExecute = 0; /* controls perf optimization */
char ExecuteCommand[1024];
char TimeColor[30] = "#ffff00";
char BackgroundColor[30] = "#181818";
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
* main
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
*/
int main(int argc, char *argv[]) {
struct tm *Time;
XEvent event;
int i, n, wid, extrady, extradx;
int Year, Month, DayOfWeek, DayOfMonth, OldDayOfMonth;
int Hours, Mins, Secs, OldSecs, digit, xoff, D[10], xsize;
long CurrentLocalTime;
double UT, TU, TU2, TU3, T0, gmst, jd(), hour24();
/*
* Parse any command line arguments.
*/
ParseCMDLine(argc, argv);
/*
* Set the font
*/
if (UseTekton && !ShowSeconds){
for (i=0; i<11; ++i) xsDigits[i] = xsDigits_Tekton12[i];
for (i=0; i<11; ++i) xeDigits[i] = xeDigits_Tekton12[i];
for (i=0; i<11; ++i) xdDigits[i] = xdDigits_Tekton12[i];
yDigits = yDigits_Tekton12;
ydDigits = ydDigits_Tekton12;
extrady = -1;
extradx = 0;
} else if (UseTekton && ShowSeconds){
for (i=0; i<11; ++i) xsDigits[i] = xsDigits_Tekton12n[i];
for (i=0; i<11; ++i) xeDigits[i] = xeDigits_Tekton12n[i];
for (i=0; i<11; ++i) xdDigits[i] = xdDigits_Tekton12n[i];
yDigits = yDigits_Tekton12n;
ydDigits = ydDigits_Tekton12n;
extrady = -2;
extradx = 1;
} else if (UseLuggerbug && !ShowSeconds){
for (i=0; i<11; ++i) xsDigits[i] = xsDigits_Luggerbug13[i];
for (i=0; i<11; ++i) xeDigits[i] = xeDigits_Luggerbug13[i];
for (i=0; i<11; ++i) xdDigits[i] = xdDigits_Luggerbug13[i];
yDigits = yDigits_Luggerbug13;
ydDigits = ydDigits_Luggerbug13;
extrady = -2;
extradx = 1;
} else if (UseLuggerbug && ShowSeconds){
for (i=0; i<11; ++i) xsDigits[i] = xsDigits_Luggerbug13n[i];
for (i=0; i<11; ++i) xeDigits[i] = xeDigits_Luggerbug13n[i];
for (i=0; i<11; ++i) xdDigits[i] = xdDigits_Luggerbug13n[i];
yDigits = yDigits_Luggerbug13n;
ydDigits = ydDigits_Luggerbug13n;
extrady = -2;
extradx = 1;
} else if (UseComicSans && !ShowSeconds){
for (i=0; i<11; ++i) xsDigits[i] = xsDigits_ComicSans11[i];
for (i=0; i<11; ++i) xeDigits[i] = xeDigits_ComicSans11[i];
for (i=0; i<11; ++i) xdDigits[i] = xdDigits_ComicSans11[i];
yDigits = yDigits_ComicSans11;
ydDigits = ydDigits_ComicSans11;
extrady = -1;
extradx = 1;
} else if (UseComicSans && ShowSeconds){
for (i=0; i<11; ++i) xsDigits[i] = xsDigits_ComicSans12n[i];
for (i=0; i<11; ++i) xeDigits[i] = xeDigits_ComicSans12n[i];
for (i=0; i<11; ++i) xdDigits[i] = xdDigits_ComicSans12n[i];
yDigits = yDigits_ComicSans12n;
ydDigits = ydDigits_ComicSans12n;
extrady = -1;
extradx = 1;
} else if (UseJazzPoster && !ShowSeconds){
for (i=0; i<11; ++i) xsDigits[i] = xsDigits_JazzPoster12[i];
for (i=0; i<11; ++i) xeDigits[i] = xeDigits_JazzPoster12[i];
for (i=0; i<11; ++i) xdDigits[i] = xdDigits_JazzPoster12[i];
yDigits = yDigits_JazzPoster12;
ydDigits = ydDigits_JazzPoster12;
extrady = -1;
extradx = 0;
} else if (UseJazzPoster && ShowSeconds){
for (i=0; i<11; ++i) xsDigits[i] = xsDigits_JazzPoster12n[i];
for (i=0; i<11; ++i) xeDigits[i] = xeDigits_JazzPoster12n[i];
for (i=0; i<11; ++i) xdDigits[i] = xdDigits_JazzPoster12n[i];
yDigits = yDigits_JazzPoster12n;
ydDigits = ydDigits_JazzPoster12n;
extrady = -1;
extradx = 1;
} else {
for (i=0; i<11; ++i) xsDigits[i] = xsDigits_Arial10[i];
for (i=0; i<11; ++i) xeDigits[i] = xeDigits_Arial10[i];
for (i=0; i<11; ++i) xdDigits[i] = xdDigits_Arial10[i];
yDigits = yDigits_Arial10;
ydDigits = ydDigits_Arial10;
extrady = 0;
extradx = 0;
}
/*
* Compute widths of digits etc...
* Should hand-encode for efficiency, but its easier to do this for development...
*/
for (i=0; i<12; ++i) xdMonth[i] = xeMonth[i] - xsMonth[i] + 1;
for (i=0; i<7; ++i) xdDayOfWeek[i] = xeDayOfWeek[i] - xsDayOfWeek[i] + 1;
for (i=0; i<31; ++i) xdDayOfMonth[i] = xeDayOfMonth[i] - xsDayOfMonth[i] + 1;
for (i=0; i<31; ++i) xdDayOfMonth2[i] = xeDayOfMonth2[i] - xsDayOfMonth[i] + 1;
for (i=0; i<11; ++i) xdDigits[i] = xeDigits[i] - xsDigits[i] + 1;
for (i=0; i<2; ++i) xdAMPM[i] = xeAMPM[i] - xsAMPM[i] + 1;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
initXwindow(argc, argv);
if (DisplayDepth <= 8) UseLowColorPixmap = 1;
if (UseLowColorPixmap)
openXwindow(argc, argv, wmCalClock_master_LowColor, wmCalClock_mask_bits, wmCalClock_mask_width, wmCalClock_mask_height);
else
openXwindow(argc, argv, wmCalClock_master, wmCalClock_mask_bits, wmCalClock_mask_width, wmCalClock_mask_height);
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
/*
* Loop until we die
*/
n = 32000;
OldDayOfMonth = -1;
OldSecs = -1;
while(1) {
/*
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
* Only process every 10th cycle of this loop. We run it faster
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* to catch expose events, etc...
*
*/
if ( HasExecute == 0 || n>10){
n = 0;
if (ShowGreenwichTime){
CurrentLocalTime = time(CurrentTime);
Time = gmtime(&CurrentLocalTime);
DayOfMonth = Time->tm_mday-1;
DayOfWeek = Time->tm_wday;
Month = Time->tm_mon;
Hours = Time->tm_hour;
Mins = Time->tm_min;
Secs = Time->tm_sec;
} else if (ShowSiderealTime){
Show24HourTime = 1;
CurrentLocalTime = time(CurrentTime);
Time = gmtime(&CurrentLocalTime);
DayOfMonth = Time->tm_mday-1;
DayOfWeek = Time->tm_wday;
Year = Time->tm_year + 1900; /* this is NOT a Y2K bug */
Month = Time->tm_mon;
Hours = Time->tm_hour;
Mins = Time->tm_min;
Secs = Time->tm_sec;
UT = (double)Hours + (double)Mins/60.0 + (double)Secs/3600.0;
/*
* Compute Greenwich Mean Sidereal Time (gmst)
* The TU here is number of Julian centuries
* since 2000 January 1.5
* From the 1996 astronomical almanac
*/
TU = (jd(Year, Month+1, DayOfMonth+1, 0.0) - 2451545.0)/36525.0;
TU2 = TU*TU;
TU3 = TU2*TU;
T0 = (6.0 + 41.0/60.0 + 50.54841/3600.0) + 8640184.812866/3600.0*TU
+ 0.093104/3600.0*TU2 - 6.2e-6/3600.0*TU3;
gmst = hour24(hour24(T0) + UT*1.002737909 + Longitude/15.0);
Hours = (int)gmst;
gmst = (gmst - (double)Hours)*60.0;
Mins = (int)gmst;
gmst = (gmst - (double)Mins)*60.0;
Secs = (int)gmst;
} else {
CurrentLocalTime = time(CurrentTime);
Time = localtime(&CurrentLocalTime);
DayOfMonth = Time->tm_mday-1;
DayOfWeek = Time->tm_wday;
Month = Time->tm_mon;
Hours = Time->tm_hour;
Mins = Time->tm_min;
Secs = Time->tm_sec;
}
/*
* Flag indicates AM (Flag=0) or PM (Flag=1)
*/
if (!Show24HourTime){
Flag = (Hours >= 12) ? 1 : 0;
if (Hours == 0)
Hours = 12;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
else
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
Hours = (Hours > 12) ? Hours-12 : Hours;
}
/*
* Blank the HH:MM section....
*/
xsize = 0;
/* dont show leading zeros */
if ((digit = Hours / 10) > 0){
D[0] = digit, xsize += (xdDigits[digit]+1);
} else{
D[0] = -1;
}
digit = Hours % 10, D[1] = digit, xsize += (xdDigits[digit]+1);
digit = 10, D[2] = digit, xsize += (xdDigits[digit]+1);
digit = Mins / 10, D[3] = digit, xsize += (xdDigits[digit]+1);
digit = Mins % 10, D[4] = digit, xsize += (xdDigits[digit]+1);
if (ShowSeconds){
digit = 10, D[5] = digit, xsize += (xdDigits[digit]+1);
digit = Secs / 10, D[6] = digit, xsize += (xdDigits[digit]+1);
digit = Secs % 10, D[7] = digit, xsize += (xdDigits[digit]);
}
xoff = ((Hours>9)&&(!Show24HourTime)&&(ShowSeconds)) ? 28 - xsize/2 : 31 - xsize/2;
copyXPMArea(5, 110, 54, 15, 5, 5);
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* Draw Hours
*/
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
/* dont show leading zeros */
if (D[0] > -1){
digit = D[0];
copyXPMArea(xsDigits[digit], yDigits, xdDigits[digit], ydDigits, xoff+extradx, 7+extrady);
xoff += (xdDigits[digit]+1);
}
digit = D[1];
copyXPMArea(xsDigits[digit], yDigits, xdDigits[digit], ydDigits, xoff+extradx, 7+extrady);
xoff += (xdDigits[digit]+1);
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* Draw Colon
*/
digit = 10;
copyXPMArea(xsDigits[digit], yDigits, xdDigits[digit], ydDigits, xoff+extradx, 7+extrady);
xoff += (xdDigits[digit]+1);
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* Draw Minutes
*/
digit = D[3];
copyXPMArea(xsDigits[digit], yDigits, xdDigits[digit], ydDigits, xoff+extradx, 7+extrady);
xoff += (xdDigits[digit]+1);
digit = D[4];
copyXPMArea(xsDigits[digit], yDigits, xdDigits[digit], ydDigits, xoff+extradx, 7+extrady);
xoff += (xdDigits[digit]+1);
if (ShowSeconds){
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* Draw Colon
*/
digit = 10;
copyXPMArea(xsDigits[digit], yDigits, xdDigits[digit], ydDigits, xoff+extradx, 7+extrady);
xoff += (xdDigits[digit]+1);
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* Draw Seconds
*/
digit = D[6];
copyXPMArea(xsDigits[digit], yDigits, xdDigits[digit], ydDigits, xoff+extradx, 7+extrady);
xoff += (xdDigits[digit]+1);
digit = D[7];
copyXPMArea(xsDigits[digit], yDigits, xdDigits[digit], ydDigits, xoff+extradx, 7+extrady);
xoff += (xdDigits[digit]+3);
}
/*
* Draw AM/PM indicator if we are using 12 Hour Clock.
* Dont show it if we are using 24 Hour Clock.
*/
if (!Show24HourTime)
copyXPMArea(xsAMPM[Flag], yAMPM, xdAMPM[Flag], ydAMPM, 54, 5);
/*
* Beep on the hour
*/
if (Beep){
if ((Mins == 0)&&(Secs == 0)&&(OldSecs != Secs)) XBell(display, Volume);
OldSecs = Secs;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
}
if (OldDayOfMonth != DayOfMonth){
/*
* Blank the Calendar section....
*/
copyXPMArea(5, 70, 54, 35, 5, 24);
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* Draw Day of Week and Month
*/
wid = xdDayOfWeek[DayOfWeek] + xdMonth[Month] + 1;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
copyXPMArea(xsDayOfWeek[DayOfWeek], yDayOfWeek, xdDayOfWeek[DayOfWeek],
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
ydMonth, 33-wid/2, 64-24-4-12);
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
copyXPMArea(xsMonth[Month], yMonth, xdMonth[Month],
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
ydMonth, 33-wid/2+xdDayOfWeek[DayOfWeek]+1, 64-24-4-12);
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* Draw Day of Month
*/
copyXPMArea(xsDayOfMonth[DayOfMonth], yDayOfMonth[DayOfMonth], xdDayOfMonth[DayOfMonth], ydDayOfMonth, 32-xdDayOfMonth2[DayOfMonth]/2, 36);
}
OldDayOfMonth = DayOfMonth;
} else {
/*
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
* Update the counter.
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
*/
++n;
}
/*
* Double Click Delays
* Keep track of click events. If Delay too long, set GotFirstClick's to False.
*/
if (DblClkDelay > 15) {
DblClkDelay = 0;
GotFirstClick1 = 0; GotDoubleClick1 = 0;
GotFirstClick2 = 0; GotDoubleClick2 = 0;
GotFirstClick3 = 0; GotDoubleClick3 = 0;
} else {
++DblClkDelay;
}
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
* Process any pending X events.
*/
while(XPending(display)){
XNextEvent(display, &event);
switch(event.type){
case Expose:
RedrawWindow();
break;
case ButtonPress:
ButtonPressEvent(&event.xbutton);
break;
case ButtonRelease:
break;
}
}
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
* Redraw and wait for next update
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
*/
RedrawWindow();
if( HasExecute == 1) {
usleep(DELAY);
} else if( ShowSeconds == 1) {
usleep( 200000L);
} else {
usleep( 500000L);
}
}
}
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
/*
* ParseCMDLine()
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
*/
void ParseCMDLine(int argc, char *argv[]) {
int i;
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
for (i = 1; i < argc; i++) {
if (!strcmp(argv[i], "-display")){
++i;
} else if (!strcmp(argv[i], "-jazz")){
UseJazzPoster = 1;
} else if (!strcmp(argv[i], "-arial")){
UseArial = 1;
} else if (!strcmp(argv[i], "-tekton")){
UseTekton = 1;
} else if (!strcmp(argv[i], "-luggerbug")){
UseLuggerbug = 1;
} else if (!strcmp(argv[i], "-comicsans")){
UseComicSans = 1;
} else if (!strcmp(argv[i], "-tc")){
if ((i+1 >= argc)||(argv[i+1][0] == '-')) {
fprintf(stderr, "wmCalClock: No color found\n");
print_usage();
exit(-1);
}
strcpy(TimeColor, argv[++i]);
} else if (!strcmp(argv[i], "-bc")){
if ((i+1 >= argc)||(argv[i+1][0] == '-')) {
fprintf(stderr, "wmCalClock: No color found\n");
print_usage();
exit(-1);
}
strcpy(BackgroundColor, argv[++i]);
} else if (!strcmp(argv[i], "-24")){
Show24HourTime = 1;
} else if (!strcmp(argv[i], "-b")){
if ((i+1 >= argc)||(argv[i+1][0] == '-')) {
fprintf(stderr, "wmCalClock: No volume given\n");
print_usage();
exit(-1);
}
Beep = 1;
Volume = atoi(argv[++i]);
} else if (!strcmp(argv[i], "-e")){
if ((i+1 >= argc)||(argv[i+1][0] == '-')) {
fprintf(stderr, "wmCalClock: No command given\n");
print_usage();
exit(-1);
}
strcpy(ExecuteCommand, argv[++i]);
HasExecute = 1;
} else if (!strcmp(argv[i], "-g")){
ShowGreenwichTime = 1;
} else if (!strcmp(argv[i], "-S")){
ShowSeconds = 0;
} else if (!strcmp(argv[i], "-s")){
ShowSiderealTime = 1;
Longitude = 0.0;
} else if (!strcmp(argv[i], "-L")){
if ((i+1 >= argc)||(argv[i+1][0] == '-')) {
fprintf(stderr, "wmCalClock: No longitude given\n");
print_usage();
exit(-1);
}
ShowSiderealTime = 1;
Longitude = atof(argv[++i]);
} else if (!strcmp(argv[i], "-l")){
UseLowColorPixmap = 1;
} else {
print_usage();
exit(1);
}
}
Remove trailing whitespace.
2014-10-05 15:29:59 +00:00
if (!ShowSeconds && !UseArial && !UseJazzPoster
Initial dockapps git repo I tried to get the latest versions from dockapps.org, but I haven't tested any of them. More dockapps will be added as time permits.
2011-03-25 18:45:13 +00:00
&& !UseComicSans && !UseLuggerbug) UseTekton = 1;
}
void print_usage(){
printf("\nwmCalClock version: %s\n", WMCALCLOCK_VERSION);
printf("\nusage: wmCalClock [-b <Volume>] [-tc <Color>] [-bc <Color>] [-e \"Command\"] [-S]\n");
printf(" [-24] [-g] [-s] [-l <longitude>] [-l] [-jazz] [-tekton] [-luggerbug]\n");
printf(" [-arial] [-comicsans] [-h]\n\n");
printf("\t-b <Volume>\tBeep on the hour. Volume is between -100 to 100.\n");
printf("\t-tekton\t\tUse the Tekton font for time field.\n");
printf("\t-arial\t\tUse the Arial-Narrow (i.e. Helvetica-Narrow) font for time field.\n");
printf("\t-jazz\t\tUse the JazzPoster font for time field.\n");
printf("\t-luggerbug\tUse the Luggerbug font for time field.\n");
printf("\t-comicsans\tUse the ComicSans font for time field.\n");
printf("\t-tc <Color>\tColor of the time digits (e.g. red or #ff8800).\n");
printf("\t-bc <Color>\tBackground color.\n");
printf("\t-e \"Command\"\tCommand to execute via double click of mouse button 1.\n");
printf("\t-S\t\tDo not show seconds.\n");
printf("\t-24\t\tShow 24-hour time. Default is 12 hour AM/PM Time.\n");
printf("\t-g\t\tShow Greenwich time.\n");
printf("\t-s\t\tShow Greenwich Mean Sidereal Time (GMST) in 24-hour format. \n");
printf("\t-L <Longitude>\tShow Local Sidereal Time (LST) in 24-hour format. \n");
printf("\t \t\tLongitude is in degrees (- for West + for East).\n");
printf("\t-l\t\tUse a low-color pixmap to conserve colors. On 8-bit displays the\n");
printf("\t \t\tlow color pixmap will always be used.\n");
printf("\t-h\t\tDisplay help screen.\n");
printf("\nExample: wmCalClock -b 100 -tc #001100 -bc #7e9e69 \n\n");
}
/*
* Compute the Julian Day number for the given date.
* Julian Date is the number of days since noon of Jan 1 4713 B.C.
*/
double jd(ny, nm, nd, UT)
int ny, nm, nd;
double UT;
{
double A, B, C, D, JD, day;
day = nd + UT/24.0;
if ((nm == 1) || (nm == 2)){
ny = ny - 1;
nm = nm + 12;
}
if (((double)ny+nm/12.0+day/365.25)>=(1582.0+10.0/12.0+15.0/365.25)){
A = ((int)(ny / 100.0));
B = 2.0 - A + (int)(A/4.0);
}
else{
B = 0.0;
}
if (ny < 0.0){
C = (int)((365.25*(double)ny) - 0.75);
}
else{
C = (int)(365.25*(double)ny);
}
D = (int)(30.6001*(double)(nm+1));
JD = B + C + D + day + 1720994.5;
return(JD);
}
double hour24(hour)
double hour;
{
int n;
if (hour < 0.0){
n = (int)(hour/24.0) - 1;
return(hour-n*24.0);
}
else if (hour > 24.0){
n = (int)(hour/24.0);
return(hour-n*24.0);
}
else{
return(hour);
}
}
/*
* This routine handles button presses.
*
* Double click on
* Mouse Button 1: Execute the command defined in the -e command-line option.
* Mouse Button 2: No action assigned.
* Mouse Button 3: No action assigned.
*
*
*/
void ButtonPressEvent(XButtonEvent *xev){
char Command[512];
if( HasExecute == 0) return; /* no command specified. Ignore clicks. */
DblClkDelay = 0;
if ((xev->button == Button1) && (xev->type == ButtonPress)){
if (GotFirstClick1) GotDoubleClick1 = 1;
else GotFirstClick1 = 1;
} else if ((xev->button == Button2) && (xev->type == ButtonPress)){
if (GotFirstClick2) GotDoubleClick2 = 1;
else GotFirstClick2 = 1;
} else if ((xev->button == Button3) && (xev->type == ButtonPress)){
if (GotFirstClick3) GotDoubleClick3 = 1;
else GotFirstClick3 = 1;
}
/*
* We got a double click on Mouse Button1 (i.e. the left one)
*/
if (GotDoubleClick1) {
GotFirstClick1 = 0;
GotDoubleClick1 = 0;
sprintf(Command, "%s &", ExecuteCommand);
system(Command);
}
/*
* We got a double click on Mouse Button2 (i.e. the left one)
*/
if (GotDoubleClick2) {
GotFirstClick2 = 0;
GotDoubleClick2 = 0;
}
/*
* We got a double click on Mouse Button3 (i.e. the left one)
*/
if (GotDoubleClick3) {
GotFirstClick3 = 0;
GotDoubleClick3 = 0;
}
return;
}
Reference in a new issue Copy permalink