mabox-colorizer/bin/mbclr

#!/bin/bash
# 
#    colorizer - set of tools for Mabox (auto)theming
#    Copyright (C) 2022-2023 Daniel Napora    <napcok@gmail.com>
#
#    This program is free software: you can redistribute it and/or modify
#    it under the terms of the GNU General Public License as published by
#    the Free Software Foundation, either version 3 of the License, or
#    (at your option) any later version.
#
#    This program is distributed in the hope that it will be useful,
#    but WITHOUT ANY WARRANTY; without even the implied warranty of
#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#    GNU General Public License for more details.
#
#    You should have received a copy of the GNU General Public License
#    along with this program.  If not, see <http://www.gnu.org/licenses/>.

# mbclr current polecenie funkcja argument backprg [config_file]
# mbclr
#notify-send.sh "mbclr" "${1}\n${2}\n${3}\n${4}\n${5}\n${6}"
case "$LANG" in
    pl*)
    SELECT_COLOR="Wybierz kolor"
    PICK_FROM_SCREEN="Pobierz kolor z ekranu"
    SELECT_OR_PICK="Wybierz kolor z selektora"
    OPACITY="Nieprzezroczystość"
    SHADES_OF_CURRENT="odcienie bieżącego"
    SHADES_OF="odcienie"
    WALLPAPER_COLORS="Kolory z tapety"
    ACCENT_COLORS="Popularne kolory akcentu"
    LIGHTCOLORS="Jasne kolory..."
    DARKCOLORS="Ciemne kolory..."
    ;;
    *)
    SELECT_COLOR="Select color"
    PICK_FROM_SCREEN="Pick color from screen"
    SELECT_OR_PICK="Select or pick from screen"
    OPACITY="Opacity"
    SHADES_OF_CURRENT="shades of current"
    SHADES_OF="shades of"
    WALLPAPER_COLORS="Wallpaper colors"
    ACCENT_COLORS="Popular accent colors"
    LIGHTCOLORS="Light colors..."
    DARKCOLORS="Dark colors..."
    ;;
esac


