scripts/dpi: Constant blur/corner-radius/cursor scaling

Scale picom blur and corner radius and X cursor size according to a
constant scale factor. This ideally would be defined somewhere
centrally, but this is better than nothing.

Signed-off-by: Joe Groocock <me@frebib.net>

picom/picom.conf

@@ -38,7 +38,7 @@ opacity-rule = [
 blur:
 {
 	method = "dual_kawase";
-	strength = 8;
+	strength = 10;
 };
 blur-background-frame = true;
 blur-background-fixed = true;

scripts/dpi

@@ -4,6 +4,10 @@ set -eu
 # Based on https://github.com/vincentbernat/awesome-configuration/blob/master/bin/xsettingsd-setup
 CONF_DIR="${XDG_CONFIG_HOME:-$HOME/.config}"
 
+BLUR_STRENGTH=10
+CORNER_RADIUS=9
+CURSOR_SIZE=16
+
 xrdbget() {
     set -o pipefail
     xrdb -query | grep -i -m1 "$1" | sed 's/^.*:\s//g' || echo "$2"
@@ -26,11 +30,11 @@ fi
 
 dpi=$1
 scale=$(( dpi/96 ))
-cursor=$(( dpi/6 ))
+cursor=$(( (dpi*CURSOR_SIZE)/96 ))
 
 # Update picom scale
-sed -i -e "s/strength =.*$/strength = $(( dpi*8/96 ));/" \
-    -e "s/corner-radius =.*$/corner-radius = $(( dpi/13 ));/" \
+sed -i -e "s/strength =.*$/strength = $(( (dpi*BLUR_STRENGTH)/96 ));/" \
+    -e "s/corner-radius =.*$/corner-radius = $(( (dpi*CORNER_RADIUS)/96 ));/" \
     "$CONF_DIR/picom/picom.conf" &
 
 # Build xsettingsd.conf