mirror of
https://github.com/morgant/mlclock.git
synced 2024-11-22 03:30:54 +00:00
452 lines
11 KiB
C
452 lines
11 KiB
C
/*
|
|
* Mlclock is "Macintsh like clock" .
|
|
* Written by Hideki Kimata.
|
|
* Send Email to hideki@hry.info.gifu-u.ac.jp.
|
|
* Access to http://www.hry.info.gifu-u.ac.jp/~hideki/index.html
|
|
*/
|
|
|
|
#include <X11/Xlib.h>
|
|
#include <X11/Xlocale.h>
|
|
#include <X11/Xutil.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <time.h>
|
|
#include <sys/time.h>
|
|
#include <unistd.h>
|
|
|
|
#define VERSION "1.1"
|
|
|
|
#define TRUE 1
|
|
#define FALSE 0
|
|
#define NONE -1
|
|
#define MAX_FORM 1000
|
|
|
|
#ifndef RCFILE
|
|
#define RCFILE ".mlclockrc"
|
|
#endif
|
|
|
|
#define FOCUS 0
|
|
#define CLICK 1
|
|
#define DEFAULTFONT "-*-*-medium-r-normal--14-*"
|
|
#define NEAR 10
|
|
#define FORM1 "(%a)%p%l:%M:%S"
|
|
#define FORM2 "(%a)%Y.%b.%d"
|
|
#define DEFAULTLANG "C"
|
|
|
|
int Mode ; /* timing of change form */
|
|
int Near ; /* the distance of activity */
|
|
int Head ; /* space of window head */
|
|
char *Form1 ; /* display form of main */
|
|
char *Form2 ; /* display form of second */
|
|
char *LocaleName ; /* locale name */
|
|
char *FSName ; /* font set name */
|
|
char *RCFile ; /* path of config file */
|
|
int Color[2][3] ; /* the color for font and background */
|
|
int Bold = False ; /* software bold font */
|
|
|
|
void SetFont( char *localename , Display *dpy , char *fsname ) ;
|
|
void readrc() ;
|
|
void getRGB( char *color , int *store ) ;
|
|
void usage( char *name ) ;
|
|
|
|
Display *dpy ;
|
|
Window win ;
|
|
XEvent eve ;
|
|
XRectangle ink, logical;
|
|
GC gc ;
|
|
XFontSet fs ;
|
|
Colormap cmap ;
|
|
|
|
struct timeval wait ;
|
|
|
|
int main( int argc , char **argv ){
|
|
char str[MAX_FORM] , str2[MAX_FORM] , *form = NULL ;
|
|
int screen , sw = False , lsec = 0 , uhead , width , height , i ;
|
|
struct tm *tmm ;
|
|
time_t tmt ;
|
|
|
|
Window root , child ;
|
|
int rootx , rooty , wx , wy ;
|
|
unsigned int key ;
|
|
XColor xcol ;
|
|
XSizeHints hint ;
|
|
int iro[2] ;
|
|
|
|
wait.tv_usec = 200000 ;
|
|
wait.tv_sec = 0 ;
|
|
|
|
str[0] = '\0' ;
|
|
i = 1 ;
|
|
while( i < argc ){
|
|
if ( !strcmp( "-display" , argv[i] )){
|
|
i++ ;
|
|
if ( argc >= argc )
|
|
usage( argv[0]) ;
|
|
strcpy( str , argv[i] ) ;
|
|
break ;
|
|
}
|
|
usage(argv[0]) ;
|
|
}
|
|
|
|
dpy = XOpenDisplay(NULL);
|
|
|
|
if ( dpy == NULL ){
|
|
fprintf( stderr , "Can't open display.\n" ) ;
|
|
exit(0) ;
|
|
}
|
|
|
|
screen = DefaultScreen( dpy ) ;
|
|
gc = DefaultGC( dpy , screen ) ;
|
|
cmap = DefaultColormap( dpy , screen ) ;
|
|
|
|
readrc() ;
|
|
|
|
if (XSupportsLocale() == False)
|
|
fprintf(stderr,"X does not support the locale\n");
|
|
SetFont( LocaleName , dpy , FSName ) ;
|
|
|
|
XSetForeground( dpy , gc , BlackPixel( dpy , screen )) ;
|
|
setlocale(LC_TIME, LocaleName );
|
|
|
|
time( &tmt ) ;
|
|
tmm = localtime( &tmt ) ;
|
|
tmm->tm_sec = 59;
|
|
tmm->tm_min = 59;
|
|
tmm->tm_hour = 23;
|
|
tmm->tm_mday = 30;
|
|
tmm->tm_yday = 365;
|
|
|
|
strftime(str, MAX_FORM, Form1 , tmm);
|
|
XmbTextExtents( fs , str , strlen(str) , &ink, &logical);
|
|
width=logical.width ;
|
|
uhead = logical.y ;
|
|
height = logical.height ;
|
|
|
|
strftime(str, MAX_FORM, Form2 , tmm);
|
|
XmbTextExtents( fs , str , strlen(str) , &ink, &logical);
|
|
if ( width < logical.width )
|
|
width = logical.width ;
|
|
if ( uhead < logical.y )
|
|
uhead = logical.y ;
|
|
if ( height < logical.height )
|
|
height = logical.height ;
|
|
|
|
xcol.flags = DoRed|DoGreen|DoBlue ;
|
|
for ( i = 0 ; i < 2 ; i ++ ){
|
|
xcol.red = Color[i][0] ;
|
|
xcol.green = Color[i][1] ;
|
|
xcol.blue = Color[i][2] ;
|
|
if ( XAllocColor( dpy , cmap , &xcol ))
|
|
iro[i] = xcol.pixel ;
|
|
else fprintf(stderr,"Can't allocate Color \n" ) ;
|
|
}
|
|
|
|
win = XCreateSimpleWindow( dpy , DefaultRootWindow( dpy ) ,
|
|
0 , 0 , width + 3 , height + Head + 2 , 0 ,
|
|
iro[0] ,iro[1] ) ;
|
|
|
|
hint.max_width = hint.min_width = width + 3 ;
|
|
hint.max_height = hint.min_height = height + Head + 2 ;
|
|
hint.flags = PMinSize | PMaxSize;
|
|
XSetNormalHints(dpy , win , &hint);
|
|
|
|
XSelectInput( dpy , win , ButtonReleaseMask ) ;
|
|
XStoreName( dpy , win , "mlclock" ) ;
|
|
XSetForeground( dpy , gc , iro[0] ) ;
|
|
XSync( dpy , 0 );
|
|
XMapWindow( dpy ,win ) ;
|
|
XSync( dpy , 0 );
|
|
|
|
str2[0] = '\0' ;
|
|
form = Form1 ;
|
|
while(1){
|
|
select( 0 , (fd_set *)0 , (fd_set *)0 , (fd_set *)0 , &wait) ;
|
|
|
|
time( &tmt ) ;
|
|
tmm = localtime( &tmt ) ;
|
|
|
|
if ( Mode == FOCUS ){
|
|
XQueryPointer( dpy , win , &root , &child , &rootx,&rooty , &wx,&wy,&key);
|
|
if (( -Near < wx ) && ( wx < width + Near ) &&
|
|
( -Near < wy ) && ( wy < height + Near + Head ))
|
|
form = Form2 ;
|
|
else
|
|
form = Form1 ; }
|
|
else
|
|
if ( Mode == CLICK ){
|
|
if( XEventsQueued( dpy, QueuedAfterFlush ) ){
|
|
XNextEvent( dpy , &eve ) ;
|
|
if ( eve.type == ButtonRelease ){
|
|
if ( !sw ){
|
|
sw = True ;
|
|
lsec = tmm->tm_sec ;
|
|
form = Form2 ;
|
|
}
|
|
else {
|
|
sw = False ;
|
|
form = Form1 ;
|
|
}
|
|
}
|
|
}
|
|
|
|
if ( sw ){
|
|
if ( tmm->tm_sec < lsec )
|
|
tmm->tm_sec += 60 ;
|
|
if ( tmm->tm_sec > lsec + 2 ){
|
|
sw = False ;
|
|
form = Form1 ;
|
|
}
|
|
}
|
|
}
|
|
|
|
strftime(str, sizeof(str),form , tmm);
|
|
if ( strcmp( str , str2 )){
|
|
XClearWindow( dpy , win ) ;
|
|
XmbDrawString( dpy , win , fs , gc, 1 , - uhead + Head + 1 , str, strlen(str));
|
|
if ( Bold )
|
|
XmbDrawString( dpy , win , fs , gc, 2 , - uhead + Head + 1 , str, strlen(str));
|
|
XSync( dpy , 0 ) ;
|
|
strcpy( str2 , str ) ;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
void SetFont( char *localename , Display *dpy , char *fsname )
|
|
{
|
|
char **miss, *def;
|
|
int nMiss;
|
|
|
|
if (setlocale(LC_ALL, localename) == NULL)
|
|
fprintf(stderr,"Can't set the locale\n");
|
|
|
|
fs = XCreateFontSet( dpy , fsname , &miss, &nMiss, &def);
|
|
if (fs == NULL)
|
|
fprintf(stderr,"Can't get fontset.\n" ) ;
|
|
}
|
|
|
|
void readrc(){
|
|
int i , end , len , sw1 , cn = 0 ;
|
|
char string[501] , work[201] , code[100] , data[100] , *ptr ;
|
|
char *fore , *back ;
|
|
struct _name {
|
|
char name[10] ;
|
|
int sw ;
|
|
} ;
|
|
|
|
FILE *file ;
|
|
|
|
struct _name N[] ={
|
|
{ "FORM1" , 1 } ,
|
|
{ "FORM2" , 2 } ,
|
|
{ "NEAR" , 3 } ,
|
|
{ "EVENT" , 4 } ,
|
|
{ "LOCALE" , 5 } ,
|
|
{ "FONTSET" , 6 } ,
|
|
{ "HEAD" , 7 } ,
|
|
{ "FONTCOLOR" , 8 } ,
|
|
{ "BACKCOLOR" , 9 } ,
|
|
{ "BOLD" , 10 } ,
|
|
{ "" , 0 }} ;
|
|
|
|
|
|
Mode = Near = Head = NONE ;
|
|
Form1 = Form2 = LocaleName = FSName = NULL ;
|
|
|
|
for ( i = 0 ; i < 3 ; i ++ ){
|
|
Color[0][i] = 0 ;
|
|
Color[1][i] = 0xffff ;
|
|
}
|
|
|
|
RCFile = malloc ( sizeof( RCFILE ) + strlen( getenv("HOME")) + 3 ) ;
|
|
sprintf( RCFile , "%s/%s",getenv("HOME"),RCFILE ) ;
|
|
|
|
if ( ( file = fopen( RCFile , "r" )) == NULL ){
|
|
fprintf( stderr , "Can't open \"%s\" file.\n" , RCFile ) ;
|
|
fprintf( stderr , "Now making rc file.\n" , RCFile ) ;
|
|
|
|
if ((file = fopen( RCFile , "a" )) == NULL )
|
|
fprintf( stderr , "You can't make rc file in your own dirctory.\n" ) ;
|
|
else{
|
|
fprintf( file , "FORM1 = \"(%%a)%%l:%%M:%%S%%p\"\n") ;
|
|
fprintf( file , "FORM2 = \"(%%a)%%b-%%d\"\n") ;
|
|
fprintf( file , "EVENT = FOCUS ; FOCUS or CLICK\n") ;
|
|
fprintf( file , "NEAR = 10\n" ) ;
|
|
fprintf( file , "LOCALE = \"C\"\n") ;
|
|
fprintf( file , "FONTSET = \"-*-*-medium-r-normal--12-*\"\n") ;
|
|
fprintf( file , "HEAD = 5\n") ;
|
|
fprintf( file , "FONTCOLOR = \"blue\"\n" ) ;
|
|
fprintf( file , "BACKCOLOR = \"white\"\n" ) ;
|
|
fprintf( file , "BOLD = FALSE ; TRUE or FALSE\n" ) ;
|
|
fclose ( file ) ;
|
|
fprintf( stderr , "Created %s file.\n" , RCFile ) ;
|
|
}
|
|
}
|
|
else
|
|
while( fgets( string , 500 , file )){
|
|
end = FALSE ;
|
|
i = 0 ;
|
|
sw1 = False ;
|
|
while( string[i] != ';' && string[i] != '\0' && string[i] != '\n' ){
|
|
if ( string[i] == '=' && sw1 == False ){
|
|
string[i] = ' ' ;
|
|
sw1 = True ;
|
|
}
|
|
work[i] = string[i++] ;
|
|
}
|
|
work[i] = '\0' ;
|
|
|
|
if ( sw1 == False )
|
|
continue ;
|
|
|
|
code[0] = '\0' ;
|
|
data[0] = '\0' ;
|
|
|
|
sscanf( work , "%s %s", code , data) ;
|
|
if ( code[0] == '\0' )
|
|
continue ;
|
|
|
|
i = 0 ;
|
|
while( True ){
|
|
if ( N[i].name[0] == '\0' ){
|
|
cn = 0 ;
|
|
break ;
|
|
}
|
|
if ( !strcmp( N[i].name , code )){
|
|
cn = N[i].sw ;
|
|
break ;
|
|
}
|
|
i ++ ;
|
|
}
|
|
|
|
switch( cn ){
|
|
case 1:
|
|
len = strlen( data ) ;
|
|
Form1 = malloc( len ) ;
|
|
strcpy( Form1 , &data[1] ) ;
|
|
Form1[len-2] = '\0' ;
|
|
break ;
|
|
case 2:
|
|
len = strlen( data ) ;
|
|
Form2 = malloc( len ) ;
|
|
strcpy( Form2 , &data[1] ) ;
|
|
Form2[len-2] = '\0' ;
|
|
break ;
|
|
case 3:
|
|
Near = atoi( data ) ;
|
|
break;
|
|
case 4:
|
|
if ( !strcmp( data , "FOCUS" )){
|
|
Mode = FOCUS ;
|
|
break ;
|
|
}
|
|
if ( !strcmp( data , "CLICK" )){
|
|
Mode = CLICK ;
|
|
break ;
|
|
}
|
|
break ;
|
|
case 5:
|
|
len = strlen( data ) ;
|
|
LocaleName = malloc( len ) ;
|
|
strcpy( LocaleName , &data[1] ) ;
|
|
LocaleName[len-2] = '\0' ;
|
|
break ;
|
|
case 6:
|
|
len = strlen( data ) ;
|
|
FSName = malloc( len ) ;
|
|
strcpy( FSName , &data[1] ) ;
|
|
FSName[len-2] = '\0' ;
|
|
break ;
|
|
case 7:
|
|
Head = atoi( data ) ;
|
|
break;
|
|
case 8:
|
|
len = strlen( data ) ;
|
|
fore = malloc( len ) ;
|
|
strcpy( fore , &data[1] ) ;
|
|
fore[len-2] = '\0' ;
|
|
getRGB( fore , Color[0] ) ;
|
|
break ;
|
|
case 9:
|
|
len = strlen( data ) ;
|
|
back = malloc( len ) ;
|
|
strcpy( back , &data[1] ) ;
|
|
back[len-2] = '\0' ;
|
|
getRGB( back , Color[1] ) ;
|
|
break ;
|
|
case 10:
|
|
if ( !strcmp( data , "TRUE" )){
|
|
Bold = True ;
|
|
break ;
|
|
}
|
|
if ( !strcmp( data , "FALSE" )){
|
|
Bold = False ;
|
|
break ;
|
|
}
|
|
break ;
|
|
default:
|
|
break ;
|
|
}
|
|
}
|
|
|
|
if ( Mode == NONE )
|
|
Mode = FOCUS ;
|
|
if ( Near == NONE )
|
|
Near = NEAR ;
|
|
if ( Head == NONE )
|
|
Head = 0 ;
|
|
if ( Form1 == NULL ){
|
|
Form1 = malloc( strlen( FORM1 ) + 1) ;
|
|
strcpy( Form1 , FORM1 ) ;
|
|
}
|
|
if ( Form2 == NULL ){
|
|
Form2 = malloc( strlen( FORM2 ) + 1) ;
|
|
strcpy( Form2 , FORM2 ) ;
|
|
}
|
|
if ( FSName == NULL ){
|
|
FSName = malloc( strlen( DEFAULTFONT ) + 1) ;
|
|
strcpy( FSName , DEFAULTFONT ) ;
|
|
}
|
|
if ( LocaleName == NULL ){
|
|
ptr = getenv( "LANG" ) ;
|
|
if ( ptr == NULL )
|
|
ptr = DEFAULTLANG ;
|
|
LocaleName = malloc( strlen( ptr ) + 1) ;
|
|
strcpy( LocaleName , ptr ) ;
|
|
}
|
|
}
|
|
|
|
void getRGB( char *color , int *store ){
|
|
int i ;
|
|
char tmpcolor[3] ;
|
|
XColor rgb , hard ;
|
|
|
|
if ( color[0] == '#' ){
|
|
color ++ ;
|
|
for ( i = 0 ; i < 3 ; i ++ ){
|
|
strncpy( tmpcolor , color , 2 ) ;
|
|
sscanf( tmpcolor , "%x" , store ) ;
|
|
(*store) *= 256 ;
|
|
color += 2 ;
|
|
}
|
|
}
|
|
else {
|
|
XLookupColor( dpy , cmap , color , &rgb , &hard ) ;
|
|
store[0] = hard.red ;
|
|
store[1] = hard.green ;
|
|
store[2] = hard.blue ;
|
|
}
|
|
}
|
|
|
|
void usage( char *name ){
|
|
printf("%s: usage\n" , name ) ;
|
|
printf(" -display display name\n\n" ) ;
|
|
printf(" Version %s\n" , VERSION );
|
|
printf(" Written by Hideki Kimata\n") ;
|
|
printf(" EMail hideki@hry.info.gifu-u.ac.jp\n" ) ;
|
|
printf(" Access to http://www.hry.info.gifu-u.ac.jp/~hideki/index.html\n" ) ;
|
|
exit(0) ;
|
|
}
|