From: Zdenek Hutyra <zhutyra@centrum.cz>
Date: Fri, 30 Aug 2024 13:16:39 +0100
Subject: PS interpreter - check the type of the Pattern Implementation
Origin: https://git.ghostscript.com/?p=ghostpdl.git;a=commit;h=ada21374f0c90cc3acf7ce0e96302394560c7aee
Bug: https://bugs.ghostscript.com/show_bug.cgi?id=707991
Bug-Debian-Security: https://security-tracker.debian.org/tracker/CVE-2024-46951

Bug #707991

See bug report for details.

CVE-2024-46951
---
 psi/zcolor.c | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/psi/zcolor.c b/psi/zcolor.c
index d4e7a4438186..d3384d75d49c 100644
--- a/psi/zcolor.c
+++ b/psi/zcolor.c
@@ -5276,6 +5276,9 @@ static int patterncomponent(i_ctx_t * i_ctx_p, ref *space, int *n)
             code = array_get(imemory, pImpl, 0, &pPatInst);
             if (code < 0)
                 return code;
+
+            if (!r_is_struct(&pPatInst) || (!r_has_stype(&pPatInst, imemory, st_pattern1_instance) && !r_has_stype(&pPatInst, imemory, st_pattern2_instance)))
+                return_error(gs_error_typecheck);
             cc.pattern = r_ptr(&pPatInst, gs_pattern_instance_t);
             if (pattern_instance_uses_base_space(cc.pattern))
                 *n = n_comps;
-- 
2.45.2