main () {
#read WALLPAPER<<< $(grep file "$HOME"/.config/nitrogen/bg-saved.cfg | cut -d'=' -f2)
WALLPALDIR="$HOME/.cache/colorizer/palettes"
mkdir -p "$WALLPALDIR"
read WALLPATH<<< $(grep file "$HOME"/.config/nitrogen/bg-saved.cfg | cut -d'=' -f2)

NAME=${WALLPATH////_}
if [[ "${NAME}" =~ ^_home_.* ]]; then
n=${#HOME}
((n++))
NAME=${NAME:${n}}
fi


if [ ! -f "$WALLPALDIR/$NAME.clr" ]; then
convert ${WALLPATH} -resize 25% -colors 16 -unique-colors txt:- |grep -v '^#'| awk '{print substr($3,1,7)}' |pastel sort-by brightness |pastel format hex > "$WALLPALDIR/$NAME.clr"
fi
mapfile -t wallcolors < "$WALLPALDIR/$NAME.clr"
if [[ "${#wallcolors[@]}" -lt 8 ]]; then
wallcolors+=("#2e3440" "#4c566a" "#5e81ac" "#bf616b" "#b48ead" "#a3be8c" "#ebcb8b" "#d8dee9" "#eceff4")
fi


dark=("#000000" "#111111" "#222222" "#333333" "#444444" "#555555" "#666666")
light=("#FFFFFF" "#EEEEEE" "#DDDDDD" "#CCCCCC" "#BBBBBB" "#AAAAAA" "#999999")
#yt=("#181818" "#212121" "#3d3d3d" "#FFFFFF" "#AAAAAA")
plasma=("#e93a9a" "#e93d58" "#e9643a" "#e8cb2d" "#3dd425" "#00d3b8" "#3daee9" "#b875dc" "#926ee4" "#686b6f")
#ubuntu
ubuntu=("#E95420" "#18b0b0" "#3584e4" "#0e8420" "#c748ba" "#77216f" "#c7162b" "#f4a100")
#linuxmint
mint+=("#6cabcd" "#5b73c4" "#aa876a" "#9d9d9d" "#db9d61" "#c76199" "#8c6ec9" "#c15b58" "#c8ac69" "#5aaa9a")
#w8+=("#a4c400" "#60a917" "#008a00" "#00aba9" "#1ba1e2" "#3e65ff" "#0050ef" "#6a00ff" "#aa00ff" "#f472d0" "#d80073" "#a20025" "#e51400" "#fa6800" "#f0a30a" "#e3c800" "#825a2c" "#6d8764" "#647687" "#76608a" "#87794e" "#a0522d")
#for i in $(theme.sh -p |cut -d':' -f2)
#do
#colors+=("$i")
#done


out+=("^sep($4)")
if [[ "$2" == "jgctl" ]]; then
. $HOME/.config/mabox/mabox.conf
case "$jgmenu_theme" in
obtheme)
OBTHEME=$(awk '/<theme>/ {while (getline n) {if (match(n, /<name>/))
          {l=n; exit}}} END {split(l, a, "[<>]"); print a[3]}' "$HOME/.config/openbox/rc.xml");
THEMERC="$HOME/.config/mabox/jgobthemes/${OBTHEME}.colorrc";;
*)
THEMERC="$HOME/.config/mabox/jgobthemes/${jgmenu_theme}.colorrc";;
esac
read COLOR OP<<< $(grep "${3}" ${THEMERC} | cut -d'=' -f2)
out+=("^sep($OPACITY)")
out+=("$OPACITY <small>[ <b>$OP</b> ]</small>,^checkout(opacity)")
out2+=("^tag(opacity)")
out2+=("^sep($OPACITY <small>[ $OP ]</small>")
out2+=("<tt><small>100</small> <span bgcolor='$1' bgalpha='100%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 100;${5}")
out2+=("<tt><small> 95</small> <span bgcolor='$1' bgalpha='95%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 95 ;${5}")
out2+=("<tt><small> 90</small> <span bgcolor='$1' bgalpha='90%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 90 ;${5}")
out2+=("<tt><small> 80</small> <span bgcolor='$1' bgalpha='80%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 80 ;${5}")
out2+=("<tt><small> 70</small> <span bgcolor='$1' bgalpha='70%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 70 ;${5}")
out2+=("<tt><small> 60</small> <span bgcolor='$1' bgalpha='60%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 60 ;${5}")
out2+=("<tt><small> 50</small> <span bgcolor='$1' bgalpha='50%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 50 ;${5}")
out2+=("<tt><small> 40</small> <span bgcolor='$1' bgalpha='40%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 40 ;${5}")
out2+=("<tt><small> 30</small> <span bgcolor='$1' bgalpha='30%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 30 ;${5}")
out2+=("<tt><small> 20</small> <span bgcolor='$1' bgalpha='20%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 20 ;${5}")
out2+=("<tt><small> 10</small> <span bgcolor='$1' bgalpha='10%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 10 ;${5}")
out2+=("<tt><small>  5</small> <span bgcolor='$1' bgalpha='5%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 5 ;${5}")
out2+=("<tt><small>  0</small> <span bgcolor='$1' bgalpha='1%'>         </span><span bgcolor='$1'>    </span></tt>,jgctl $3 0 ;${5}")
fi

#Current
out+=("^sep($SELECT_COLOR)")
out+=("   $PICK_FROM_SCREEN,mbclr pixelcolor $2 $3 ${5} ${6}")
out+=("  $SELECT_OR_PICK,mbclr pick $2 $3 ${5} ${6}")
out+=("^sep()")
out+=("<tt><span bgcolor='$1'>      </span></tt>  $SHADES_OF_CURRENT (<small>$1</small>),^checkout(curshades)")

out+=("^sep($WALLPAPER_COLORS)")
for i in "${wallcolors[@]}"
do
out+=("<tt><small>$i</small> <span bgcolor='$i'>               </span></tt>,$2 $3 '${i}' ${6};${5}")
done


