hectic-lab/util.nix
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

feat(package): hemar: conected to nix config

Browse Source
This commit is contained in:
yukkop
2025-11-24 14:20:03 +00:00
parent 783cbe20e8
commit f5d412997e
16 changed files with 270 additions and 59 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
package/default.nix
View File

@@ -142,6 +142,7 @@ in {
onlinepubs2man = pkgs.callPackage ./onlinepubs2man {};
migrator = pkgs.callPackage ./migrator {};
nbt2json = pkgs.callPackage ./nbt2json {};
hemar = pkgs.callPackage ./hemar {};
pg-17-ext-http = buildHttpExt pkgs "17";
pg-17-ext-smtp-client = buildSmtpExt pkgs "17";
pg-17-ext-plhaskell = buildPlHaskellExt pkgs "17";

36
package/hemar/default.nix Normal file
View File

@@ -0,0 +1,36 @@
{ dash, hectic, symlinkJoin }:
let
shell = "${dash}/bin/dash";
bashOptions = [
"errexit"
"nounset"
];
test = hectic.writeShellApplication {
inherit shell bashOptions;
name = "hemar-test";
runtimeInputs = [ ];
text = ''
WORKSPACE=${./.}
${builtins.readFile hectic.helpers.posix-shell.log}
${builtins.readFile ./test.sh}
'';
};
hemar = hectic.writeShellApplication {
inherit shell bashOptions;
name = "hemar";
runtimeInputs = [ ];
text = ''
WORKSPACE=${./.}
${builtins.readFile hectic.helpers.posix-shell.log}
${builtins.readFile ./hemar.sh}
'';
};
in
symlinkJoin {
name = "hemar";
paths = [ hemar test ];
}

10
package/hemar/hemar.sh
View File

@@ -1,5 +1,9 @@
#!/bin/dash
# shellcheck disable=SC1091
. "${WORKSPACE:?}/src/plex/plex.sh"
init_plex jq
# Syntax scheme:
#
# hemar
@@ -162,8 +166,8 @@
#
# AbstarctSyntaxTree (ATS) = {
# e = [Element] # elements array
#}
AST=''
# }
#AST=''
# 0 - text
# 1 - deside tag type
@@ -218,6 +222,8 @@ find_open_pattern() {
parse() {
char="$1"
data_pointer=
case "$STAGE" in
0)
if find_open_pattern "$char"; then

0
package/hemar/log.sh
View File

18
package/hemar/plex/plex.sh
View File

@@ -1,18 +0,0 @@
#!/bin/dash
init_plex() {
local backend
backend=${1:?}
case "$backend" in
env)
. ${WORKSPACE}/plex/backend/env_var.sh
;;
file)
. ${WORKSPACE}/plex/backend/file.sh
;;
*)
exit 1
;;
esac
}

0
package/hemar/plex/backend/env_var.sh → package/hemar/src/plex/backend/env_var.sh
View File

21
package/hemar/plex/backend/file.sh → package/hemar/src/plex/backend/file.sh
View File

@@ -2,29 +2,12 @@
PLEX_TEMP="$(mktemp -d)"
#plex_set(name, key, value)
plex_set() {
local plexfile key val regex base esc_key esc
plexfile="${PLEX_TEMP:?}${1:?}" key="${2:?}" val="${3:?}"
# construct regex for ancestors
regex="^$key="
base=$key
while expr "$base" : '.*\.' >/dev/null; do
base=$(printf '%s\n' "$base" | sed 's/\.[^.]*$//')
esc=$(printf '%s\n' "$base" | sed 's/\./\\./g')
regex="$regex|^$esc="
done
# add descendants
esc_key="$(printf '%s\n' "$key" | sed 's/\./\\./g')"
regex="$regex|^${esc_key}\."
# remove old
grep -v -E "$regex" "$plexfile" > "$plexfile.tmp" && mv "$plexfile.tmp" "$plexfile"
# add new
printf '%s=%s\n' "$key" "$val" >> "$plexfile"
find PLEX_
}
plex_child() {

40
package/hemar/src/plex/backend/yq-go.sh Normal file
View File

@@ -0,0 +1,40 @@
#!/bin/dash
PLEX_TEMP="$(mktemp -d)"
trap 'rm -rf $PLEX_TEMP' EXIT
#plex_set(name, key, value)
plex_set() {
local plexfile key val
plexfile="${PLEX_TEMP:?}/${1:?}" key="${2:?}" val="${3:?}"
touch "$plexfile"
yq -i ".$key += \"$val\"" "$plexfile"
}
#plex_child(plexfile, key)
plex_child() {
plex_fetch "${1:?}" "${2:?}"
}
#plex_val(plexfile, key)
plex_val() {
plex_fetch "${1:?}" "${2:?}"
}
#plex_val(plexfile, key)
plex_fetch() {
local plexfile key
plexfile="${PLEX_TEMP:?}/${1:?}" key="${2:?}"
yq -i ".$key" "$plexfile"
}
#plex_push(name, prefix, val)
plex_push() {
local plexfile prefix val
plexfile="${PLEX_TEMP:?}/${1:?}" prefix="${2:?}" val="${3:?}"
yq -i ".$prefix += [\"$val\"]" "$plexfile"
}

21
package/hemar/src/plex/plex.sh Normal file
View File

@@ -0,0 +1,21 @@
#!/bin/dash
init_plex() {
local backend
backend=${1:?}
case "$backend" in
env)
. ${WORKSPACE}/src/plex/backend/env_var.sh
;;
file)
. ${WORKSPACE}/src/plex/backend/file.sh
;;
yq-go)
. ${WORKSPACE}/src/plex/backend/yq-go.sh
;;
*)
exit 1
;;
esac
}

