module Defaults where

import XMonad
import XMonad.Layout.Spacing
import XMonad.Layout.Tabbed
import XMonad.Actions.GridSelect
import XMonad.Util.Loggers

-- import XMonad.Hooks.StatusBar
-- import XMonad.Hooks.StatusBar.PP

myBorder          = "#282c34"
myBorder'         = "#c678dd"
-- myBorder          = "#120F23"
-- myBorder'         = "#a663cc"
-- myBorder'         = "#C44CF2"
-- myBorder          = "#120F23"
-- myBorder'         = "#1ca09d"

myBorderWidth     :: Dimension
myBorderWidth     = 1

myFont            = "xft:Sauce Code Pro:style=Regular:size=14"

myModMask         = mod4Mask
myModMask'        = mod1Mask
myModShiftMask    = myModMask  .|. shiftMask
myModShiftMask'   = myModMask' .|. shiftMask

myLockscreen      = "betterlockscreen -q -l"
myColorPicker     = "colorpicker --short --one-shot --preview | xsel -b"

myTerminal        = "open_terminal"
myTerminal'       = "WINIT_X11_SCALE_FACTOR=1.5 alacritty"
myLauncher        = "dmenu_run"

pausePlay         = "playerctl play-pause"

volUp             = "pamixer -i 5"
volDown           = "pamixer -d 5"
volMute           = "pamixer -t"

backlightUp       = "brightnessctl s +5"
backlightDown     = "brightnessctl s 5-"

wifiOn            = "nmcli radio wifi on"
wifiOff           = "nmcli radio wifi off"

screenshot        = "flameshot screen"
fullScreenshot    = "flameshot full"
customScreenshot  = "flameshot gui"

myBrowser         = "librewolf"
myPrivateBrowser  = "librewolf --private-window"
myBrowser'        = "firefox"
myPrivateBrowser' = "firefox --private-window"

myTorrentClient   = "qbittorrent"

myFileManager     = "pcmanfm"
myFileManager'    = "lf"

myTextEditor      = "doom run"
myTextEditor'     = "nvim"

myEmailClient     = "thunderbird"
myPasswordManager = "keepassxc"

-- workspaces
myExtraWorkspaces = [(xK_0, "十")]
myWorkspaces      = ["一", "二", "三", "四", "五", "六", "七", "八", "九"] ++ map snd myExtraWorkspaces

-- screen gaps
sGap = 3
wGap = 4

-- myGap  = spacingRaw True (Border sGap sGap sGap sGap) True (Border wGap wGap wGap wGap) True
myGap  = spacingRaw False (Border sGap sGap sGap sGap) True (Border wGap wGap wGap wGap) True

myTabTheme = def {
    fontName              = myFont
    , activeColor         = "#755999"
    , inactiveColor       = "#282c35"
    , activeBorderColor   = "#755999"
    , inactiveBorderColor = "#313846"
    , activeTextColor     = "#FFFFFF"
    , inactiveTextColor   = "#d0d0d0"
    , decoHeight          = 20
  }
myGSColorizer :: Window -> Bool -> X (String, String)
myGSColorizer = colorRangeFromClassName
  (0x28,0x2c,0x34) -- lowest inactive bg
  (0x28,0x2c,0x34) -- highest inactive bg
  -- (0xff,0xff,0xff) -- lowest inactive bg
  -- (0xff,0xff,0xff) -- highest inactive bg
  (0xc4,0x4c,0xf2) -- active bg
  (0xff,0xff,0xff) -- inactive fg
  (0xff,0xff,0xff) -- active fg

myGSConfig colorizer = (buildDefaultGSConfig myGSColorizer)
  { gs_cellheight   = 36
  , gs_cellwidth    = 180
  , gs_cellpadding  = 6
  , gs_originFractX = 0.5
  , gs_originFractY = 0.5
  , gs_font         = myFont
  }

myGridSelect = myGSConfig myGSColorizer

-- myLemonbarCmd =  "lemon | lemonbar -d -g 1920x28+1920+0 -o -2 -f 'Source Han Sans JP Normal:size=12' -B '#e6100b13' -F '#9d00ff'"
-- myLemonbarCmd' = "lemon | lemonbar -d -g 1920x20+0+0    -o 0  -f 'Source Han Sans JP Normal:size=9'  -B '#e6100b13' -F '#9d00ff'"
-- 
-- myLemonbarPP  = def {
--   ppCurrent            = wrap "%{B#ff0aa3}   %{F#FFFFFF}" "   %{F-}%{B-}"
--   , ppVisible          = wrap "%{B#28c78f}   %{F#FFFFFF}" "   %{F-}%{B-}"
--   , ppHidden           = wrap "%{B#9b1bed}   %{F#FFFFFF}" "   %{F-}%{B-}"
--   , ppHiddenNoWindows  = wrap "   " "   "
--   --, ppVisibleNoWindows = wrap "%{B#ffffff}  %{F#9b1bed}" "  %{F-}%{B-}"
--   , ppWsSep            = ""
--   , ppSep              = ""
--   , ppTitle            = wrap " " "" . shorten 60
--   , ppOrder  = \(ws:l:t:ex) -> [t]++["%{r}",ws]
--   }