summaryrefslogtreecommitdiff
path: root/Build/source/libs/icu/icu-4.6/samples/cal/cal.c
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/libs/icu/icu-4.6/samples/cal/cal.c')
-rw-r--r--Build/source/libs/icu/icu-4.6/samples/cal/cal.c762
1 files changed, 762 insertions, 0 deletions
diff --git a/Build/source/libs/icu/icu-4.6/samples/cal/cal.c b/Build/source/libs/icu/icu-4.6/samples/cal/cal.c
new file mode 100644
index 00000000000..99fd1ac1d1a
--- /dev/null
+++ b/Build/source/libs/icu/icu-4.6/samples/cal/cal.c
@@ -0,0 +1,762 @@
+/*
+**********************************************************************
+* Copyright (C) 1998-2009, International Business Machines Corporation
+* and others. All Rights Reserved.
+**********************************************************************
+*
+* File date.c
+*
+* Modification History:
+*
+* Date Name Description
+* 06/16/99 stephen Creation.
+*******************************************************************************
+*/
+
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+
+#include "unicode/uloc.h"
+#include "unicode/udat.h"
+#include "unicode/ucal.h"
+#include "unicode/ustring.h"
+#include "unicode/uclean.h"
+
+#include "uprint.h"
+
+#if UCONFIG_NO_FORMATTING
+
+int main(int argc, char **argv)
+{
+ printf("%s: Sorry, UCONFIG_NO_FORMATTING was turned on (see uconfig.h). No formatting can be done. \n", argv[0]);
+ return 0;
+}
+#else
+
+
+/* Protos */
+static void usage(void);
+
+static void version(void);
+
+static void cal(int32_t month, int32_t year,
+ UBool useLongNames, UErrorCode *status);
+
+static void get_symbols(const UDateFormat *fmt,
+ UDateFormatSymbolType type,
+ UChar *array[],
+ int32_t arrayLength,
+ int32_t lowestIndex,
+ int32_t firstIndex,
+ UErrorCode *status);
+
+static void free_symbols(UChar *array[],
+ int32_t arrayLength);
+
+static void get_days(const UDateFormat *fmt,
+ UChar *days [], UBool useLongNames,
+ int32_t fdow, UErrorCode *status);
+
+static void free_days(UChar *days[]);
+
+static void get_months(const UDateFormat *fmt,
+ UChar *months [], UBool useLongNames,
+ UErrorCode *status);
+
+static void free_months(UChar *months[]);
+
+static void indent(int32_t count, FILE *f);
+
+static void print_days(UChar *days [], FILE *f, UErrorCode *status);
+
+static void print_month(UCalendar *c,
+ UChar *days [],
+ UBool useLongNames, int32_t fdow,
+ UErrorCode *status);
+
+static void print_year(UCalendar *c,
+ UChar *days [], UChar *months [],
+ UBool useLongNames, int32_t fdow,
+ UErrorCode *status);
+
+/* The version of cal */
+#define CAL_VERSION "1.0"
+
+/* Number of days in a week */
+#define DAY_COUNT 7
+
+/* Number of months in a year (yes, 13) */
+#define MONTH_COUNT 13
+
+/* Separation between months in year view */
+#define MARGIN_WIDTH 4
+
+/* Size of stack buffers */
+#define BUF_SIZE 64
+
+/* Patterm string - "MMM yyyy" */
+static const UChar sShortPat [] = { 0x004D, 0x004D, 0x004D, 0x0020,
+0x0079, 0x0079, 0x0079, 0x0079 };
+/* Pattern string - "MMMM yyyy" */
+static const UChar sLongPat [] = { 0x004D, 0x004D, 0x004D, 0x004D, 0x0020,
+0x0079, 0x0079, 0x0079, 0x0079 };
+
+
+int
+main(int argc,
+ char **argv)
+{
+ int printUsage = 0;
+ int printVersion = 0;
+ UBool useLongNames = 0;
+ int optind = 1;
+ char *arg;
+ int32_t month = -1, year = -1;
+ UErrorCode status = U_ZERO_ERROR;
+
+
+ /* parse the options */
+ for(optind = 1; optind < argc; ++optind) {
+ arg = argv[optind];
+
+ /* version info */
+ if(strcmp(arg, "-v") == 0 || strcmp(arg, "--version") == 0) {
+ printVersion = 1;
+ }
+ /* usage info */
+ else if(strcmp(arg, "-h") == 0 || strcmp(arg, "--help") == 0) {
+ printUsage = 1;
+ }
+ /* use long day names */
+ else if(strcmp(arg, "-l") == 0 || strcmp(arg, "--long") == 0) {
+ useLongNames = 1;
+ }
+ /* POSIX.1 says all arguments after -- are not options */
+ else if(strcmp(arg, "--") == 0) {
+ /* skip the -- */
+ ++optind;
+ break;
+ }
+ /* unrecognized option */
+ else if(strncmp(arg, "-", strlen("-")) == 0) {
+ printf("cal: invalid option -- %s\n", arg+1);
+ printUsage = 1;
+ }
+ /* done with options, display cal */
+ else {
+ break;
+ }
+ }
+
+ /* Get the month and year to display, if specified */
+ if(optind != argc) {
+
+ /* Month and year specified */
+ if(argc - optind == 2) {
+ sscanf(argv[optind], "%d", (int*)&month);
+ sscanf(argv[optind + 1], "%d", (int*)&year);
+
+ /* Make sure the month value is legal */
+ if(month < 0 || month > 12) {
+ printf("icucal: Bad value for month -- %d\n", (int)month);
+
+ /* Display usage */
+ printUsage = 1;
+ }
+
+ /* Adjust because months are 0-based */
+ --month;
+ }
+ /* Only year specified */
+ else {
+ sscanf(argv[optind], "%d", (int*)&year);
+ }
+ }
+
+ /* print usage info */
+ if(printUsage) {
+ usage();
+ return 0;
+ }
+
+ /* print version info */
+ if(printVersion) {
+ version();
+ return 0;
+ }
+
+ /* print the cal */
+ cal(month, year, useLongNames, &status);
+
+ /* ICU cleanup. Deallocate any memory ICU may be holding. */
+ u_cleanup();
+
+ return (U_FAILURE(status) ? 1 : 0);
+}
+
+/* Usage information */
+static void
+usage()
+{
+ puts("Usage: icucal [OPTIONS] [[MONTH] YEAR]");
+ puts("");
+ puts("Options:");
+ puts(" -h, --help Print this message and exit.");
+ puts(" -v, --version Print the version number of cal and exit.");
+ puts(" -l, --long Use long names.");
+ puts("");
+ puts("Arguments (optional):");
+ puts(" MONTH An integer (1-12) indicating the month to display");
+ puts(" YEAR An integer indicating the year to display");
+ puts("");
+ puts("For an interesting calendar, look at October 1582");
+}
+
+/* Version information */
+static void
+version()
+{
+ printf("icucal version %s (ICU version %s), created by Stephen F. Booth.\n",
+ CAL_VERSION, U_ICU_VERSION);
+ puts(U_COPYRIGHT_STRING);
+}
+
+static void
+cal(int32_t month,
+ int32_t year,
+ UBool useLongNames,
+ UErrorCode *status)
+{
+ UCalendar *c;
+ UChar *days [DAY_COUNT];
+ UChar *months [MONTH_COUNT];
+ int32_t fdow;
+
+ if(U_FAILURE(*status)) return;
+
+ /* Create a new calendar */
+ c = ucal_open(0, -1, uloc_getDefault(), UCAL_TRADITIONAL, status);
+
+ /* Determine if we are printing a calendar for one month or for a year */
+
+ /* Print an entire year */
+ if(month == -1 && year != -1) {
+
+ /* Set the year */
+ ucal_set(c, UCAL_YEAR, year);
+
+ /* Determine the first day of the week */
+ fdow = ucal_getAttribute(c, UCAL_FIRST_DAY_OF_WEEK);
+
+ /* Print the calendar for the year */
+ print_year(c, days, months, useLongNames, fdow, status);
+ }
+
+ /* Print only one month */
+ else {
+
+ /* Set the month and the year, if specified */
+ if(month != -1)
+ ucal_set(c, UCAL_MONTH, month);
+ if(year != -1)
+ ucal_set(c, UCAL_YEAR, year);
+
+ /* Determine the first day of the week */
+ fdow = ucal_getAttribute(c, UCAL_FIRST_DAY_OF_WEEK);
+
+ /* Print the calendar for the month */
+ print_month(c, days, useLongNames, fdow, status);
+ }
+
+ /* Clean up */
+ ucal_close(c);
+}
+/*
+ * Get a set of DateFormat symbols of a given type.
+ *
+ * lowestIndex is the index of the first symbol to fetch.
+ * (e.g. it will be one to fetch day names, since Sunday is
+ * day 1 *not* day 0.)
+ *
+ * firstIndex is the index of the symbol to place first in
+ * the output array. This is used when fetching day names
+ * in locales where the week doesn't start on Sunday.
+ */
+static void get_symbols(const UDateFormat *fmt,
+ UDateFormatSymbolType type,
+ UChar *array[],
+ int32_t arrayLength,
+ int32_t lowestIndex,
+ int32_t firstIndex,
+ UErrorCode *status)
+{
+ int32_t count, i;
+
+ if (U_FAILURE(*status)) {
+ return;
+ }
+
+ count = udat_countSymbols(fmt, type);
+
+ if(count != arrayLength + lowestIndex) {
+ return;
+ }
+
+ for(i = 0; i < arrayLength; i++) {
+ int32_t idx = (i + firstIndex) % arrayLength;
+ int32_t size = 1 + udat_getSymbols(fmt, type, idx + lowestIndex, NULL, 0, status);
+
+ array[idx] = (UChar *) malloc(sizeof(UChar) * size);
+
+ *status = U_ZERO_ERROR;
+ udat_getSymbols(fmt, type, idx + lowestIndex, array[idx], size, status);
+ }
+}
+
+/* Free the symbols allocated by get_symbols(). */
+static void free_symbols(UChar *array[],
+ int32_t arrayLength)
+{
+ int32_t i;
+
+ for(i = 0; i < arrayLength; i++) {
+ free(array[i]);
+ }
+}
+
+/* Get the day names for the specified locale, in either long or short
+form. Also, reorder the days so that they are in the proper order
+for the locale (not all locales begin weeks on Sunday; in France,
+weeks start on Monday) */
+static void
+get_days(const UDateFormat *fmt,
+ UChar *days [],
+ UBool useLongNames,
+ int32_t fdow,
+ UErrorCode *status)
+{
+ UDateFormatSymbolType dayType = (useLongNames ? UDAT_WEEKDAYS : UDAT_SHORT_WEEKDAYS);
+
+ if(U_FAILURE(*status))
+ return;
+
+ /* fdow is 1-based */
+ --fdow;
+
+ get_symbols(fmt, dayType, days, DAY_COUNT, 1, fdow, status);
+}
+
+static void free_days(UChar *days[])
+{
+ free_symbols(days, DAY_COUNT);
+}
+
+/* Get the month names for the specified locale, in either long or
+short form. */
+static void
+get_months(const UDateFormat *fmt,
+ UChar *months [],
+ UBool useLongNames,
+ UErrorCode *status)
+{
+ UDateFormatSymbolType monthType = (useLongNames ? UDAT_MONTHS : UDAT_SHORT_MONTHS);
+
+ if(U_FAILURE(*status))
+ return;
+
+ get_symbols(fmt, monthType, months, MONTH_COUNT - 1, 0, 0, status); /* some locales have 13 months, no idea why */
+}
+
+static void free_months(UChar *months[])
+{
+ free_symbols(months, MONTH_COUNT - 1);
+}
+
+/* Indent a certain number of spaces */
+static void
+indent(int32_t count,
+ FILE *f)
+{
+ char c [BUF_SIZE];
+
+ if(count <= 0)
+ {
+ return;
+ }
+
+ if(count < BUF_SIZE) {
+ memset(c, (int)' ', count);
+ fwrite(c, sizeof(char), count, f);
+ }
+ else {
+ int32_t i;
+ for(i = 0; i < count; ++i)
+ putc(' ', f);
+ }
+}
+
+/* Print the days */
+static void
+print_days(UChar *days [],
+ FILE *f,
+ UErrorCode *status)
+{
+ int32_t i;
+
+ if(U_FAILURE(*status)) return;
+
+ /* Print the day names */
+ for(i = 0; i < DAY_COUNT; ++i) {
+ uprint(days[i], f, status);
+ putc(' ', f);
+ }
+}
+
+/* Print out a calendar for c's current month */
+static void
+print_month(UCalendar *c,
+ UChar *days [],
+ UBool useLongNames,
+ int32_t fdow,
+ UErrorCode *status)
+{
+ int32_t width, pad, i, day;
+ int32_t lens [DAY_COUNT];
+ int32_t firstday, current;
+ UNumberFormat *nfmt;
+ UDateFormat *dfmt;
+ UChar s [BUF_SIZE];
+ const UChar *pat = (useLongNames ? sLongPat : sShortPat);
+ int32_t len = (useLongNames ? 9 : 8);
+
+ if(U_FAILURE(*status)) return;
+
+
+ /* ========== Generate the header containing the month and year */
+
+ /* Open a formatter with a month and year only pattern */
+ dfmt = udat_open(UDAT_IGNORE,UDAT_IGNORE,NULL,NULL,0,pat, len,status);
+
+ /* Format the date */
+ udat_format(dfmt, ucal_getMillis(c, status), s, BUF_SIZE, 0, status);
+
+
+ /* ========== Get the day names */
+ get_days(dfmt, days, useLongNames, fdow, status);
+
+ /* ========== Print the header */
+
+ /* Calculate widths for justification */
+ width = 6; /* 6 spaces, 1 between each day name */
+ for(i = 0; i < DAY_COUNT; ++i) {
+ lens[i] = u_strlen(days[i]);
+ width += lens[i];
+ }
+
+ /* Print the header, centered among the day names */
+ pad = width - u_strlen(s);
+ indent(pad / 2, stdout);
+ uprint(s, stdout, status);
+ putc('\n', stdout);
+
+
+ /* ========== Print the day names */
+
+ print_days(days, stdout, status);
+ putc('\n', stdout);
+
+
+ /* ========== Print the calendar */
+
+ /* Get the first of the month */
+ ucal_set(c, UCAL_DATE, 1);
+ firstday = ucal_get(c, UCAL_DAY_OF_WEEK, status);
+
+ /* The day of the week for the first day of the month is based on
+ 1-based days of the week, which were also reordered when placed
+ in the days array. Account for this here by offsetting by the
+ first day of the week for the locale, which is also 1-based. */
+ firstday -= fdow;
+
+ /* Open the formatter */
+ nfmt = unum_open(UNUM_DECIMAL, NULL,0,NULL,NULL, status);
+
+ /* Indent the correct number of spaces for the first week */
+ current = firstday;
+ if(current < 0)
+ {
+ current += 7;
+ }
+ for(i = 0; i < current; ++i)
+ indent(lens[i] + 1, stdout);
+
+ /* Finally, print out the days */
+ day = ucal_get(c, UCAL_DATE, status);
+ do {
+
+ /* Format the current day string */
+ unum_format(nfmt, day, s, BUF_SIZE, 0, status);
+
+ /* Calculate the justification and indent */
+ pad = lens[current] - u_strlen(s);
+ indent(pad, stdout);
+
+ /* Print the day number out, followed by a space */
+ uprint(s, stdout, status);
+ putc(' ', stdout);
+
+ /* Update the current day */
+ ++current;
+ current %= DAY_COUNT;
+
+ /* If we're at day 0 (first day of the week), insert a newline */
+ if(current == 0) {
+ putc('\n', stdout);
+ }
+
+ /* Go to the next day */
+ ucal_add(c, UCAL_DATE, 1, status);
+ day = ucal_get(c, UCAL_DATE, status);
+
+ } while(day != 1);
+
+ /* Output a trailing newline */
+ putc('\n', stdout);
+
+ /* Clean up */
+ free_days(days);
+ unum_close(nfmt);
+ udat_close(dfmt);
+}
+
+/* Print out a calendar for c's current year */
+static void
+print_year(UCalendar *c,
+ UChar *days [],
+ UChar *months [],
+ UBool useLongNames,
+ int32_t fdow,
+ UErrorCode *status)
+{
+ int32_t width, pad, i, j;
+ int32_t lens [DAY_COUNT];
+ UNumberFormat *nfmt;
+ UDateFormat *dfmt;
+ UChar s [BUF_SIZE];
+ const UChar pat [] = { 0x0079, 0x0079, 0x0079, 0x0079 };
+ int32_t len = 4;
+ UCalendar *left_cal, *right_cal;
+ int32_t left_day, right_day;
+ int32_t left_firstday, right_firstday, left_current, right_current;
+ int32_t left_month, right_month;
+
+ if(U_FAILURE(*status)) return;
+
+ /* Alias */
+ left_cal = c;
+
+ /* ========== Generate the header containing the year (only) */
+
+ /* Open a formatter with a month and year only pattern */
+ dfmt = udat_open(UDAT_IGNORE,UDAT_IGNORE,NULL,NULL,0,pat, len, status);
+
+ /* Format the date */
+ udat_format(dfmt, ucal_getMillis(left_cal, status), s, BUF_SIZE, 0, status);
+
+ /* ========== Get the month and day names */
+ get_days(dfmt, days, useLongNames, fdow, status);
+ get_months(dfmt, months, useLongNames, status);
+
+ /* ========== Print the header, centered */
+
+ /* Calculate widths for justification */
+ width = 6; /* 6 spaces, 1 between each day name */
+ for(i = 0; i < DAY_COUNT; ++i) {
+ lens[i] = u_strlen(days[i]);
+ width += lens[i];
+ }
+
+ /* width is the width for 1 calendar; we are displaying in 2 cols
+ with MARGIN_WIDTH spaces between months */
+
+ /* Print the header, centered among the day names */
+ pad = 2 * width + MARGIN_WIDTH - u_strlen(s);
+ indent(pad / 2, stdout);
+ uprint(s, stdout, status);
+ putc('\n', stdout);
+ putc('\n', stdout);
+
+ /* Generate a copy of the calendar to use */
+ right_cal = ucal_open(0, -1, uloc_getDefault(), UCAL_TRADITIONAL, status);
+ ucal_setMillis(right_cal, ucal_getMillis(left_cal, status), status);
+
+ /* Open the formatter */
+ nfmt = unum_open(UNUM_DECIMAL,NULL, 0,NULL,NULL, status);
+
+ /* ========== Calculate and display the months, two at a time */
+ for(i = 0; i < MONTH_COUNT - 1; i += 2) {
+
+ /* Print the month names for the two current months */
+ pad = width - u_strlen(months[i]);
+ indent(pad / 2, stdout);
+ uprint(months[i], stdout, status);
+ indent(pad / 2 + MARGIN_WIDTH, stdout);
+ pad = width - u_strlen(months[i + 1]);
+ indent(pad / 2, stdout);
+ uprint(months[i + 1], stdout, status);
+ putc('\n', stdout);
+
+ /* Print the day names, twice */
+ print_days(days, stdout, status);
+ indent(MARGIN_WIDTH, stdout);
+ print_days(days, stdout, status);
+ putc('\n', stdout);
+
+ /* Setup the two calendars */
+ ucal_set(left_cal, UCAL_MONTH, i);
+ ucal_set(left_cal, UCAL_DATE, 1);
+ ucal_set(right_cal, UCAL_MONTH, i + 1);
+ ucal_set(right_cal, UCAL_DATE, 1);
+
+ left_firstday = ucal_get(left_cal, UCAL_DAY_OF_WEEK, status);
+ right_firstday = ucal_get(right_cal, UCAL_DAY_OF_WEEK, status);
+
+ /* The day of the week for the first day of the month is based on
+ 1-based days of the week. However, the days were reordered
+ when placed in the days array. Account for this here by
+ offsetting by the first day of the week for the locale, which
+ is also 1-based. */
+
+ /* We need to mod by DAY_COUNT since fdow can be > firstday. IE,
+ if fdow = 2 = Monday (like in France) and the first day of the
+ month is a 1 = Sunday, we want firstday to be 6, not -1 */
+ left_firstday += (DAY_COUNT - fdow);
+ left_firstday %= DAY_COUNT;
+
+ right_firstday += (DAY_COUNT - fdow);
+ right_firstday %= DAY_COUNT;
+
+ left_current = left_firstday;
+ right_current = right_firstday;
+
+ left_day = ucal_get(left_cal, UCAL_DATE, status);
+ right_day = ucal_get(right_cal, UCAL_DATE, status);
+
+ left_month = ucal_get(left_cal, UCAL_MONTH, status);
+ right_month = ucal_get(right_cal, UCAL_MONTH, status);
+
+ /* Finally, print out the days */
+ while(left_month == i || right_month == i + 1) {
+
+ /* If the left month is finished printing, but the right month
+ still has days to be printed, indent the width of the days
+ strings and reset the left calendar's current day to 0 */
+ if(left_month != i && right_month == i + 1) {
+ indent(width + 1, stdout);
+ left_current = 0;
+ }
+
+ while(left_month == i) {
+
+ /* If the day is the first, indent the correct number of
+ spaces for the first week */
+ if(left_day == 1) {
+ for(j = 0; j < left_current; ++j)
+ indent(lens[j] + 1, stdout);
+ }
+
+ /* Format the current day string */
+ unum_format(nfmt, left_day, s, BUF_SIZE, 0, status);
+
+ /* Calculate the justification and indent */
+ pad = lens[left_current] - u_strlen(s);
+ indent(pad, stdout);
+
+ /* Print the day number out, followed by a space */
+ uprint(s, stdout, status);
+ putc(' ', stdout);
+
+ /* Update the current day */
+ ++left_current;
+ left_current %= DAY_COUNT;
+
+ /* Go to the next day */
+ ucal_add(left_cal, UCAL_DATE, 1, status);
+ left_day = ucal_get(left_cal, UCAL_DATE, status);
+
+ /* Determine the month */
+ left_month = ucal_get(left_cal, UCAL_MONTH, status);
+
+ /* If we're at day 0 (first day of the week), break and go to
+ the next month */
+ if(left_current == 0) {
+ break;
+ }
+ };
+
+ /* If the current day isn't 0, indent to make up for missing
+ days at the end of the month */
+ if(left_current != 0) {
+ for(j = left_current; j < DAY_COUNT; ++j)
+ indent(lens[j] + 1, stdout);
+ }
+
+ /* Indent between the two months */
+ indent(MARGIN_WIDTH, stdout);
+
+ while(right_month == i + 1) {
+
+ /* If the day is the first, indent the correct number of
+ spaces for the first week */
+ if(right_day == 1) {
+ for(j = 0; j < right_current; ++j)
+ indent(lens[j] + 1, stdout);
+ }
+
+ /* Format the current day string */
+ unum_format(nfmt, right_day, s, BUF_SIZE, 0, status);
+
+ /* Calculate the justification and indent */
+ pad = lens[right_current] - u_strlen(s);
+ indent(pad, stdout);
+
+ /* Print the day number out, followed by a space */
+ uprint(s, stdout, status);
+ putc(' ', stdout);
+
+ /* Update the current day */
+ ++right_current;
+ right_current %= DAY_COUNT;
+
+ /* Go to the next day */
+ ucal_add(right_cal, UCAL_DATE, 1, status);
+ right_day = ucal_get(right_cal, UCAL_DATE, status);
+
+ /* Determine the month */
+ right_month = ucal_get(right_cal, UCAL_MONTH, status);
+
+ /* If we're at day 0 (first day of the week), break out */
+ if(right_current == 0) {
+ break;
+ }
+
+ };
+
+ /* Output a newline */
+ putc('\n', stdout);
+ }
+
+ /* Output a trailing newline */
+ putc('\n', stdout);
+ }
+
+ /* Clean up */
+ free_months(months);
+ free_days(days);
+ udat_close(dfmt);
+ unum_close(nfmt);
+ ucal_close(right_cal);
+}
+
+#endif