8
package/hemar/test.sh
View File

@@ -1,6 +1,6 @@
#!/bin/dash
WORKSPACE="$(cd "$(dirname "$0")" && pwd)"
#. "${WORKSPACE:?}/test/plex.sh"
. "${WORKSPACE:?}/test/plex/time.sh"
# shellcheck disable=SC1091
#. "${WORKSPACE:?}/test/plex/jq_backend_time.sh"
#. "${WORKSPACE:?}/test/plex/env_backend_time.sh"
. "${WORKSPACE:?}/test/plex/jq_backend.sh"

3
package/hemar/test/plex/time.sh → package/hemar/test/plex/env_backend_time.sh
View File

@@ -1,6 +1,7 @@
#!/bin/dash
. "${WORKSPACE:?}/plex.sh"
. "${WORKSPACE:?}/src/plex/plex.sh"
init_plex env
MY_STRUCT=''

7
package/hemar/test/plex/jq_backend.sh Normal file
View File

@@ -0,0 +1,7 @@
. "${WORKSPACE:?}/src/plex/plex.sh"
init_plex yq-go
plex_set ZALUPA zalupa apulaz
log error "struct: $WHITE$(yq . "$PLEX_TEMP/ZALUPA")$NC"
plex_set ZALUPA zalupa.zalupa apulaz

129
package/hemar/test/plex/jq_backend_time.sh Normal file
View File

@@ -0,0 +1,129 @@
#!/bin/dash
# shellcheck disable=SC1091
. "${WORKSPACE:?}/src/plex/plex.sh"
init_plex yq-go
math() {
awk "BEGIN {print $1}"
}
elapsed() {
local task time count decrease avg
task=$1
time=$2
count=$3
decrease=${4:-0}
avg=$(math "$time/$count-$decrease")
if [ "$time" -eq 0 ]; then
log info "\n[$WHITE${task}$NC]\ninstant\n"
else
log info "\n[$WHITE${task}$NC]\nelapsed $WHITE${avg}$NC seconds\n$WHITE$(math "1/$avg")$NC per second\n"
fi
printf '%s' "$avg"
}
set_word_length() {
local length
length=${1:?}
# shellcheck disable=SC2183
__WORD_OFFSET_PATERN="$(printf '%*s' "$length" | tr ' ' '?')"
}
UNIQ_8_WORDS_COUNT=1000
DEFAULT_WORD_LENGTH=8
set_word_length "$DEFAULT_WORD_LENGTH"
randomword() {
local length
length=${1:-$DEFAULT_WORD_LENGTH}
LC_ALL=C tr -dc 'A-Za-z0-9' </dev/urandom | head -c "$length"
}
WORDS=$(randomword $((8 * UNIQ_8_WORDS_COUNT)))
WORDS=0123456789abcdefg
new_word() {
local prefix
# shellcheck disable=SC2295
prefix=${WORDS%"${WORDS#${__WORD_OFFSET_PATERN:?}}"}
# shellcheck disable=SC2295
WORDS=${WORDS#${__WORD_OFFSET_PATERN:?}}$prefix
printf '%s' "$prefix"
}
bench_set() {
local task depth count wordtime i start key d end
task=$1
depth=$2
count=$3
wordtime=$4
i=0
start=$(date +%s)
while [ "$i" -lt "$count" ]; do
key=$(new_word)
if [ "$depth" -gt 1 ]; then
d=1
while [ "$d" -lt "$depth" ]; do
key="$key.$(new_word)"
d=$((d + 1))
done
fi
set +e
plex_set 'MY_STRUCT' "$key" "$i"
error_code=$?
log warning "error_code: $error_code"
set -e
if [ $error_code != 0 ]; then
log error "key: $WHITE$key$NC, i: $WHITE$i$NC, struct: $WHITE$(jq . "$PLEX_TEMP/MY_STRUCT")$NC"
exit 1
fi
i=$((i + 1))
done
end=$(date +%s)
elapsed "$task" "$((end - start))" "$count" "$(math "$wordtime*$depth")" >/dev/null
}
DEFAULT_TRIES=1000
ACCURATE_TRIES=10000
SUPPER_ACCURATE_TRIES=100000
WORD_CREATE_ACCURACY="$SUPPER_ACCURATE_TRIES"
BENCH_ACCURACY="$DEFAULT_TRIES"
count="$WORD_CREATE_ACCURACY"
set_word_length 8
i=0
start=$(date +%s)
while [ "$i" -lt "${count:?}" ]; do
new_word >/dev/null
i=$((i + 1))
done
end=$(date +%s)
time=$((end - start))
log debug "word creation time: $time"
wordtime=$(elapsed 'Word creation' "$time" "$count")
bench_set 'Set element with depth 1 length 8' 1 "$BENCH_ACCURACY" "$wordtime"
bench_set 'Set element with depth 2 length 8' 2 "$BENCH_ACCURACY" "$wordtime"
bench_set 'Set element with depth 3 length 8' 3 "$BENCH_ACCURACY" "$wordtime"
log notice -
count="$WORD_CREATE_ACCURACY"
set_word_length 2
i=0
start=$(date +%s)
while [ "$i" -lt "${count:?}" ]; do
new_word >/dev/null
i=$((i + 1))
done
end=$(date +%s)
wordtime=$(elapsed 'Word creation' "$((end - start))" "$count")
bench_set 'Set element with depth 1 length 2' 1 "$BENCH_ACCURACY" "$wordtime"
bench_set 'Set element with depth 2 length 2' 2 "$BENCH_ACCURACY" "$wordtime"
bench_set 'Set element with depth 3 length 2' 3 "$BENCH_ACCURACY" "$wordtime"