ireplace the not-so-useful tcal format by a plain text output - ics2txt - convert icalendar .ics file to plain text	Err	bitreich.org	70
hgit clone git://bitreich.org/ics2txt git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/ics2txt	URL:git://bitreich.org/ics2txt git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/ics2txt	bitreich.org	70
1Log	/scm/ics2txt/log.gph	bitreich.org	70
1Files	/scm/ics2txt/files.gph	bitreich.org	70
1Refs	/scm/ics2txt/refs.gph	bitreich.org	70
1Tags	/scm/ics2txt/tag	bitreich.org	70
1README	/scm/ics2txt/file/README.md.gph	bitreich.org	70
i---	Err	bitreich.org	70
1commit 742516775b1d9b12e4c8893114b7cc5a363884ad	/scm/ics2txt/commit/742516775b1d9b12e4c8893114b7cc5a363884ad.gph	bitreich.org	70
1parent 5a6d05cc7d0f248c84b7f22bd1262bd9fdc9e750	/scm/ics2txt/commit/5a6d05cc7d0f248c84b7f22bd1262bd9fdc9e750.gph	bitreich.org	70
hAuthor: Josuah Demangeon <me@josuah.net>	URL:mailto:me@josuah.net	bitreich.org	70
iDate:   Sun, 20 Jun 2021 12:12:53 +0200	Err	bitreich.org	70
i	Err	bitreich.org	70
ireplace the not-so-useful tcal format by a plain text output	Err	bitreich.org	70
i	Err	bitreich.org	70
iThe input format will be an email open by a text editor, spawned by	Err	bitreich.org	70
isome script.	Err	bitreich.org	70
i	Err	bitreich.org	70
iDiffstat:	Err	bitreich.org	70
i  M .gitignore                          |       1 +	Err	bitreich.org	70
i  M Makefile                            |       4 ++--	Err	bitreich.org	70
i  M README                              |       6 ++----	Err	bitreich.org	70
i  M base64.c                            |       3 ---	Err	bitreich.org	70
i  D bin/tcal2tsv                        |      85 -------------------------------	Err	bitreich.org	70
i  D bin/tsv2tcal                        |      91 -------------------------------	Err	bitreich.org	70
i  M ical.c                              |       3 ---	Err	bitreich.org	70
i  M ical.h                              |       8 +++-----	Err	bitreich.org	70
i  M ics2tree.c                          |      11 +++++++----	Err	bitreich.org	70
i  M ics2tsv.c                           |      19 +++++++++++++------	Err	bitreich.org	70
i  A strtonum.c                          |      66 +++++++++++++++++++++++++++++++	Err	bitreich.org	70
i  D tcal.5                              |      61 -------------------------------	Err	bitreich.org	70
i  A tsv2agenda.c                        |     193 +++++++++++++++++++++++++++++++	Err	bitreich.org	70
i  M util.c                              |       8 +++-----	Err	bitreich.org	70
i  M util.h                              |       3 ++-	Err	bitreich.org	70
i	Err	bitreich.org	70
i15 files changed, 292 insertions(+), 270 deletions(-)	Err	bitreich.org	70
i---	Err	bitreich.org	70
1diff --git a/.gitignore b/.gitignore	/scm/ics2txt/file/.gitignore.gph	bitreich.org	70
i@@ -1,4 +1,5 @@	Err	bitreich.org	70
i *.o	Err	bitreich.org	70
i /ics2tsv	Err	bitreich.org	70
i /ics2tree	Err	bitreich.org	70
i+/tsv2agenda	Err	bitreich.org	70
i /ics2txt-[0-9]*	Err	bitreich.org	70
1diff --git a/Makefile b/Makefile	/scm/ics2txt/file/Makefile.gph	bitreich.org	70
i@@ -2,7 +2,7 @@ NAME = ics2txt	Err	bitreich.org	70
i VERSION = 0.2	Err	bitreich.org	70
i 	Err	bitreich.org	70
i W = -Wall -Wextra -std=c99 --pedantic	Err	bitreich.org	70
i-D = -D_POSIX_C_SOURCE=200811L -DVERSION='"${VERSION}"'	Err	bitreich.org	70
i+D = -D_POSIX_C_SOURCE=200811L -D_BSD_SOURCE -DVERSION='"${VERSION}"'	Err	bitreich.org	70
i CFLAGS = $D $W -g	Err	bitreich.org	70
i PREFIX = /usr/local	Err	bitreich.org	70
i MANPREFIX = ${PREFIX}/man	Err	bitreich.org	70
i@@ -10,7 +10,7 @@ MANPREFIX = ${PREFIX}/man	Err	bitreich.org	70
i SRC = ical.c base64.c util.c	Err	bitreich.org	70
i HDR = ical.h base64.h util.h	Err	bitreich.org	70
i OBJ = ${SRC:.c=.o}	Err	bitreich.org	70
i-BIN = ics2tree ics2tsv	Err	bitreich.org	70
i+BIN = ics2tree ics2tsv tsv2agenda	Err	bitreich.org	70
i MAN1 = ics2txt.1 ics2tsv.1	Err	bitreich.org	70
i MAN5 = tcal.5	Err	bitreich.org	70
i 	Err	bitreich.org	70
1diff --git a/README b/README	/scm/ics2txt/file/README.gph	bitreich.org	70
i@@ -7,11 +7,9 @@ The current implementation uses [awk](//josuah.net/wiki/awk/) scripts, but a	Err	bitreich.org	70
i rather complete implementation of iCalendar, without memory leak or crash, is	Err	bitreich.org	70
i already there, and used for the `ics2tree` linting tool.	Err	bitreich.org	70
i 	Err	bitreich.org	70
i-Plans include to have an `ics2json` tool for a 1:1 mapping of iCalendar, and	Err	bitreich.org	70
i-have `ics2tsv` a more general-purpose tool with user-chosen column fields.	Err	bitreich.org	70
i+`ics2tsv` converts the iCalendar data to an easier-to-parse TSV format.	Err	bitreich.org	70
i 	Err	bitreich.org	70
i-So far, Awk-based parsing have been tested with the following input formats	Err	bitreich.org	70
i-(sample account created for testing):	Err	bitreich.org	70
i+So far, Awk-based parsing have been tested with the following inputs:	Err	bitreich.org	70
i 	Err	bitreich.org	70
i * Zoom meetings generated events	Err	bitreich.org	70
i * FOSDEM events, like <https://fosdem.org/2020/schedule/ical>	Err	bitreich.org	70
1diff --git a/base64.c b/base64.c	/scm/ics2txt/file/base64.c.gph	bitreich.org	70
i@@ -1,12 +1,9 @@	Err	bitreich.org	70
i #include "base64.h"	Err	bitreich.org	70
i-	Err	bitreich.org	70
i #include <assert.h>	Err	bitreich.org	70
i #include <stddef.h>	Err	bitreich.org	70
i #include <stdint.h>	Err	bitreich.org	70
i #include <string.h>	Err	bitreich.org	70
i 	Err	bitreich.org	70
i-#include <stdio.h>	Err	bitreich.org	70
i-	Err	bitreich.org	70
i static char encode_map[64] =	Err	bitreich.org	70
i     "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";	Err	bitreich.org	70
i 	Err	bitreich.org	70
1diff --git a/bin/tcal2tsv b/bin/tcal2tsv	/scm/ics2txt/file/bin/tcal2tsv.gph	bitreich.org	70
i@@ -1,85 +0,0 @@	Err	bitreich.org	70
i-#!/usr/bin/awk -f	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-function isleap(year)	Err	bitreich.org	70
i-{	Err	bitreich.org	70
i-        return (year % 4 == 0) && (year % 100 != 0) || (year % 400 == 0)	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-function mdays(mon, year)	Err	bitreich.org	70
i-{	Err	bitreich.org	70
i-        return (mon == 2) ? (28 + isleap(year)) : (30 + (mon + (mon > 7)) % 2)	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-function maketime(tm,	Err	bitreich.org	70
i-        sec, mon, day)	Err	bitreich.org	70
i-{	Err	bitreich.org	70
i-        sec = tm["sec"] + tm["min"] * 60 + tm["hour"] * 3600	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-        day = tm["mday"] - 1	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-        for (mon = tm["mon"] - 1; mon > 0; mon--)	Err	bitreich.org	70
i-                day = day + mdays(mon, tm["year"])	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-        # constants: x * 365 + x / 400 - x / 100 + x / 4	Err	bitreich.org	70
i-        day = day + int(tm["year"] / 400) * 146097	Err	bitreich.org	70
i-        day = day + int(tm["year"] % 400 / 100) * 36524	Err	bitreich.org	70
i-        day = day + int(tm["year"] % 100 / 4) * 1461	Err	bitreich.org	70
i-        day = day + int(tm["year"] % 4 / 1) * 365	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-        return sec + (day - 719527) * 86400	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-function text_to_epoch(str, tz,	Err	bitreich.org	70
i-        tm)	Err	bitreich.org	70
i-{	Err	bitreich.org	70
i-        tm["year"] = substr(str, 1, 4)	Err	bitreich.org	70
i-        tm["mon"] = substr(str, 6, 2)	Err	bitreich.org	70
i-        tm["mday"] = substr(str, 9, 2)	Err	bitreich.org	70
i-        tm["hour"] = substr(str, 12, 2)	Err	bitreich.org	70
i-        tm["min"] = substr(str, 15, 2)	Err	bitreich.org	70
i-        return maketime(tm) - tz	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-BEGIN {	Err	bitreich.org	70
i-        FIELDS = "beg end cat loc sum des"	Err	bitreich.org	70
i-        split(FIELDS, fields, " ")	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-        for (i = 1; i in fields; i++) {	Err	bitreich.org	70
i-                pos[fields[i]] = i	Err	bitreich.org	70
i-                printf("%s%s", (i > 1 ? "\t" : ""), fields[i])	Err	bitreich.org	70
i-        }	Err	bitreich.org	70
i-        printf("\n")	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-{	Err	bitreich.org	70
i-        gsub(/\t/, " ")	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-/^TZ[+-]/ {	Err	bitreich.org	70
i-        TZ = substr($1, 3, 1) substr($0, 4, 2)*3600 + substr($0, 6, 2)*60	Err	bitreich.org	70
i-        while (getline && $0 ~ /^$/)	Err	bitreich.org	70
i-                continue	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-/^[0-9]+-[0-9]+-[0-9]+/ {	Err	bitreich.org	70
i-        if ("beg" in ev)	Err	bitreich.org	70
i-                ev["end"] = text_to_epoch($0, TZ)	Err	bitreich.org	70
i-        else	Err	bitreich.org	70
i-                ev["beg"] = text_to_epoch($0, TZ)	Err	bitreich.org	70
i-        next	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-/^ / {	Err	bitreich.org	70
i-        tag = $1	Err	bitreich.org	70
i-        sub("^ *[^ :]+: *", "")	Err	bitreich.org	70
i-        sub(":$", "", tag)	Err	bitreich.org	70
i-        ev[tag] = $0	Err	bitreich.org	70
i-        next	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-/^$/ {	Err	bitreich.org	70
i-        for (i = 1; i in fields; i++)	Err	bitreich.org	70
i-                printf("%s%s", (i > 1 ? "\t" : ""), ev[fields[i]])	Err	bitreich.org	70
i-        printf("\n")	Err	bitreich.org	70
i-        delete ev	Err	bitreich.org	70
i-}	Err	bitreich.org	70
1diff --git a/bin/tsv2tcal b/bin/tsv2tcal	/scm/ics2txt/file/bin/tsv2tcal.gph	bitreich.org	70
i@@ -1,91 +0,0 @@	Err	bitreich.org	70
i-#!/usr/bin/awk -f	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-function isleap(year)	Err	bitreich.org	70
i-{	Err	bitreich.org	70
i-        return (year % 4 == 0) && (year % 100 != 0) || (year % 400 == 0)	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-function mdays(mon, year)	Err	bitreich.org	70
i-{	Err	bitreich.org	70
i-        return (mon == 2) ? (28 + isleap(year)) : (30 + (mon + (mon > 7)) % 2)	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-function gmtime(sec, tm)	Err	bitreich.org	70
i-{	Err	bitreich.org	70
i-        tm["year"] = 1970	Err	bitreich.org	70
i-        while (sec >= (s = 86400 * (365 + isleap(tm["year"])))) {	Err	bitreich.org	70
i-                tm["year"]++	Err	bitreich.org	70
i-                sec -= s	Err	bitreich.org	70
i-        }	Err	bitreich.org	70
i-        tm["mon"] = 1	Err	bitreich.org	70
i-        while (sec >= (s = 86400 * mdays(tm["mon"], tm["year"]))) {	Err	bitreich.org	70
i-                tm["mon"]++	Err	bitreich.org	70
i-                sec -= s	Err	bitreich.org	70
i-        }	Err	bitreich.org	70
i-        tm["mday"] = 1	Err	bitreich.org	70
i-        while (sec >= (s = 86400)) {	Err	bitreich.org	70
i-                tm["mday"]++	Err	bitreich.org	70
i-                sec -= s	Err	bitreich.org	70
i-        }	Err	bitreich.org	70
i-        tm["hour"] = 0	Err	bitreich.org	70
i-        while (sec >= 3600) {	Err	bitreich.org	70
i-                tm["hour"]++	Err	bitreich.org	70
i-                sec -= 3600	Err	bitreich.org	70
i-        }	Err	bitreich.org	70
i-        tm["min"] = 0	Err	bitreich.org	70
i-        while (sec >= 60) {	Err	bitreich.org	70
i-                tm["min"]++	Err	bitreich.org	70
i-                sec -= 60	Err	bitreich.org	70
i-        }	Err	bitreich.org	70
i-        tm["sec"] = sec	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-function localtime(sec, tm,	Err	bitreich.org	70
i-        tz, h, m)	Err	bitreich.org	70
i-{	Err	bitreich.org	70
i-        return gmtime(sec + TZ, tm)	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-BEGIN {	Err	bitreich.org	70
i-        "exec date +%z" | getline tz	Err	bitreich.org	70
i-        close("exec date +%z")	Err	bitreich.org	70
i-        TZ = substr(tz, 1, 1) substr(tz, 2, 2)*3600 + substr(tz, 4, 2)*60	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-        print("TZ" tz)	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-        FS = "\t"	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-NR == 1 {	Err	bitreich.org	70
i-        for (i = 1; i <= NF; i++)	Err	bitreich.org	70
i-                name[i] = $i	Err	bitreich.org	70
i-        next	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-{	Err	bitreich.org	70
i-        for (i = 1; i <= NF; i++)	Err	bitreich.org	70
i-                ev[name[i]] = $i	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-        print("")	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-        localtime(ev["beg"] + offset, tm)	Err	bitreich.org	70
i-        printf("%04d-%02d-%02d %02d:%02d\n",	Err	bitreich.org	70
i-          tm["year"], tm["mon"], tm["mday"], tm["hour"], tm["min"])	Err	bitreich.org	70
i-        delete ev["beg"]	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-        localtime(ev["end"] + offset, tm)	Err	bitreich.org	70
i-        printf("%04d-%02d-%02d %02d:%02d\n",	Err	bitreich.org	70
i-          tm["year"], tm["mon"], tm["mday"], tm["hour"], tm["min"])	Err	bitreich.org	70
i-        delete ev["end"]	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-        for (i = 1; i <= NF; i++) {	Err	bitreich.org	70
i-                if (name[i] in ev && ev[name[i]])	Err	bitreich.org	70
i-                        printf(" %s: %s\n", name[i], ev[name[i]])	Err	bitreich.org	70
i-        }	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-        delete ev	Err	bitreich.org	70
i-}	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-END {	Err	bitreich.org	70
i-        print("")	Err	bitreich.org	70
i-}	Err	bitreich.org	70
1diff --git a/ical.c b/ical.c	/scm/ics2txt/file/ical.c.gph	bitreich.org	70
i@@ -1,5 +1,4 @@	Err	bitreich.org	70
i #include "ical.h"	Err	bitreich.org	70
i-	Err	bitreich.org	70
i #include <assert.h>	Err	bitreich.org	70
i #include <ctype.h>	Err	bitreich.org	70
i #include <errno.h>	Err	bitreich.org	70
i@@ -7,7 +6,6 @@	Err	bitreich.org	70
i #include <stdlib.h>	Err	bitreich.org	70
i #include <string.h>	Err	bitreich.org	70
i #include <strings.h>	Err	bitreich.org	70
i-	Err	bitreich.org	70
i #include "util.h"	Err	bitreich.org	70
i #include "base64.h"	Err	bitreich.org	70
i 	Err	bitreich.org	70
i@@ -329,7 +327,6 @@ ical_parse(IcalParser *p, FILE *fp)	Err	bitreich.org	70
i         } while        (l > 0 && (err = ical_parse_contentline(p, contentline)) == 0);	Err	bitreich.org	70
i 	Err	bitreich.org	70
i         free(contentline);	Err	bitreich.org	70
i-        free(line);	Err	bitreich.org	70
i 	Err	bitreich.org	70
i         if (err == 0 && p->current != p->stack)	Err	bitreich.org	70
i                 return ical_err(p, "more BEGIN: than END:");	Err	bitreich.org	70
1diff --git a/ical.h b/ical.h	/scm/ics2txt/file/ical.h.gph	bitreich.org	70
i@@ -6,9 +6,6 @@	Err	bitreich.org	70
i 	Err	bitreich.org	70
i #define ICAL_STACK_SIZE 10	Err	bitreich.org	70
i 	Err	bitreich.org	70
i-typedef struct IcalParser IcalParser;	Err	bitreich.org	70
i-typedef struct IcalStack IcalStack;	Err	bitreich.org	70
i-	Err	bitreich.org	70
i typedef enum {	Err	bitreich.org	70
i         ICAL_BLOCK_VEVENT,	Err	bitreich.org	70
i         ICAL_BLOCK_VTODO,	Err	bitreich.org	70
i@@ -18,11 +15,12 @@ typedef enum {	Err	bitreich.org	70
i         ICAL_BLOCK_OTHER,	Err	bitreich.org	70
i } IcalBlock;	Err	bitreich.org	70
i 	Err	bitreich.org	70
i-struct IcalStack {	Err	bitreich.org	70
i+typedef struct {	Err	bitreich.org	70
i         char         name[32];	Err	bitreich.org	70
i         char         tzid[32];	Err	bitreich.org	70
i-};	Err	bitreich.org	70
i+} IcalStack;	Err	bitreich.org	70
i 	Err	bitreich.org	70
i+typedef struct IcalParser IcalParser;	Err	bitreich.org	70
i struct IcalParser {	Err	bitreich.org	70
i         /* function called while parsing in this order */	Err	bitreich.org	70
i         int (*fn_field_name)(IcalParser *, char *);	Err	bitreich.org	70
1diff --git a/ics2tree.c b/ics2tree.c	/scm/ics2txt/file/ics2tree.c.gph	bitreich.org	70
i@@ -2,10 +2,13 @@	Err	bitreich.org	70
i #include <stdlib.h>	Err	bitreich.org	70
i #include <string.h>	Err	bitreich.org	70
i #include <strings.h>	Err	bitreich.org	70
i-	Err	bitreich.org	70
i #include "ical.h"	Err	bitreich.org	70
i #include "util.h"	Err	bitreich.org	70
i 	Err	bitreich.org	70
i+#ifndef __OpenBSD__	Err	bitreich.org	70
i+#define pledge(...) 0	Err	bitreich.org	70
i+#endif	Err	bitreich.org	70
i+	Err	bitreich.org	70
i static void	Err	bitreich.org	70
i print_ruler(int level)	Err	bitreich.org	70
i {	Err	bitreich.org	70
i@@ -76,7 +79,7 @@ main(int argc, char **argv)	Err	bitreich.org	70
i 	Err	bitreich.org	70
i         if (*argv == NULL) {	Err	bitreich.org	70
i                 if (ical_parse(&p, stdin) < 0)	Err	bitreich.org	70
i-                        err("parsing stdin:%d: %s", p.linenum, p.errmsg);	Err	bitreich.org	70
i+                        err(1, "parsing stdin:%d: %s", p.linenum, p.errmsg);	Err	bitreich.org	70
i         }	Err	bitreich.org	70
i 	Err	bitreich.org	70
i         for (; *argv != NULL; argv++, argc--) {	Err	bitreich.org	70
i@@ -84,9 +87,9 @@ main(int argc, char **argv)	Err	bitreich.org	70
i 	Err	bitreich.org	70
i                 debug("converting \"%s\"", *argv);	Err	bitreich.org	70
i                 if ((fp = fopen(*argv, "r")) == NULL)	Err	bitreich.org	70
i-                        err("opening %s", *argv);	Err	bitreich.org	70
i+                        err(1, "opening %s", *argv);	Err	bitreich.org	70
i                 if (ical_parse(&p, fp) < 0)	Err	bitreich.org	70
i-                        err("parsing %s:%d: %s", *argv, p.linenum, p.errmsg);	Err	bitreich.org	70
i+                        err(1, "parsing %s:%d: %s", *argv, p.linenum, p.errmsg);	Err	bitreich.org	70
i                 fclose(fp);	Err	bitreich.org	70
i         }	Err	bitreich.org	70
i         return 0;	Err	bitreich.org	70
1diff --git a/ics2tsv.c b/ics2tsv.c	/scm/ics2txt/file/ics2tsv.c.gph	bitreich.org	70
i@@ -5,10 +5,13 @@	Err	bitreich.org	70
i #include <strings.h>	Err	bitreich.org	70
i #include <time.h>	Err	bitreich.org	70
i #include <unistd.h>	Err	bitreich.org	70
i-	Err	bitreich.org	70
i #include "ical.h"	Err	bitreich.org	70
i #include "util.h"	Err	bitreich.org	70
i 	Err	bitreich.org	70
i+#ifndef __OpenBSD__	Err	bitreich.org	70
i+#define pledge(...) 0	Err	bitreich.org	70
i+#endif	Err	bitreich.org	70
i+	Err	bitreich.org	70
i #define FIELDS_MAX 128	Err	bitreich.org	70
i 	Err	bitreich.org	70
i typedef struct Field Field;	Err	bitreich.org	70
i@@ -155,6 +158,9 @@ main(int argc, char **argv)	Err	bitreich.org	70
i 	Err	bitreich.org	70
i         arg0 = *argv;	Err	bitreich.org	70
i 	Err	bitreich.org	70
i+        if (pledge("stdio rpath", "") < 0)	Err	bitreich.org	70
i+                err(1, "pledge: %s", strerror(errno));	Err	bitreich.org	70
i+	Err	bitreich.org	70
i         p.fn_field_name = fn_field_name;	Err	bitreich.org	70
i         p.fn_block_begin = fn_block_begin;	Err	bitreich.org	70
i         p.fn_block_end = fn_block_end;	Err	bitreich.org	70
i@@ -186,12 +192,12 @@ main(int argc, char **argv)	Err	bitreich.org	70
i         i = 0;	Err	bitreich.org	70
i         do {	Err	bitreich.org	70
i                 if (i >= sizeof fields / sizeof *fields - 1)	Err	bitreich.org	70
i-                        err("too many fields specified with -o flag");	Err	bitreich.org	70
i+                        err(1, "too many fields specified with -o flag");	Err	bitreich.org	70
i         } while ((fields[i++] = strsep(&flag_f, ",")) != NULL);	Err	bitreich.org	70
i         fields[i] = NULL;	Err	bitreich.org	70
i 	Err	bitreich.org	70
i         if (flag_1) {	Err	bitreich.org	70
i-                printf("%s\t%s\t%s", "TYPE", "BEG", "END");	Err	bitreich.org	70
i+                printf("%s\t%s\t%s\t%s", "TYPE", "BEG", "END", "RECUR");	Err	bitreich.org	70
i                 for (i = 0; fields[i] != NULL; i++)	Err	bitreich.org	70
i                         printf("\t%s", fields[i]);	Err	bitreich.org	70
i                 fputc('\n', stdout);	Err	bitreich.org	70
i@@ -200,16 +206,17 @@ main(int argc, char **argv)	Err	bitreich.org	70
i         if (*argv == NULL || strcmp(*argv, "-") == 0) {	Err	bitreich.org	70
i                 debug("converting *stdin*");	Err	bitreich.org	70
i                 if (ical_parse(&p, stdin) < 0)	Err	bitreich.org	70
i-                        err("parsing *stdin*:%d: %s", p.linenum, p.errmsg);	Err	bitreich.org	70
i+                        err(1, "parsing *stdin*:%d: %s", p.linenum, p.errmsg);	Err	bitreich.org	70
i         }	Err	bitreich.org	70
i         for (; *argv != NULL; argv++, argc--) {	Err	bitreich.org	70
i                 FILE *fp;	Err	bitreich.org	70
i                 debug("converting \"%s\"", *argv);	Err	bitreich.org	70
i                 if ((fp = fopen(*argv, "r")) == NULL)	Err	bitreich.org	70
i-                        err("opening %s: %s", *argv, strerror(errno));	Err	bitreich.org	70
i+                        err(1, "opening %s: %s", *argv, strerror(errno));	Err	bitreich.org	70
i                 if (ical_parse(&p, fp) < 0)	Err	bitreich.org	70
i-                        err("parsing %s:%d: %s", *argv, p.linenum, p.errmsg);	Err	bitreich.org	70
i+                        err(1, "parsing %s:%d: %s", *argv, p.linenum, p.errmsg);	Err	bitreich.org	70
i                 fclose(fp);	Err	bitreich.org	70
i         }	Err	bitreich.org	70
i+	Err	bitreich.org	70
i         return 0;	Err	bitreich.org	70
i }	Err	bitreich.org	70
1diff --git a/strtonum.c b/strtonum.c	/scm/ics2txt/file/strtonum.c.gph	bitreich.org	70
i@@ -0,0 +1,66 @@	Err	bitreich.org	70
i+/*        $OpenBSD: strtonum.c,v 1.8 2015/09/13 08:31:48 guenther Exp $        */	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+/*	Err	bitreich.org	70
i+ * Copyright (c) 2004 Ted Unangst and Todd Miller	Err	bitreich.org	70
i+ * All rights reserved.	Err	bitreich.org	70
i+ *	Err	bitreich.org	70
i+ * Permission to use, copy, modify, and distribute this software for any	Err	bitreich.org	70
i+ * purpose with or without fee is hereby granted, provided that the above	Err	bitreich.org	70
i+ * copyright notice and this permission notice appear in all copies.	Err	bitreich.org	70
i+ *	Err	bitreich.org	70
i+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES	Err	bitreich.org	70
i+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF	Err	bitreich.org	70
i+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR	Err	bitreich.org	70
i+ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES	Err	bitreich.org	70
i+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN	Err	bitreich.org	70
i+ * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF	Err	bitreich.org	70
i+ * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.	Err	bitreich.org	70
i+ */	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+#include <errno.h>	Err	bitreich.org	70
i+#include <limits.h>	Err	bitreich.org	70
i+#include <stdlib.h>	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+#define        INVALID                1	Err	bitreich.org	70
i+#define        TOOSMALL        2	Err	bitreich.org	70
i+#define        TOOLARGE        3	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+long long	Err	bitreich.org	70
i+strtonum(const char *numstr, long long minval, long long maxval,	Err	bitreich.org	70
i+    const char **errstrp)	Err	bitreich.org	70
i+{	Err	bitreich.org	70
i+        long long ll = 0;	Err	bitreich.org	70
i+        int error = 0;	Err	bitreich.org	70
i+        char *ep;	Err	bitreich.org	70
i+        struct errval {	Err	bitreich.org	70
i+                const char *errstr;	Err	bitreich.org	70
i+                int err;	Err	bitreich.org	70
i+        } ev[4] = {	Err	bitreich.org	70
i+                { NULL,                0 },	Err	bitreich.org	70
i+                { "invalid",        EINVAL },	Err	bitreich.org	70
i+                { "too small",        ERANGE },	Err	bitreich.org	70
i+                { "too large",        ERANGE },	Err	bitreich.org	70
i+        };	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        ev[0].err = errno;	Err	bitreich.org	70
i+        errno = 0;	Err	bitreich.org	70
i+        if (minval > maxval) {	Err	bitreich.org	70
i+                error = INVALID;	Err	bitreich.org	70
i+        } else {	Err	bitreich.org	70
i+                ll = strtoll(numstr, &ep, 10);	Err	bitreich.org	70
i+                if (numstr == ep || *ep != '\0')	Err	bitreich.org	70
i+                        error = INVALID;	Err	bitreich.org	70
i+                else if ((ll == LLONG_MIN && errno == ERANGE) || ll < minval)	Err	bitreich.org	70
i+                        error = TOOSMALL;	Err	bitreich.org	70
i+                else if ((ll == LLONG_MAX && errno == ERANGE) || ll > maxval)	Err	bitreich.org	70
i+                        error = TOOLARGE;	Err	bitreich.org	70
i+        }	Err	bitreich.org	70
i+        if (errstrp != NULL)	Err	bitreich.org	70
i+                *errstrp = ev[error].errstr;	Err	bitreich.org	70
i+        errno = ev[error].err;	Err	bitreich.org	70
i+        if (error)	Err	bitreich.org	70
i+                ll = 0;	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        return (ll);	Err	bitreich.org	70
i+}	Err	bitreich.org	70
i+DEF_WEAK(strtonum);	Err	bitreich.org	70
1diff --git a/tcal.5 b/tcal.5	/scm/ics2txt/file/tcal.5.gph	bitreich.org	70
i@@ -1,61 +0,0 @@	Err	bitreich.org	70
i-.Dd $Mdocdate: March 05 2020$	Err	bitreich.org	70
i-.Dt TCAL 5	Err	bitreich.org	70
i-.Os	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.Sh NAME	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.Nm tcal	Err	bitreich.org	70
i-.Nd plaintext calendar for editing by hand on the go	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.Sh DESCRIPTION	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-The first line contain	Err	bitreich.org	70
i-.Dq TZ+HHMM	Err	bitreich.org	70
i-with	Err	bitreich.org	70
i-.Dq +HHMM	Err	bitreich.org	70
i-as returned by	Err	bitreich.org	70
i-.D1 $ date +%z .	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.Pp	Err	bitreich.org	70
i-Then empty line delimited event entries follow, with for each:	Err	bitreich.org	70
i-One line with the start date, one line with the end date,	Err	bitreich.org	70
i-formatted like:	Err	bitreich.org	70
i-.Dq %Y-%m-%d %H:%M	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.Pp	Err	bitreich.org	70
i-Then one line per attribute, each formatted with:	Err	bitreich.org	70
i-optional space, attribute name, colon,	Err	bitreich.org	70
i-optional space, and attribute content,	Err	bitreich.org	70
i-end of line.	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.Sh EXAMPLES	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.Bd -literal	Err	bitreich.org	70
i-TZ+0200	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-2021-06-28 00:00	Err	bitreich.org	70
i-2021-06-05 00:00	Err	bitreich.org	70
i- loc: 950-0994, Chuo Ward, Niigata, Japan	Err	bitreich.org	70
i- sum: summer holidays	Err	bitreich.org	70
i-	Err	bitreich.org	70
i-2021-06-29 13:30	Err	bitreich.org	70
i-2021-06-29 15:00	Err	bitreich.org	70
i- loc: online, irc.bitreich.org, #bitreich-en	Err	bitreich.org	70
i- sum: bitreich irc invitation	Err	bitreich.org	70
i- des: at this moment like all other moment, everyone invited on IRC	Err	bitreich.org	70
i-.Ed	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.Sh SEE ALSO	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.Xr cal 1 ,	Err	bitreich.org	70
i-.Xr calendar 1	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.Sh AUTHORS	Err	bitreich.org	70
i-.	Err	bitreich.org	70
i-.An Josuah Demangeon	Err	bitreich.org	70
i-.Aq Mt me@josuah.net	Err	bitreich.org	70
1diff --git a/tsv2agenda.c b/tsv2agenda.c	/scm/ics2txt/file/tsv2agenda.c.gph	bitreich.org	70
i@@ -0,0 +1,193 @@	Err	bitreich.org	70
i+#include <assert.h>	Err	bitreich.org	70
i+#include <errno.h>	Err	bitreich.org	70
i+#include <stdio.h>	Err	bitreich.org	70
i+#include <stdlib.h>	Err	bitreich.org	70
i+#include <stdint.h>	Err	bitreich.org	70
i+#include <string.h>	Err	bitreich.org	70
i+#include <unistd.h>	Err	bitreich.org	70
i+#include "util.h"	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+#ifndef __OpenBSD__	Err	bitreich.org	70
i+#define pledge(...) 0	Err	bitreich.org	70
i+#endif	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+#define FIELDS_MAX 128	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+enum {	Err	bitreich.org	70
i+        FIELD_TYPE,	Err	bitreich.org	70
i+        FIELD_BEG,	Err	bitreich.org	70
i+        FIELD_END,	Err	bitreich.org	70
i+        FIELD_RECUR,	Err	bitreich.org	70
i+        FIELD_OTHER,	Err	bitreich.org	70
i+};	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+typedef struct {	Err	bitreich.org	70
i+        struct tm beg, end;	Err	bitreich.org	70
i+} AgendaCtx;	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+static size_t field_categories = 0;	Err	bitreich.org	70
i+static size_t field_location = 0;	Err	bitreich.org	70
i+static size_t field_summary = 0;	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+void	Err	bitreich.org	70
i+print_date(struct tm *tm)	Err	bitreich.org	70
i+{	Err	bitreich.org	70
i+         if (tm == NULL) {	Err	bitreich.org	70
i+                fprintf(stdout, "%11s", "");	Err	bitreich.org	70
i+        } else {	Err	bitreich.org	70
i+                char buf[128];	Err	bitreich.org	70
i+                if (strftime(buf, sizeof buf, "%Y-%m-%d", tm) == 0)	Err	bitreich.org	70
i+                        err(1, "strftime: %s", strerror(errno));	Err	bitreich.org	70
i+                fprintf(stdout, "%s ", buf);	Err	bitreich.org	70
i+        }	Err	bitreich.org	70
i+}	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+void	Err	bitreich.org	70
i+print_time(struct tm *tm)	Err	bitreich.org	70
i+{	Err	bitreich.org	70
i+        if (tm == NULL) {	Err	bitreich.org	70
i+                fprintf(stdout, "%5s ", "");	Err	bitreich.org	70
i+        } else {	Err	bitreich.org	70
i+                char buf[128];	Err	bitreich.org	70
i+                if (strftime(buf, sizeof buf, "%H:%M", tm) == 0)	Err	bitreich.org	70
i+                        err(1, "strftime: %s", strerror(errno));	Err	bitreich.org	70
i+                fprintf(stdout, "%5s ", buf);	Err	bitreich.org	70
i+        }	Err	bitreich.org	70
i+}	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+void	Err	bitreich.org	70
i+print(AgendaCtx *ctx, char **fields, size_t n)	Err	bitreich.org	70
i+{	Err	bitreich.org	70
i+        struct tm beg = {0}, end = {0};	Err	bitreich.org	70
i+        time_t t;	Err	bitreich.org	70
i+        char const *e;	Err	bitreich.org	70
i+        int rows, samedate;	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        t = strtonum(fields[FIELD_BEG], 0, UINT32_MAX, &e);	Err	bitreich.org	70
i+        if (e != NULL)	Err	bitreich.org	70
i+                err(1, "start time %s is %s", fields[FIELD_BEG], e);	Err	bitreich.org	70
i+        localtime_r(&t, &beg);	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        t = strtonum(fields[FIELD_END], 0, UINT32_MAX, &e);	Err	bitreich.org	70
i+        if (e != NULL)	Err	bitreich.org	70
i+                err(1, "end time %s is %s", fields[FIELD_END], e);	Err	bitreich.org	70
i+        localtime_r(&t, &end);	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        fputc('\n', stdout);	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        samedate = (ctx->beg.tm_year != beg.tm_year || ctx->beg.tm_mon != beg.tm_mon ||	Err	bitreich.org	70
i+            ctx->beg.tm_mday != beg.tm_mday);	Err	bitreich.org	70
i+        print_date(samedate ? &beg : NULL);	Err	bitreich.org	70
i+        print_time(&beg);	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        assert(field_summary < n);	Err	bitreich.org	70
i+        assert(field_summary > FIELD_OTHER);	Err	bitreich.org	70
i+        fprintf(stdout, "%s\n", fields[field_summary]);	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        samedate = (beg.tm_year != end.tm_year || beg.tm_mon != end.tm_mon ||	Err	bitreich.org	70
i+            beg.tm_mday != end.tm_mday);	Err	bitreich.org	70
i+        print_date(samedate ? &end : NULL);	Err	bitreich.org	70
i+        print_time(&end);	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        rows = 0;	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        assert(field_location < n);	Err	bitreich.org	70
i+        if (field_location > 0 && fields[field_location][0] != '\0') {	Err	bitreich.org	70
i+                assert(field_summary > FIELD_OTHER);	Err	bitreich.org	70
i+                fprintf(stdout, "%s\n", fields[field_location]);	Err	bitreich.org	70
i+                rows++;	Err	bitreich.org	70
i+        }	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        assert(field_categories < n);	Err	bitreich.org	70
i+        if (field_categories > 0 && fields[field_categories][0] != '\0') {	Err	bitreich.org	70
i+                assert(field_summary > FIELD_OTHER);	Err	bitreich.org	70
i+                if (rows > 0) {	Err	bitreich.org	70
i+                        print_date(NULL);	Err	bitreich.org	70
i+                        print_time(NULL);	Err	bitreich.org	70
i+                }	Err	bitreich.org	70
i+                fprintf(stdout, "%s\n", fields[field_categories]);	Err	bitreich.org	70
i+        }	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        ctx->beg = beg;	Err	bitreich.org	70
i+        ctx->end = end;	Err	bitreich.org	70
i+}	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+void	Err	bitreich.org	70
i+set_fields_num(char **fields, size_t n)	Err	bitreich.org	70
i+{	Err	bitreich.org	70
i+        struct { char *name; size_t *var; } map[] = {	Err	bitreich.org	70
i+                { "CATEGORIES", &field_categories },	Err	bitreich.org	70
i+                { "LOCATION", &field_location },	Err	bitreich.org	70
i+                { "SUMMARY", &field_summary },	Err	bitreich.org	70
i+                { NULL, NULL }	Err	bitreich.org	70
i+        };	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        debug("n=%zd", n);	Err	bitreich.org	70
i+        for (size_t i1 = FIELD_OTHER; i1 < n; i1++)	Err	bitreich.org	70
i+                for (size_t i2 = 0; map[i2].name != NULL; i2++)	Err	bitreich.org	70
i+                        if (strcasecmp(fields[i1], map[i2].name) == 0)	Err	bitreich.org	70
i+                                *map[i2].var = i1;	Err	bitreich.org	70
i+        if (field_summary < FIELD_OTHER)	Err	bitreich.org	70
i+                err(1, "missing column SUMMARY");	Err	bitreich.org	70
i+}	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+ssize_t	Err	bitreich.org	70
i+tsv_getline(char **fields, size_t max, char **line, size_t *sz, FILE *fp)	Err	bitreich.org	70
i+{	Err	bitreich.org	70
i+        char *s;	Err	bitreich.org	70
i+        size_t n = 0;	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        if (getline(line, sz, fp) <= 0)	Err	bitreich.org	70
i+                return ferror(fp) ? -1 : 0;	Err	bitreich.org	70
i+        s = *line;	Err	bitreich.org	70
i+        strchomp(s);	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        do {	Err	bitreich.org	70
i+                if (n >= max)	Err	bitreich.org	70
i+                        return errno=E2BIG, -1;	Err	bitreich.org	70
i+        } while ((fields[n++] = strsep(&s, "\t")) != NULL);	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        return n - 1;	Err	bitreich.org	70
i+}	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+int	Err	bitreich.org	70
i+main(int argc, char **argv)	Err	bitreich.org	70
i+{	Err	bitreich.org	70
i+        AgendaCtx ctx = {0};	Err	bitreich.org	70
i+        ssize_t nfield, n;	Err	bitreich.org	70
i+        size_t sz = 0;	Err	bitreich.org	70
i+        char *line = NULL, *fields[FIELDS_MAX];	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        arg0 = *argv;	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        if (pledge("stdio", "") < 0)	Err	bitreich.org	70
i+                err(1, "pledge: %s", strerror(errno));	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        nfield = tsv_getline(fields, FIELDS_MAX, &line, &sz, stdin);	Err	bitreich.org	70
i+        if (nfield == -1)	Err	bitreich.org	70
i+                err(1, "reading stdin: %s", strerror(errno));	Err	bitreich.org	70
i+        if (nfield == 0)	Err	bitreich.org	70
i+                err(1, "empty input");	Err	bitreich.org	70
i+        if (nfield < FIELD_OTHER)	Err	bitreich.org	70
i+                err(1, "not enough input columns");	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        set_fields_num(fields, nfield);	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        for (size_t num = 1;; num++) {	Err	bitreich.org	70
i+                n = tsv_getline(fields, FIELDS_MAX, &line, &sz, stdin);	Err	bitreich.org	70
i+                if (n < 0)	Err	bitreich.org	70
i+                        err(1, "line %zd: reading stdin: %s", num, strerror(errno));	Err	bitreich.org	70
i+                if (n == 0)	Err	bitreich.org	70
i+                        break;	Err	bitreich.org	70
i+                if (n != nfield)	Err	bitreich.org	70
i+                        err(1, "line %zd: had %lld columns, wanted %lld",	Err	bitreich.org	70
i+                            num, n, nfield);	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+                print(&ctx, fields, n);	Err	bitreich.org	70
i+        }	Err	bitreich.org	70
i+        fputc('\n', stdout);	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        free(line);	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+        return 0;	Err	bitreich.org	70
i+}	Err	bitreich.org	70
1diff --git a/util.c b/util.c	/scm/ics2txt/file/util.c.gph	bitreich.org	70
i@@ -1,5 +1,4 @@	Err	bitreich.org	70
i #include "util.h"	Err	bitreich.org	70
i-	Err	bitreich.org	70
i #include <errno.h>	Err	bitreich.org	70
i #include <stdint.h>	Err	bitreich.org	70
i #include <stdlib.h>	Err	bitreich.org	70
i@@ -22,13 +21,13 @@ _log(char const *fmt, va_list va)	Err	bitreich.org	70
i }	Err	bitreich.org	70
i 	Err	bitreich.org	70
i void	Err	bitreich.org	70
i-err(char const *fmt, ...)	Err	bitreich.org	70
i+err(int e, char const *fmt, ...)	Err	bitreich.org	70
i {	Err	bitreich.org	70
i         va_list va;	Err	bitreich.org	70
i 	Err	bitreich.org	70
i         va_start(va, fmt);	Err	bitreich.org	70
i         _log( fmt, va);	Err	bitreich.org	70
i-        exit(1);	Err	bitreich.org	70
i+        exit(e);	Err	bitreich.org	70
i }	Err	bitreich.org	70
i 	Err	bitreich.org	70
i void	Err	bitreich.org	70
i@@ -87,8 +86,7 @@ strsep(char **sp, char const *sep)	Err	bitreich.org	70
i         if (*sp == NULL)	Err	bitreich.org	70
i                 return NULL;	Err	bitreich.org	70
i         prev = *sp;	Err	bitreich.org	70
i-        for (s = *sp; strchr(sep, *s) == NULL; s++)	Err	bitreich.org	70
i-                continue;	Err	bitreich.org	70
i+        for (s = *sp; strchr(sep, *s) == NULL; s++);	Err	bitreich.org	70
i         if (*s == '\0') {	Err	bitreich.org	70
i                 *sp = NULL;	Err	bitreich.org	70
i         } else {	Err	bitreich.org	70
1diff --git a/util.h b/util.h	/scm/ics2txt/file/util.h.gph	bitreich.org	70
i@@ -7,7 +7,7 @@	Err	bitreich.org	70
i 	Err	bitreich.org	70
i /** logging **/	Err	bitreich.org	70
i extern char *arg0;	Err	bitreich.org	70
i-void         err(char const *fmt, ...);	Err	bitreich.org	70
i+void         err(int, char const *fmt, ...);	Err	bitreich.org	70
i void         warn(char const *fmt, ...);	Err	bitreich.org	70
i void         debug(char const *fmt, ...);	Err	bitreich.org	70
i 	Err	bitreich.org	70
i@@ -17,6 +17,7 @@ char        *strsep(char **, char const *);	Err	bitreich.org	70
i void         strchomp(char *);	Err	bitreich.org	70
i char        *strappend(char **, char const *);	Err	bitreich.org	70
i size_t         strlcat(char *, char const *, size_t);	Err	bitreich.org	70
i+long long strtonum(const char *, long long, long long, const char **);	Err	bitreich.org	70
i 	Err	bitreich.org	70
i /** memory **/	Err	bitreich.org	70
i void        *reallocarray(void *, size_t, size_t);	Err	bitreich.org	70
.