Compare commits
	
		
			28 Commits
		
	
	
		
			dev
			...
			f663c200d2
		
	
	| Author | SHA1 | Date | |
|---|---|---|---|
| f663c200d2 | |||
| 78d0983464 | |||
| e80d9deb79 | |||
| e1d6b2b08e | |||
| 58680a130d | |||
| 458755b020 | |||
| 31c1357fbb | |||
| c8642343e7 | |||
| e954569d5d | |||
| aeff8a3679 | |||
| e948a18a05 | |||
| bc0233962a | |||
| c8f88b2410 | |||
| a9bdca55b5 | |||
| 0dd0a81a64 | |||
| 53149ea9db | |||
| c63b3c4ee2 | |||
| d228f551ab | |||
| 3fe908738f | |||
| 8f04082d65 | |||
| 7f04d84b30 | |||
| 3150e877c7 | |||
| 26a6900555 | |||
| 76fa32da39 | |||
| 609d9712a6 | |||
| de4650d1ac | |||
| 7656da2a71 | |||
| 6c78213587 | 
							
								
								
									
										58
									
								
								README.md
									
									
									
									
									
								
							
							
						
						
									
										58
									
								
								README.md
									
									
									
									
									
								
							@@ -13,14 +13,22 @@ with a CalDav server, such as [Radicale](https://radicale.org/), and a synchroni
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
Installation
 | 
					Installation
 | 
				
			||||||
------------
 | 
					------------
 | 
				
			||||||
Download the file `fzf-vjour` from the [latest release](https://github.com/baumea/fzf-vjour/releases/latest), or run `./scripts/build.sh`, then
 | 
					
 | 
				
			||||||
copy `fzf-vjour` to your preferred location, e.g., `~/.local/bin`, and make it executable.
 | 
					### Manual
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					Run `./scripts/build.sh`, then copy `fzf-vjour` to your preferred location, e.g., `~/.local/bin`, and make it executable.
 | 
				
			||||||
 | 
					
 | 
				
			||||||
### Requirements
 | 
					### Requirements
 | 
				
			||||||
This is a POSIX script with inline `awk` elements.
 | 
					This is a POSIX script with inline `awk` elements.
 | 
				
			||||||
Make sure you have [fzf](https://github.com/junegunn/fzf) installed.
 | 
					Make sure you have [fzf](https://github.com/junegunn/fzf) installed.
 | 
				
			||||||
I also suggest to install [batcat](https://github.com/sharkdp/bat) for colorful previews.
 | 
					I also suggest to install [batcat](https://github.com/sharkdp/bat) for colorful previews.
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					### Arch Linux
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					```bash
 | 
				
			||||||
 | 
					yay -S fzf-vjour-git
 | 
				
			||||||
 | 
					```
 | 
				
			||||||
 | 
					
 | 
				
			||||||
Configuration
 | 
					Configuration
 | 
				
			||||||
--------------
 | 
					--------------
 | 
				
			||||||
This application is configured with a file located at `$HOME/.config/fzf-vjour/config`.
 | 
					This application is configured with a file located at `$HOME/.config/fzf-vjour/config`.
 | 
				
			||||||
@@ -62,6 +70,8 @@ item_types = ["VJOURNAL", "VTODO"]
 | 
				
			|||||||
...
 | 
					...
 | 
				
			||||||
```
 | 
					```
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					You may also specify the location of the configuration file with the environment `CONFIGFILE`.
 | 
				
			||||||
 | 
					
 | 
				
			||||||
Usage
 | 
					Usage
 | 
				
			||||||
-----
 | 
					-----
 | 
				
			||||||
Use the default `fzf` keys to navigate your notes, e.g., `ctrl-j` and `ctrl-k` for going down/up in the list.
 | 
					Use the default `fzf` keys to navigate your notes, e.g., `ctrl-j` and `ctrl-k` for going down/up in the list.
 | 
				
			||||||
@@ -76,6 +86,9 @@ In addition, there are the following keybindings:
 | 
				
			|||||||
| `ctrl-x` | Toggle task completion |
 | 
					| `ctrl-x` | Toggle task completion |
 | 
				
			||||||
| `alt-up` | Increase task priority |
 | 
					| `alt-up` | Increase task priority |
 | 
				
			||||||
| `alt-down` | Decrease task priority |
 | 
					| `alt-down` | Decrease task priority |
 | 
				
			||||||
 | 
					| `ctrl-a` | Open attachments view |
 | 
				
			||||||
 | 
					| `ctrl-t` | Filter by category |
 | 
				
			||||||
 | 
					| `alt-v` | View bare iCalendar file |
 | 
				
			||||||
| `alt-0` | Default view: Journal, notes, and _open_ tasks |
 | 
					| `alt-0` | Default view: Journal, notes, and _open_ tasks |
 | 
				
			||||||
| `alt-1` | Display journal entries |
 | 
					| `alt-1` | Display journal entries |
 | 
				
			||||||
| `alt-2` | Display notes |
 | 
					| `alt-2` | Display notes |
 | 
				
			||||||
@@ -83,6 +96,47 @@ In addition, there are the following keybindings:
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
You may also invoke the script with `--help` to see further command-line options. 
 | 
					You may also invoke the script with `--help` to see further command-line options. 
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					In the attachment view, you may use the following keys:
 | 
				
			||||||
 | 
					| Key | Action |
 | 
				
			||||||
 | 
					| --- | ------ |
 | 
				
			||||||
 | 
					| `enter` | Open attachment |
 | 
				
			||||||
 | 
					| `w` | Toggle line wrap |
 | 
				
			||||||
 | 
					| `ctrl-a` | Add attachment |
 | 
				
			||||||
 | 
					| `ctrl-alt-d` | Delete attachment |
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					Git support
 | 
				
			||||||
 | 
					-----------
 | 
				
			||||||
 | 
					You can track your entries with `git` by simply running `fzf-vjour --git-init`.
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					Extended configuration / Theming
 | 
				
			||||||
 | 
					--------------------------------
 | 
				
			||||||
 | 
					You may override any of the following parameters (shown with default values) in
 | 
				
			||||||
 | 
					the configuration file:
 | 
				
			||||||
 | 
					```sh
 | 
				
			||||||
 | 
					FLAG_OPEN=🔲
 | 
				
			||||||
 | 
					FLAG_COMPLETED=✅
 | 
				
			||||||
 | 
					FLAG_JOURNAL=📘
 | 
				
			||||||
 | 
					FLAG_NOTE=🗒️
 | 
				
			||||||
 | 
					FLAG_PRIORITY=❗
 | 
				
			||||||
 | 
					FLAG_ATTACHMENT=🔗
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					STYLE_COLLECTION="$FAINT$WHITE"
 | 
				
			||||||
 | 
					STYLE_DATE="$CYAN"
 | 
				
			||||||
 | 
					STYLE_SUMMARY="$GREEN"
 | 
				
			||||||
 | 
					STYLE_EXPIRED="$RED"
 | 
				
			||||||
 | 
					STYLE_CATEGORY="$WHITE"
 | 
				
			||||||
 | 
					```
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					Limitations
 | 
				
			||||||
 | 
					-----------
 | 
				
			||||||
 | 
					Here is a list of some currently present limitations.
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					- Timezone agnostic: Timezone specifications are ignored.
 | 
				
			||||||
 | 
					- Time agnostic: We use the date portion only of date-time specifications.
 | 
				
			||||||
 | 
					- No alarms or notifications
 | 
				
			||||||
 | 
					- Inline attachments only
 | 
				
			||||||
 | 
					- No recurrences
 | 
				
			||||||
 | 
					
 | 
				
			||||||
License
 | 
					License
 | 
				
			||||||
-------
 | 
					-------
 | 
				
			||||||
This project is licensed under the [MIT License](./LICENSE).
 | 
					This project is licensed under the [MIT License](./LICENSE).
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -5,7 +5,15 @@ GREEN="\033[0;32m"
 | 
				
			|||||||
OFF="\033[m"
 | 
					OFF="\033[m"
 | 
				
			||||||
NAME="fzf-vjour"
 | 
					NAME="fzf-vjour"
 | 
				
			||||||
SRC="./src/main.sh"
 | 
					SRC="./src/main.sh"
 | 
				
			||||||
echo "🐔 ${GREEN}Building${OFF} ${BOLD}$NAME${OFF}"
 | 
					
 | 
				
			||||||
sed -E 's|@@include (.+)$|cat \1|e' "$SRC" >"$NAME"
 | 
					tmpdir=$(mktemp -d)
 | 
				
			||||||
 | 
					echo "🐔 ${GREEN}Internalize sourced files${OFF}"
 | 
				
			||||||
 | 
					sed -E 's|\. "([^$].+)"$|cat src/\1|e' "$SRC" >"$tmpdir/1.sh"
 | 
				
			||||||
 | 
					echo "🥚 ${GREEN}Internalize awk scripts${OFF}"
 | 
				
			||||||
 | 
					sed -E 's|@@include (.+)$|cat src/\1|e' "$tmpdir/1.sh" >"$tmpdir/2.sh"
 | 
				
			||||||
 | 
					echo "🐔 ${GREEN}Internalize awk libraries${OFF}"
 | 
				
			||||||
 | 
					sed -E 's|@include "(.+)"$|cat src/\1|e' "$tmpdir/2.sh" >"$NAME"
 | 
				
			||||||
 | 
					echo "🥚 ${GREEN}Make executable and cleanup${OFF}"
 | 
				
			||||||
chmod +x "$NAME"
 | 
					chmod +x "$NAME"
 | 
				
			||||||
echo "🥚 ${GREEN}Done${OFF}"
 | 
					rm -rf "$tmpdir"
 | 
				
			||||||
 | 
					echo "🍳 ${GREEN}Done:${OFF} Sucessfully built ${BOLD}${GREEN}$NAME${OFF}"
 | 
				
			||||||
 
 | 
				
			|||||||
							
								
								
									
										35
									
								
								src/awk/attach.awk
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										35
									
								
								src/awk/attach.awk
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,35 @@
 | 
				
			|||||||
 | 
					## src/awk/attach.awk
 | 
				
			||||||
 | 
					## Prepend attachment to iCalendar file.
 | 
				
			||||||
 | 
					##
 | 
				
			||||||
 | 
					## @assign file: Path to base64-encoded content
 | 
				
			||||||
 | 
					## @assign mime: Mime
 | 
				
			||||||
 | 
					## @assign filename: Original filename
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Functions
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Write attachment
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @local variables: line, aline
 | 
				
			||||||
 | 
					function write_attachment(    line, aline, fl) {
 | 
				
			||||||
 | 
					  line = "ATTACH;ENCODING=BASE64;VALUE=BINARY;FMTTYPE="mime";FILENAME="filename":"
 | 
				
			||||||
 | 
					  fl = 1
 | 
				
			||||||
 | 
					  while (getline aline <file) {
 | 
				
			||||||
 | 
					    line = line aline
 | 
				
			||||||
 | 
					    if (fl && length(line) >= 73) {
 | 
				
			||||||
 | 
					      print substr(line, 1, 73)
 | 
				
			||||||
 | 
					      line = substr(line, 74)
 | 
				
			||||||
 | 
					      fl = 0
 | 
				
			||||||
 | 
					    }
 | 
				
			||||||
 | 
					    while (length(line) >= 72) {
 | 
				
			||||||
 | 
					      print " "substr(line, 1, 72)
 | 
				
			||||||
 | 
					      line = substr(line, 73)
 | 
				
			||||||
 | 
					    }
 | 
				
			||||||
 | 
					  }
 | 
				
			||||||
 | 
					  if (line)
 | 
				
			||||||
 | 
					    print " "line
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# AWK program
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					/^END:(VTODO|VJOURNAL)$/ { write_attachment() }
 | 
				
			||||||
 | 
					{ print }
 | 
				
			||||||
							
								
								
									
										8
									
								
								src/awk/attachdd.awk
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										8
									
								
								src/awk/attachdd.awk
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,8 @@
 | 
				
			|||||||
 | 
					BEGIN                       { FS="[:;]" }
 | 
				
			||||||
 | 
					/^END:(VTODO|VJOURNAL)$/    { ins = 0; exit }
 | 
				
			||||||
 | 
					/^[^ ]/ && a                { a = 0 }
 | 
				
			||||||
 | 
					/^ / && a && p              { print substr($0, 2); }
 | 
				
			||||||
 | 
					/^ / && a && !p             { if (index($0, ":")) { p = 1; print substr($0, index($0, ":")+1) } }
 | 
				
			||||||
 | 
					/^ATTACH/ && ins            { i++; }
 | 
				
			||||||
 | 
					/^ATTACH/ && ins && i == id { a = 1; if (index($0, ":")) { p = 1; print substr($0, index($0, ":")+1) } }
 | 
				
			||||||
 | 
					/^BEGIN:(VTODO|VJOURNAL)$/  { ins = 1 }
 | 
				
			||||||
							
								
								
									
										41
									
								
								src/awk/attachls.awk
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										41
									
								
								src/awk/attachls.awk
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,41 @@
 | 
				
			|||||||
 | 
					# Decide if we need to read more to get all properties
 | 
				
			||||||
 | 
					# 
 | 
				
			||||||
 | 
					# @input str: strin read so far
 | 
				
			||||||
 | 
					# @return: 1 if we need more data, 0 otherwise
 | 
				
			||||||
 | 
					function cont_reading(str) {
 | 
				
			||||||
 | 
					  return index(str, ":") ? 0 : 1
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Get information about attachment
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input i: Attachment index
 | 
				
			||||||
 | 
					# @input str: Attachment string (at least up to content separator `:`)
 | 
				
			||||||
 | 
					# @return: informative string
 | 
				
			||||||
 | 
					function att_info(i, str,    cnt, k, info) {
 | 
				
			||||||
 | 
					  str = substr(str, 1, index(str, ":") - 1)
 | 
				
			||||||
 | 
					  cnt = split(str, props)
 | 
				
			||||||
 | 
					  if (cnt > 1) {
 | 
				
			||||||
 | 
					    for (k=2; k<=cnt; k++) {
 | 
				
			||||||
 | 
					      pname = substr(props[k], 1, index(props[k], "=") - 1)
 | 
				
			||||||
 | 
					      pvalu = substr(props[k], index(props[k], "=") + 1)
 | 
				
			||||||
 | 
					      if (pname == "ENCODING" && pvalu = "BASE64")
 | 
				
			||||||
 | 
					        enc = "base64"
 | 
				
			||||||
 | 
					      if (pname == "FILENAME")
 | 
				
			||||||
 | 
					        fin = pvalu
 | 
				
			||||||
 | 
					      if (pname == "VALUE")
 | 
				
			||||||
 | 
					        val = pvalu
 | 
				
			||||||
 | 
					      if (pname == "FMTTYPE")
 | 
				
			||||||
 | 
					        type = pvalu
 | 
				
			||||||
 | 
					    }
 | 
				
			||||||
 | 
					    if (enc)
 | 
				
			||||||
 | 
					      info = "inline"
 | 
				
			||||||
 | 
					  }
 | 
				
			||||||
 | 
					  print i, fin, type, enc, info
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					BEGIN                      { FS="[:;]"; OFS="\t" }
 | 
				
			||||||
 | 
					/^END:(VTODO|VJOURNAL)$/   { ins = 0; exit }
 | 
				
			||||||
 | 
					l && !r                    { att_info(i, l); l = "" }
 | 
				
			||||||
 | 
					/^ / && r                  { l = l substr($0, 2); r = cont_reading($0) }
 | 
				
			||||||
 | 
					/^ATTACH/ && ins           { i++; l = $0; r = cont_reading($0) }
 | 
				
			||||||
 | 
					/^BEGIN:(VTODO|VJOURNAL)$/ { ins = 1 }
 | 
				
			||||||
							
								
								
									
										13
									
								
								src/awk/attachrm.awk
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										13
									
								
								src/awk/attachrm.awk
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,13 @@
 | 
				
			|||||||
 | 
					## src/awk/attachrm.awk
 | 
				
			||||||
 | 
					## Remove attachment from iCalendar file.
 | 
				
			||||||
 | 
					##
 | 
				
			||||||
 | 
					## @assign id: Attachment number to remove
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					BEGIN                       { FS="[:;]" }
 | 
				
			||||||
 | 
					/^END:(VTODO|VJOURNAL)$/    { ins = 0 }
 | 
				
			||||||
 | 
					/^[^ ]/ && a                { a = 0 }
 | 
				
			||||||
 | 
					/^ / && a                   { next }
 | 
				
			||||||
 | 
					/^ATTACH/ && ins            { i++; }
 | 
				
			||||||
 | 
					/^ATTACH/ && ins && i == id { a = 1; next }
 | 
				
			||||||
 | 
					/^BEGIN:(VTODO|VJOURNAL)$/  { ins = 1 }
 | 
				
			||||||
 | 
					{ print }
 | 
				
			||||||
@@ -1,39 +0,0 @@
 | 
				
			|||||||
function getcontent(content_line, prop)
 | 
					 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  return substr(content_line[prop], index(content_line[prop], ":") + 1);
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
function storetext_line(content_line, c, prop)
 | 
					 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  c[prop] = getcontent(content_line, prop);
 | 
					 | 
				
			||||||
  gsub("\\\\n",    "\n", c[prop]);
 | 
					 | 
				
			||||||
  gsub("\\\\N",    "\n", c[prop]);
 | 
					 | 
				
			||||||
  gsub("\\\\,",    ",",  c[prop]);
 | 
					 | 
				
			||||||
  gsub("\\\\;",    ";",  c[prop]);
 | 
					 | 
				
			||||||
  gsub("\\\\\\\\", "\\", c[prop]);
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
BEGIN                                   { FS = "[:;]"; }
 | 
					 | 
				
			||||||
/^BEGIN:(VJOURNAL|VTODO)/               { type = $2 }
 | 
					 | 
				
			||||||
/^END:/ && $2 == type                   { exit }
 | 
					 | 
				
			||||||
/^(CATEGORIES|DESCRIPTION|SUMMARY|DUE)/ { prop = $1; content_line[prop] = $0;                               next; }
 | 
					 | 
				
			||||||
/^[^ ]/ && prop                         { prop = "";                                                        next; }
 | 
					 | 
				
			||||||
/^ / && prop                            {            content_line[prop] = content_line[prop] substr($0, 2); next; }
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
END {
 | 
					 | 
				
			||||||
  if (!type) {
 | 
					 | 
				
			||||||
    exit
 | 
					 | 
				
			||||||
  }
 | 
					 | 
				
			||||||
  # Process content lines
 | 
					 | 
				
			||||||
  storetext_line(content_line, c, "CATEGORIES" );
 | 
					 | 
				
			||||||
  storetext_line(content_line, c, "DESCRIPTION");
 | 
					 | 
				
			||||||
  storetext_line(content_line, c, "SUMMARY"    );
 | 
					 | 
				
			||||||
  storetext_line(content_line, c, "DUE"        );
 | 
					 | 
				
			||||||
  # Print
 | 
					 | 
				
			||||||
  if (c["DUE"])
 | 
					 | 
				
			||||||
    print "::: <| " substr(c["DUE"], 1, 4) "-" substr(c["DUE"], 5, 2) "-" substr(c["DUE"], 7, 2);
 | 
					 | 
				
			||||||
  print "# " c["SUMMARY"];
 | 
					 | 
				
			||||||
  print "> " c["CATEGORIES"];
 | 
					 | 
				
			||||||
  print "";
 | 
					 | 
				
			||||||
  print c["DESCRIPTION"];
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
@@ -1,18 +1,49 @@
 | 
				
			|||||||
 | 
					# Retrieve content from iCalendar files
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# Mandatory variable: `field`.
 | 
				
			||||||
 | 
					# Name of field to retrieve.
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# Optional variable: `format`.
 | 
				
			||||||
 | 
					# If `format` is set to "csv", then the content is interpreted as
 | 
				
			||||||
 | 
					# comma-separated values, and empty values are dropped.
 | 
				
			||||||
 | 
					# If `format` is set to "date", then the content is interpreted as
 | 
				
			||||||
 | 
					# a date the output is in the form YYYY-MM-DD.
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# Optional variable: `oneline`.
 | 
				
			||||||
 | 
					# If `oneline` is set, then the all newlines will be replaced by white spaces
 | 
				
			||||||
 | 
					@include "lib/awk/icalendar.awk"
 | 
				
			||||||
 | 
					
 | 
				
			||||||
# print content of field `field`
 | 
					# print content of field `field`
 | 
				
			||||||
BEGIN                     { FS = ":"; regex = "^" field; }
 | 
					BEGIN                     { FS = ":"; regex = "^" field; }
 | 
				
			||||||
 | 
					BEGINFILE                 { type = ""; line = ""; }
 | 
				
			||||||
/^BEGIN:(VJOURNAL|VTODO)/ { type = $2 }
 | 
					/^BEGIN:(VJOURNAL|VTODO)/ { type = $2 }
 | 
				
			||||||
/^END:/ && $2 == type     { exit }
 | 
					/^END:/ && $2 == type     { nextfile }
 | 
				
			||||||
$0 ~ field                { content = $0;                    next; }
 | 
					$0 ~ regex                { line = $0;                 next; }
 | 
				
			||||||
/^ / && content           { content = content substr($0, 2); next; }
 | 
					/^ / && line              { line = line substr($0, 2); next; }
 | 
				
			||||||
/^[^ ]/ && content        { exit }
 | 
					/^[^ ]/ && line           { nextfile }
 | 
				
			||||||
END {
 | 
					ENDFILE {
 | 
				
			||||||
  if (!type) { exit }
 | 
					  if (type) {
 | 
				
			||||||
  # Process content line
 | 
					    # Process line
 | 
				
			||||||
  content = substr(content, index(content, ":") + 1);
 | 
					    content = getcontent(line)
 | 
				
			||||||
  gsub("\\\\n",    "\n", content);
 | 
					    if (oneline)
 | 
				
			||||||
  gsub("\\\\N",    "\n", content);
 | 
					      content = singleline(content)
 | 
				
			||||||
  gsub("\\\\,",    ",",  content);
 | 
					    switch (format) {
 | 
				
			||||||
  gsub("\\\\;",    ";",  content);
 | 
					      case "csv" : 
 | 
				
			||||||
  gsub("\\\\\\\\", "\\", content);
 | 
					        split(content, a, ",")
 | 
				
			||||||
  print content;
 | 
					        res = ""
 | 
				
			||||||
 | 
					        for (i in a) {
 | 
				
			||||||
 | 
					          if (a[i])
 | 
				
			||||||
 | 
					            res = res "," a[i]
 | 
				
			||||||
 | 
					        }
 | 
				
			||||||
 | 
					        print substr(res, 2)
 | 
				
			||||||
 | 
					        break
 | 
				
			||||||
 | 
					      case "date" : 
 | 
				
			||||||
 | 
					        if (content)
 | 
				
			||||||
 | 
					          print substr(parse_dt("", content), 1, 10)
 | 
				
			||||||
 | 
					        break
 | 
				
			||||||
 | 
					      default :
 | 
				
			||||||
 | 
					        print content
 | 
				
			||||||
 | 
					        break
 | 
				
			||||||
 | 
					    }
 | 
				
			||||||
 | 
					  }
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 
 | 
				
			|||||||
							
								
								
									
										153
									
								
								src/awk/list.awk
									
									
									
									
									
								
							
							
						
						
									
										153
									
								
								src/awk/list.awk
									
									
									
									
									
								
							@@ -3,39 +3,15 @@
 | 
				
			|||||||
# See https://datatracker.ietf.org/doc/html/rfc5545 for the RFC 5545 that
 | 
					# See https://datatracker.ietf.org/doc/html/rfc5545 for the RFC 5545 that
 | 
				
			||||||
# describes iCalendar, and its syntax
 | 
					# describes iCalendar, and its syntax
 | 
				
			||||||
 | 
					
 | 
				
			||||||
function getcontent(content_line, prop)
 | 
					@include "lib/awk/icalendar.awk"
 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  return substr(content_line[prop], index(content_line[prop], ":") + 1);
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					
 | 
				
			||||||
function storetext_line(content_line, c, prop)
 | 
					# Generate kind-of-pretty date strings.
 | 
				
			||||||
{
 | 
					#
 | 
				
			||||||
  c[prop] = getcontent(content_line, prop);
 | 
					# @local variables: ts, ts_y, ts_m, ts_d, delta
 | 
				
			||||||
  gsub("\\\\n",    " ",  c[prop]);
 | 
					# @input date: Date in the format YYYYMMDD
 | 
				
			||||||
  gsub("\\\\N",    " ",  c[prop]);
 | 
					# @input todaystamp: Today, seconds since epoch
 | 
				
			||||||
  gsub("\\\\,",    ",",  c[prop]);
 | 
					# @return: string
 | 
				
			||||||
  gsub("\\\\;",    ";",  c[prop]);
 | 
					function formatdate(date, todaystamp,       ts, ts_y, ts_m, ts_d, delta)
 | 
				
			||||||
  gsub("\\\\\\\\", "\\", c[prop]);
 | 
					 | 
				
			||||||
  #gsub(" ",    "_",  c[prop]);
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
function storeinteger(content_line, c, prop)
 | 
					 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  c[prop] = getcontent(content_line, prop);
 | 
					 | 
				
			||||||
  c[prop] = c[prop] ? c[prop] : 0;
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
function storedatetime(content_line, c, prop)
 | 
					 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  c[prop] = getcontent(content_line, prop);
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
function storedate(content_line, c, prop)
 | 
					 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  c[prop] = substr(getcontent(content_line, prop), 1, 8);
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
function formatdate(date, today, todaystamp,       ts, ts_y, ts_m, ts_d, delta)
 | 
					 | 
				
			||||||
{
 | 
					{
 | 
				
			||||||
  ts_y = substr(date, 1, 4);
 | 
					  ts_y = substr(date, 1, 4);
 | 
				
			||||||
  ts_m = substr(date, 5, 2);
 | 
					  ts_m = substr(date, 5, 2);
 | 
				
			||||||
@@ -73,6 +49,13 @@ BEGIN {
 | 
				
			|||||||
  # flag_completed: symbol for completed to-dos
 | 
					  # flag_completed: symbol for completed to-dos
 | 
				
			||||||
  # flag_journal:   symbol for journal entries
 | 
					  # flag_journal:   symbol for journal entries
 | 
				
			||||||
  # flag_note:      symbol for note entries
 | 
					  # flag_note:      symbol for note entries
 | 
				
			||||||
 | 
					  # flag_priority   symbol for prior. task
 | 
				
			||||||
 | 
					  # flag_attachment symbol for attachment
 | 
				
			||||||
 | 
					  # style_collection
 | 
				
			||||||
 | 
					  # style_date
 | 
				
			||||||
 | 
					  # style_summary
 | 
				
			||||||
 | 
					  # style_expired
 | 
				
			||||||
 | 
					  # style_category
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  FS = "[:;]";
 | 
					  FS = "[:;]";
 | 
				
			||||||
  # Collections
 | 
					  # Collections
 | 
				
			||||||
@@ -83,11 +66,6 @@ BEGIN {
 | 
				
			|||||||
    collection2label[m[1]] = m[2];
 | 
					    collection2label[m[1]] = m[2];
 | 
				
			||||||
  }
 | 
					  }
 | 
				
			||||||
  # Colors
 | 
					  # Colors
 | 
				
			||||||
  GREEN = "\033[1;32m";
 | 
					 | 
				
			||||||
  RED = "\033[1;31m";
 | 
					 | 
				
			||||||
  WHITE = "\033[1;97m";
 | 
					 | 
				
			||||||
  CYAN = "\033[1;36m";
 | 
					 | 
				
			||||||
  FAINT = "\033[2m";
 | 
					 | 
				
			||||||
  OFF = "\033[m";
 | 
					  OFF = "\033[m";
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  # For date comparision
 | 
					  # For date comparision
 | 
				
			||||||
@@ -99,9 +77,8 @@ BEGIN {
 | 
				
			|||||||
BEGINFILE {
 | 
					BEGINFILE {
 | 
				
			||||||
  type = "";
 | 
					  type = "";
 | 
				
			||||||
  prop = "";
 | 
					  prop = "";
 | 
				
			||||||
  delete content_line;
 | 
					  att = "";
 | 
				
			||||||
  delete c;
 | 
					  delete c;
 | 
				
			||||||
 | 
					 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
/^BEGIN:(VJOURNAL|VTODO)/ {
 | 
					/^BEGIN:(VJOURNAL|VTODO)/ {
 | 
				
			||||||
@@ -112,9 +89,14 @@ BEGINFILE {
 | 
				
			|||||||
  nextfile
 | 
					  nextfile
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
/^(CATEGORIES|DESCRIPTION|PRIORITY|STATUS|SUMMARY|COMPLETED|DUE|DTSTART|DURATION|CREATED|DTSTAMP|LAST-MODIFIED)/ {
 | 
					/^(CATEGORIES|PRIORITY|STATUS|SUMMARY|COMPLETED|DUE|DTSTART|DURATION|CREATED|DTSTAMP|LAST-MODIFIED)/ {
 | 
				
			||||||
  prop = $1;
 | 
					  prop = $1;
 | 
				
			||||||
  content_line[prop] = $0;
 | 
					  c[prop] = $0;
 | 
				
			||||||
 | 
					  next;
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					/^ATTACH/ {
 | 
				
			||||||
 | 
					  prop = ""
 | 
				
			||||||
 | 
					  att = 1;
 | 
				
			||||||
  next;
 | 
					  next;
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
/^[^ ]/ && prop {
 | 
					/^[^ ]/ && prop {
 | 
				
			||||||
@@ -122,7 +104,7 @@ BEGINFILE {
 | 
				
			|||||||
  next;
 | 
					  next;
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
/^ / && prop {
 | 
					/^ / && prop {
 | 
				
			||||||
  content_line[prop] = content_line[prop] substr($0, 2); 
 | 
					  c[prop] = c[prop] substr($0, 2); 
 | 
				
			||||||
  next; 
 | 
					  next; 
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
@@ -137,8 +119,9 @@ ENDFILE {
 | 
				
			|||||||
  {
 | 
					  {
 | 
				
			||||||
    print 10,
 | 
					    print 10,
 | 
				
			||||||
          "-",
 | 
					          "-",
 | 
				
			||||||
 | 
					          type,
 | 
				
			||||||
          "-",
 | 
					          "-",
 | 
				
			||||||
          RED "ERROR: file '" fpath "' contains whitespaces!" OFF
 | 
					          style_expired "ERROR: file '" fpath "' contains whitespaces!" OFF
 | 
				
			||||||
    exit
 | 
					    exit
 | 
				
			||||||
  }
 | 
					  }
 | 
				
			||||||
  # Collection name
 | 
					  # Collection name
 | 
				
			||||||
@@ -146,26 +129,39 @@ ENDFILE {
 | 
				
			|||||||
  collection = collection in collection2label ? collection2label[collection] : collection;
 | 
					  collection = collection in collection2label ? collection2label[collection] : collection;
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  # Process content lines
 | 
					  # Process content lines
 | 
				
			||||||
  storetext_line(content_line, c, "CATEGORIES"   );
 | 
					  # strings
 | 
				
			||||||
  storetext_line(content_line, c, "DESCRIPTION"  );
 | 
					  cat = singleline(unescape(getcontent(c["CATEGORIES"])))
 | 
				
			||||||
  storeinteger(  content_line, c, "PRIORITY"     );
 | 
					  split(cat, a, ",")
 | 
				
			||||||
  storetext_line(content_line, c, "STATUS"       );
 | 
					  cat = ""
 | 
				
			||||||
  storetext_line(content_line, c, "SUMMARY"      );
 | 
					  for (i in a)
 | 
				
			||||||
  storedatetime( content_line, c, "COMPLETED"    );
 | 
					    if (a[i])
 | 
				
			||||||
  storedate(     content_line, c, "DUE"          );
 | 
					      cat = cat "," a[i]
 | 
				
			||||||
  storedate(     content_line, c, "DTSTART"      );
 | 
					  cat = substr(cat, 2)
 | 
				
			||||||
  storedatetime( content_line, c, "DURATION"     );
 | 
					  sta = singleline(unescape(getcontent(c["STATUS"])))
 | 
				
			||||||
  storedatetime( content_line, c, "CREATED"      );
 | 
					  sum = singleline(unescape(getcontent(c["SUMMARY"])))
 | 
				
			||||||
  storedatetime( content_line, c, "DTSTAMP"      );
 | 
					
 | 
				
			||||||
  storedatetime( content_line, c, "LAST-MODIFIED");
 | 
					  # integers
 | 
				
			||||||
 | 
					  pri = unescape(getcontent(c["PRIORITY"]))
 | 
				
			||||||
 | 
					  pri = pri ? pri + 0 : 0
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					  # dates
 | 
				
			||||||
 | 
					  due = substr(unescape(getcontent(c["DUE"])), 1, 8)
 | 
				
			||||||
 | 
					  dts = substr(unescape(getcontent(c["DTSTART"])), 1, 8)
 | 
				
			||||||
 | 
					  
 | 
				
			||||||
 | 
					  # date-times
 | 
				
			||||||
 | 
					  com = unescape(getcontent(c["COMPLETED"]))
 | 
				
			||||||
 | 
					  dur = unescape(getcontent(c["DURATION"]))
 | 
				
			||||||
 | 
					  cre = unescape(getcontent(c["CREATED"]))
 | 
				
			||||||
 | 
					  stp = unescape(getcontent(c["DTSTAMP"]))
 | 
				
			||||||
 | 
					  lmd = unescape(getcontent(c["LAST-MODIFIED"]))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  # Priority field, primarly used for sorting
 | 
					  # Priority field, primarly used for sorting
 | 
				
			||||||
  priotext = "";
 | 
					  psort = 0;
 | 
				
			||||||
  prio = 0;
 | 
					  priotext = ""
 | 
				
			||||||
  if (c["PRIORITY"] > 0)
 | 
					  if (pri > 0)
 | 
				
			||||||
  {
 | 
					  {
 | 
				
			||||||
    priotext = "❗(" c["PRIORITY"] ") ";
 | 
					    priotext = flag_priority "(" pri ") "
 | 
				
			||||||
    prio = 10 - c["PRIORITY"];
 | 
					    psort = 10 - pri
 | 
				
			||||||
  }
 | 
					  }
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  # Last modification/creation time stamp, used for sorting
 | 
					  # Last modification/creation time stamp, used for sorting
 | 
				
			||||||
@@ -173,53 +169,56 @@ ENDFILE {
 | 
				
			|||||||
  #                UTC time format
 | 
					  #                UTC time format
 | 
				
			||||||
  # DTSTAMP:       mandatory field in VTODO and VJOURNAL, date-time in UTC time
 | 
					  # DTSTAMP:       mandatory field in VTODO and VJOURNAL, date-time in UTC time
 | 
				
			||||||
  #                format
 | 
					  #                format
 | 
				
			||||||
  mod = c["LAST-MODIFIED"] ? c["LAST-MODIFIED"] : c["DTSTAMP"];
 | 
					  mod = lmd ? lmd : stp
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  # Date field. For VTODO entries, we show the due date, for journal entries,
 | 
					  # Date field. For VTODO entries, we show the due date, for journal entries,
 | 
				
			||||||
  # the associated date.
 | 
					  # the associated date.
 | 
				
			||||||
  datecolor = CYAN;
 | 
					  datecolor = style_date
 | 
				
			||||||
  summarycolor = GREEN;
 | 
					  summarycolor = style_summary
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  if (type == "VTODO")
 | 
					  if (type == "VTODO")
 | 
				
			||||||
  {
 | 
					  {
 | 
				
			||||||
    # Either DUE or DURATION may appear. If DURATION appears, then also DTSTART
 | 
					    # Either DUE or DURATION may appear. If DURATION appears, then also DTSTART
 | 
				
			||||||
    d = c["DUE"] ? c["DUE"] : 
 | 
					    d = due ? due : (dur ? dts " for " dur : "");
 | 
				
			||||||
      (c["DURATION"] ? c["DTSTART"] " for " c["DURATION"] : "");
 | 
					    if (d && d <= today && sta != "COMPLETED")
 | 
				
			||||||
    if (d && d <= today && c["STATUS"] != "COMPLETED")
 | 
					 | 
				
			||||||
    {
 | 
					    {
 | 
				
			||||||
      datecolor = RED;
 | 
					      datecolor = style_expired;
 | 
				
			||||||
      summarycolor = RED;
 | 
					      summarycolor = style_expired;
 | 
				
			||||||
    }
 | 
					    }
 | 
				
			||||||
  } else {
 | 
					  } else {
 | 
				
			||||||
    d = c["DTSTART"];
 | 
					    d = dts
 | 
				
			||||||
  }
 | 
					  }
 | 
				
			||||||
  d = d ? formatdate(d, today, todaystamp       ts, ts_y, ts_m, ts_d, delta) : "              ";
 | 
					  d = d ? formatdate(d, todaystamp) : "              ";
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  # flag: - "journal"   for VJOURNAL with DTSTART
 | 
					  # flag: - "journal"   for VJOURNAL with DTSTART
 | 
				
			||||||
  #       - "note"      for VJOURNAL without DTSTART
 | 
					  #       - "note"      for VJOURNAL without DTSTART
 | 
				
			||||||
  #       - "completed" for VTODO with c["STATUS"] == COMPLETED
 | 
					  #       - "completed" for VTODO with c["STATUS"] == COMPLETED
 | 
				
			||||||
  #       - "open"      for VTODO with c["STATUS"] != COMPLETED
 | 
					  #       - "open"      for VTODO with c["STATUS"] != COMPLETED
 | 
				
			||||||
  if (type == "VTODO")
 | 
					  if (type == "VTODO")
 | 
				
			||||||
    flag = c["STATUS"] == "COMPLETED" ? flag_completed : flag_open;
 | 
					    flag = sta == "COMPLETED" ? flag_completed : flag_open;
 | 
				
			||||||
  else
 | 
					  else
 | 
				
			||||||
    flag = c["DTSTART"] ? flag_journal : flag_note;
 | 
					    flag = dts ? flag_journal : flag_note;
 | 
				
			||||||
  
 | 
					  
 | 
				
			||||||
  # summary
 | 
					  # summary
 | 
				
			||||||
  # c["SUMMARY"]
 | 
					  # c["SUMMARY"]
 | 
				
			||||||
  summary = c["SUMMARY"] ? c["SUMMARY"] : " "
 | 
					  summary = sum ? sum : " "
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  # categories
 | 
					  # categories
 | 
				
			||||||
  categories = c["CATEGORIES"] ? c["CATEGORIES"] : " "
 | 
					  categories = cat ? cat : " "
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					  # attachments
 | 
				
			||||||
 | 
					  att = att ? flag_attachment " " : ""
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  # filename
 | 
					  # filename
 | 
				
			||||||
  # FILENAME
 | 
					  # FILENAME
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  print prio,
 | 
					  print psort,
 | 
				
			||||||
        mod,
 | 
					        mod,
 | 
				
			||||||
 | 
					        type,
 | 
				
			||||||
        fpath,
 | 
					        fpath,
 | 
				
			||||||
        collection,
 | 
					        collection,
 | 
				
			||||||
        datecolor d OFF,
 | 
					        datecolor d OFF,
 | 
				
			||||||
        flag,
 | 
					        flag,
 | 
				
			||||||
        priotext summarycolor summary OFF,
 | 
					        priotext att summarycolor summary OFF,
 | 
				
			||||||
        WHITE categories OFF;
 | 
					        style_category categories OFF;
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -1,73 +1,46 @@
 | 
				
			|||||||
function escape_categories(str)
 | 
					@include "lib/awk/icalendar.awk"
 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  gsub("\\\\", "\\\\", str);
 | 
					 | 
				
			||||||
  gsub(";",  "\\\\;",    str);
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
function escape(str)
 | 
					 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  escape_categories(str)
 | 
					 | 
				
			||||||
  gsub(",",  "\\\\,",    str);
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
function print_fold(nameparam, content,    i, s)
 | 
					 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  i = 74 - length(nameparam);
 | 
					 | 
				
			||||||
  s = substr(content, 1, i);
 | 
					 | 
				
			||||||
  print nameparam s;
 | 
					 | 
				
			||||||
  s = substr(content, i+1, 73);
 | 
					 | 
				
			||||||
  i = i + 73;
 | 
					 | 
				
			||||||
  while (s)
 | 
					 | 
				
			||||||
  {
 | 
					 | 
				
			||||||
    print " " s;
 | 
					 | 
				
			||||||
    s = substr(content, i+1, 73);
 | 
					 | 
				
			||||||
    i = i + 73;
 | 
					 | 
				
			||||||
  }
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					
 | 
				
			||||||
BEGIN { 
 | 
					BEGIN { 
 | 
				
			||||||
  FS=":"; 
 | 
					  FS=":"; 
 | 
				
			||||||
  type = "VJOURNAL"; 
 | 
					 | 
				
			||||||
  zulu = strftime("%Y%m%dT%H%M%SZ", systime(), 1);
 | 
					  zulu = strftime("%Y%m%dT%H%M%SZ", systime(), 1);
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
desc { desc = desc "\\n" $0; next; }
 | 
					desc                 { desc = desc "\\n" escape($0);                      next; }
 | 
				
			||||||
{
 | 
					/^::: \|>/ && !start { gsub("\"", ""); start = substr(zulu, 1, 8);        next; }
 | 
				
			||||||
  if (substr($0, 1, 6) == "::: |>")
 | 
					/^::: <\|/ && !due   { gsub("\"", ""); due = "D" substr($0, 8);           next; }
 | 
				
			||||||
  {
 | 
					/^# / && !summary    { summary = "S" escape(substr($0, 3));               next; }
 | 
				
			||||||
    start = substr(zulu, 1, 8);
 | 
					/^> / && !categories { categories = "C" escape_but_commas(substr($0, 3)); next; }
 | 
				
			||||||
    getline;
 | 
					!$0 && !el           { el = 1;                                        next; }
 | 
				
			||||||
  }
 | 
					!el                  { print "Unrecognized header on line "NR": " $0 > "/dev/stderr"; exit 1; }
 | 
				
			||||||
  if (substr($0, 1, 6) == "::: <|")
 | 
					                     { desc = "D" escape($0);                             next; }
 | 
				
			||||||
  {
 | 
					 | 
				
			||||||
    type = "VTODO"
 | 
					 | 
				
			||||||
    due = substr($0, 8);
 | 
					 | 
				
			||||||
    getline;
 | 
					 | 
				
			||||||
  }
 | 
					 | 
				
			||||||
  summary = substr($0, 1, 2) != "# " ? "" : substr($0, 3);
 | 
					 | 
				
			||||||
  getline;
 | 
					 | 
				
			||||||
  categories = substr($0, 1, 1) != ">" ? "" : substr($0, 3);
 | 
					 | 
				
			||||||
  getline; # This line should be empty
 | 
					 | 
				
			||||||
  getline; # First line of description
 | 
					 | 
				
			||||||
  desc = $0;
 | 
					 | 
				
			||||||
  next;
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
END {
 | 
					END {
 | 
				
			||||||
  # Sanitize input
 | 
					  # Sanitize input
 | 
				
			||||||
 | 
					  type = due ? "VTODO" : "VJOURNAL"
 | 
				
			||||||
 | 
					  due = substr(due, 2)
 | 
				
			||||||
 | 
					  summary = substr(summary, 2)
 | 
				
			||||||
 | 
					  categories = substr(categories, 2)
 | 
				
			||||||
 | 
					  desc = substr(desc, 2)
 | 
				
			||||||
 | 
					  if (categories) {
 | 
				
			||||||
 | 
					    split(categories, a, ",")
 | 
				
			||||||
 | 
					    categories = ""
 | 
				
			||||||
 | 
					    for (i in a)
 | 
				
			||||||
 | 
					      if (a[i])
 | 
				
			||||||
 | 
					        categories = categories "," a[i]
 | 
				
			||||||
 | 
					    categories = substr(categories, 2)
 | 
				
			||||||
 | 
					  }
 | 
				
			||||||
  if (due) {
 | 
					  if (due) {
 | 
				
			||||||
    # Use command line `date` for parsing
 | 
					    # Use command line `date` for parsing
 | 
				
			||||||
    cmd = "date -d \"" due "\" +\"%Y%m%d\"";
 | 
					    cmd = "date -d \"" due "\" +\"%Y%m%d\"";
 | 
				
			||||||
    cmd | getline res
 | 
					    suc = cmd | getline due
 | 
				
			||||||
    due = res ? res : ""
 | 
					    close(cmd)
 | 
				
			||||||
 | 
					    if (suc != 1)
 | 
				
			||||||
 | 
					      exit 1
 | 
				
			||||||
  }
 | 
					  }
 | 
				
			||||||
  escape(summary);
 | 
					 | 
				
			||||||
  escape(desc);
 | 
					 | 
				
			||||||
  escape_categories(categories);
 | 
					 | 
				
			||||||
 | 
					
 | 
				
			||||||
  # print ical
 | 
					  # print ical
 | 
				
			||||||
  print "BEGIN:VCALENDAR";
 | 
					  print "BEGIN:VCALENDAR";
 | 
				
			||||||
  print "VERSION:2.0";
 | 
					  print "VERSION:2.0";
 | 
				
			||||||
  print "CALSCALE:GREGORIAN";
 | 
					  print "CALSCALE:GREGORIAN";
 | 
				
			||||||
  print "PRODID:-//fab//awk//EN";
 | 
					  print "PRODID:-//fzf-vjour//awk//EN";
 | 
				
			||||||
  print "BEGIN:" type;
 | 
					  print "BEGIN:" type;
 | 
				
			||||||
  print "DTSTAMP:" zulu;
 | 
					  print "DTSTAMP:" zulu;
 | 
				
			||||||
  print "UID:" uid;
 | 
					  print "UID:" uid;
 | 
				
			||||||
@@ -88,9 +61,9 @@ END {
 | 
				
			|||||||
    if (start)
 | 
					    if (start)
 | 
				
			||||||
      print "DTSTART;VALUE=DATE:" start;
 | 
					      print "DTSTART;VALUE=DATE:" start;
 | 
				
			||||||
  }
 | 
					  }
 | 
				
			||||||
  if (summary)    print_fold("SUMMARY:",     summary,       i, s);
 | 
					  if (summary)    print_fold("SUMMARY:",     summary);
 | 
				
			||||||
  if (categories) print_fold("CATEGORIES:",  categories,    i, s);
 | 
					  if (categories) print_fold("CATEGORIES:",  categories);
 | 
				
			||||||
  if (desc)       print_fold("DESCRIPTION:", desc,          i, s);
 | 
					  if (desc)       print_fold("DESCRIPTION:", desc);
 | 
				
			||||||
  print "END:" type;
 | 
					  print "END:" type;
 | 
				
			||||||
  print "END:VCALENDAR"
 | 
					  print "END:VCALENDAR"
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -1,34 +1,4 @@
 | 
				
			|||||||
function getcontent(content_line, prop)
 | 
					@include "lib/awk/icalendar.awk"
 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  return substr(content_line[prop], index(content_line[prop], ":") + 1);
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
function escape_categories(str)
 | 
					 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  gsub("\\\\", "\\\\", str);
 | 
					 | 
				
			||||||
  gsub(";",  "\\\\;",    str);
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
function escape(str)
 | 
					 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  escape_categories(str)
 | 
					 | 
				
			||||||
  gsub(",",  "\\\\,",    str);
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
function print_fold(nameparam, content,    i, s)
 | 
					 | 
				
			||||||
{
 | 
					 | 
				
			||||||
  i = 74 - length(nameparam);
 | 
					 | 
				
			||||||
  s = substr(content, 1, i);
 | 
					 | 
				
			||||||
  print nameparam s;
 | 
					 | 
				
			||||||
  s = substr(content, i+1, 73);
 | 
					 | 
				
			||||||
  i = i + 73;
 | 
					 | 
				
			||||||
  while (s)
 | 
					 | 
				
			||||||
  {
 | 
					 | 
				
			||||||
    print " " s;
 | 
					 | 
				
			||||||
    s = substr(content, i+1, 73);
 | 
					 | 
				
			||||||
    i = i + 73;
 | 
					 | 
				
			||||||
  }
 | 
					 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					
 | 
				
			||||||
BEGIN { 
 | 
					BEGIN { 
 | 
				
			||||||
  FS=":";
 | 
					  FS=":";
 | 
				
			||||||
@@ -36,50 +6,52 @@ BEGIN {
 | 
				
			|||||||
}
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
ENDFILE { 
 | 
					ENDFILE { 
 | 
				
			||||||
  if (NR == FNR)
 | 
					  if (NR == FNR) {
 | 
				
			||||||
  {
 | 
					    due = substr(due, 2)
 | 
				
			||||||
    # Sanitize input
 | 
					    summary = substr(summary, 2)
 | 
				
			||||||
 | 
					    categories = substr(categories, 2)
 | 
				
			||||||
 | 
					    desc = substr(desc, 2)
 | 
				
			||||||
 | 
					    if (categories) {
 | 
				
			||||||
 | 
					      split(categories, a, ",")
 | 
				
			||||||
 | 
					      categories = ""
 | 
				
			||||||
 | 
					      for (i in a)
 | 
				
			||||||
 | 
					        if (a[i])
 | 
				
			||||||
 | 
					          categories = categories "," a[i]
 | 
				
			||||||
 | 
					      categories = substr(categories, 2)
 | 
				
			||||||
 | 
					    }
 | 
				
			||||||
    if (due) {
 | 
					    if (due) {
 | 
				
			||||||
      # Use command line `date` for parsing
 | 
					      # Use command line `date` for parsing
 | 
				
			||||||
      cmd = "date -d \"" due "\" +\"%Y%m%d\"";
 | 
					      cmd = "date -d \"" due "\" +\"%Y%m%d\"";
 | 
				
			||||||
      cmd | getline res
 | 
					      suc = cmd | getline due
 | 
				
			||||||
      due = res ? res : ""
 | 
					      close(cmd)
 | 
				
			||||||
 | 
					      if (suc != 1)
 | 
				
			||||||
 | 
					        exit 1
 | 
				
			||||||
    }
 | 
					    }
 | 
				
			||||||
    escape(summary);
 | 
					 | 
				
			||||||
    escape(desc);
 | 
					 | 
				
			||||||
    escape_categories(categories);
 | 
					 | 
				
			||||||
  }
 | 
					  }
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
NR == FNR && desc { desc = desc "\\n" $0; next; }
 | 
					NR == FNR && desc                 { desc = desc "\\n" escape($0);                      next; }
 | 
				
			||||||
NR == FNR {
 | 
					NR == FNR && /^::: <\|/ && !due   { gsub("\"",""); due = "D" substr($0, 8);            next; }
 | 
				
			||||||
  if (substr($0, 1, 6) == "::: <|")
 | 
					NR == FNR && /^# / && !summary    { summary = "S" escape(substr($0, 3));               next; }
 | 
				
			||||||
  {
 | 
					NR == FNR && /^> / && !categories { categories = "C" escape_but_commas(substr($0, 3)); next; }
 | 
				
			||||||
    due = substr($0, 8);
 | 
					NR == FNR && !$0 && !el           { el = 1;                                            next; }
 | 
				
			||||||
    getline;
 | 
					NR == FNR && !el                  { print "Unrecognized header on line "NR": " $0 > "/dev/stderr"; exit 1; }
 | 
				
			||||||
  }
 | 
					NR == FNR                         { desc = "D" escape($0);                             next; }
 | 
				
			||||||
  summary = substr($0, 1, 2) != "# " ? "" : substr($0, 3);
 | 
					due && type == "VJOURNAL"         { print "Notes and journal entries do not have due dates." > "/dev/stderr"; exit 1; }
 | 
				
			||||||
  getline;
 | 
					/^BEGIN:(VJOURNAL|VTODO)/         { type = $2; print;                                  next; }
 | 
				
			||||||
  categories = substr($0, 1, 1) != ">" ? "" : substr($0, 3);
 | 
					/^ / && drop                      {                                                    next; } # drop this folded line
 | 
				
			||||||
  getline; # This line should be empty
 | 
					/^X-ALT-DESC/ && type             { drop = 1;                                          next; } # drop this alternative description
 | 
				
			||||||
  getline; # First line of description
 | 
					/^(DUE|SUMMARY|CATEGORIES|DESCRIPTION|LAST-MODIFIED)/ && type { drop = 1;              next; } # skip for now, we will write updated fields at the end
 | 
				
			||||||
  desc = $0;
 | 
					                                  { drop = 0 } # keep everything else
 | 
				
			||||||
  next;
 | 
					/^SEQUENCE/ && type               { seq = $2;                                          next; } # store sequence number and skip
 | 
				
			||||||
}
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
/^BEGIN:(VJOURNAL|VTODO)/                                     { type = $2; print; next }
 | 
					 | 
				
			||||||
/^X-ALT-DESC/ && type                                         { next } # drop this alternative description
 | 
					 | 
				
			||||||
/^ / && type                                                  { next } # drop this folded line (the only content with folded lines will be updated)
 | 
					 | 
				
			||||||
/^(DUE|SUMMARY|CATEGORIES|DESCRIPTION|LAST-MODIFIED)/ && type { next } # skip for now, we will write updated fields at the end
 | 
					 | 
				
			||||||
/^SEQUENCE/ && type                                           { seq = $2; next } # store sequence number and skip
 | 
					 | 
				
			||||||
/^END:/ && type == $2 {
 | 
					/^END:/ && type == $2 {
 | 
				
			||||||
  seq = seq ? seq + 1 : 1;
 | 
					  seq = seq ? seq + 1 : 1;
 | 
				
			||||||
  print "SEQUENCE:" seq;
 | 
					  print "SEQUENCE:" seq;
 | 
				
			||||||
  print "LAST-MODIFIED:" zulu;
 | 
					  print "LAST-MODIFIED:" zulu;
 | 
				
			||||||
  if (due) print "DUE;VALUE=DATE:" due;
 | 
					  if (due) print "DUE;VALUE=DATE:" due;
 | 
				
			||||||
  print_fold("SUMMARY:",     summary,       i, s);
 | 
					  print_fold("SUMMARY:",     summary);
 | 
				
			||||||
  print_fold("CATEGORIES:",  categories,    i, s);
 | 
					  print_fold("CATEGORIES:",  categories);
 | 
				
			||||||
  print_fold("DESCRIPTION:", desc,          i, s);
 | 
					  print_fold("DESCRIPTION:", desc);
 | 
				
			||||||
  type = "";
 | 
					  type = "";
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
{ print }
 | 
					{ print }
 | 
				
			||||||
 
 | 
				
			|||||||
							
								
								
									
										146
									
								
								src/lib/awk/icalendar.awk
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										146
									
								
								src/lib/awk/icalendar.awk
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,146 @@
 | 
				
			|||||||
 | 
					# Make string single-line
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input str: String
 | 
				
			||||||
 | 
					# @return: String without newlines
 | 
				
			||||||
 | 
					function singleline(str) {
 | 
				
			||||||
 | 
					  gsub("\\n", " ", str)
 | 
				
			||||||
 | 
					  return str
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Escape string to be used as content in iCalendar files.
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input str: String to escape
 | 
				
			||||||
 | 
					# @return: Escaped string
 | 
				
			||||||
 | 
					function escape(str)
 | 
				
			||||||
 | 
					{
 | 
				
			||||||
 | 
					  gsub("\\\\", "\\\\", str)
 | 
				
			||||||
 | 
					  gsub("\\n",  "\\n",  str)
 | 
				
			||||||
 | 
					  gsub(";",    "\\;",  str)
 | 
				
			||||||
 | 
					  gsub(",",    "\\,",  str)
 | 
				
			||||||
 | 
					  return str
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Escape string to be used as content in iCalendar files, but don't escape
 | 
				
			||||||
 | 
					# commas.
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input str: String to escape
 | 
				
			||||||
 | 
					# @return: Escaped string
 | 
				
			||||||
 | 
					function escape_but_commas(str)
 | 
				
			||||||
 | 
					{
 | 
				
			||||||
 | 
					  gsub("\\\\", "\\\\", str)
 | 
				
			||||||
 | 
					  gsub("\\n",  "\\n",  str)
 | 
				
			||||||
 | 
					  gsub(";",    "\\;",  str)
 | 
				
			||||||
 | 
					  return str
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Print property with its content and fold according to the iCalendar
 | 
				
			||||||
 | 
					# specification.
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @local variables: i, s
 | 
				
			||||||
 | 
					# @input nameparam: Property name with optional parameters
 | 
				
			||||||
 | 
					# @input content: Escaped content
 | 
				
			||||||
 | 
					function print_fold(nameparam, content,    i, s)
 | 
				
			||||||
 | 
					{
 | 
				
			||||||
 | 
					  i = 74 - length(nameparam)
 | 
				
			||||||
 | 
					  s = substr(content, 1, i)
 | 
				
			||||||
 | 
					  print nameparam s
 | 
				
			||||||
 | 
					  s = substr(content, i+1, 73)
 | 
				
			||||||
 | 
					  i = i + 73
 | 
				
			||||||
 | 
					  while (s)
 | 
				
			||||||
 | 
					  {
 | 
				
			||||||
 | 
					    print " " s
 | 
				
			||||||
 | 
					    s = substr(content, i+1, 73)
 | 
				
			||||||
 | 
					    i = i + 73
 | 
				
			||||||
 | 
					  }
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Unescape string
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @local variables: i, c, c2, res
 | 
				
			||||||
 | 
					# @input str: String
 | 
				
			||||||
 | 
					# @return: Unescaped string
 | 
				
			||||||
 | 
					function unescape(str,    i, c, c2, res) {
 | 
				
			||||||
 | 
					  for(i = 1; i <= length(str); i++) {
 | 
				
			||||||
 | 
					    c = substr(str, i, 1)
 | 
				
			||||||
 | 
					    if (c != "\\") {
 | 
				
			||||||
 | 
					      res = res c
 | 
				
			||||||
 | 
					      continue
 | 
				
			||||||
 | 
					    }
 | 
				
			||||||
 | 
					    i++
 | 
				
			||||||
 | 
					    c2 = substr(str, i, 1)
 | 
				
			||||||
 | 
					    if (c2 == "n" || c2 == "N") {
 | 
				
			||||||
 | 
					      res = res "\n"
 | 
				
			||||||
 | 
					      continue
 | 
				
			||||||
 | 
					    }
 | 
				
			||||||
 | 
					    # Alternatively, c2 is "\\" or "," or ";". In each case, append res with
 | 
				
			||||||
 | 
					    # c2. If the strings has been escaped correctly, then the character c2
 | 
				
			||||||
 | 
					    # cannot be anything else. To be fail-safe, simply append res with c2.
 | 
				
			||||||
 | 
					    res = res c2
 | 
				
			||||||
 | 
					  }
 | 
				
			||||||
 | 
					  return res
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Isolate parameter part of an iCalendar line.
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input str: String
 | 
				
			||||||
 | 
					# @return: Parameter part
 | 
				
			||||||
 | 
					function getparam(str,    i) {
 | 
				
			||||||
 | 
					  i = index(str, ";")
 | 
				
			||||||
 | 
					  if (!i)
 | 
				
			||||||
 | 
					    return ""
 | 
				
			||||||
 | 
					  return substr(str, i + 1, index(str, ":") - i)
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Isolate content part of an iCalendar line, and unescape.
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input str: String
 | 
				
			||||||
 | 
					# @return: Unescaped content part
 | 
				
			||||||
 | 
					function getcontent(str) {
 | 
				
			||||||
 | 
					  return unescape(substr(str, index(str, ":") + 1))
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Time-zone aware parsing of DTSTART or DTEND entries.
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @local variables: tz
 | 
				
			||||||
 | 
					# @input dt_param: iCalendar DTSTART or DTEND parameter string
 | 
				
			||||||
 | 
					# @input dt_content: iCalendar DTSTART or DTEND content string
 | 
				
			||||||
 | 
					# @return: date or date-time string that can be used in date (1). In
 | 
				
			||||||
 | 
					#          particular, date strings are of the form YYYY-MM-DD and datetime
 | 
				
			||||||
 | 
					#          strings are of the form YYYY-MM-DD HH:MM:SS[Z]. If the field
 | 
				
			||||||
 | 
					#          containts timezone information, then this is prepended.
 | 
				
			||||||
 | 
					function parse_dt(dt_param, dt_content,    tz, a, i, k, date, time) {
 | 
				
			||||||
 | 
					  if (dt_param) {
 | 
				
			||||||
 | 
					    split(dt_param, a, ";")
 | 
				
			||||||
 | 
					    for (i in a) {
 | 
				
			||||||
 | 
					      k = index(a[i], "=")
 | 
				
			||||||
 | 
					      if (substr(a[i], 1, k-1) == "TZID") {
 | 
				
			||||||
 | 
					        tz = "TZ=\"" substr(a[i], k + 1) "\" "
 | 
				
			||||||
 | 
					        break
 | 
				
			||||||
 | 
					      }
 | 
				
			||||||
 | 
					    }
 | 
				
			||||||
 | 
					  }
 | 
				
			||||||
 | 
					  # Get date/date-time
 | 
				
			||||||
 | 
					  date = substr(dt_content, 1, 4) "-" substr(dt_content, 5, 2) "-" substr(dt_content, 7, 2)
 | 
				
			||||||
 | 
					  time = length(dt_content) == 8 ? "" : " " substr(dt_content, 10, 2) ":" substr(dt_content, 12, 2) ":" substr(dt_content, 14)
 | 
				
			||||||
 | 
					  return tz date time
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Map iCalendar duration specification into the format to be used in date (1).
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @local variables: dt, dta, i, n, a, seps
 | 
				
			||||||
 | 
					# @input duration: iCalendar duration string
 | 
				
			||||||
 | 
					# @return: relative-date/date-time specification to be used in date (1)
 | 
				
			||||||
 | 
					function parse_duration(duration,    dt, dta, i, n, a, seps) {
 | 
				
			||||||
 | 
					  n = split(duration, a, /[PTWHMSD]/, seps)
 | 
				
			||||||
 | 
					  for (i=2; i<=n; i++) {
 | 
				
			||||||
 | 
					    if(seps[i] == "W") dta["weeks"]   = a[i]
 | 
				
			||||||
 | 
					    if(seps[i] == "H") dta["hours"]   = a[i]
 | 
				
			||||||
 | 
					    if(seps[i] == "M") dta["minutes"] = a[i]
 | 
				
			||||||
 | 
					    if(seps[i] == "S") dta["seconds"] = a[i]
 | 
				
			||||||
 | 
					    if(seps[i] == "D") dta["days"]    = a[i]
 | 
				
			||||||
 | 
					  }
 | 
				
			||||||
 | 
					  dt = a[1] ? a[1] : "+"
 | 
				
			||||||
 | 
					  for (i in dta)
 | 
				
			||||||
 | 
					    dt = dt " " dta[i] " " i
 | 
				
			||||||
 | 
					  return dt
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
							
								
								
									
										365
									
								
								src/main.sh
									
									
									
									
									
								
							
							
						
						
									
										365
									
								
								src/main.sh
									
									
									
									
									
								
							@@ -2,301 +2,132 @@
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
set -eu
 | 
					set -eu
 | 
				
			||||||
 | 
					
 | 
				
			||||||
err() {
 | 
					# Helper functions
 | 
				
			||||||
  echo "❌ $1" >/dev/tty
 | 
					. "sh/helper.sh"
 | 
				
			||||||
}
 | 
					
 | 
				
			||||||
 | 
					# Read theme
 | 
				
			||||||
 | 
					. "sh/theme.sh"
 | 
				
			||||||
 | 
					
 | 
				
			||||||
if [ -z "${FZF_VJOUR_USE_EXPORTED:-}" ]; then
 | 
					 | 
				
			||||||
# Read configuration
 | 
					# Read configuration
 | 
				
			||||||
  CONFIGFILE="$HOME/.config/fzf-vjour/config"
 | 
					. "sh/config.sh"
 | 
				
			||||||
  if [ ! -f "$CONFIGFILE" ]; then
 | 
					 | 
				
			||||||
    err "Configuration '$CONFIGFILE' not found."
 | 
					 | 
				
			||||||
    exit 1
 | 
					 | 
				
			||||||
  fi
 | 
					 | 
				
			||||||
  # shellcheck source=/dev/null
 | 
					 | 
				
			||||||
  . "$CONFIGFILE"
 | 
					 | 
				
			||||||
  if [ -z "${ROOT:-}" ] || [ -z "${SYNC_CMD:-}" ] || [ -z "${COLLECTION_LABELS:-}" ]; then
 | 
					 | 
				
			||||||
    err "Configuration is incomplete."
 | 
					 | 
				
			||||||
    exit 1
 | 
					 | 
				
			||||||
  fi
 | 
					 | 
				
			||||||
  export ROOT
 | 
					 | 
				
			||||||
  export SYNC_CMD
 | 
					 | 
				
			||||||
  export COLLECTION_LABELS
 | 
					 | 
				
			||||||
 | 
					
 | 
				
			||||||
  # Tools
 | 
					# Load awk scripts
 | 
				
			||||||
  if command -v "fzf" >/dev/null; then
 | 
					. "sh/awkscripts.sh"
 | 
				
			||||||
    FZF="fzf"
 | 
					 | 
				
			||||||
  else
 | 
					 | 
				
			||||||
    err "Did not find the command-line fuzzy finder fzf."
 | 
					 | 
				
			||||||
    exit 1
 | 
					 | 
				
			||||||
  fi
 | 
					 | 
				
			||||||
  export FZF
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
  if command -v "uuidgen" >/dev/null; then
 | 
					 | 
				
			||||||
    UUIDGEN="uuidgen"
 | 
					 | 
				
			||||||
  else
 | 
					 | 
				
			||||||
    err "Did not find the uuidgen command."
 | 
					 | 
				
			||||||
    exit 1
 | 
					 | 
				
			||||||
  fi
 | 
					 | 
				
			||||||
  export UUIDGEN
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
  if command -v "bat" >/dev/null; then
 | 
					 | 
				
			||||||
    CAT="bat"
 | 
					 | 
				
			||||||
  elif command -v "batcat" >/dev/null; then
 | 
					 | 
				
			||||||
    CAT="batcat"
 | 
					 | 
				
			||||||
  fi
 | 
					 | 
				
			||||||
  CAT=${CAT:+$CAT --color=always --style=numbers --language=md}
 | 
					 | 
				
			||||||
  CAT=${CAT:-cat}
 | 
					 | 
				
			||||||
  export CAT
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
  ### AWK SCRIPTS
 | 
					 | 
				
			||||||
  AWK_ALTERTODO=$(
 | 
					 | 
				
			||||||
    cat <<'EOF'
 | 
					 | 
				
			||||||
@@include src/awk/altertodo.awk
 | 
					 | 
				
			||||||
EOF
 | 
					 | 
				
			||||||
  )
 | 
					 | 
				
			||||||
  export AWK_ALTERTODO
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
  AWK_EXPORT=$(
 | 
					 | 
				
			||||||
    cat <<'EOF'
 | 
					 | 
				
			||||||
@@include src/awk/export.awk
 | 
					 | 
				
			||||||
EOF
 | 
					 | 
				
			||||||
  )
 | 
					 | 
				
			||||||
  export AWK_EXPORT
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
  AWK_GET=$(
 | 
					 | 
				
			||||||
    cat <<'EOF'
 | 
					 | 
				
			||||||
@@include src/awk/get.awk
 | 
					 | 
				
			||||||
EOF
 | 
					 | 
				
			||||||
  )
 | 
					 | 
				
			||||||
  export AWK_GET
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
  AWK_LIST=$(
 | 
					 | 
				
			||||||
    cat <<'EOF'
 | 
					 | 
				
			||||||
@@include src/awk/list.awk
 | 
					 | 
				
			||||||
EOF
 | 
					 | 
				
			||||||
  )
 | 
					 | 
				
			||||||
  export AWK_LIST
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
  AWK_NEW=$(
 | 
					 | 
				
			||||||
    cat <<'EOF'
 | 
					 | 
				
			||||||
@@include src/awk/new.awk
 | 
					 | 
				
			||||||
EOF
 | 
					 | 
				
			||||||
  )
 | 
					 | 
				
			||||||
  export AWK_NEW
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
  AWK_UPDATE=$(
 | 
					 | 
				
			||||||
    cat <<'EOF'
 | 
					 | 
				
			||||||
@@include src/awk/update.awk
 | 
					 | 
				
			||||||
EOF
 | 
					 | 
				
			||||||
  )
 | 
					 | 
				
			||||||
  export AWK_UPDATE
 | 
					 | 
				
			||||||
  ### END OF AWK SCRIPTS
 | 
					 | 
				
			||||||
  FZF_VJOUR_USE_EXPORTED="yes"
 | 
					 | 
				
			||||||
  export FZF_VJOUR_USE_EXPORTED
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
 | 
					
 | 
				
			||||||
__lines() {
 | 
					__lines() {
 | 
				
			||||||
  find "$ROOT" -type f -name '*.ics' -print0 | xargs -0 -P 0 \
 | 
					  find "$ROOT" -type f -name '*.ics' -print0 | xargs -0 -P 0 \
 | 
				
			||||||
    awk \
 | 
					    awk \
 | 
				
			||||||
    -v collection_labels="$COLLECTION_LABELS" \
 | 
					    -v collection_labels="$COLLECTION_LABELS" \
 | 
				
			||||||
    -v flag_open="🔲" \
 | 
					    -v flag_open="$FLAG_OPEN" \
 | 
				
			||||||
    -v flag_completed="✅" \
 | 
					    -v flag_completed="$FLAG_COMPLETED" \
 | 
				
			||||||
    -v flag_journal="📘" \
 | 
					    -v flag_journal="$FLAG_JOURNAL" \
 | 
				
			||||||
    -v flag_note="🗒️" \
 | 
					    -v flag_note="$FLAG_NOTE" \
 | 
				
			||||||
 | 
					    -v flag_priority="$FLAG_PRIORITY" \
 | 
				
			||||||
 | 
					    -v flag_attachment="$FLAG_ATTACHMENT" \
 | 
				
			||||||
 | 
					    -v style_collection="$STYLE_COLLECTION" \
 | 
				
			||||||
 | 
					    -v style_date="$STYLE_DATE" \
 | 
				
			||||||
 | 
					    -v style_summary="$STYLE_SUMMARY" \
 | 
				
			||||||
 | 
					    -v style_expired="$STYLE_EXPIRED" \
 | 
				
			||||||
 | 
					    -v style_category="$STYLE_CATEGORY" \
 | 
				
			||||||
    "$AWK_LIST" |
 | 
					    "$AWK_LIST" |
 | 
				
			||||||
    sort -g -r
 | 
					    sort -g -r
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
# Program starts here
 | 
					# Program starts here
 | 
				
			||||||
if [ "${1:-}" = "--help" ]; then
 | 
					if [ "${1:-}" = "--help" ]; then
 | 
				
			||||||
  echo "Usage: $0 [OPTION]"
 | 
					  shift
 | 
				
			||||||
  echo ""
 | 
					  echo "Usage: $0 [--help | --new [FILTER..] | [FILTER..] ]
 | 
				
			||||||
  echo "You may specify at most one option."
 | 
					  --help                 Show this help and exit
 | 
				
			||||||
  echo "  --help                 Show this help and exit"
 | 
					  --new                  Create new entry and do not exit
 | 
				
			||||||
  echo "  --tasks                Show tasks only"
 | 
					  --git-init             Activate git usage and exit
 | 
				
			||||||
  echo "  --no-tasks             Ignore tasks"
 | 
					  --git <cmd>            Run git command and exit
 | 
				
			||||||
  echo "  --notes                Show notes only"
 | 
					
 | 
				
			||||||
  echo "  --no-notes             Ignore notes"
 | 
					[FILTER]
 | 
				
			||||||
  echo "  --journal              Show journal only"
 | 
					  You may specify any of these filters. Filters can be negated using the
 | 
				
			||||||
  echo "  --no-journal           Ignore journal"
 | 
					  --no-... versions, e.g., --no-tasks. Multiple filters are applied in
 | 
				
			||||||
  echo "  --completed            Show completed tasks only"
 | 
					  conjuction. By default, the filter --no-completed is used. Note that
 | 
				
			||||||
  echo "  --no-completed         Ignore completed tasks"
 | 
					  --no-completed is not the same as --open, and similarly, --no-open is not the
 | 
				
			||||||
  echo "  --new                  Create new entry"
 | 
					  same as --completed.
 | 
				
			||||||
  echo ""
 | 
					
 | 
				
			||||||
  echo "The following options are for internal use."
 | 
					  --tasks                 Show tasks only
 | 
				
			||||||
  echo "  --reload                            Reload list"
 | 
					  --notes                 Show notes only
 | 
				
			||||||
  echo "  --preview <selection>               Generate preview"
 | 
					  --journal               Show jounral only
 | 
				
			||||||
  echo "  --delete <selection>                Delete selected entry"
 | 
					  --completed             Show completed tasks only
 | 
				
			||||||
  echo "  --decrease-priority <selection>     Decrease priority of selected task"
 | 
					  --open                  Show open tasks only
 | 
				
			||||||
  echo "  --increase-priority <selection>     Increase priority of selected task"
 | 
					  --filter <query>        Specify custom query"
 | 
				
			||||||
  echo "  --toggle-completed <selection>      Toggle completion flag of task"
 | 
					 | 
				
			||||||
  exit
 | 
					  exit
 | 
				
			||||||
fi
 | 
					fi
 | 
				
			||||||
 | 
					
 | 
				
			||||||
# Command line arguments to be self-contained
 | 
					# iCalendar routines
 | 
				
			||||||
# Generate preview of file from selection
 | 
					. "sh/icalendar.sh"
 | 
				
			||||||
if [ "${1:-}" = "--preview" ]; then
 | 
					
 | 
				
			||||||
  name=$(echo "$2" | cut -d ' ' -f 3)
 | 
					# Command line arguments: Interal use
 | 
				
			||||||
  file="$ROOT/$name"
 | 
					. "sh/cliinternal.sh"
 | 
				
			||||||
  awk -v field="DESCRIPTION" "$AWK_GET" "$file" |
 | 
					
 | 
				
			||||||
    $CAT
 | 
					# Command line arguments: Interal use
 | 
				
			||||||
  exit
 | 
					. "sh/cli.sh"
 | 
				
			||||||
fi
 | 
					
 | 
				
			||||||
# Delete file from selection
 | 
					# Attachment handling
 | 
				
			||||||
if [ "${1:-}" = "--delete" ]; then
 | 
					. "sh/attachment.sh"
 | 
				
			||||||
  name=$(echo "$2" | cut -d ' ' -f 3)
 | 
					
 | 
				
			||||||
  file="$ROOT/$name"
 | 
					# Categories handling
 | 
				
			||||||
  summary=$(awk -v field="SUMMARY" "$AWK_GET" "$file")
 | 
					. "sh/categories.sh"
 | 
				
			||||||
 | 
					
 | 
				
			||||||
while true; do
 | 
					while true; do
 | 
				
			||||||
    printf "Do you want to delete the entry with the title \"%s\"? (yes/no): " "$summary" >/dev/tty
 | 
					  query=$(stripws "$query")
 | 
				
			||||||
    read -r yn
 | 
					 | 
				
			||||||
    case $yn in
 | 
					 | 
				
			||||||
    "yes")
 | 
					 | 
				
			||||||
      rm -v "$file"
 | 
					 | 
				
			||||||
      break
 | 
					 | 
				
			||||||
      ;;
 | 
					 | 
				
			||||||
    "no")
 | 
					 | 
				
			||||||
      break
 | 
					 | 
				
			||||||
      ;;
 | 
					 | 
				
			||||||
    *)
 | 
					 | 
				
			||||||
      echo "Please answer \"yes\" or \"no\"." >/dev/tty
 | 
					 | 
				
			||||||
      ;;
 | 
					 | 
				
			||||||
    esac
 | 
					 | 
				
			||||||
  done
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
# Generate new entry
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--new" ]; then
 | 
					 | 
				
			||||||
  collection=$(echo "$COLLECTION_LABELS" | tr ';' '\n' | $FZF --delimiter='=' --with-nth=2 --accept-nth=1)
 | 
					 | 
				
			||||||
  file=""
 | 
					 | 
				
			||||||
  while [ -f "$file" ] || [ -z "$file" ]; do
 | 
					 | 
				
			||||||
    uuid=$($UUIDGEN)
 | 
					 | 
				
			||||||
    file="$ROOT/$collection/$uuid.ics"
 | 
					 | 
				
			||||||
  done
 | 
					 | 
				
			||||||
  tmpmd=$(mktemp --suffix='.md')
 | 
					 | 
				
			||||||
  {
 | 
					 | 
				
			||||||
    echo "::: |> <!-- keep this line to associate the entry to _today_ -->"
 | 
					 | 
				
			||||||
    echo "::: <| <!-- specify the due date for to-dos, can be empty, a date string, or even \"next Sunday\" -->"
 | 
					 | 
				
			||||||
    echo "# <!-- write summary here -->"
 | 
					 | 
				
			||||||
    echo "> <!-- comma-separated list of categories -->"
 | 
					 | 
				
			||||||
    echo ""
 | 
					 | 
				
			||||||
  } >"$tmpmd"
 | 
					 | 
				
			||||||
  checksum=$(cksum "$tmpmd")
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
  # Open in editor
 | 
					 | 
				
			||||||
  $EDITOR "$tmpmd" >/dev/tty
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
  # Update if changes are detected
 | 
					 | 
				
			||||||
  if [ "$checksum" != "$(cksum "$tmpmd")" ]; then
 | 
					 | 
				
			||||||
    tmpfile="$tmpmd.ics"
 | 
					 | 
				
			||||||
    awk -v uid="$uuid" "$AWK_NEW" "$tmpmd" >"$tmpfile"
 | 
					 | 
				
			||||||
    mv "$tmpfile" "$file"
 | 
					 | 
				
			||||||
  fi
 | 
					 | 
				
			||||||
  rm "$tmpmd"
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
# Toggle completed flag
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--toggle-completed" ]; then
 | 
					 | 
				
			||||||
  name=$(echo "$2" | cut -d ' ' -f 3)
 | 
					 | 
				
			||||||
  file="$ROOT/$name"
 | 
					 | 
				
			||||||
  tmpfile=$(mktemp)
 | 
					 | 
				
			||||||
  awk "$AWK_ALTERTODO" "$file" >"$tmpfile"
 | 
					 | 
				
			||||||
  mv "$tmpfile" "$file"
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
# Increase priority
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--increase-priority" ]; then
 | 
					 | 
				
			||||||
  name=$(echo "$2" | cut -d ' ' -f 3)
 | 
					 | 
				
			||||||
  file="$ROOT/$name"
 | 
					 | 
				
			||||||
  tmpfile=$(mktemp)
 | 
					 | 
				
			||||||
  awk -v delta="1" "$AWK_ALTERTODO" "$file" >"$tmpfile"
 | 
					 | 
				
			||||||
  mv "$tmpfile" "$file"
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
# Decrease priority
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--decrease-priority" ]; then
 | 
					 | 
				
			||||||
  name=$(echo "$2" | cut -d ' ' -f 3)
 | 
					 | 
				
			||||||
  file="$ROOT/$name"
 | 
					 | 
				
			||||||
  tmpfile=$(mktemp)
 | 
					 | 
				
			||||||
  awk -v delta="-1" "$AWK_ALTERTODO" "$file" >"$tmpfile"
 | 
					 | 
				
			||||||
  mv "$tmpfile" "$file"
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--reload" ]; then
 | 
					 | 
				
			||||||
  __lines
 | 
					 | 
				
			||||||
  exit
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
query="${FZF_QUERY:-}"
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--no-completed" ]; then
 | 
					 | 
				
			||||||
  query="!✅"
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--completed" ]; then
 | 
					 | 
				
			||||||
  query="✅"
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--tasks" ]; then
 | 
					 | 
				
			||||||
  query="✅ | 🔲"
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--no-tasks" ]; then
 | 
					 | 
				
			||||||
  query="!✅ !🔲"
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--notes" ]; then
 | 
					 | 
				
			||||||
  query="🗒️"
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--no-notes" ]; then
 | 
					 | 
				
			||||||
  query="!🗒️"
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--journal" ]; then
 | 
					 | 
				
			||||||
  query="📘"
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
if [ "${1:-}" = "--no-journal" ]; then
 | 
					 | 
				
			||||||
  query="!📘"
 | 
					 | 
				
			||||||
fi
 | 
					 | 
				
			||||||
query=${query:-!✅}
 | 
					 | 
				
			||||||
query=$(echo "$query" | xargs)
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
  selection=$(
 | 
					  selection=$(
 | 
				
			||||||
    __lines | $FZF --ansi \
 | 
					    __lines | $FZF --ansi \
 | 
				
			||||||
      --query="$query " \
 | 
					      --query="$query " \
 | 
				
			||||||
      --no-sort \
 | 
					      --no-sort \
 | 
				
			||||||
      --no-hscroll \
 | 
					      --no-hscroll \
 | 
				
			||||||
    --ellipsis='' \
 | 
					      --with-nth=5.. \
 | 
				
			||||||
    --with-nth=4.. \
 | 
					      --print-query \
 | 
				
			||||||
    --accept-nth=3 \
 | 
					      --accept-nth=4 \
 | 
				
			||||||
    --preview="$0 --preview {}" \
 | 
					      --preview="$0 --preview {4}" \
 | 
				
			||||||
    --bind="ctrl-r:reload-sync($0 --reload)" \
 | 
					      --expect="ctrl-n,ctrl-alt-d,alt-v,ctrl-a,ctrl-t" \
 | 
				
			||||||
    --bind="ctrl-alt-d:become($0 --delete {})" \
 | 
					      --bind="ctrl-r:reload($0 --reload)" \
 | 
				
			||||||
    --bind="ctrl-x:become($0 --toggle-completed {})" \
 | 
					      --bind="ctrl-x:reload($0 --reload --toggle-completed {4})" \
 | 
				
			||||||
    --bind="alt-up:become($0 --increase-priority {})" \
 | 
					      --bind="alt-up:reload($0 --reload --change-priority '+1' {4})" \
 | 
				
			||||||
    --bind="alt-down:become($0 --decrease-priority {})" \
 | 
					      --bind="alt-down:reload($0 --reload --change-priority '-1' {4})" \
 | 
				
			||||||
    --bind="ctrl-n:become($0 --new)" \
 | 
					 | 
				
			||||||
      --bind="alt-0:change-query(!✅)" \
 | 
					      --bind="alt-0:change-query(!✅)" \
 | 
				
			||||||
      --bind="alt-1:change-query(📘)" \
 | 
					      --bind="alt-1:change-query(📘)" \
 | 
				
			||||||
      --bind="alt-2:change-query(🗒️)" \
 | 
					      --bind="alt-2:change-query(🗒️)" \
 | 
				
			||||||
      --bind="alt-3:change-query(✅ | 🔲)" \
 | 
					      --bind="alt-3:change-query(✅ | 🔲)" \
 | 
				
			||||||
    --bind="ctrl-s:execute($SYNC_CMD ; printf 'Press <enter> to continue.'; read -r tmp)"
 | 
					      --bind='focus:transform:[ {3} = "VTODO" ] && echo "rebind(ctrl-x)+rebind(alt-up)+rebind(alt-down)" || echo "unbind(ctrl-x)+unbind(alt-up)+unbind(alt-down)"' \
 | 
				
			||||||
 | 
					      --bind="ctrl-s:execute($SYNC_CMD; [ -n \"${GIT:-}\" ] && ${GIT:-echo} add -A; ${GIT:-echo} commit -am 'Synchronized'; printf 'Press <enter> to continue.'; read -r tmp)" ||
 | 
				
			||||||
 | 
					      true
 | 
				
			||||||
  )
 | 
					  )
 | 
				
			||||||
if [ -z "$selection" ]; then
 | 
					
 | 
				
			||||||
 | 
					  # Line 1: query
 | 
				
			||||||
 | 
					  # Line 2: key ("" for enter)
 | 
				
			||||||
 | 
					  # Line 3: relative file path
 | 
				
			||||||
 | 
					  lines=$(echo "$selection" | wc -l)
 | 
				
			||||||
 | 
					  if [ "$lines" -eq 1 ]; then
 | 
				
			||||||
    return 0
 | 
					    return 0
 | 
				
			||||||
  fi
 | 
					  fi
 | 
				
			||||||
 | 
					  query=$(echo "$selection" | head -n 1)
 | 
				
			||||||
 | 
					  key=$(echo "$selection" | head -n 2 | tail -n 1)
 | 
				
			||||||
 | 
					  fname=$(echo "$selection" | head -n 3 | tail -n 1)
 | 
				
			||||||
 | 
					  file="$ROOT/$fname"
 | 
				
			||||||
 | 
					
 | 
				
			||||||
file="$ROOT/$selection"
 | 
					  case "$key" in
 | 
				
			||||||
 | 
					  "ctrl-n")
 | 
				
			||||||
if [ ! -f "$file" ]; then
 | 
					    __new
 | 
				
			||||||
  echo "ERROR: File '$file' does not exist!" >/dev/tty
 | 
					    ;;
 | 
				
			||||||
  return 1
 | 
					  "ctrl-alt-d")
 | 
				
			||||||
fi
 | 
					    __delete "$file"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
# Prepare file to be edited
 | 
					  "alt-v")
 | 
				
			||||||
filetmp=$(mktemp --suffix='.md')
 | 
					    $EDITOR "$file"
 | 
				
			||||||
awk "$AWK_EXPORT" "$file" >"$filetmp"
 | 
					    ;;
 | 
				
			||||||
checksum=$(cksum "$filetmp")
 | 
					  "ctrl-a")
 | 
				
			||||||
 | 
					    __attachment_view "$file"
 | 
				
			||||||
# Open in editor
 | 
					    ;;
 | 
				
			||||||
$EDITOR "$filetmp" >/dev/tty
 | 
					  "ctrl-t")
 | 
				
			||||||
 | 
					    query="'$(__select_category)'"
 | 
				
			||||||
# Update only if changes are detected
 | 
					    ;;
 | 
				
			||||||
if [ "$checksum" != "$(cksum "$filetmp")" ]; then
 | 
					  "")
 | 
				
			||||||
  file_new="$filetmp.ics"
 | 
					    __edit "$file"
 | 
				
			||||||
  awk "$AWK_UPDATE" "$filetmp" "$file" >"$file_new"
 | 
					    ;;
 | 
				
			||||||
  mv "$file_new" "$file"
 | 
					  esac
 | 
				
			||||||
fi
 | 
					done
 | 
				
			||||||
rm "$filetmp"
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
exec "$0"
 | 
					 | 
				
			||||||
 
 | 
				
			|||||||
							
								
								
									
										178
									
								
								src/sh/attachment.sh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										178
									
								
								src/sh/attachment.sh
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,178 @@
 | 
				
			|||||||
 | 
					# Add attachment to iCalendar file
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input $1: Path to iCalendar file
 | 
				
			||||||
 | 
					__add_attachment() {
 | 
				
			||||||
 | 
					  file="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  sel=$(
 | 
				
			||||||
 | 
					    $FZF --prompt="Select attachment> " \
 | 
				
			||||||
 | 
					      --walker="file,hidden" \
 | 
				
			||||||
 | 
					      --walker-root="$HOME" \
 | 
				
			||||||
 | 
					      --expect="ctrl-c,ctrl-g,ctrl-q,esc"
 | 
				
			||||||
 | 
					  )
 | 
				
			||||||
 | 
					  key=$(echo "$sel" | head -1)
 | 
				
			||||||
 | 
					  f=$(echo "$sel" | tail -1)
 | 
				
			||||||
 | 
					  if [ -n "$key" ]; then
 | 
				
			||||||
 | 
					    f=""
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					  if [ -z "$f" ] || [ ! -f "$f" ]; then
 | 
				
			||||||
 | 
					    return
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					  filename=$(basename "$f")
 | 
				
			||||||
 | 
					  mime=$(file -b -i "$f" | cut -d ';' -f 1)
 | 
				
			||||||
 | 
					  if [ -z "$mime" ]; then
 | 
				
			||||||
 | 
					    mime="application/octet-stream"
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					  fenc=$(mktemp)
 | 
				
			||||||
 | 
					  base64 "$f" >"$fenc"
 | 
				
			||||||
 | 
					  filetmp=$(mktemp)
 | 
				
			||||||
 | 
					  awk -v file="$fenc" -v mime="$mime" -v filename="$filename" "$AWK_ATTACH" "$file" >"$filetmp"
 | 
				
			||||||
 | 
					  mv "$filetmp" "$file"
 | 
				
			||||||
 | 
					  if [ -n "${GIT:-}" ]; then
 | 
				
			||||||
 | 
					    $GIT add "$file"
 | 
				
			||||||
 | 
					    $GIT commit -q -m "Added attachment" -- "$file"
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					  rm "$fenc"
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Open attachment from iCalendar file
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input $1: Attachment id
 | 
				
			||||||
 | 
					# @input $2: Attachment name
 | 
				
			||||||
 | 
					# @input $3: Attachment format
 | 
				
			||||||
 | 
					# @input $4: Attachment encoding
 | 
				
			||||||
 | 
					# @input $5: Path to iCalendar file
 | 
				
			||||||
 | 
					__open_attachment() {
 | 
				
			||||||
 | 
					  attid="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  attname="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  attfmt="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  attenc="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  file="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  if [ "$attenc" != "base64" ]; then
 | 
				
			||||||
 | 
					    err "Unsupported attachment encoding: $attenc. Press <enter> to continue."
 | 
				
			||||||
 | 
					    read -r tmp
 | 
				
			||||||
 | 
					    return
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					  if [ -n "$attname" ]; then
 | 
				
			||||||
 | 
					    tmpdir=$(mktemp -d)
 | 
				
			||||||
 | 
					    attpath="$tmpdir/$attname"
 | 
				
			||||||
 | 
					  elif [ -n "$attfmt" ]; then
 | 
				
			||||||
 | 
					    attext=$(echo "$attfmt" | cut -d "/" -f 2)
 | 
				
			||||||
 | 
					    attpath=$(mktemp --suffix="$attext")
 | 
				
			||||||
 | 
					  else
 | 
				
			||||||
 | 
					    attpath=$(mktemp)
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					  # Get file and decode
 | 
				
			||||||
 | 
					  awk -v id="$attid" "$AWK_ATTACHDD" "$file" | base64 -d >"$attpath"
 | 
				
			||||||
 | 
					  fn=$(file "$attpath")
 | 
				
			||||||
 | 
					  while true; do
 | 
				
			||||||
 | 
					    printf "Are you sure you want to open \"%s\"? (yes/no): " "$fn" >/dev/tty
 | 
				
			||||||
 | 
					    read -r yn
 | 
				
			||||||
 | 
					    case $yn in
 | 
				
			||||||
 | 
					    "yes")
 | 
				
			||||||
 | 
					      $OPEN "$attpath"
 | 
				
			||||||
 | 
					      printf "Press <enter> to continue." >/dev/tty
 | 
				
			||||||
 | 
					      read -r tmp
 | 
				
			||||||
 | 
					      break
 | 
				
			||||||
 | 
					      ;;
 | 
				
			||||||
 | 
					    "no")
 | 
				
			||||||
 | 
					      break
 | 
				
			||||||
 | 
					      ;;
 | 
				
			||||||
 | 
					    *)
 | 
				
			||||||
 | 
					      echo "Please answer \"yes\" or \"no\"." >/dev/tty
 | 
				
			||||||
 | 
					      ;;
 | 
				
			||||||
 | 
					    esac
 | 
				
			||||||
 | 
					  done
 | 
				
			||||||
 | 
					  # Clean up
 | 
				
			||||||
 | 
					  rm -f "$attpath"
 | 
				
			||||||
 | 
					  if [ -n "${tmpdir:-}" ] && [ -d "${tmpdir:-}" ]; then
 | 
				
			||||||
 | 
					    rm -rf "$tmpdir"
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Delete attachment from iCalendar file
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input $1: Attachment id
 | 
				
			||||||
 | 
					# @input $2: Path to iCalendar File
 | 
				
			||||||
 | 
					__del_attachment() {
 | 
				
			||||||
 | 
					  attid="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  file="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  while true; do
 | 
				
			||||||
 | 
					    printf "Are you sure you want to delete attachment \"%s\"? (yes/no): " "$attid" >/dev/tty
 | 
				
			||||||
 | 
					    read -r yn
 | 
				
			||||||
 | 
					    case $yn in
 | 
				
			||||||
 | 
					    "yes")
 | 
				
			||||||
 | 
					      filetmp=$(mktemp)
 | 
				
			||||||
 | 
					      awk -v id="$attid" "$AWK_ATTACHRM" "$file" >"$filetmp"
 | 
				
			||||||
 | 
					      mv "$filetmp" "$file"
 | 
				
			||||||
 | 
					      if [ -n "${GIT:-}" ]; then
 | 
				
			||||||
 | 
					        $GIT add "$file"
 | 
				
			||||||
 | 
					        $GIT commit -q -m "Deleted attachment" -- "$file"
 | 
				
			||||||
 | 
					      fi
 | 
				
			||||||
 | 
					      break
 | 
				
			||||||
 | 
					      ;;
 | 
				
			||||||
 | 
					    "no")
 | 
				
			||||||
 | 
					      break
 | 
				
			||||||
 | 
					      ;;
 | 
				
			||||||
 | 
					    *)
 | 
				
			||||||
 | 
					      echo "Please answer \"yes\" or \"no\"." >/dev/tty
 | 
				
			||||||
 | 
					      ;;
 | 
				
			||||||
 | 
					    esac
 | 
				
			||||||
 | 
					  done
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Show attachment window
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input $1: Path to iCalendar file
 | 
				
			||||||
 | 
					__attachment_view() {
 | 
				
			||||||
 | 
					  file="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  att=$(
 | 
				
			||||||
 | 
					    awk "$AWK_ATTACHLS" "$file" |
 | 
				
			||||||
 | 
					      $FZF \
 | 
				
			||||||
 | 
					        --delimiter="\t" \
 | 
				
			||||||
 | 
					        --accept-nth=1,2,3,4 \
 | 
				
			||||||
 | 
					        --with-nth="Attachment {1}: \"{2}\" {3} ({5})" \
 | 
				
			||||||
 | 
					        --no-sort \
 | 
				
			||||||
 | 
					        --tac \
 | 
				
			||||||
 | 
					        --margin="30%,30%" \
 | 
				
			||||||
 | 
					        --border=bold \
 | 
				
			||||||
 | 
					        --border-label="Attachment View     Keys: <enter> open, <ctrl-alt-d> delete, <ctrl-a> add" \
 | 
				
			||||||
 | 
					        --expect="ctrl-a" \
 | 
				
			||||||
 | 
					        --expect="ctrl-c,ctrl-g,ctrl-q,ctrl-d,esc,q,backspace" \
 | 
				
			||||||
 | 
					        --print-query \
 | 
				
			||||||
 | 
					        --bind="start:hide-input" \
 | 
				
			||||||
 | 
					        --bind="ctrl-alt-d:show-input+change-query(ctrl-alt-d)+accept" \
 | 
				
			||||||
 | 
					        --bind='load:transform:[ "$FZF_TOTAL_COUNT" -eq 0 ] && echo "unbind(enter)+unbind(ctrl-alt-d)"' \
 | 
				
			||||||
 | 
					        --bind="w:toggle-wrap" \
 | 
				
			||||||
 | 
					        --bind="j:down" \
 | 
				
			||||||
 | 
					        --bind="k:up" ||
 | 
				
			||||||
 | 
					      true
 | 
				
			||||||
 | 
					  )
 | 
				
			||||||
 | 
					  key=$(echo "$att" | head -2 | xargs)
 | 
				
			||||||
 | 
					  sel=$(echo "$att" | tail -1)
 | 
				
			||||||
 | 
					  attid=$(echo "$sel" | cut -f 1)
 | 
				
			||||||
 | 
					  attname=$(echo "$sel" | cut -f 2)
 | 
				
			||||||
 | 
					  attfmt=$(echo "$sel" | cut -f 3)
 | 
				
			||||||
 | 
					  attenc=$(echo "$sel" | cut -f 4)
 | 
				
			||||||
 | 
					  case "$key" in
 | 
				
			||||||
 | 
					  "ctrl-c" | "ctrl-g" | "ctrl-q" | "ctrl-d" | "esc" | "q" | "backspace") ;;
 | 
				
			||||||
 | 
					  "ctrl-alt-d")
 | 
				
			||||||
 | 
					    __del_attachment "$attid" "$file"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "ctrl-a")
 | 
				
			||||||
 | 
					    __add_attachment "$file"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  *)
 | 
				
			||||||
 | 
					    __open_attachment "$attid" "$attname" "$attfmt" "$attenc" "$file"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  esac
 | 
				
			||||||
 | 
					  #
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
							
								
								
									
										62
									
								
								src/sh/awkscripts.sh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										62
									
								
								src/sh/awkscripts.sh
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,62 @@
 | 
				
			|||||||
 | 
					AWK_ALTERTODO=$(
 | 
				
			||||||
 | 
					  cat <<'EOF'
 | 
				
			||||||
 | 
					@@include awk/altertodo.awk
 | 
				
			||||||
 | 
					EOF
 | 
				
			||||||
 | 
					)
 | 
				
			||||||
 | 
					export AWK_ALTERTODO
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					AWK_GET=$(
 | 
				
			||||||
 | 
					  cat <<'EOF'
 | 
				
			||||||
 | 
					@@include awk/get.awk
 | 
				
			||||||
 | 
					EOF
 | 
				
			||||||
 | 
					)
 | 
				
			||||||
 | 
					export AWK_GET
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					AWK_LIST=$(
 | 
				
			||||||
 | 
					  cat <<'EOF'
 | 
				
			||||||
 | 
					  @@include awk/list.awk
 | 
				
			||||||
 | 
					EOF
 | 
				
			||||||
 | 
					)
 | 
				
			||||||
 | 
					export AWK_LIST
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					AWK_NEW=$(
 | 
				
			||||||
 | 
					  cat <<'EOF'
 | 
				
			||||||
 | 
					@@include awk/new.awk
 | 
				
			||||||
 | 
					EOF
 | 
				
			||||||
 | 
					)
 | 
				
			||||||
 | 
					export AWK_NEW
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					AWK_UPDATE=$(
 | 
				
			||||||
 | 
					  cat <<'EOF'
 | 
				
			||||||
 | 
					@@include awk/update.awk
 | 
				
			||||||
 | 
					EOF
 | 
				
			||||||
 | 
					)
 | 
				
			||||||
 | 
					export AWK_UPDATE
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					AWK_ATTACH=$(
 | 
				
			||||||
 | 
					  cat <<'EOF'
 | 
				
			||||||
 | 
					@@include awk/attach.awk
 | 
				
			||||||
 | 
					EOF
 | 
				
			||||||
 | 
					)
 | 
				
			||||||
 | 
					export AWK_ATTACH
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					AWK_ATTACHDD=$(
 | 
				
			||||||
 | 
					  cat <<'EOF'
 | 
				
			||||||
 | 
					@@include awk/attachdd.awk
 | 
				
			||||||
 | 
					EOF
 | 
				
			||||||
 | 
					)
 | 
				
			||||||
 | 
					export AWK_ATTACHDD
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					AWK_ATTACHLS=$(
 | 
				
			||||||
 | 
					  cat <<'EOF'
 | 
				
			||||||
 | 
					@@include awk/attachls.awk
 | 
				
			||||||
 | 
					EOF
 | 
				
			||||||
 | 
					)
 | 
				
			||||||
 | 
					export AWK_ATTACHLS
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					AWK_ATTACHRM=$(
 | 
				
			||||||
 | 
					  cat <<'EOF'
 | 
				
			||||||
 | 
					@@include awk/attachrm.awk
 | 
				
			||||||
 | 
					EOF
 | 
				
			||||||
 | 
					)
 | 
				
			||||||
 | 
					export AWK_ATTACHRM
 | 
				
			||||||
							
								
								
									
										17
									
								
								src/sh/categories.sh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										17
									
								
								src/sh/categories.sh
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,17 @@
 | 
				
			|||||||
 | 
					# List all categories and lest user select
 | 
				
			||||||
 | 
					__select_category() {
 | 
				
			||||||
 | 
					  find "$ROOT" -type f -name "*.ics" -print0 |
 | 
				
			||||||
 | 
					    xargs -0 -P 0 \
 | 
				
			||||||
 | 
					      awk -v field="CATEGORIES" -v format="csv" "$AWK_GET" |
 | 
				
			||||||
 | 
					    tr ',' '\n' |
 | 
				
			||||||
 | 
					    sort |
 | 
				
			||||||
 | 
					    uniq |
 | 
				
			||||||
 | 
					    grep '.' |
 | 
				
			||||||
 | 
					    $FZF --prompt="Select category> " \
 | 
				
			||||||
 | 
					      --no-sort \
 | 
				
			||||||
 | 
					      --tac \
 | 
				
			||||||
 | 
					      --margin="30%,30%" \
 | 
				
			||||||
 | 
					      --border=bold \
 | 
				
			||||||
 | 
					      --border-label="Categories" ||
 | 
				
			||||||
 | 
					    true
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
							
								
								
									
										94
									
								
								src/sh/cli.sh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										94
									
								
								src/sh/cli.sh
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,94 @@
 | 
				
			|||||||
 | 
					# Git
 | 
				
			||||||
 | 
					if [ "${1:-}" = "--git-init" ]; then
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  if [ -n "${GIT:-}" ]; then
 | 
				
			||||||
 | 
					    err "Git already enabled"
 | 
				
			||||||
 | 
					    return 1
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					  if ! command -v "git" >/dev/null; then
 | 
				
			||||||
 | 
					    err "Git not installed"
 | 
				
			||||||
 | 
					    return 1
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					  git -C "$ROOT" init
 | 
				
			||||||
 | 
					  git -C "$ROOT" add -A
 | 
				
			||||||
 | 
					  git -C "$ROOT" commit -m 'Initial commit: Start git tracking'
 | 
				
			||||||
 | 
					  exit
 | 
				
			||||||
 | 
					fi
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					if [ "${1:-}" = "--git" ]; then
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  if [ -z "${GIT:-}" ]; then
 | 
				
			||||||
 | 
					    err "Git not supported, run \`$0 --git-init\` first"
 | 
				
			||||||
 | 
					    return 1
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					  $GIT "$@"
 | 
				
			||||||
 | 
					  exit
 | 
				
			||||||
 | 
					fi
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Generate new entry
 | 
				
			||||||
 | 
					if [ "${1:-}" = "--new" ]; then
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  __new
 | 
				
			||||||
 | 
					fi
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Build query
 | 
				
			||||||
 | 
					while [ -n "${1:-}" ]; do
 | 
				
			||||||
 | 
					  case "${1:-}" in
 | 
				
			||||||
 | 
					  "--completed")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    cliquery="${cliquery:-} $FLAG_COMPLETED"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "--no-completed")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    cliquery="${cliquery:-} !$FLAG_COMPLETED"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "--open")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    cliquery="${cliquery:-} $FLAG_OPEN"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "--no-open")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    cliquery="${cliquery:-} !$FLAG_OPEN"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "--tasks")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    cliquery="${cliquery:-} $FLAG_OPEN | $FLAG_COMPLETED"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "--no-tasks")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    cliquery="${cliquery:-} !$FLAG_COMPLETED !$FLAG_OPEN"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "--notes")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    cliquery="${cliquery:-} $FLAG_NOTE"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "--no-notes")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    cliquery="${cliquery:-} !$FLAG_NOTE"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "--journal")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    cliquery="${cliquery:-} $FLAG_JOURNAL"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "--no-journal")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    cliquery="${cliquery:-} !$FLAG_JOURNAL"
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "--filter")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    cliquery="${cliquery:-} $1"
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "--no-filter")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    cliquery="${cliquery:-} !$1"
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  *)
 | 
				
			||||||
 | 
					    err "Unknown option \"$1\""
 | 
				
			||||||
 | 
					    exit 1
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  esac
 | 
				
			||||||
 | 
					done
 | 
				
			||||||
 | 
					query=${cliquery:-!$FLAG_COMPLETED}
 | 
				
			||||||
 | 
					export query
 | 
				
			||||||
							
								
								
									
										35
									
								
								src/sh/cliinternal.sh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										35
									
								
								src/sh/cliinternal.sh
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,35 @@
 | 
				
			|||||||
 | 
					# Command-line interface for internal use only
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Generate preview of file from selection
 | 
				
			||||||
 | 
					if [ "${1:-}" = "--preview" ]; then
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  name="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  file="$ROOT/$name"
 | 
				
			||||||
 | 
					  awk -v field="DESCRIPTION" "$AWK_GET" "$file" |
 | 
				
			||||||
 | 
					    $CAT
 | 
				
			||||||
 | 
					  exit
 | 
				
			||||||
 | 
					fi
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Reload view
 | 
				
			||||||
 | 
					if [ "${1:-}" = "--reload" ]; then
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  case "${1:-}" in
 | 
				
			||||||
 | 
					  "--toggle-completed")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    fname="$1"
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    __toggle_completed "$fname" >/dev/null
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  "--change-priority")
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    delta=$1
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    fname="$1"
 | 
				
			||||||
 | 
					    shift
 | 
				
			||||||
 | 
					    __change_priority "$delta" "$fname" >/dev/null
 | 
				
			||||||
 | 
					    ;;
 | 
				
			||||||
 | 
					  esac
 | 
				
			||||||
 | 
					  __lines
 | 
				
			||||||
 | 
					  exit
 | 
				
			||||||
 | 
					fi
 | 
				
			||||||
							
								
								
									
										48
									
								
								src/sh/config.sh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										48
									
								
								src/sh/config.sh
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,48 @@
 | 
				
			|||||||
 | 
					CONFIGFILE="${CONFIGFILE:-$HOME/.config/fzf-vjour/config}"
 | 
				
			||||||
 | 
					if [ ! -f "$CONFIGFILE" ]; then
 | 
				
			||||||
 | 
					  err "Configuration '$CONFIGFILE' not found."
 | 
				
			||||||
 | 
					  exit 1
 | 
				
			||||||
 | 
					fi
 | 
				
			||||||
 | 
					# shellcheck source=/dev/null
 | 
				
			||||||
 | 
					. "$CONFIGFILE"
 | 
				
			||||||
 | 
					if [ -z "${ROOT:-}" ] || [ -z "${COLLECTION_LABELS:-}" ]; then
 | 
				
			||||||
 | 
					  err "Configuration is incomplete."
 | 
				
			||||||
 | 
					  exit 1
 | 
				
			||||||
 | 
					fi
 | 
				
			||||||
 | 
					SYNC_CMD="${SYNC_CMD:-}"
 | 
				
			||||||
 | 
					export ROOT
 | 
				
			||||||
 | 
					export SYNC_CMD
 | 
				
			||||||
 | 
					export COLLECTION_LABELS
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Tools
 | 
				
			||||||
 | 
					if command -v "fzf" >/dev/null; then
 | 
				
			||||||
 | 
					  FZF="fzf"
 | 
				
			||||||
 | 
					else
 | 
				
			||||||
 | 
					  err "Did not find the command-line fuzzy finder fzf."
 | 
				
			||||||
 | 
					  exit 1
 | 
				
			||||||
 | 
					fi
 | 
				
			||||||
 | 
					export FZF
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					if command -v "uuidgen" >/dev/null; then
 | 
				
			||||||
 | 
					  UUIDGEN="uuidgen"
 | 
				
			||||||
 | 
					else
 | 
				
			||||||
 | 
					  err "Did not find the uuidgen command."
 | 
				
			||||||
 | 
					  exit 1
 | 
				
			||||||
 | 
					fi
 | 
				
			||||||
 | 
					export UUIDGEN
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					if command -v "bat" >/dev/null; then
 | 
				
			||||||
 | 
					  CAT="bat"
 | 
				
			||||||
 | 
					elif command -v "batcat" >/dev/null; then
 | 
				
			||||||
 | 
					  CAT="batcat"
 | 
				
			||||||
 | 
					fi
 | 
				
			||||||
 | 
					CAT=${CAT:+$CAT --color=always --style=numbers --language=md}
 | 
				
			||||||
 | 
					CAT=${CAT:-cat}
 | 
				
			||||||
 | 
					export CAT
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					if command -v "git" >/dev/null && [ -d "$ROOT/.git" ]; then
 | 
				
			||||||
 | 
					  GIT="git -C $ROOT"
 | 
				
			||||||
 | 
					  export GIT
 | 
				
			||||||
 | 
					fi
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					export OPEN=${OPEN:-open}
 | 
				
			||||||
							
								
								
									
										9
									
								
								src/sh/helper.sh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										9
									
								
								src/sh/helper.sh
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,9 @@
 | 
				
			|||||||
 | 
					# Print error message
 | 
				
			||||||
 | 
					err() {
 | 
				
			||||||
 | 
					  echo "❌ $1" >/dev/tty
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Strip whitespaces from argument
 | 
				
			||||||
 | 
					stripws() {
 | 
				
			||||||
 | 
					  echo "$@" | sed "s/^ *//" | sed "s/ *$//"
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
							
								
								
									
										150
									
								
								src/sh/icalendar.sh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										150
									
								
								src/sh/icalendar.sh
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,150 @@
 | 
				
			|||||||
 | 
					# Interface to modify iCalendar files
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Toggle completed status of VTODO
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input $1: Relative path to iCalendar file
 | 
				
			||||||
 | 
					__toggle_completed() {
 | 
				
			||||||
 | 
					  fname="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  file="$ROOT/$fname"
 | 
				
			||||||
 | 
					  tmpfile=$(mktemp)
 | 
				
			||||||
 | 
					  awk "$AWK_ALTERTODO" "$file" >"$tmpfile"
 | 
				
			||||||
 | 
					  mv "$tmpfile" "$file"
 | 
				
			||||||
 | 
					  if [ -n "${GIT:-}" ]; then
 | 
				
			||||||
 | 
					    $GIT add "$file"
 | 
				
			||||||
 | 
					    $GIT commit -q -m "Completed toggle" -- "$file"
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Change priority of VTODO entry
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input $1: Delta, can be any integer
 | 
				
			||||||
 | 
					# @input $2: Relative path to iCalendar file
 | 
				
			||||||
 | 
					__change_priority() {
 | 
				
			||||||
 | 
					  delta=$1
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  fname="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  file="$ROOT/$fname"
 | 
				
			||||||
 | 
					  tmpfile=$(mktemp)
 | 
				
			||||||
 | 
					  awk -v delta="$delta" "$AWK_ALTERTODO" "$file" >"$tmpfile"
 | 
				
			||||||
 | 
					  mv "$tmpfile" "$file"
 | 
				
			||||||
 | 
					  if [ -n "${GIT:-}" ]; then
 | 
				
			||||||
 | 
					    $GIT add "$file"
 | 
				
			||||||
 | 
					    $GIT commit -q -m "Priority changed by $delta" -- "$file"
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Edit file
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input $1: File path
 | 
				
			||||||
 | 
					__edit() {
 | 
				
			||||||
 | 
					  file="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  tmpmd=$(mktemp --suffix='.md')
 | 
				
			||||||
 | 
					  due=$(awk -v field="DUE" -v format="date" "$AWK_GET" "$file")
 | 
				
			||||||
 | 
					  if [ -n "$due" ]; then
 | 
				
			||||||
 | 
					    echo "::: <| $due" >"$tmpmd"
 | 
				
			||||||
 | 
					  fi
 | 
				
			||||||
 | 
					  {
 | 
				
			||||||
 | 
					    echo "# $(awk -v field="SUMMARY" -v oneline=1 "$AWK_GET" "$file")"
 | 
				
			||||||
 | 
					    echo "> $(awk -v field="CATEGORIES" -v format="csv" -v oneline=1 "$AWK_GET" "$file")"
 | 
				
			||||||
 | 
					    echo ""
 | 
				
			||||||
 | 
					    awk -v field="DESCRIPTION" "$AWK_GET" "$file"
 | 
				
			||||||
 | 
					  } >>"$tmpmd"
 | 
				
			||||||
 | 
					  checksum=$(cksum "$tmpmd")
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					  # Open in editor
 | 
				
			||||||
 | 
					  $EDITOR "$tmpmd" >/dev/tty
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					  # Update only if changes are detected
 | 
				
			||||||
 | 
					  while [ "$checksum" != "$(cksum "$tmpmd")" ]; do
 | 
				
			||||||
 | 
					    tmpfile="$tmpmd.ics"
 | 
				
			||||||
 | 
					    if awk "$AWK_UPDATE" "$tmpmd" "$file" >"$tmpfile"; then
 | 
				
			||||||
 | 
					      mv "$tmpfile" "$file"
 | 
				
			||||||
 | 
					      if [ -n "${GIT:-}" ]; then
 | 
				
			||||||
 | 
					        $GIT add "$file"
 | 
				
			||||||
 | 
					        $GIT commit -q -m "File modified" -- "$file"
 | 
				
			||||||
 | 
					      fi
 | 
				
			||||||
 | 
					      break
 | 
				
			||||||
 | 
					    else
 | 
				
			||||||
 | 
					      rm -f "$tmpfile"
 | 
				
			||||||
 | 
					      err "Failed to update entry. Press <enter> to continue."
 | 
				
			||||||
 | 
					      read -r tmp
 | 
				
			||||||
 | 
					      # Re-open in editor
 | 
				
			||||||
 | 
					      $EDITOR "$tmpmd" >/dev/tty
 | 
				
			||||||
 | 
					    fi
 | 
				
			||||||
 | 
					  done
 | 
				
			||||||
 | 
					  rm "$tmpmd"
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Delete file
 | 
				
			||||||
 | 
					#
 | 
				
			||||||
 | 
					# @input $1: File path
 | 
				
			||||||
 | 
					__delete() {
 | 
				
			||||||
 | 
					  file="$1"
 | 
				
			||||||
 | 
					  shift
 | 
				
			||||||
 | 
					  summary=$(awk -v field="SUMMARY" "$AWK_GET" "$file")
 | 
				
			||||||
 | 
					  while true; do
 | 
				
			||||||
 | 
					    printf "Do you want to delete the entry with the title \"%s\"? (yes/no): " "$summary" >/dev/tty
 | 
				
			||||||
 | 
					    read -r yn
 | 
				
			||||||
 | 
					    case $yn in
 | 
				
			||||||
 | 
					    "yes")
 | 
				
			||||||
 | 
					      rm -v "$file"
 | 
				
			||||||
 | 
					      if [ -n "${GIT:-}" ]; then
 | 
				
			||||||
 | 
					        $GIT add "$file"
 | 
				
			||||||
 | 
					        $GIT commit -q -m "File deleted" -- "$file"
 | 
				
			||||||
 | 
					      fi
 | 
				
			||||||
 | 
					      break
 | 
				
			||||||
 | 
					      ;;
 | 
				
			||||||
 | 
					    "no")
 | 
				
			||||||
 | 
					      break
 | 
				
			||||||
 | 
					      ;;
 | 
				
			||||||
 | 
					    *)
 | 
				
			||||||
 | 
					      echo "Please answer \"yes\" or \"no\"." >/dev/tty
 | 
				
			||||||
 | 
					      ;;
 | 
				
			||||||
 | 
					    esac
 | 
				
			||||||
 | 
					  done
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Add file
 | 
				
			||||||
 | 
					__new() {
 | 
				
			||||||
 | 
					  collection=$(printf "%s" "$COLLECTION_LABELS" | tr ';' '\n' | $FZF --delimiter='=' --with-nth=2 --accept-nth=1)
 | 
				
			||||||
 | 
					  file=""
 | 
				
			||||||
 | 
					  while [ -f "$file" ] || [ -z "$file" ]; do
 | 
				
			||||||
 | 
					    uuid=$($UUIDGEN)
 | 
				
			||||||
 | 
					    file="$ROOT/$collection/$uuid.ics"
 | 
				
			||||||
 | 
					  done
 | 
				
			||||||
 | 
					  tmpmd=$(mktemp --suffix='.md')
 | 
				
			||||||
 | 
					  {
 | 
				
			||||||
 | 
					    echo "::: |> <!-- keep this line to associate the entry to _today_ -->"
 | 
				
			||||||
 | 
					    echo "::: <| <!-- specify the due date for to-dos, can be empty, a date string, or even \"next Sunday\" -->"
 | 
				
			||||||
 | 
					    echo "# <!-- write summary here -->"
 | 
				
			||||||
 | 
					    echo "> <!-- comma-separated list of categories -->"
 | 
				
			||||||
 | 
					    echo ""
 | 
				
			||||||
 | 
					  } >"$tmpmd"
 | 
				
			||||||
 | 
					  checksum=$(cksum "$tmpmd")
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					  # Open in editor
 | 
				
			||||||
 | 
					  $EDITOR "$tmpmd" >/dev/tty
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					  # Update if changes are detected
 | 
				
			||||||
 | 
					  while [ "$checksum" != "$(cksum "$tmpmd")" ]; do
 | 
				
			||||||
 | 
					    tmpfile="$tmpmd.ics"
 | 
				
			||||||
 | 
					    if awk -v uid="$uuid" "$AWK_NEW" "$tmpmd" >"$tmpfile"; then
 | 
				
			||||||
 | 
					      mv "$tmpfile" "$file"
 | 
				
			||||||
 | 
					      if [ -n "${GIT:-}" ]; then
 | 
				
			||||||
 | 
					        $GIT add "$file"
 | 
				
			||||||
 | 
					        $GIT commit -q -m "File added" -- "$file"
 | 
				
			||||||
 | 
					      fi
 | 
				
			||||||
 | 
					      break
 | 
				
			||||||
 | 
					    else
 | 
				
			||||||
 | 
					      rm -f "$tmpfile"
 | 
				
			||||||
 | 
					      err "Failed to create new entry. Press <enter> to continue."
 | 
				
			||||||
 | 
					      read -r tmp
 | 
				
			||||||
 | 
					      # Re-open in editor
 | 
				
			||||||
 | 
					      $EDITOR "$tmpmd" >/dev/tty
 | 
				
			||||||
 | 
					    fi
 | 
				
			||||||
 | 
					  done
 | 
				
			||||||
 | 
					  rm "$tmpmd"
 | 
				
			||||||
 | 
					}
 | 
				
			||||||
							
								
								
									
										21
									
								
								src/sh/theme.sh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										21
									
								
								src/sh/theme.sh
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,21 @@
 | 
				
			|||||||
 | 
					# Colors
 | 
				
			||||||
 | 
					GREEN="\033[1;32m"
 | 
				
			||||||
 | 
					RED="\033[1;31m"
 | 
				
			||||||
 | 
					WHITE="\033[1;97m"
 | 
				
			||||||
 | 
					CYAN="\033[1;36m"
 | 
				
			||||||
 | 
					FAINT="\033[2m"
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Flags
 | 
				
			||||||
 | 
					export FLAG_OPEN="${FLAG_OPEN:-🔲}"
 | 
				
			||||||
 | 
					export FLAG_COMPLETED="${FLAG_COMPLETED:-✅}"
 | 
				
			||||||
 | 
					export FLAG_JOURNAL="${FLAG_JOURNAL:-📘}"
 | 
				
			||||||
 | 
					export FLAG_NOTE="${FLAG_NOTE:-🗒️}"
 | 
				
			||||||
 | 
					export FLAG_PRIORITY="${FLAG_PRIORITY:-❗}"
 | 
				
			||||||
 | 
					export FLAG_ATTACHMENT="${FLAG_ATTACHMENT:-🔗}"
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					# Style
 | 
				
			||||||
 | 
					export STYLE_COLLECTION="${STYLE_COLLECTION:-$FAINT$WHITE}"
 | 
				
			||||||
 | 
					export STYLE_DATE="${STYLE_DATE:-$CYAN}"
 | 
				
			||||||
 | 
					export STYLE_SUMMARY="${STYLE_SUMMARY:-$GREEN}"
 | 
				
			||||||
 | 
					export STYLE_EXPIRED="${STYLE_EXPIRED:-$RED}"
 | 
				
			||||||
 | 
					export STYLE_CATEGORY="${STYLE_CATEGORY:-$WHITE}"
 | 
				
			||||||
		Reference in New Issue
	
	Block a user