/* * $Header: calentool.c,v 2.6 91/05/13 09:17:52 billr Exp $ */ /* * calentool.c * * calentool - a year/month/week/day-at-a-glance calendar for Sun workstations. * * Author: Philip Heller, Sun Microsystems. Inc. * * Original source Copyright (C) 1987, Sun Microsystems, Inc. * All Rights Reserved * Permission is hereby granted to use and modify this program in source * or binary form as long as it is not sold for profit and this copyright * notice remains intact. * * * Changes/additions by: Bill Randle, Tektronix, Inc. * * Changes and additions Copyright (C) 1988, 1989, 1991 Tektronix, Inc. * All Rights Reserved * Permission is hereby granted to use and modify the modifications in source * or binary form as long as they are not sold for profit and this copyright * notice remains intact. */ #include /* #include #include #include #include #include #include #include #include #include #include #include #include #include */ #include //#include #include #include #include "ct.h" /* amiga includes */ #include #include #include #include #include "awindows.h" struct Library *GadToolsBase, *GfxBase; struct IntuitionBase *IntuitionBase; struct IntuiMessage *Msg; struct RastPort *WindRPort; // extern Xv_Font font, sfont; extern char tmpapts_pathname[160]; /* AMIGA: former extern */ extern char apts_pathname[160]; /* AMIGA: former extern */ extern char clockstr[]; extern char *smonthnames[]; char *Version = "$VER: ACalentool 0.80"; struct month_coords MCord; /* extern Panel_item clock_pi; extern Frame fframe; extern Panel panel; */ extern int day_is_open; #ifndef NO_SUN_MOON // extern Frame sframe; #endif // Frame frame = 0; struct tm today, current; struct tm First, Last; struct tm olddate, closedate; int mainsw_state, selected_type; int x_coord, y_coord, startx, starty; int read_only; int nr_weekdays=7, dayslot_width, day_message_size, n_tslots, n_slots; int week_message_size, weekslot_width=85, weekslot_height=12, dayslot_height; int ybox_height, ybox_width; int lastSlot; /* last active slot */ struct dayslot *slots; struct rect_limits boxlims[31]; struct rect_limits mboxlims[12]; struct week_arrow week_arrows[6]; struct weekrect week_boxes[7]; // Rect *closed_rect, image_rect, label_rect; char *mailto = NULL; int one_based = 0, new_entry = 0, version2 = 0; int otherfile = 0; char *othername; int beep = 0, show_time = 0, beep_open = 0; int include_old = 0, save_old = 0; #ifndef NO_HOLIDAYS int holiday_a = 0, holiday_c = 0, holiday_i = 0; int holiday_j = 0, holiday_s = 0; #endif char *progname; //struct itimerval cal_timer; int update_interval = 0; int show_future = 1; /* Server_image year_cursor_image, month_cursor_image; Server_image week_cursor_image, day_cursor_image, wait_cursor_image; Xv_Cursor year_cursor, month_cursor, week_cursor, day_cursor; Xv_Cursor wait_cursor; */ char orig_apts_pathname[160]; int orig_ro; char timestr[16], datestr_day[3]; char printer[64]; // struct pr_prpos where; int working_msg; int hour24=1, monday_first=1, day_first=1; int expire_days = 0; int start_hour=8, end_hour=18, num_notes=5; int print_dev = PR_DEFAULT; int appt_check_limit, week_ofs = 0; int locked = 0; int limitcheck = -1; #define DAY 1 #define WEEK 2 #define MONTH 3 #define YEAR 4 int act_wind = DAY; /* Seln_client s_client; Xv_server server; Display *mydisplay; Drawable drawable, drawable2; int screen; GC gc, gcc, gccs; XGCValues gc_val; unsigned long foregr, backgr; XFontStruct *xfont; Window m_root; Pixmap iconPixmap, icon, rev_icon, na_icon; int m_x, m_y; unsigned int m_width, m_height; unsigned int m_border, m_depth; unsigned int g_width, g_height; XClassHint WMClassHints; XWMHints *myWMHints; XPoint ilabel = {0, 74}; XSetWindowAttributes frame_xattr; Colormap def_cmap; XColor def_color; Xv_singlecolor ct_back, ct_fore; Defaults_pairs holiday_pairs[] = { {"all",1}, {"day",2}, {NULL,0} }; Defaults_pairs displayMode_pairs[] = { {"day",DISPLAYING_DAY}, {"week",DISPLAYING_WEEK}, {"month",DISPLAYING_MONTH}, {"year",DISPLAYING_YEAR}, {NULL,DISPLAYING_DAY} }; int xposition, yposition; XSizeHints sizehints; XWindowAttributes attr; XSetWindowAttributes icon_attr; Window icon_window; char userStdPixmap[256] = "\0"; char userNapPixmap[256] = "\0"; char userRevPixmap[256] = "\0"; #include "std_icon.xbm" #include "rev_icon.xbm" #include "nap_icon.xbm" static short year_cursor_data[] = { #include "year.cursor" }; static short month_cursor_data[] = { #include "month.cursor" }; static short week_cursor_data[] = { #include "week.cursor" }; static short day_cursor_data[] = { #include "day.cursor" }; static short wait_cursor_data[] = { #include }; #ifndef NO_SUN_MOON static short moon_icon_data[] = { #include "moony.icon" }; static short sun_icon_data[] = { #include "sunny.icon" }; #endif */ #include /* static Notify_value itimer_handler(); Notify_value leave(); Notify_value myframe_interposer(); void sel_func_key_proc(); Seln_result sel_reply_proc(); void XIOError(), XError(); void def_to_xvsc(); */ void usage(); void get_user_defaults(); /* AMIGA: getopt simulieren */ static char *optarg; int getopt(int argc, char *argv[], char *x) { static int Argc=1; int res=EOF; if (Argc >= argc || argc == 1) return EOF; while (argv[Argc][0] != '-') /* yes, an option */ if (Argc >= argc) Argc++; else return EOF; if (argv[Argc][0] == '-') { optarg = argv[Argc] + 2 /* == '-' ? NULL:argv[Argc+1])*/ ; res = argv[Argc][1]; Argc++; /* if (!optarg) Argc += 2; else Argc++; */ } return res; } /* end func getopt */ void main(int argc, char *argv[]) { int i; int printit = 0, toolrunning = 1; int printit_dst = 0; int win_height; USHORT flag=TRUE; /* AMIGA */ // extern char *optarg; fprintf(stderr, "This is Amiga-Calentool, V2.2 Amiga Port 0.81\n"); GadToolsBase = OpenLibrary((UBYTE *)"gadtools.library", 37L); if (GadToolsBase == NULL) { fprintf(stderr,"%s: could not open GadTools.library V37+\n", argv[0]); exit(5); } IntuitionBase=(struct IntuitionBase *)OpenLibrary("intuition.library", 37L); if (IntuitionBase == NULL) { CloseLibrary (GadToolsBase); fprintf(stderr,"%s: could not open Intuition.library V37+\n", argv[0]); exit(5); } GfxBase = OpenLibrary("graphics.library", 37L); if (GfxBase == NULL) { CloseLibrary (GadToolsBase); CloseLibrary (IntuitionBase); fprintf(stderr,"%s: could not open Graphics.library V37+\n", argv[0]); exit(5); } if (progname = strchr(*argv, '/')) progname++; else progname = *argv; get_today(); /* initial day is today */ current = today; closedate = today; /* in case we started iconic */ read_only = 0; working_msg = 0; lastSlot = -1; /* no slot was active, yet */ /* * Check for -p, -P, -m or -M option, which means we don't want * to create the tool. */ i = argc; while (--i > 0) { if (!strncmp(argv[i], "-p", 2) || !strncmp(argv[i], "-m", 2) || !strncmp(argv[i], "-P", 2) || !strncmp(argv[i], "-M", 2)) { /* standard getopt doesn't allow optional * arguments, so we do a check here for * obsolete usage of the -p option */ if ((argv[i][1] == 'p' || argv[i][1] == 'P') && argv[i][2] == '\0') { fprintf(stderr, "%s: -p/-P requires a 'd', 'w' or 'm' argument\n", progname); exit(1); } toolrunning = 0; } } /* AMIGA: */ // toolrunning = 0; if (toolrunning) { /* user did not specify a -[pP] or -[mM] option */ /* * hack alert: it should be possible to use the return from 'xv_init' * to determine if X is running, but it dies instead. So, we try and * open the display using a direct Xlib call to see if the server * can be accessed. */ // if ((mydisplay = XOpenDisplay(NULL)) == NULL) { // /* can't open up the display */ // if (!strncmp(argv[1], "-?", 2)) // usage(); // else { // fprintf(stderr, "%s: X server not available.\n", progname); // fprintf(stderr, "%s: one of -p, -P, -m or -M options must be specified. Use -? for help.\n", // progname); // exit(1); // } // } else { // /* it worked */ // XCloseDisplay(mydisplay); // } /* ** Parse args: xv_init must be called before getopt, so ** it can interpret and extract flags for XView. */ // server = (Xv_server)xv_init(XV_INIT_ARGC_PTR_ARGV, &argc, argv, // XV_USAGE_PROC, usage, NULL); // if (server == NULL) { // fprintf(stderr, "%s: can't conect to server, bailing out.\n", progname); // exit(1); // } // mydisplay = (Display *)xv_get(server, XV_DISPLAY); // screen = DefaultScreen(mydisplay); // /* set foreground and background colors */ // set_fgbg(); // // frame = xv_create(NULL, FRAME, // XV_NAME, "calentool", // FRAME_LABEL, version(), // FRAME_BACKGROUND_COLOR, &ct_back, // FRAME_FOREGROUND_COLOR, &ct_fore, // FRAME_INHERIT_COLORS, TRUE, // WIN_ERROR_MSG, // "Error opening display. Is DISPLAY set?", // 0); // if (frame == NULL) // exit(1); err2console(TRUE); /* force error msgs to console */ // /* pick out some X data from the base frame for later use */ // drawable = (Drawable)xv_get(frame, XV_XID); // frame_xattr.backing_store = WhenMapped; // XChangeWindowAttributes(mydisplay, drawable, // CWBackingStore, &frame_xattr); // /* DEBUG */ // /** // XSynchronize(mydisplay, 1); // **/ // if ((s_client = selection_create(server, sel_func_key_proc, sel_reply_proc, NULL)) == NULL) // err_rpt("Can't create selection svc client", NON_FATAL); } /* end if toolrunning */ get_user_defaults(); /* these can be overriden by the command line */ while ((flag = getopt(argc, argv, "1:2:567bBd:eEf:il:m:M:op:P:rtu:zH:h:wx:T:s:S:N:")) != EOF) switch (flag) { case 'f': /* use this file */ otherfile = 1; othername = optarg; break; case 'd': /* starting date */ (void)parse_date(optarg, TRUE); break; case 'r': /* read only file */ read_only = 1; break; case '1': /* -12 -- 12 hour time */ if (*optarg == '2') hour24 = FALSE; break; case '2': /* -24 -- 24 hour time */ if (*optarg == '4') hour24 = TRUE; break; case 'e': /* European calendar Mon-Sun */ monday_first = TRUE; break; case 'E': /* European style */ monday_first = TRUE; hour24 = TRUE; day_first = TRUE; break; case 'p': /* print and exit */ read_only = 1; switch (*optarg) { case 'd': case 'D': printit = PRI_DAY; break; case 'w': printit = PRI_WEEK; week_ofs = 0; break; case 'W': printit = PRI_WEEK; week_ofs = 1; break; case 'm': case 'M': printit = PRI_MONTH; break; default: fprintf(stderr, "%s: unknown print option.", progname); break; } if (!printit_dst) printit_dst = DST_STDOUT; break; case 'P': /* print and exit (ignore some notes) */ read_only = 1; switch (*optarg) { case 'd': case 'D': printit = PRI_DAY_XNOTES; break; case 'w': printit = PRI_WEEK_XNOTES; week_ofs = 0; break; case 'W': printit = PRI_WEEK_XNOTES; week_ofs = 1; break; case 'm': case 'M': printit = PRI_MONTH_XNOTES; break; default: fprintf(stderr, "%s: unknown print option.", progname); break; } if (!printit_dst) printit_dst = DST_STDOUT; break; case 'l': /* appt check limit */ if (optarg) limitcheck = atoi(optarg); else limitcheck = 0; break; case 'm': /* mail today's appts and exit */ read_only = 1; if (!printit) printit = PRI_DAY; printit_dst = DST_MAIL; mailto = optarg; break; case 'M': /* mail today's appts and exit (ignore some notes) */ read_only = 1; if (!printit) printit = PRI_DAY_XNOTES; printit_dst = DST_MAIL; mailto = optarg; break; case 'b': /* beep to console for pending appt */ beep = 1; break; case 'B': /* beep then open wondow */ beep_open = 1; break; case 'i': /* include old appt files */ include_old = 1; break; case 'o': /* save outdated appts to another file */ save_old = 1; break; case 't': /* display current time under icon */ show_time = 1; break; case '5': /* Mon - Fri week display */ nr_weekdays = 5; break; case '6': /* Mon - Sat week display */ nr_weekdays = 6; break; case '7': /* Sun - Sat (or Mon-Sun) week display */ nr_weekdays = 7; break; case 'u': /* update interval (in seconds) */ update_interval = atoi(optarg); break; case 'w': /* display Working! message */ working_msg = 1; break; case 'x': /* eXpire appts after so many days */ expire_days = atoi(optarg); break; case 'z': /* zero offset -- new style appts file */ one_based = 1; break; #ifndef NO_HOLIDAYS case 'h': /* show certain holidays */ switch (*optarg) { case 'A': /* all holidays */ holiday_a = holiday_c = holiday_i = 1; holiday_j = holiday_s = 1; break; case 'a': /* astronomical events */ holiday_a = 1; break; case 'c': /* Christian holidays */ holiday_c = 1; break; case 'i': /* Islamic holidays */ holiday_i = 1; break; case 'j': /* Jewish holidays */ holiday_j = 1; break; case 's': /* secular holidays */ holiday_s = 1; break; default: fprintf(stderr, "%s: unknown holiday option (must be one of \"Aacijs\")", progname); break; } break; case 'H': /* show certain holidays day/week display only */ switch (*optarg) { case 'A': /* all holidays */ holiday_a = holiday_c = holiday_i = 2; holiday_j = holiday_s = 2; break; case 'a': /* astronomical events */ holiday_a = 2; break; case 'c': /* Christian holidays */ holiday_c = 2; break; case 'i': /* Islamic holidays */ holiday_i = 2; break; case 'j': /* Jewish holidays */ holiday_j = 2; break; case 's': /* secular holidays */ holiday_s = 2; break; default: fprintf(stderr, "%s: unknown holiday option (must be one of \"Aacijs\")", progname); break; } break; #else case 'h': case 'H': fprintf(stderr, "%s: -h and -H options not available\n", progname); break; #endif case 'T': if (!strncmp(optarg, "ps", 2)) print_dev = PR_POSTSCRIPT; else print_dev = PR_ASCII; break; case 's': /* start hour */ start_hour = atoi(optarg); if (start_hour < 0 || start_hour > 23) fprintf(stderr, "%s: start hour must be in the range 0 - 23\n", progname); break; case 'S': /* Stop (end) hour */ end_hour = atoi(optarg); if (end_hour < 1 || end_hour > 24) fprintf(stderr, "%s: end hour must be in the range 1 - 24\n", progname); break; case 'N': /* number of note slots */ num_notes = atoi(optarg); break; case '?': default: usage(); } /* set default printer to something useful */ if (print_dev == PR_DEFAULT) { if (printit == PRI_MONTH || printit == PRI_MONTH_XNOTES) print_dev = PR_POSTSCRIPT; else print_dev = PR_ASCII; } /* ** setup number of slots and allocate memory for them */ if ( start_hour >= end_hour ) err_rpt("Start Hour must be less than Stop Hour", FATAL); n_tslots = (end_hour - start_hour) * 2; n_slots = n_tslots + num_notes; appt_check_limit = APPT_CHECK_LIMIT; /* set default */ if (limitcheck == 0) appt_check_limit = n_tslots; else if (limitcheck == 1) appt_check_limit = n_slots; /* make room for n_slots dayslot entries and week entries */ if ((slots = (struct dayslot *) malloc(n_slots * sizeof(struct dayslot))) == NULL) err_rpt("Can't get enough storage for day slots", FATAL); for (i=0; ifid; // gc = XCreateGC(mydisplay, iconPixmap, // GCBackground|GCForeground|GCFunction|GCFont, // &gc_val); // // /* change default values for future gc's */ // xfont = (XFontStruct *)xv_get(font, FONT_INFO); // gc_val.font = xfont->fid; // gc_val.fill_style = FillOpaqueStippled; // // /* maybe overwrite default icon pixmaps */ // if (userStdPixmap[0]) // create_icon(userStdPixmap, icon); // if (userNapPixmap[0]) // create_icon(userNapPixmap, na_icon); // if (userRevPixmap[0]) // create_icon(userRevPixmap, rev_icon); // // /* create a window for the icon */ // icon_attr.border_pixel = foregr; // icon_attr.background_pixmap = iconPixmap; // icon_window = XCreateWindow(mydisplay, DefaultRootWindow(mydisplay), // 0, 0, 64, (show_time ? 77 : 64), 0, attr.depth, InputOutput, // CopyFromParent, CWBackPixmap, &icon_attr); // // if (show_time) { // /* time string displayed below icon */ // ilabel.x = xv_get(sfont, FONT_DEFAULT_CHAR_WIDTH) + // xv_get(sfont, FONT_DEFAULT_CHAR_WIDTH)/2; // if (update_interval >= 60) // /* no seconds displayed, adjust label position */ // ilabel.x += 2*xv_get(sfont, FONT_DEFAULT_CHAR_WIDTH) - 2; // if (!hour24) // /* am/pm, adjust position */ // ilabel.x -= xv_get(sfont, FONT_DEFAULT_CHAR_WIDTH); // } // set_icon(); // // week_message_size = WEEK_MESSAGE_SIZE + 3; // weekslot_width = (xv_get(font, FONT_DEFAULT_CHAR_WIDTH) * // week_message_size); // dayslot_width = (nr_weekdays - 1) * weekslot_width; // day_message_size = dayslot_width / xv_get(font, FONT_DEFAULT_CHAR_WIDTH); // ybox_height = dayslot_height = weekslot_height = // xv_get(font, FONT_DEFAULT_CHAR_HEIGHT) + 6; // ybox_width = 3 * xv_get(font, FONT_DEFAULT_CHAR_WIDTH); // win_height = MAX(36*ybox_height, (n_slots+5)*weekslot_height) + 72; // // init_pixrects(); /* Initialize pictures. */ // // /* Create the rest of the tool */ // xv_set(frame, // XV_WIDTH, (nr_weekdays+1)*weekslot_width+60, // XV_HEIGHT, win_height, // XV_X, xposition, XV_Y, yposition, // 0); // // /* set this applications WM_CLASS attributes */ // WMClassHints.res_name = progname; // WMClassHints.res_class = "Calentool"; // // myWMHints = XGetWMHints(mydisplay, xv_get(frame, XV_XID)); // if (myWMHints == NULL) { // myWMHints = XAllocWMHints(); // }; // myWMHints->input = True; // myWMHints->icon_window = icon_window; // myWMHints->flags = InputHint | IconWindowHint; // // /* do this to make sure positioning hints get set */ // /* (doing XV_X and XV_Y on the frame doesn't work) */ // sizehints.x = xposition; // sizehints.y = yposition; // sizehints.flags = PPosition; // XSetWMProperties(mydisplay, xv_get(frame, XV_XID), NULL, NULL, // NULL, 0, &sizehints, myWMHints, &WMClassHints); // // closed_rect = (Rect *)xv_get(frame, FRAME_CLOSED_RECT); // create_panel(); // create_main_window(); check_calendar(); /* set proper icon */ /* interpose on frame events (specifically open/close) */ if (toolrunning) { // (void) notify_set_signal_func(frame, leave, SIGHUP, NOTIFY_ASYNC); // (void) notify_set_signal_func(frame, leave, SIGINT, NOTIFY_ASYNC); // (void) notify_set_signal_func(frame, leave, SIGTERM, NOTIFY_ASYNC); // /* slimy - capture I/O errors so we can clean up! */ // XSetIOErrorHandler(XIOError); // XSetErrorHandler(XError); /* AMIGA: */ // if (InitStuff_day()) /* open window for day */ // if (SetupScreen()) // { // fprintf (stderr,"%s: could not open screen.\n",progname); // exit (10); // } if (OpenACalentoolWindow()) { fprintf (stderr,"%s: could not open window/screen.\n",progname); // fprintf (stderr," try to open a smaller one with -s and -S\n"); exit (10); } WindowToFront(ACalentoolWnd); ActivateWindow(ACalentoolWnd); /* insert todays appts */ if (draw_day()) { fprintf (stderr,"%s: could not open window.\n",progname); exit (10); } /* main loop */ while(flag) { WaitPort(ACalentoolWnd->UserPort); while (Msg = GT_GetIMsg(ACalentoolWnd->UserPort)) flag = Do_W(Msg); } // CleanStuff_d(); saveDay(); CloseACalentoolWindow(); CloseDownScreen(); } // (void) notify_interpose_event_func(frame, myframe_interposer, NOTIFY_SAFE); // timerclear(&(cal_timer.it_interval)); // timerclear(&(cal_timer.it_value)); // cal_timer.it_value.tv_sec = (long)update_interval; // cal_timer.it_value.tv_usec = 0L; // (void) notify_set_itimer_func(frame, itimer_handler, ITIMER_REAL, &cal_timer, NULL); // err2console(FALSE); /* error msgs to notice window */ // xv_main_loop(frame); // (void)leave((Notify_client)0, 0, (Notify_signal_mode)0); exit(0); } /* end main */ //static Notify_value //itimer_handler(me, which) //Notify_client me; //int which; //{ // static int timeout_cntr = 0; // // timerclear(&(cal_timer.it_interval)); // timerclear(&(cal_timer.it_value)); // cal_timer.it_value.tv_sec = (long)update_interval; // cal_timer.it_value.tv_usec = 0L; // (void) notify_set_itimer_func(frame, itimer_handler, ITIMER_REAL, &cal_timer, NULL); // get_today(); // /* update date/time displayed in the panel */ //// xv_set(clock_pi, PANEL_LABEL_STRING, clockstr, 0); //// if (show_time && (int)xv_get(frame, FRAME_CLOSED)) //// update_icon_time(); //#ifndef NO_SUN_MOON // /* update data in Sun Data frame (if it's open) */ //// if (sframe) //// write_times(); //#endif // /* only check appointments every TIME_OUT minutes */ // timeout_cntr += update_interval; // if (timeout_cntr/60 < TIME_OUT) // return(NOTIFY_DONE); // timeout_cntr = 0; // /* check todays appointments */ // check_calendar(); // return(NOTIFY_DONE); //} //Notify_value leave(me, signal, when) //Notify_client me; //int signal; //Notify_signal_mode when; //{ // if (day_is_open) // close_day(); // // /* create outdated include files (if necessary) */ // if (save_old || expire_days) // expire(expire_days); // // /* delete tmp file */ // if (access(tmpapts_pathname, R_OK) == 0 && unlink(tmpapts_pathname) < 0) // perror(tmpapts_pathname); // // seln_destroy(s_client); // exit(0); // /* NOTREACHED */ // return(NOTIFY_DONE); //} //void XIOError(mydisplay) //Display *mydisplay; //{ // leave((Notify_client)0, 0, (Notify_signal_mode)0); //} //void XError(mydisplay, myerror) //Display *mydisplay; //XErrorEvent *myerror; //{ // char error_description[1024], error_mesg[1024], number[32]; // // /* UGLY HACK! Xview generates BadMatch errors on X_SetInputFocus // * events when you close a window before the tool has a chance to // * draw in it - so, ignore those without comment. // */ // if ((myerror->error_code == BadMatch) && // ((int) myerror->request_code == 42) && // ((int) myerror->minor_code == 0)) // return; // // /* okay, these are errors we should report - but don't die, because // * X says these are non-fatal. // */ // XGetErrorText(mydisplay, myerror->error_code, error_description, 1024); // XGetErrorDatabaseText(mydisplay, "XlibMessage", "XError", // "X Error", error_mesg, 1024); // fprintf(stderr, "%s: %s\n ", error_mesg, error_description); // XGetErrorDatabaseText(mydisplay, "XlibMessage", "MajorCode", // "Request Major code %d", error_mesg, 1024); // fprintf(stderr, error_mesg, myerror->request_code); // if (myerror->request_code < 128) { // sprintf(number, "%d", myerror->request_code); // XGetErrorDatabaseText(mydisplay, "XRequest", number, // "", error_mesg, 1024); // } else { // strcpy(error_mesg, "X Extension Protocol Request"); // } // fprintf(stderr, " (%s)\n ", error_mesg); // XGetErrorDatabaseText(mydisplay, "XlibMessage", "MinorCode", // "Request Minor code %d", error_mesg, 1024); // fprintf(stderr, error_mesg, myerror->minor_code); // fputs("\n ", stderr); // XGetErrorDatabaseText(mydisplay, "XlibMessage", "ResourceID", // "ResourceID 0x%x", error_mesg, 1024); // fprintf(stderr, error_mesg, myerror->resourceid); // fputs("\n ", stderr); // XGetErrorDatabaseText(mydisplay, "XlibMessage", "ErrorSerial", // "Error Serial #%d", error_mesg, 1024); // fprintf(stderr, error_mesg, myerror->serial); // fputs("\n ", stderr); // XGetErrorDatabaseText(mydisplay, "XlibMessage", "CurrentSerial", // "Current Serial #%d", error_mesg, 1024); // fprintf(stderr, error_mesg, mydisplay->request); // fputs("\n", stderr); // // /** If we were debugging, this would be useful.... // abort(); // **/ // // return; //} // //create_icon(filename, iconPix) //char *filename; //Pixmap iconPix; //{ // Pixmap pix; // int width, height, x_hot, y_hot; // int status; // // status = XReadBitmapFile(mydisplay, DefaultRootWindow(mydisplay), // filename, &width, &height, &pix, &x_hot, &y_hot); // if (status != BitmapSuccess) // err_rpt("Error reading iconPixmap", NON_FATAL); // else // XCopyPlane(mydisplay, pix, iconPix, gc, 0, 0, width, height, // 0, 0, 1L); // XFreePixmap(mydisplay, pix); //} /* * find the default background and foreground * colors of the screen then pass them on to * the frame (since the frame colors in XView * are, by definition, undefined). */ //set_fgbg() //{ // char *def_str; // Status result; // char buff[128]; // // /* get default color map */ // def_cmap = DefaultColormap(mydisplay, screen); // /* // * check command line, then calentool defaults, then // * default black & white // */ // sprintf(buff, "%s.color.foreground", progname); // if (defaults_exists("window.color.foreground", NULL)) { // def_str = defaults_get_string("window.color.foreground", NULL, NULL); // def_to_xvsc(def_str, &ct_fore, &foregr); // } else if (defaults_exists(buff, "Calentool.color.foreground")) { // def_str = defaults_get_string(buff, "Calentool.color.foreground", NULL); // def_to_xvsc(def_str, &ct_fore, &foregr); // } else { // foregr = BlackPixel(mydisplay, screen); // def_color.pixel = foregr; // XQueryColor(mydisplay, def_cmap, &def_color); // ct_fore.red = def_color.red / 257; // ct_fore.green = def_color.green / 257; // ct_fore.blue = def_color.blue / 257; // } // sprintf(buff, "%s.color.background", progname); // if (defaults_exists("window.color.background", NULL)) { // def_str = defaults_get_string("window.color.background", NULL, NULL); // def_to_xvsc(def_str, &ct_back, &backgr); // } else if (defaults_exists(buff, "Calentool.color.background")) { // def_str = defaults_get_string(buff, "Calentool.color.background", NULL); // def_to_xvsc(def_str, &ct_back, &backgr); // } else { // backgr = WhitePixel(mydisplay, screen); // def_color.pixel = backgr; // XQueryColor(mydisplay, def_cmap, &def_color); // ct_back.red = def_color.red / 257; // ct_back.green = def_color.green / 257; // ct_back.blue = def_color.blue / 257; // } //} //void def_to_xvsc(def, sc, pixel) //char *def; //Xv_singlecolor *sc; //unsigned long *pixel; //{ // // int r, g, b; // // /* // * we need to convert the defaults data base entry because // * it could be either a X color name or a string consisting // * of three space seperated integers. // * The defaults entry is converted to a Xv_singlecolor struct // * and a X pixel value. // */ // if (isdigit(*def)) { // sscanf(def, "%d %d %d", &r, &g, &b); // sc->red = r; // sc->green = g; // sc->blue = b; // /* approx scaling 0->255 to 0->65535 */ // def_color.red = r * 257; // def_color.green = g * 257; // def_color.blue = b * 257; // XAllocColor(mydisplay, def_cmap, &def_color); // *pixel = def_color.pixel; // } else { // (void) XParseColor(mydisplay, def_cmap, def, &def_color); // /* approx scaling 0->65535 to 0->255 */ // sc->red = def_color.red / 257; // sc->green = def_color.green / 257; // sc->blue = def_color.blue / 257; // XAllocColor(mydisplay, def_cmap, &def_color); // *pixel = def_color.pixel; // } //} void get_user_defaults(void) { char *getenv(), *def; unsigned int result, w, h; char buff[128]; // sprintf(buff, "%s.mainWin.geometry", progname); // if (defaults_exists("window.geometry", NULL)) { // def = defaults_get_string("window.geometry", NULL, "+100+56"); // result = XGeometry(mydisplay, screen, def, "+100+56", // 6, 1, 1, 0, 0, // &xposition, &yposition, &w, &h); // } else if (defaults_exists("window.x", NULL)) { // xposition = defaults_get_integer("window.x", NULL, 100); // yposition = defaults_get_integer("window.y", NULL, 56); // } else if (defaults_exists(buff, NULL)) { // def = defaults_get_string(buff, "Calentool.mainWin.geometry", "+100+56"); // result = XGeometry(mydisplay, screen, def, "+100+56", // 6, 1, 1, 0, 0, // &xposition, &yposition, &w, &h); // } else { // xposition = 100; // yposition = 56; // } // sprintf(buff, "%s.hour24", progname); // hour24 = defaults_get_boolean(buff, "Calentool.hour24", HOUR_24); // sprintf(buff, "%s.weekdays", progname); // nr_weekdays = defaults_get_integer_check(buff, "Calentool.weekdays", NR_WEEKDAYS, 5, 7); // sprintf(buff, "%s.mondayFirst", progname); // monday_first = defaults_get_boolean(buff, "Calentool.mondayFirst", MON_FIRST); // sprintf(buff, "%s.dayFirst", progname); // day_first = defaults_get_boolean(buff, "Calentool.dayFirst", DAY_FIRST); // sprintf(buff, "%s.startHour", progname); // start_hour = defaults_get_integer_check(buff, "Calentool.startHour", START_HOUR, 0, 23); // sprintf(buff, "%s.endHour", progname); // end_hour = defaults_get_integer_check(buff, "Calentool.endHour", END_HOUR, start_hour+1, 23); // sprintf(buff, "%s.numberOfNotes", progname); // num_notes = defaults_get_integer_check(buff, "Calentool.numberOfNotes", N_NOTESLOTS, 1, 20); // sprintf(buff, "%s.printer.type", progname); // if (defaults_exists(buff, "Calentool.printer.type")) { // def = defaults_get_string(buff, "Calentool.printer.type", "ps"); // if (!strncmp(def, "ps", 2)) // print_dev = PR_POSTSCRIPT; // else // print_dev = PR_ASCII; // } //#ifndef NO_PRINTER // sprintf(buff, "%s.printer.name", progname); // if (defaults_exists(buff, "Calentool.printer.name")) { // def = defaults_get_string(buff, "Calentool.printer.name", NULL); // strcpy(printer, "lpr -P"); // strcat(printer, def); // } else if ((def = getenv("PRINTER")) != NULL) // strcat(printer, def); // else // strcpy(printer, PRINT_CMD); //#endif // sprintf(buff, "%s.beep", progname); // beep = defaults_get_boolean(buff, "Calentool.beep", FALSE); // sprintf(buff, "%s.beepOpen", progname); // beep_open = defaults_get_boolean(buff, "Calentool.beepOpen", FALSE); // sprintf(buff, "%s.includeOld", progname); // include_old = defaults_get_boolean(buff, "Calentool.includeOld", FALSE); // sprintf(buff, "%s.saveOld", progname); // save_old = defaults_get_boolean(buff, "Calentool.saveOld", FALSE); // sprintf(buff, "%s.showIconTime", progname); // show_time = defaults_get_boolean(buff, "Calentool.showIconTime", FALSE); // sprintf(buff, "%s.updateInterval", progname); // if (defaults_exists(buff, "Calentool.updateInterval")) // update_interval = defaults_get_integer_check(buff, "Calentool.updateInterval", 1, 1, 300); // sprintf(buff, "%s.expireInterval", progname); // if (defaults_exists(buff, "Calentool.expireInterval")) // expire_days = defaults_get_integer(buff, "Calentool.expireInterval", 7); // sprintf(buff, "%s.checkNotes", progname); // if (defaults_exists(buff, "Calentool.checkNotes")) { // limitcheck = !defaults_get_boolean(buff, "Calentool.checkNotes", FALSE); // if (limitcheck > 1) // limitcheck = 1; // } // sprintf(buff, "%s.holidays.astronomical", progname); // if (defaults_exists(buff, "Calentool.holidays.astronomical")) // holiday_a = defaults_get_enum(buff, "Calentool.holidays.astronomical", holiday_pairs); // sprintf(buff, "%s.holidays.christian", progname); // if (defaults_exists(buff, "Calentool.holidays.christian")) // holiday_c = defaults_get_enum(buff, "Calentool.holidays.christian", holiday_pairs); // sprintf(buff, "%s.holidays.islamic", progname); // if (defaults_exists(buff, "Calentool.holidays.islamic")) // holiday_i = defaults_get_enum(buff, "Calentool.holidays.islamic", holiday_pairs); // sprintf(buff, "%s.holidays.jewish", progname); // if (defaults_exists(buff, "Calentool.holidays.jewish")) // holiday_j = defaults_get_enum(buff, "Calentool.holidays.jewish", holiday_pairs); // sprintf(buff, "%s.holidays.secular", progname); // if (defaults_exists(buff, "Calentool.holidays.secular")) // holiday_s = defaults_get_enum(buff, "Calentool.holidays.secular", holiday_pairs); // sprintf(buff, "%s.initialDisplay", progname); // if (defaults_exists(buff, "Calentool.initialDisplay")) // mainsw_state = defaults_get_enum(buff, "Calentool.initialDisplay", displayMode_pairs); // else // mainsw_state = DISPLAYING_DAY; // sprintf(buff, "%s.iconPixmap.standard", progname); // if (defaults_exists(buff, "Calentool.iconPixmap.standard")) { // def = defaults_get_string(buff, "Calentool.iconPixmap.standard", ""); // strcpy(userStdPixmap, def); // } // sprintf(buff, "%s.iconPixmap.noAppts", progname); // if (defaults_exists(buff, "Calentool.iconPixmap.noAppts")) { // def = defaults_get_string(buff, "Calentool.iconPixmap.noAppts", ""); // strcpy(userNapPixmap, def); // } // sprintf(buff, "%s.iconPixmap.apptPending", progname); // if (defaults_exists(buff, "Calentool.iconPixmap.apptPending")) { // def = defaults_get_string(buff, "Calentool.iconPixmap.apptPending", ""); // strcpy(userRevPixmap, def); // } } void usage(void) { fprintf(stderr, "usage: %s [options...]\nwhere are:\n", progname); fprintf(stderr, " -f \n"); fprintf(stderr, " -r // readonly\n"); fprintf(stderr, " -p // print selected day [d], week [w] or month [m] appts and exit\n"); fprintf(stderr, " -P // like -p, only don't print marked notes\n"); fprintf(stderr, " -m // mail selected days appts to \n"); fprintf(stderr, " -M // like -m, only don't mail marked notes\n"); fprintf(stderr, " [-5|-6|-7] // 5, 6 or 7-day week display\n"); fprintf(stderr, " [-12|-24] // 12 or 24 hour time format\n"); fprintf(stderr, " -d // display appts for \n"); fprintf(stderr, " -b // beep and display message when appt is pending\n"); fprintf(stderr, " -B // beep and open window when appt is pending\n"); fprintf(stderr, " -i // auto-include outdated appts files\n"); fprintf(stderr, " -l [0|1] // set limit check for appts to include notes\n"); fprintf(stderr, " -o // create outdated include files\n"); fprintf(stderr, " -t // display time below icon\n"); fprintf(stderr, " -u // time update interval (seconds)\n"); fprintf(stderr, " -w // display 'Working!' message\n"); fprintf(stderr, " -e // Mon-Sun week display\n"); fprintf(stderr, " -E // European options (-e, -24)\n"); #ifndef NO_HOLIDAYS fprintf(stderr, " -h // display selected computed holidays\n"); fprintf(stderr, " // A=All, a=astronomical, c=Christian,\n"); fprintf(stderr, " // i=Islamic, j=Jewish, s=secular\n"); fprintf(stderr, " -H // like -h, only flag them as marked\n"); #endif fprintf(stderr, " -T // printer output type for -p and -m options\n"); fprintf(stderr, " -s // start hour\n"); fprintf(stderr, " -S // stop hour\n"); fprintf(stderr, " -N // number of note slots\n"); fprintf(stderr, " -x // expire appts after days\n"); fprintf(stderr, " -z // conversion flag (see INSTALL)\n"); // fprintf(stderr, " // XView options\n"); exit(0); } /* AMIGA */ void HandleEvent(APTR object) { USHORT id; id = ((struct Gadget *)object)->GadgetID; switch (id) { case GD_today: saveDay(); current = today; redraw_day(); break; case GD_next: saveDay(); current.tm_mday++; if (current.tm_mday > monthlength(current.tm_mon)) { current.tm_mday = 1; current.tm_mon++; } redraw_day(); break; case GD_prev: saveDay(); current.tm_mday--; if (current.tm_mday == 0) { current.tm_mday = monthlength(--current.tm_mon); } redraw_day(); break; } } void HandleMEvent(struct IntuiMessage *msg) { USHORT id; int x, y, d, week, day; if (msg->Class == IDCMP_GADGETUP) { id = ((struct Gadget *)msg->IAddress)->GadgetID; switch (id) { case GD_today: current = today; draw_day(); break; case GD_next: /* next */ current.tm_mon++; fix_current_day(); draw_month(current.tm_mon); break; case GD_prev: current.tm_mon--; fix_current_day(); draw_month(current.tm_mon); break; } return; } /* else */ // if (id >= 100) /* Jump to week */ // { // current.tm_mday = (id - 100) * 7; // fix_current_day(); // draw_week(); // } // else // { // current.tm_mday = id - LAST_D_GAD + 2; // fix_current_day(); // draw_day(); // } // col = (msg->MouseX - 20) / 78; /* 78 = [600 (width) - 50 (week)] / 7 */ // row = (msg->MouseY - 40) / 40; /* falsch!!! */ if (msg->MouseY < MCord.yoff || msg->MouseY > MCord.yoff + MCord.height || msg->MouseX < MCord.xoff || msg->MouseX > MCord.xoff + 7 * MCord.d_width + MCord.w_width) return; /* out of the border */ /* woche abfragen! */ if (msg->MouseX > (MCord.xoff + 7 * MCord.d_width)) { week = (msg->MouseY - MCord.yoff) / MCord.d_height; current.tm_mday = week * 7; fix_current_day(); draw_week(); } else { day = (msg->MouseX - MCord.xoff) / MCord.d_width + 7 * ((msg->MouseY - MCord.yoff) / MCord.d_height) - MCord.first_wday + 2; if (day <= 0 || day > monthlength(current.tm_mon)) return; /* one of the "empty leading days" was clicked */ current.tm_mday = day; draw_day(); } } void HandleWEvent(struct IntuiMessage *msg) { USHORT id; int x, y, d; if (msg->Class == IDCMP_GADGETUP) { id = ((struct Gadget *)msg->IAddress)->GadgetID; switch (id) { case GD_today: current = today; draw_day(); break; case GD_next: /* next */ current.tm_mday += 7; draw_week(); break; case GD_prev: current.tm_mday -= 7; draw_week(); break; default: ; break; } } if (msg->Class == IDCMP_MOUSEBUTTONS) { x = msg->MouseX; y = msg->MouseY; d = (x - 41) / 85; /* day of week [0..6] */ if (x > 41 && x < (41 + 7 * weekslot_width) && y > YSTART && y < (YSTART + n_slots * SLOTHEIGHT)) { if (d >= 0 && d <= 6) { if (monday_first) /* mon..sun */ { current.tm_mday += d + 1; if (d == 6) current.tm_mday -= 7; } else current.tm_mday += d; fix_current_day(); draw_day(); } } } /* end if MousButtons */ } void HandleYEvent(struct IntuiMessage *msg) { USHORT id; int x, y, m; if (msg->Class == IDCMP_GADGETUP) { id = ((struct Gadget *)msg->IAddress)->GadgetID; switch (id) { case GD_today: current = today; draw_day(); break; case GD_next: /* next */ current.tm_year++; fix_current_day(); draw_year(current.tm_year); break; case GD_prev: current.tm_year--; fix_current_day(); draw_year(current.tm_year); break; default: ; break; } } if (msg->Class == IDCMP_MOUSEBUTTONS) { x = msg->MouseX; y = msg->MouseY; m = (y - 21) / MCord.d_height * 4 + (x - 5) / 160; if (m >= 0 && m <= 11 && y > 30) draw_month(m); } } Do_W(struct IntuiMessage *Msg) { USHORT flag=TRUE, class, code, id; APTR iadr; long t; class= Msg->Class; code = Msg->Code; iadr = Msg->IAddress; switch (class) { case IDCMP_REFRESHWINDOW: GT_BeginRefresh(ACalentoolWnd); GT_EndRefresh(ACalentoolWnd, TRUE); break; case IDCMP_GADGETUP: switch (act_wind) { case DAY: HandleEvent(iadr); id = ((struct Gadget *)iadr)->GadgetID; if (id >= 100 ) /* stringgadget */ { new_entry = 1; /* that means the entries could have changed */ lastSlot = id - 100; /* last active slot [0..n_slots-1] */ } break; case WEEK: HandleWEvent(Msg); break; case MONTH: HandleMEvent(Msg); break; case YEAR: HandleYEvent(Msg); break; } break; case IDCMP_GADGETDOWN: if (act_wind = DAY) { id = ((struct Gadget *)iadr)->GadgetID; if (id >= 100) /* stringgadget */ lastSlot = id - 100; /* last active slot [0..n_slots-1] */ } else lastSlot = -1; break; case IDCMP_CLOSEWINDOW: flag=FALSE; break; case IDCMP_MOUSEBUTTONS: if (act_wind == YEAR) HandleYEvent(Msg); if (act_wind == WEEK) HandleWEvent(Msg); if (act_wind == MONTH) HandleMEvent(Msg); break; case IDCMP_MENUPICK: if (act_wind == DAY && code != 0xf860) saveDay(); switch (code) { case 0xf800: // save: nothing to do (is saved) break; case 0xf820: // save as: ask for requester and copy break; case 0xf840: // print... break; case 0xf860: if (act_wind == DAY && lastSlot != -1) edit_appt(lastSlot); break; case 0xf880: time(&t); moon_data(t); break; case 0xf8A0: time(&t); riseset(t); break; case 0xf8e0: flag = FALSE; break; /* menu row 2 */ case 0xf801: /* monday */ current.tm_mday -= current.tm_wday - 1; fix_current_day(); draw_day(); break; case 0xf821: /* tuesday */ current.tm_mday -= current.tm_wday - 2; fix_current_day(); draw_day(); break; case 0xf841: /* wednesday */ current.tm_mday -= current.tm_wday - 3; fix_current_day(); draw_day(); break; case 0xf861: /* thursday */ current.tm_mday -= current.tm_wday - 4; fix_current_day(); draw_day(); break; case 0xf881: /* friday */ current.tm_mday -= current.tm_wday - 5; fix_current_day(); draw_day(); break; case 0xf8a1: /* saturday */ current.tm_mday -= current.tm_wday - 6; fix_current_day(); draw_day(); break; case 0xf8c1: /* sunday */ current.tm_mday -= current.tm_wday; fix_current_day(); draw_day(); break; /* menu row 3: week */ case 0xf802: /* 1st */ current.tm_mday = 0; draw_week(); break; case 0xf822: /* 2nd */ current.tm_mday = 7; draw_week(); break; case 0xf842: /* 3rd */ current.tm_mday = 14; draw_week(); break; case 0xf862: /* 4th */ current.tm_mday = 21; draw_week(); break; case 0xf882: /* 5th */ current.tm_mday = 28; draw_week(); break; case 0xf8a2: /* last */ current.tm_mday = 35; draw_week(); break; /* menu row 4: Month */ case 0xf803: /* jan */ current.tm_mon = 0; draw_month(current.tm_mon); break; case 0xf823: /* feb */ current.tm_mon = 1; draw_month(current.tm_mon); break; case 0xf843: /* mar */ current.tm_mon = 2; draw_month(current.tm_mon); break; case 0xf863: /* apr */ current.tm_mon = 3; draw_month(current.tm_mon); break; case 0xf883: /* mai */ current.tm_mon = 4; draw_month(current.tm_mon); break; case 0xf8a3: /* jun */ current.tm_mon = 5; draw_month(current.tm_mon); break; case 0xf8c3: /* jul */ current.tm_mon = 6; draw_month(current.tm_mon); break; case 0xf8e3: /* aug */ current.tm_mon = 7; draw_month(current.tm_mon); break; case 0xf903: /* sep */ current.tm_mon = 8; draw_month(current.tm_mon); break; case 0xf923: /* oct */ current.tm_mon = 9; draw_month(current.tm_mon); break; case 0xf943: /* nov */ current.tm_mon = 10; draw_month(current.tm_mon); break; case 0xf963: /* dec */ current.tm_mon = 11; draw_month(current.tm_mon); break; /* menu row 5: year */ case 0xf804: /* 91 */ current.tm_year = 91; draw_year(current.tm_year); break; case 0xf824: /* 92 */ current.tm_year = 92; draw_year(current.tm_year); break; case 0xf844: /* 93 */ current.tm_year = 93; draw_year(current.tm_year); break; case 0xf864: /* 94 */ current.tm_year = 94; draw_year(current.tm_year); break; case 0xf884: /* 95 */ current.tm_year = 95; draw_year(current.tm_year); break; case 0xf8a4: /* 96 */ current.tm_year = 96; draw_year(current.tm_year); break; case 0xf8c4: /* 97 */ current.tm_year = 97; draw_year(current.tm_year); break; case 0xf8e4: /* 98 */ current.tm_year = 98; draw_year(current.tm_year); break; case 0xf904: /* 99 */ current.tm_year = 99; draw_year(current.tm_year); break; case 0xf924: /* 2000 */ current.tm_year = 100; draw_year(current.tm_year); break; /* menu row 6: goto */ case 0xf805: /* < day */ current.tm_mday--; fix_current_day(); draw_day(); break; case 0xf825: /* < week */ current.tm_mday -= 7; draw_week(); break; case 0xf845: /* < month */ current.tm_mon--; fix_current_day(); draw_month(current.tm_mon); break; case 0xf865: /* < year */ draw_year(--current.tm_year); break; case 0xf8a5: /* = day (today) */ // current = today; draw_day(); break; case 0xf8c5: /* = week */ // current = today; draw_week(); break; case 0xf8e5: /* = month */ // current = today; draw_month(current.tm_mon); break; case 0xf905: /* = year */ // current = today; draw_year(current.tm_year); break; case 0xf945: /* > day */ current.tm_mday++; fix_current_day(); draw_day(); break; case 0xf965: /* > week */ current.tm_mday += 7; draw_week(); break; case 0xf985: /* > month */ ++current.tm_mon; fix_current_day(); draw_month(current.tm_mon); break; case 0xf9a5: /* > year */ draw_year(++current.tm_year); break; } break; } GT_ReplyIMsg(Msg); return(flag); }