;;
esac
+. ./shader-parser.subr
+
pid=$$
status=true
trap 'status=false' USR1
kill -USR1 "$pid"
}
-LF="
-"
-
-normalize()
+nowarn=false
+err()
{
- echo "$1" | sed 's/\.\(tga\|jpg\|png\)$//'
+ echo "(EE) $*"
+ seterror
+}
+warn()
+{
+ $nowarn || echo "(WW) $*"
}
+LF="
+"
+
allowed_prefixes=
forbidden_prefixes=
if [ "$3" = "shader" ]; then
return
else
- echo "(EE) shader $1 uses non-existing texture $2"; seterror
+ err "$1 uses non-existing texture $2"
fi
fi
textures_used="$textures_used$LF$2"
'') # no dpoffsetmapping keyword
getstats "../${2}_norm.tga" || getstats "../${2}_norm.png" || getstats "../${2}_norm.jpg"
if [ "$min" -eq "$max" ]; then
- echo "(WW) shader $1 uses broken normalmap ${2}_norm.tga (add dpoffsetmapping none)"
+ warn "$1 uses broken normalmap ${2}_norm.tga (add dpoffsetmapping none)"
else
- echo "(EE) shader $1 uses ${2}_norm.tga but lacks median (add dpoffsetmapping - 1 match8 $median)"; seterror
+ err "$1 uses ${2}_norm.tga but lacks median (add dpoffsetmapping - 1 match8 $median)"
fi
;;
none) # offsetmapping turned off explicitly
default) # offsetmapping keyword without bias
getstats "../${2}_norm.tga"
if [ "$min" -eq "$max" ]; then
- echo "(WW) shader $1 uses broken normalmap ${2}_norm.tga, maybe use dpoffsetmapping none?"; seterror
+ warn "$1 uses broken normalmap ${2}_norm.tga, maybe use dpoffsetmapping none?"
else
- echo "(EE) shader $1 uses ${2}_norm.tga but lacks median (add to dpoffsetmapping: match8 $median)"; seterror
+ err "$1 uses ${2}_norm.tga but lacks median (add to dpoffsetmapping: match8 $median)"
fi
;;
*) # offsetmapping keyword with bias
esac
else
if [ -n "$offsetmapping_match8" ]; then
- echo "(EE) shader $1 specifies offsetmapping, but texture $2 does not have a normalmap"
+ warn "$1 specifies offsetmapping, but texture $2 does not have a normalmap"
fi
fi
fi
esac
done
if ! $ok; then
- echo "(EE) shader $1 is not allowed in this shader file (allowed: $allowed_prefixes, forbidden: $forbidden_prefixes)"; seterror
+ err "$1 is not allowed in this shader file (allowed: $allowed_prefixes, forbidden: $forbidden_prefixes)"
fi
case "$3" in
env/*)
;;
*)
- echo "(EE) texture $2 of shader $1 is out of place, $3 textures must be in env/"; seterror
+ err "texture $2 of shader $1 is out of place, $3 textures must be in env/"
;;
esac
;;
*)
case "$2" in
env/*)
- echo "(EE) texture $2 of shader $1 is out of place, $3 textures must not be in env/"; seterror
+ err "texture $2 of shader $1 is out of place, $3 textures must not be in env/"
;;
*)
;;
"$pre"/*/*)
;;
*)
- echo "(EE) texture $2 of shader $1 is out of place, recommended file name is $pre/$suf"; seterror
+ err "texture $2 of shader $1 is out of place, recommended file name is $pre/$suf"
;;
esac
;;
"$pre"/*/*)
;;
*)
- echo "(EE) texture $2 of shader $1 is out of place, recommended file name is $pre/base/$suf"; seterror
+ err "texture $2 of shader $1 is out of place, recommended file name is $pre/base/$suf"
;;
esac
;;
## RULE: textures/map_FOO[_/]* must use textures/map_FOO[_/]*
- textures/map_*/*)
+ textures/map_*/*|models/map_*/*)
pre=${1%%/map_*}
suf=${1#*/map_}
map=${suf%%[_/]*}
case "$2" in
- "$pre"/map_$map[/_]*)
+ textures/map_$map[/_]*)
;;
- textures/map_*)
+ models/map_$map[/_]*)
+ ;;
+ textures/map_*|models/map_*)
# protect one map's textures from the evil of other maps :P
- echo "(EE) texture $2 of shader $1 is out of place, recommended file name is $pre/map_$map/*"; seterror
+ err "texture $2 of shader $1 is out of place, recommended file name is $pre/map_$map/*"
;;
*)
# using outside stuff is permitted
textures/common/*/*)
;;
*)
- echo "(EE) texture $2 of shader $1 is out of place, recommended file name is $1 or textures/common/*/*"; seterror
+ err "texture $2 of shader $1 is out of place, recommended file name is $1 or textures/common/*/*"
;;
esac
;;
- ## RULE: textures/FOO/* must use textures/FOO/*, for FOO in decals, liquids_water, liquids_slime, liquids_lava
- textures/decals/*|textures/liquids_*/*|textures/effects_*/*|textures/screens/*|textures/logos/*)
+ ## RULE: textures/FOO/* must use textures/FOO/*, for FOO in decals, liquids_water, liquids_slime, liquids_lava, alphamod, solarpanel
+ textures/decals/*|textures/liquids_*/*|textures/effects_*/*|textures/screens/*|textures/logos/*|textures/alphamod/*|textures/solarpanel/*)
pre=`echo "$1" | cut -d / -f 1-2`
case "$2" in
"$pre"/*)
# I _suppose_ this is fine, as tZork committed this pack
;;
*)
- echo "(EE) texture $2 of shader $1 is out of place, recommended file name is $1"; seterror
+ err "texture $2 of shader $1 is out of place, recommended file name is $1"
;;
esac
;;
# typical place for skybox
;;
*)
- echo "(EE) texture $2 of shader $1 is out of place, recommended file name is $1"; seterror
+ err "texture $2 of shader $1 is out of place, recommended file name is $1"
;;
esac
;;
models/*)
;;
*)
- echo "(EE) texture $2 of shader $1 is out of place, recommended file name is $1 or models/*"; seterror
+ err "texture $2 of shader $1 is out of place, recommended file name is $1 or models/*"
;;
esac
;;
*)
- echo "(EE) no shader name pattern for $1"; seterror
+ err "no shader name pattern for $1"
;;
esac
}
parsing_shader=
-parse_shaderstage()
+parse_shaderstage_pre()
{
ss_blendfunc=none
ss_alphafunc=none
ss_alphagen=none
ss_map=
- while read L A1 Aother; do
- case "`echo "$L" | tr A-Z a-z`" in
- blendfunc)
- ss_blendfunc=`echo $A1 $Aother | tr A-Z a-z`
- ;;
- alphafunc)
- ss_alphafunc=`echo $A1 | tr A-Z a-z`
- ;;
- alphagen)
- ss_alphagen=`echo $A1 | tr A-Z a-z`
- ;;
- map|clampmap)
- case "$A1" in
- '$lightmap')
- ;;
- *)
- use_texture "$parsing_shader" "`normalize "$A1"`" map
- ss_map="`normalize "$A1"`"
- offsetmapping_match8=firststagedone
- ;;
- esac
- ;;
- animmap)
- for X in $Aother; do
- use_texture "$parsing_shader" "`normalize "$X"`" animmap
- done
- for X in $Aother; do
- ss_map="`normalize "$X"`"
- break
- done
- ;;
- '{')
- echo "(EE) brace nesting error in $parsing_shader"; seterror
- ;;
- '}')
+}
+
+parse_shaderstage_line()
+{
+ L=$1
+ A1=$2
+ Aother=$3
+ case "`echo "$L" | tr A-Z a-z`" in
+ blendfunc)
+ ss_blendfunc=`echo $A1 $Aother | tr A-Z a-z`
+ ;;
+ alphafunc)
+ ss_alphafunc=`echo $A1 | tr A-Z a-z`
+ ;;
+ alphagen)
+ ss_alphagen=`echo $A1 | tr A-Z a-z`
+ ;;
+ map|clampmap)
+ case "$A1" in
+ '$lightmap')
+ ;;
+ *)
+ use_texture "$parsing_shader" "`shader_normalize "$A1"`" map
+ ss_map="`shader_normalize "$A1"`"
+ offsetmapping_match8=firststagedone
+ ;;
+ esac
+ ;;
+ animmap)
+ for X in $Aother; do
+ use_texture "$parsing_shader" "`shader_normalize "$X"`" animmap
+ done
+ for X in $Aother; do
+ ss_map="`shader_normalize "$X"`"
break
- ;;
- *)
- ;;
- esac
- done
+ done
+ ;;
+ '{')
+ err "brace nesting error in $parsing_shader"
+ ;;
+ '}')
+ break
+ ;;
+ *)
+ ;;
+ esac
+}
- if [ -n "$AUDIT_ALPHACHANNELS" ] && [ -n "$ss_map" ]; then
- getstats "../$ss_map.tga" || getstats "../$ss_map.png" || getstats "../$ss_map.jpg"
- case "$ss_blendfunc" in
+parse_shaderstage_post()
+{
+ if [ -n "$ss_map" ]; then
+ if [ -z "$maintexture" ]; then
+ maintexture=$ss_map
+ mainblendfunc=$ss_blendfunc
+ mainalphafunc=$ss_alphafunc
+ mainalphagen=$ss_alphagen
+ elif [ x"$ss_alphagen" = x"vertex" ] && ! $textureblending; then
+ case "$mainblendfunc:$mainalphafunc:$ss_blendfunc:$ss_alphafunc" in
+ # none, blend
+ none:none:blend:none) textureblending=true ;;
+ none:none:"gl_src_alpha gl_one_minus_src_alpha":none) textureblending=true ;;
+ "gl_one gl_zero":none:blend:none) textureblending=true ;;
+ "gl_one zl_zero":none:"gl_src_alpha gl_one_minus_src_alpha":none) textureblending=true ;;
+ # none, alphafunc
+ none:none:none:g*) textureblending=true ;;
+ none:none:"gl_one gl_zero":g*) textureblending=true ;;
+ "gl_one gl_zero":none:none:g*) textureblending=true ;;
+ "gl_one gl_zero":none:"gl_one gl_zero":g*) textureblending=true ;;
+ *)
+ err "$parsing_shader uses texture blending, but that requires first stage to have no blendfunc/alphatest, and requires second stage to be blendfunc filter"
+ ;;
+ esac
+ else
+ err "$parsing_shader, a multistage shader without alphagen vertex, or using more than 2 stages, is not supported by DarkPlaces"
+ fi
+ fi
+}
+
+parse_shader_pre()
+{
+ use_texture "$parsing_shader" "$parsing_shader" shader
+ offsetmapping_match8=
+ textureblending=false
+ maintexture=
+ nowarn=false
+}
+
+parse_shader_line()
+{
+ L=$1
+ A1=$2
+ Aother=$3
+ case "`echo "$L" | tr A-Z a-z`" in
+ xon_nowarn)
+ nowarn=true
+ ;;
+ dpoffsetmapping)
+ set -- $Aother
+ if [ x"$A1" = x"none" ]; then
+ offsetmapping_match8=none
+ elif [ x"$A1" = x"off" ]; then
+ offsetmapping_match8=none
+ elif [ x"$A1" = x"disabled" ]; then
+ offsetmapping_match8=none
+ elif [ x"$2" = x"match8" ]; then
+ offsetmapping_match8=`echo "($3 + 0.5) / 1" | bc`
+ elif [ x"$2" = x"match16" ]; then
+ offsetmapping_match8=`echo "($3 / 257 + 0.5) / 1" | bc`
+ elif [ x"$2" = x"match" ]; then
+ offsetmapping_match8=`echo "($3 * 255 + 0.5) / 1" | bc`
+ elif [ x"$2" = x"bias" ]; then
+ offsetmapping_match8=`echo "((1 - $3) * 255 + 0.5) / 1" | bc`
+ else
+ offsetmapping_match8=default
+ fi
+ ;;
+ qer_editorimage)
+ use_texture "$parsing_shader" "`shader_normalize "$A1"`" editorimage
+ ;;
+ skyparms)
+ use_texture "$parsing_shader" "${A1}_lf" sky
+ use_texture "$parsing_shader" "${A1}_rt" sky
+ use_texture "$parsing_shader" "${A1}_up" sky
+ use_texture "$parsing_shader" "${A1}_dn" sky
+ use_texture "$parsing_shader" "${A1}_ft" sky
+ use_texture "$parsing_shader" "${A1}_bk" sky
+ ;;
+ *)
+ ;;
+ esac
+}
+
+parse_shader_post()
+{
+ if [ -n "$AUDIT_ALPHACHANNELS" ] && [ -n "$maintexture" ] && ! $textureblending; then
+ getstats "../$maintexture.tga" || getstats "../$maintexture.png" || getstats "../$maintexture.jpg"
+ case "$mainblendfunc" in
*src_alpha*|*blend*)
# texture must have alpha
- if [ x"$ss_alphagen" = x"none" -a $min -eq 255 ]; then
- echo "(EE) $parsing_shader uses alpha-less texture $ss_map with blendfunc $ss_blendfunc and alphagen $ss_alphagen"; seterror
+ if [ x"$mainalphagen" = x"none" -a $min -eq 255 ]; then
+ err "$parsing_shader uses alpha-less texture $maintexture with blendfunc $mainblendfunc and alphagen $mainalphagen"
fi
;;
add|"gl_one gl_one")
# texture must not have alpha (engine bug)
- if [ x"$ss_alphagen" != x"none" -o $min -lt 255 ]; then
- echo "(EE) $parsing_shader uses alpha-using texture $ss_map with blendfunc $ss_blendfunc and alphagen $ss_alphagen"; seterror
+ if [ x"$mainalphagen" != x"none" -o $min -lt 255 ]; then
+ err "$parsing_shader uses alpha-using texture $maintexture with blendfunc $mainblendfunc and alphagen $mainalphagen"
fi
;;
*)
- case "$ss_alphafunc" in
+ case "$mainalphafunc" in
g*)
# texture must have alpha
- if [ x"$ss_alphagen" = x"none" -a $min -eq 255 ]; then
- echo "(EE) $parsing_shader uses alpha-less texture $ss_map with alphafunc $ss_alphafunc and alphagen $ss_alphagen"; seterror
+ if [ x"$mainalphagen" = x"none" -a $min -eq 255 ]; then
+ err "$parsing_shader uses alpha-less texture $maintexture with alphafunc $mainalphafunc and alphagen $mainalphagen"
fi
;;
*)
# texture should not have alpha (no bug if not)
- case "$ss_alphagen" in
+ case "$mainalphagen" in
none)
if [ $min -lt 255 ]; then
- echo "(WW) $parsing_shader uses alpha-using texture $ss_map with blendfunc $ss_blendfunc and alphafunc $ss_alphafunc and alphagen $ss_alphagen"
+ warn "$parsing_shader uses alpha-using texture $maintexture with blendfunc $mainblendfunc and alphafunc $mainalphafunc and alphagen $mainalphagen"
fi
;;
*)
# alphagen is set, but blendfunc has no use for it
- echo "(EE) $parsing_shader uses alpha-using texture $ss_map with blendfunc $ss_blendfunc and alphafunc $ss_alphafunc and alphagen $ss_alphagen"; seterror
+ err "$parsing_shader uses alpha-using texture $maintexture with blendfunc $mainblendfunc and alphafunc $mainalphafunc and alphagen $mainalphagen"
;;
esac
;;
fi
}
-parse_shader()
-{
- use_texture "$parsing_shader" "$parsing_shader" shader
- offsetmapping_match8=
- while read L A1 Aother; do
- case "`echo "$L" | tr A-Z a-z`" in
- dpoffsetmapping)
- set -- $Aother
- if [ x"$A1" = x"none" ]; then
- offsetmapping_match8=none
- elif [ x"$A1" = x"off" ]; then
- offsetmapping_match8=none
- elif [ x"$A1" = x"disabled" ]; then
- offsetmapping_match8=none
- elif [ x"$2" = x"match8" ]; then
- offsetmapping_match8=`echo "($3 + 0.5) / 1" | bc`
- elif [ x"$2" = x"match16" ]; then
- offsetmapping_match8=`echo "($3 / 257 + 0.5) / 1" | bc`
- elif [ x"$2" = x"match" ]; then
- offsetmapping_match8=`echo "($3 * 255 + 0.5) / 1" | bc`
- elif [ x"$2" = x"bias" ]; then
- offsetmapping_match8=`echo "((1 - $3) * 255 + 0.5) / 1" | bc`
- else
- offsetmapping_match8=default
- fi
- ;;
- qer_editorimage)
- use_texture "$parsing_shader" "`normalize "$A1"`" editorimage
- ;;
- skyparms)
- use_texture "$parsing_shader" "${A1}_lf" sky
- use_texture "$parsing_shader" "${A1}_rt" sky
- use_texture "$parsing_shader" "${A1}_up" sky
- use_texture "$parsing_shader" "${A1}_dn" sky
- use_texture "$parsing_shader" "${A1}_ft" sky
- use_texture "$parsing_shader" "${A1}_bk" sky
- ;;
- '{')
- parse_shaderstage
- ;;
- '}')
- break
- ;;
- *)
- ;;
- esac
- done
-}
-
-parse_shaderfile()
+parse_shaderfile_pre()
{
- case "$1" in
+ s="${parsing_shaderfile%.shader}"
+ case "$s" in
## RULE: map_FOO.shader may define tetxures/map_FOO_* and textures/map_FOO/*
map_*)
- allowed_prefixes="textures/map_`echo "$1" | cut -d _ -f 2`_ textures/map_`echo "$1" | cut -d _ -f 2`/"
+ allowed_prefixes="textures/map_`echo "$s" | cut -d _ -f 2`_ textures/map_`echo "$s" | cut -d _ -f 2`/ models/map_`echo "$s" | cut -d _ -f 2`_ models/map_`echo "$s" | cut -d _ -f 2`/"
forbidden_prefixes=
;;
## RULE: skies_FOO.shader may define tetxures/skies/FOO and textures/skies/FOO_*
skies_*)
- allowed_prefixes="textures/skies/`echo "$1" | cut -d _ -f 2`: textures/skies/`echo "$1" | cut -d _ -f 2`_"
+ allowed_prefixes="textures/skies/`echo "$s" | cut -d _ -f 2`: textures/skies/`echo "$s" | cut -d _ -f 2`_"
forbidden_prefixes=
;;
## RULE: model_*.shader may define models/*
model_*)
allowed_prefixes="models/"
- forbidden_prefixes=
+ forbidden_prefixes="models/map_"
;;
## RULE: any other FOO.shader may define textures/FOO/*
*)
- allowed_prefixes="textures/$1/"
+ allowed_prefixes="textures/$s/"
forbidden_prefixes="textures/skies/ textures/map_ models/"
;;
esac
- while read L; do
- case "$L" in
- */*)
- parsing_shader="`normalize "$L"`"
- if [ x"$L" != x"$parsing_shader" ]; then
- echo "(WW) normalized shader name $L to $parsing_shader"
- fi
- ;;
- '{')
- parse_shader
- ;;
- *)
- ;;
- esac
- done
-}
-
-strip_comments()
-{
- sed 's,//.*,,g; s,\r, ,g; s,\t, ,g; s, *, ,g; s, $,,; s,^ ,,; /^$/ d'
}
-t=`mktemp || echo ".temp"`
-for X in *.shader; do
- strip_comments < "$X" > "$t"
- parse_shaderfile "${X%.shader}" < "$t"
-done
-rm -f "$t"
+parse_shaders *.shader
-textures_avail=`( cd ..; find textures/ -type f -not -name '*.sh' -not -name '*_norm.*' -not -name '*_glow.*' -not -name '*_gloss.*' -not -name '*_reflect.*' -not -name '*.xcf' ) | while IFS= read -r T; do normalize "$T"; done | sort -u`
+textures_avail=`( cd ..; find textures/ -type f -not -name '*.sh' -not -name '*_norm.*' -not -name '*_glow.*' -not -name '*_gloss.*' -not -name '*_reflect.*' -not -name '*.xcf' -not -name '*.txt' ) | while IFS= read -r T; do shader_normalize "$T"; done | sort -u`
textures_used=`echo "${textures_used#$LF}" | sort -u`
echo "$textures_used$LF$textures_used$LF$textures_avail" | sort | uniq -u | while IFS= read -r L; do
case "$L" in
textures/radiant/*)
;;
+ models/map_*/*)
+ ;;
textures/map_*/*)
;;
*)
- echo "(EE) texture $L is not referenced by any shader"; seterror
+ err "texture $L is not referenced by any shader"
;;
esac
done