out+=("^sep()")
out+=("$ACCENT_COLORS,^checkout(accents)")
out2+=("^tag(accents)")
out2+=("^sep(Ubuntu)")
for i in ${ubuntu[@]};do out2+=("<tt><small>$i</small> <span bgcolor='$i'>                </span></tt>,$2 $3 '${i}' ${6};${5}");done
out2+=("^sep(Mint)")
for i in ${mint[@]};do out2+=("<tt><small>$i</small> <span bgcolor='$i'>                </span></tt>,$2 $3 '${i}' ${6};${5}");done
out2+=("^sep(Plasma)")
for i in ${plasma[@]};do out2+=("<tt><small>$i</small> <span bgcolor='$i'>                </span></tt>,$2 $3 '${i}' ${6};${5}");done

out+=("^sep()")
out+=("<tt><span bgcolor='#DDDDDD'>          </span></tt>   $LIGHTCOLORS,^checkout(light)")
out2+=("^tag(light)")
out2+=("^sep($LIGHTCOLORS)")
for i in "${light[@]}"
do
out2+=("<tt><small>$i</small> <span bgcolor='$i'>                </span></tt>,$2 $3 '${i}' ${6};${5}")
done
out+=("^sep()")
out+=("<tt><span bgcolor='#222222'>          </span></tt>   $DARKCOLORS,^checkout(dark)")
out2+=("^tag(dark)")
out2+=("^sep($DARKCOLORS)")
for i in "${dark[@]}"
do
out2+=("<tt><small>$i</small> <span bgcolor='$i'>                </span></tt>,$2 $3 '${i}' ${6};${5}")
done


#Shades
out2+=("^tag(curshades)")
out2+=("^sep($SHADES_OF $1)")
for i in 3 25 2 15 1 05; do
clr=$(pastel lighten 0.$i "${1}" | pastel format hex)
if [ "${clr}" != "#ffffff" ];then
out2+=("<tt><small>$clr</small> <span bgcolor='$clr'>                </span></tt>,$2 $3 '${clr}' ${6};${5}")
fi
done

out2+=("^sep()")
out2+=("<tt><small>$1</small> <span bgcolor='$1'>                    </span></tt>,$2 $3 '${1}' ${6};${5}")
out2+=("^sep()")
for i in 05 1 15 2 25 3; do
clr=$(pastel darken 0.$i "${1}" | pastel format hex)
if [ "${clr}" != "#000000" ];then
out2+=("<tt><small>$clr</small> <span bgcolor='$clr'>                </span></tt>,$2 $3 '${clr}' ${6};${5}")
fi
done

# NOWE
out2+=("^sep(SAT)")
for i in 1 2 3 4 5 6 7 8 9; do
clr=$(pastel saturate 0.$i "${1}" | pastel format hex)
out2+=("<tt><small>$clr</small> <span bgcolor='$clr'>                </span></tt>,$2 $3 '${clr}' ${6};${5}")
done
# NOWE

printf '%s\n' "${out[@]}"
printf '%s\n' "${out2[@]}"
}
pickcolor () {
    #notify-send.sh -t 50000 "From pickcolor" "1: $1\n2: $2\n3: $3\n4: $4\n5: $5\n6: $6"
    color=$(gcolor3 2>/dev/null)
    if [ "$color" ]; then
    mycmd=("$1 $2 '${color}' ${4};${3}")
    fi
    eval "${mycmd[@]}"
    }
pixelcolor() {
    picker=${picker:-gpick}
    if [ "$picker" == "gpick" ]; then
    command="gpick -pso 2>/dev/null"
    else
    command="xcolor --preview-size ${size} --scale ${scale}"
    fi
    color="$(${command})"
    if [ -n "${color}" ]; then
    mycmd=("$1 $2 '${color}' ${4};${3}")
    fi
    eval "${mycmd[@]}"
}

case "$1" in
    pick) pickcolor "$2" "${3}" "${4} ${5}" "${6}";;
    pixelcolor) pixelcolor "$2" "${3}" "${4} ${5}" "${6}";;
    *) main "$@" ;; 
esac