mirror of
https://github.com/oh-my-fish/oh-my-fish
synced 2024-11-03 15:40:32 +00:00
Merge pull request #292 from bucaran/plugin-msg
Add msg plugin. The technicolor message printer.
This commit is contained in:
Bruno
commit
30c683e6f9
12
plugins/msg/msg.ask.fish
Normal file
12
plugins/msg/msg.ask.fish
Normal file
@ -0,0 +1,12 @@
|
||||
# Print a message with msg and wait for y/n input. Return true on y\*.
|
||||
# @params → msg.fish
|
||||
function msg.ask
|
||||
msg $argv
|
||||
head -n 1 | read answer
|
||||
switch $answer
|
||||
case y\* Y\*
|
||||
return 0
|
||||
case \*
|
||||
return 1
|
||||
end
|
||||
end
|
||||
164
plugins/msg/msg.fish
Normal file
164
plugins/msg/msg.fish
Normal file
@ -0,0 +1,164 @@
|
||||
# __ _ ___ ___ _
|
||||
# / ' \(_-</ _ `/
|
||||
# /_/_/_/___/\_, /
|
||||
# /___/ v0.1.0
|
||||
# NAME
|
||||
# msg - technicolor message printer
|
||||
#
|
||||
# SYNOPSIS
|
||||
# msg [-sn] [@<fg:bg> | style]<text>[style]
|
||||
#
|
||||
# OPTIONS
|
||||
# -s
|
||||
# Do not separate arguments with spaces.
|
||||
# -n
|
||||
# Do not output a newline at the end of the message.
|
||||
#
|
||||
# STYLES
|
||||
# _text_ Bold
|
||||
# __text__ Underline
|
||||
# ___text___ Bold and Underline
|
||||
# `$variable` Apply @<styles> to $variables
|
||||
# /directory/ Directories
|
||||
# [url] Links
|
||||
# \n Line Break
|
||||
# \t Tab Space
|
||||
#
|
||||
# @<fg:bg> fg=bg=RGB|RRGGBB|name|random
|
||||
# RGB value can be any three to six hex digit or color name.
|
||||
# e.g, @0fb, @tomato, @random, @error, @ok.
|
||||
#
|
||||
# NOTES
|
||||
# Escape style separators or options prepending a \ to the
|
||||
# string if inside quotes `msg "\-s"` or a \\ backslash in
|
||||
# order to escape the backslash itself when outside quotes.
|
||||
#
|
||||
# AUTHORS
|
||||
# Jorge Bucaran <jbucaran@me.com>
|
||||
#
|
||||
# v. 0.1.0
|
||||
#/
|
||||
|
||||
# Global `msg` default color and styles.
|
||||
set --global msg_color_fg FFFFFF
|
||||
set --global msg_color_bg normal
|
||||
set --global msg_style_url 00FF00 $msg_color_bg -u
|
||||
set --global msg_style_dir FFA500 $msg_color_bg -u
|
||||
set --global msg_color_err FF0000
|
||||
set --global msg_color_ok 00FA9A
|
||||
|
||||
function msg -d "Technicolor printer."
|
||||
# Default " " whitespace between strings, skip with -s.
|
||||
set -l ws " "
|
||||
# Default \n newline after message, skip with -n.
|
||||
set -l ln \n
|
||||
|
||||
switch (count $argv)
|
||||
case 0
|
||||
# Nothing to print here.
|
||||
return 0
|
||||
case \*
|
||||
switch $argv[1]
|
||||
# Options must appear joined and without spaces: -sn or -ns
|
||||
case -s\* -n\*
|
||||
# To use options at least a second parameter will be required.
|
||||
if [ (count $argv) -gt 1 ]
|
||||
# Use -s to not add spaces between words.
|
||||
if msg.util.str.has "s" $argv[1]
|
||||
set ws ""
|
||||
end
|
||||
# Use -n to not add a newline at the end of the message.
|
||||
if msg.util.str.has "n" $argv[1]
|
||||
set ln ""
|
||||
end
|
||||
# We are done with options, get rid of first item.
|
||||
set argv $argv[2..-1]
|
||||
else
|
||||
return 0
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
# Print flow is get next style token, set style, get anything else, print
|
||||
# and use the reset. set_color normal makes sure to reset both colors and
|
||||
# bold / underline styles.
|
||||
set -l reset (set_color normal)(set_color $msg_color_fg)
|
||||
|
||||
# Foreground and background color carried from previous @style token.
|
||||
# These variables are set and reset via msg.util.set.color
|
||||
set -l fg $msg_color_fg
|
||||
set -l bg $msg_color_bg
|
||||
|
||||
for token in $argv
|
||||
switch $token
|
||||
# Parse style tokens:
|
||||
# _txt_, __txt__, ___txt___, @color `$var`, /dir/, [url]
|
||||
case ___\*___\* __\*__\* _\*_\* \[\*\]\* \/\*\/\* `\*`\*
|
||||
set -l left _ # Begin of style
|
||||
set -l right _ # End of style
|
||||
set -l color $fg $bg -o
|
||||
switch $token
|
||||
case ___\*___\* __\*__\* _\*_\*
|
||||
if msg.util.str.has __ $token
|
||||
set color[3] -u
|
||||
set left __
|
||||
if msg.util.str.has ___ $token
|
||||
set color[3] -uo
|
||||
set left ___
|
||||
end
|
||||
end
|
||||
case \[\*\]\*
|
||||
set color $msg_style_url
|
||||
set left [ ]
|
||||
set right ]
|
||||
case \/\*\/\*
|
||||
set color $msg_style_dir
|
||||
set left \/
|
||||
set right \/
|
||||
case `\*`\*
|
||||
set color $fg $bg
|
||||
set left `
|
||||
set right `
|
||||
end
|
||||
|
||||
# Extract text between left and right separators.
|
||||
echo -n (msg.util.set.color $color)(msg.util.str.get $left $token)$reset
|
||||
|
||||
# Extract string after separator from the right.
|
||||
echo -n (printf $token | sed "s/^.*\\$right\(.*\)/\1/")$ws
|
||||
|
||||
# Parse @fg:bg style tokens.
|
||||
case @\*
|
||||
set fg (printf $token | cut -c 2-) # @fg[:bg] → fg[:bg]
|
||||
set bg (printf $fg | cut -d: -f 2) # fg:bg → fg|bg
|
||||
set fg (printf $fg | cut -d: -f 1) # fg:bg → fg
|
||||
|
||||
# Do not let bg=fg have the same color unless the user wants to.
|
||||
if [ $bg = $fg ]
|
||||
if not msg.util.str.has : $token
|
||||
set bg $msg_color_bg
|
||||
end
|
||||
end
|
||||
|
||||
# Make color string into valid RRGGBB hex format code.
|
||||
set fg (msg.util.get.color $fg)
|
||||
set bg (msg.util.get.color $bg)
|
||||
|
||||
# Everything else, print tokens, whitespace, etc.
|
||||
case \*
|
||||
set -l blank $ws
|
||||
switch $token
|
||||
# Do not print whitespace after the following characters.
|
||||
case $argv[-1] \n\* \t\* \r
|
||||
set blank ""
|
||||
end
|
||||
switch $token
|
||||
# Escape -s -n options and style separators \\[text] \\/text/
|
||||
case \\\[\* \\\/\* \\\_\* \\\-s \\\-n
|
||||
set token (printf $token | sed "s/^\\\//")
|
||||
end
|
||||
echo -en (msg.util.set.color)$token$reset$blank
|
||||
end
|
||||
end
|
||||
echo -en $ln
|
||||
end
|
||||
300
plugins/msg/msg.util.get.color.fish
Normal file
300
plugins/msg/msg.util.get.color.fish
Normal file
@ -0,0 +1,300 @@
|
||||
# Translate color names to valid RRGGBB hexadecimal value.
|
||||
# @params <color|random>
|
||||
function msg.util.get.color
|
||||
[ (count $argv) -lt 1 ]
|
||||
and printf $msg_color_fg
|
||||
switch $argv[1]
|
||||
case success ok
|
||||
printf "%s\n" $msg_color_ok
|
||||
case error
|
||||
printf "%s\n" $msg_color_err
|
||||
case random
|
||||
msg.util.random.color
|
||||
case light
|
||||
# Higher values produce lighter colors.
|
||||
msg.util.random.color 100
|
||||
case dark
|
||||
# Lower values produce darker colors.
|
||||
msg.util.random.color 0 75
|
||||
case maroon
|
||||
printf 800000
|
||||
case d\*red
|
||||
printf 8B0000
|
||||
case brown
|
||||
printf A52A2A
|
||||
case firebrick
|
||||
printf B22222
|
||||
case crimson
|
||||
printf DC143C
|
||||
case red
|
||||
printf FF0000
|
||||
case tomato
|
||||
printf FF6347
|
||||
case coral
|
||||
printf FF7F50
|
||||
case indianred
|
||||
printf CD5C5C
|
||||
case l\*coral
|
||||
printf F08080
|
||||
case d\*salmon
|
||||
printf E9967A
|
||||
case salmon
|
||||
printf FA8072
|
||||
case l\*salmon
|
||||
printf FFA07A
|
||||
case orangered
|
||||
printf FF4500
|
||||
case d\*orange
|
||||
printf FF8C00
|
||||
case orange
|
||||
printf FFA500
|
||||
case gold
|
||||
printf FFD700
|
||||
case d\*goldenrod
|
||||
printf B8860B
|
||||
case goldenrod
|
||||
printf DAA520
|
||||
case palegoldenrod
|
||||
printf EEE8AA
|
||||
case d\*khaki
|
||||
printf BDB76B
|
||||
case khaki
|
||||
printf F0E68C
|
||||
case olive
|
||||
printf 808000
|
||||
case yellow
|
||||
printf FFFF00
|
||||
case yellowgreen
|
||||
printf 9ACD32
|
||||
case d\*olivegreen
|
||||
printf 556B2F
|
||||
case olivedrab
|
||||
printf 6B8E23
|
||||
case lawngreen
|
||||
printf 7CFC00
|
||||
case chartreuse
|
||||
printf 7FFF00
|
||||
case greenyellow
|
||||
printf ADFF2F
|
||||
case d\*green
|
||||
printf 006400
|
||||
case green
|
||||
printf 008000
|
||||
case forestgreen
|
||||
printf 228B22
|
||||
case lime
|
||||
printf 00FF00
|
||||
case limegreen
|
||||
printf 32CD32
|
||||
case l\*green
|
||||
printf 90EE90
|
||||
case palegreen
|
||||
printf 98FB98
|
||||
case d\*seagreen
|
||||
printf 8FBC8F
|
||||
case mediumspringgreen
|
||||
printf 00FA9A
|
||||
case springgreen
|
||||
printf 00FF7F
|
||||
case sea green
|
||||
printf 2E8B57
|
||||
case mediumaquamarine
|
||||
printf 66CDAA
|
||||
case mediumseagreen
|
||||
printf 3CB371
|
||||
case l\*seagreen
|
||||
printf 20B2AA
|
||||
case d\*slategray
|
||||
printf 2F4F4F
|
||||
case teal
|
||||
printf 008080
|
||||
case d\*cyan
|
||||
printf 008B8B
|
||||
case aqua
|
||||
printf 00FFFF
|
||||
case cyan
|
||||
printf 00FFFF
|
||||
case l\*cyan
|
||||
printf E0FFFF
|
||||
case d\*turquoise
|
||||
printf 00CED1
|
||||
case turquoise
|
||||
printf 40E0D0
|
||||
case mediumturquoise
|
||||
printf 48D1CC
|
||||
case paleturquoise
|
||||
printf AFEEEE
|
||||
case aquamarine
|
||||
printf 7FFFD4
|
||||
case powderblue
|
||||
printf B0E0E6
|
||||
case cadetblue
|
||||
printf 5F9EA0
|
||||
case steelblue
|
||||
printf 4682B4
|
||||
case cornflowerblue
|
||||
printf 6495ED
|
||||
case deepskyblue
|
||||
printf 00BFFF
|
||||
case dodgerblue
|
||||
printf 1E90FF
|
||||
case l\*blue
|
||||
printf ADD8E6
|
||||
case skyblue
|
||||
printf 87CEEB
|
||||
case l\*skyblue
|
||||
printf 87CEFA
|
||||
case midnightblue
|
||||
printf 191970
|
||||
case navy
|
||||
printf 000080
|
||||
case d\*blue
|
||||
printf 00008B
|
||||
case mediumblue
|
||||
printf 0000CD
|
||||
case blue
|
||||
printf 0000FF
|
||||
case royalblue
|
||||
printf 4169E1
|
||||
case blueviolet
|
||||
printf 8A2BE2
|
||||
case indigo
|
||||
printf 4B0082
|
||||
case d\*slateblue
|
||||
printf 483D8B
|
||||
case slateblue
|
||||
printf 6A5ACD
|
||||
case mediumslateblue
|
||||
printf 7B68EE
|
||||
case mediumpurple
|
||||
printf 9370DB
|
||||
case d\*magenta
|
||||
printf 8B008B
|
||||
case d\*violet
|
||||
printf 9400D3
|
||||
case d\*orchid
|
||||
printf 9932CC
|
||||
case mediumorchid
|
||||
printf BA55D3
|
||||
case purple
|
||||
printf 800080
|
||||
case thistle
|
||||
printf D8BFD8
|
||||
case plum
|
||||
printf DDA0DD
|
||||
case violet
|
||||
printf EE82EE
|
||||
case magenta fuchsia
|
||||
printf FF00FF
|
||||
case orchid
|
||||
printf DA70D6
|
||||
case mediumvioletred
|
||||
printf C71585
|
||||
case palevioletred
|
||||
printf DB7093
|
||||
case deeppink
|
||||
printf FF1493
|
||||
case hotpink
|
||||
printf FF69B4
|
||||
case l\*pink
|
||||
printf FFB6C1
|
||||
case pink
|
||||
printf FFC0CB
|
||||
case antiquewhite
|
||||
printf FAEBD7
|
||||
case beige
|
||||
printf F5F5DC
|
||||
case bisque
|
||||
printf FFE4C4
|
||||
case blanchedalmond
|
||||
printf FFEBCD
|
||||
case wheat
|
||||
printf F5DEB3
|
||||
case cornsilk
|
||||
printf FFF8DC
|
||||
case lemonchiffon
|
||||
printf FFFACD
|
||||
case l\*goldenrodyellow
|
||||
printf FAFAD2
|
||||
case l\*yellow
|
||||
printf FFFFE0
|
||||
case saddlebrown
|
||||
printf 8B4513
|
||||
case sienna
|
||||
printf A0522D
|
||||
case choco chocolate
|
||||
printf D2691E
|
||||
case peru
|
||||
printf CD853F
|
||||
case sandybrown
|
||||
printf F4A460
|
||||
case burlywood
|
||||
printf DEB887
|
||||
case tan
|
||||
printf D2B48C
|
||||
case rosybrown
|
||||
printf BC8F8F
|
||||
case moccasin
|
||||
printf FFE4B5
|
||||
case navajowhite
|
||||
printf FFDEAD
|
||||
case peach peachpuff
|
||||
printf FFDAB9
|
||||
case rose mistyrose
|
||||
printf FFE4E1
|
||||
case lavenderblush
|
||||
printf FFF0F5
|
||||
case linen
|
||||
printf FAF0E6
|
||||
case oldlace
|
||||
printf FDF5E6
|
||||
case papaya papayawhip
|
||||
printf FFEFD5
|
||||
case seashell
|
||||
printf FFF5EE
|
||||
case mintcream
|
||||
printf F5FFFA
|
||||
case slategray
|
||||
printf 708090
|
||||
case l\*slategray
|
||||
printf 778899
|
||||
case l\*steelblue
|
||||
printf B0C4DE
|
||||
case lavender
|
||||
printf E6E6FA
|
||||
case floralwhite
|
||||
printf FFFAF0
|
||||
case aliceblue
|
||||
printf F0F8FF
|
||||
case ghostwhite
|
||||
printf F8F8FF
|
||||
case honeydew
|
||||
printf F0FFF0
|
||||
case ivory
|
||||
printf FFFFF0
|
||||
case azure
|
||||
printf F0FFFF
|
||||
case snow
|
||||
printf FFFAFA
|
||||
case black
|
||||
printf 000000
|
||||
case dimgray dimgrey
|
||||
printf 696969
|
||||
case gray grey
|
||||
printf 808080
|
||||
case d\*gray d\*grey
|
||||
printf A9A9A9
|
||||
case silver
|
||||
printf C0C0C0
|
||||
case l\*gray l\*grey
|
||||
printf D3D3D3
|
||||
case gainsboro
|
||||
printf DCDCDC
|
||||
case whitesmoke
|
||||
printf F5F5F5
|
||||
case white
|
||||
printf FFFFFF
|
||||
case "*"
|
||||
printf $argv[1]
|
||||
end
|
||||
end
|
||||
17
plugins/msg/msg.util.random.color.fish
Normal file
17
plugins/msg/msg.util.random.color.fish
Normal file
@ -0,0 +1,17 @@
|
||||
# Print a random RRGGBB hexadecimal color from three min~max random beams
|
||||
# where min = 0 and max = 255. Higher values produce lighter colors.
|
||||
# @params [<min>][<max>]
|
||||
function msg.util.random.color
|
||||
set -l min 0
|
||||
if [ (count $argv) -gt 0 ]
|
||||
set min $argv[1]
|
||||
end
|
||||
|
||||
set -l max 255
|
||||
if [ (count $argv) -gt 1 ]
|
||||
set max $argv[2]
|
||||
end
|
||||
|
||||
set beam "math (random)%\($max-$min+1\)+$min"
|
||||
printf "%02x%02x%02x" (eval $beam) (eval $beam) (eval $beam)
|
||||
end
|
||||
21
plugins/msg/msg.util.set.color.fish
Normal file
21
plugins/msg/msg.util.set.color.fish
Normal file
@ -0,0 +1,21 @@
|
||||
# Set style, fg/bg colors and reset. Modifies its parent scope of `msg`.
|
||||
# @params [<fg>] [<bg>] [<style>]
|
||||
function --no-scope-shadowing msg.util.set.color
|
||||
if [ (count $argv) -gt 0 ]
|
||||
set fg $argv[1]
|
||||
end
|
||||
|
||||
if [ (count $argv) -gt 1 ]
|
||||
set bg $argv[2]
|
||||
end
|
||||
|
||||
set_color -b $bg
|
||||
set_color $fg
|
||||
|
||||
if [ (count $argv) -gt 2 ]
|
||||
set_color $argv[3]
|
||||
end
|
||||
|
||||
set bg $msg_color_bg
|
||||
set fg $msg_color_fg
|
||||
end
|
||||
17
plugins/msg/msg.util.str.get.fish
Normal file
17
plugins/msg/msg.util.str.get.fish
Normal file
@ -0,0 +1,17 @@
|
||||
# Extract string between left and right separators of variable length.
|
||||
# @params <left-sep> [<right-sep>] <string>
|
||||
function msg.util.str.get
|
||||
set -l left $argv[1]
|
||||
set -l right $argv[1]
|
||||
set -l string $argv[2]
|
||||
|
||||
if [ (count $argv) -gt 2 ]
|
||||
set right $argv[2]
|
||||
set string $argv[3]
|
||||
end
|
||||
|
||||
set -l len (printf $left | awk '{print length}')
|
||||
# Match between outermost left / right separators.
|
||||
printf $string | sed "s/[^\\$left]*\(\\$left.*\\$right\)*/\1/g" | \
|
||||
sed "s/^.\{$len\}\(.*\).\{$len\}\$/\1/"
|
||||
end
|
||||
5
plugins/msg/msg.util.str.has.fish
Normal file
5
plugins/msg/msg.util.str.has.fish
Normal file
@ -0,0 +1,5 @@
|
||||
# True if substring exists in string.
|
||||
# @params <substring> <string>
|
||||
function msg.util.str.has
|
||||
printf $argv[2] | grep -q $argv[1]
|
||||
end
|
||||
Loading…
Reference in New Issue
Block a user