CRTified

-- dev is the device that shall be read (Like "BAT0")
-- attr are the attributes that are going to be read ("status" for charging status, "capacity" for charged capacity, and so on)

acpi_power :: String -> [String] -> Logger
acpi_power dev attr = io $ do
    attrOut <- mapM (\x -> liftIO $ readFile $ sysFsPath ++ x) attr
    return $ Just $ filter (/= '\n') (intercalate " " attrOut)
    where
        sysFsPath = "/sys/class/power_supply/" ++ dev ++ "/"

CRTified

#################
# CORE SETTINGS #
#################

#
# Zim settings
#

CRTified

-- Define acpi power logger
acpi_power :: String -> [String] -> Logger
acpi_power dev attr =
  io $ do
    attrOut <- mapM (\x -> liftIO $ readFile $ sysFsPath ++ x) attr
    return $ Just $ filter (/= '\n') (intercalate " " attrOut)
  where
    sysFsPath = "/sys/class/power_supply/" ++ dev ++ "/"

file_reader :: String -> Logger

CRTified

#!/bin/sh
BOOTUUID=`blkid -o value $(df /boot | grep "$MOUNTPOINT\$"| cut -f1 -d" ") | head -n 2 | tail -n1`;
ROOTUUID=`blkid -o value $(df / | grep "$MOUNTPOINT\$"| cut -f1 -d" ") | head -n 2 | tail -n1`;


PREFIX=""
if [ "$BOOTUUID" = "$ROOTUUID" ]; then
   PREFIX="/boot"
fi;

CRTified

#!/usr/bin/env sh
#if 0
TMPFILE=$(mktemp);
tail -n +10 $0 | gcc -march=native -o $TMPFILE -x c -;
$TMPFILE "${@:1}";
RETVAL=$?
rm $TMPFILE;
exit $RETVAL;
#endif

CRTified

[Unit]
Description=VPN watchdog
After=network.target

[Service]
Type=oneshot
ExecStart=/bin/sh -c 'ping -I tun0 -c 1 8.8.8.8 > /dev/null || systemctl restart [email protected]'

[Install]
WantedBy=multi-user.target

CRTified

[Trigger]
Operation=Install
Operation=Upgrade
Type=Package
Target=xmonad
Target=haskell-*

[Action]
Depends=xmonad
When=PostTransaction

CRTified

{ lib, pkgs, config, ... }:
with lib;
let
  cfg = config.virtualisation.libvirtd;

  boolToZeroOne = x: if x then "1" else "0";

  aclString = with lib.strings;
              concatMapStringsSep ",\n  " escapeNixString cfg.deviceACL;
in {

CRTified

VFIO Setup on NixOS

Disclaimer: Nobody else tested my setup so far, so this is a "works on my machine" scenario. I am not responsible for anything you break on your machine (although I'd not expect much harm).

Hardware

My system has the following hardware:

• Board: ASRock X570 Pro4

CRTified

          bracket
            (do
                sock <- socket AF_UNIX Stream 0
                setSocketOption sock ReuseAddr 1
                bind sock $ SockAddrUnix s
                listen sock maxListenQueue
                return sock
            )
            (\sock -> do