Perhaps something like a content-model() function will be available as extension or in XSLT2?

unfortunatly it is, but uses schema syntax rather than dtd, you import a
schem which has a named complex type (essentially a named content model)
then you can match against elements with that type.

Vim users               donate.
http://iccf-holland.org/donate.html

Web developers           check.
http://www.pinkjuice.com/check/