Macro-writing challenge

Write a macro check-arguments-non-nil to be used in function definitions, that would expand to assertion about every argument being non-nil.
The intended usage of this macro:

(defun foo (a b c d)
(check-arguments-non-nil)
foo-body)

This should expand to:

(defun foo (a b c d)
(assert (and (not (null a)) (not (null b)) (not (null c)) (not (null d)))
(a b c d)
"Null argument in FOO")
foo-body)

The macro must work whatever the number and names of the function parameters.

Using the idea from Clean Code principles,
just make Lisp functions/macros very short, composed of other macros(i.e. maximum length of 2-3 lines).
Those giant Lisp expressions if separated into clear, small segments, would be as easy to read as any C expression.