test(tvos): inspect producer sampler texture and shader uniforms

Author: sachk

.github/workflows/tvos.yml

@@ -171,7 +171,8 @@ jobs:
                           if any(marker in line for marker in ["orientation:", "decoder:", "viewport:", "video result:",
                                                                "render context was not ready", "first video frame",
                                                                "render context handoff did not complete", "native target:",
-                                                               "native GL provider:", "native draw:", "native renderer result:"]):
+                                                               "native GL provider:", "native draw:", "native renderer result:",
+                                                               "native uniform:", "native sampler:"]):
                               print(line)
                       raise SystemExit(1)
           finally:

src/player/MpvVideoItem.cpp

@@ -92,6 +92,26 @@ namespace {
                 double(nativeVertexData[2]), double(nativeVertexData[3]), double(nativeVertexData[4]), double(nativeVertexData[5]),
                 double(nativeVertexData[6]), double(nativeVertexData[7]), double(nativeVertexData[8]), double(nativeVertexData[9]),
                 double(nativeVertexData[10]), double(nativeVertexData[11]), unsigned(::glGetError()));
+            for (const char *name : { "texture_size0", "texture_rot0", "texture_off0", "pixel_size0" }) {
+                const GLint location = ::glGetUniformLocation(program, name);
+                GLfloat values[16] {};
+                if (location >= 0)
+                    ::glGetUniformfv(program, location, values);
+                std::fprintf(stderr, "native uniform: name=%s location=%d values=%g,%g,%g,%g\n", name, location,
+                    double(values[0]), double(values[1]), double(values[2]), double(values[3]));
+            }
+            const GLint sampler = ::glGetUniformLocation(program, "texture0");
+            if (sampler >= 0) {
+                GLint unit = 0, active = 0, texture = 0, width = 0, height = 0;
+                ::glGetUniformiv(program, sampler, &unit);
+                ::glGetIntegerv(GL_ACTIVE_TEXTURE, &active);
+                ::glActiveTexture(GL_TEXTURE0 + unit);
+                ::glGetIntegerv(GL_TEXTURE_BINDING_2D, &texture);
+                ::glGetTexLevelParameteriv(GL_TEXTURE_2D, 0, GL_TEXTURE_WIDTH, &width);
+                ::glGetTexLevelParameteriv(GL_TEXTURE_2D, 0, GL_TEXTURE_HEIGHT, &height);
+                std::fprintf(stderr, "native sampler: unit=%d texture=%d size=%dx%d\n", unit, texture, width, height);
+                ::glActiveTexture(active);
+            }
         }
         ::glDrawArrays(mode, first, count);
     }

tools/apple/smoke-tvos.sh

@@ -103,7 +103,8 @@ for bundle, arguments, expected in checks:
                     marker in line for marker in ["[vd]", "[vo/libmpv]", "[libmpv_render", "[ffmpeg/video]",
                                                  "player: render backend", "first video frame",
                                                  "render context handoff did not complete", "native target:", "native GL provider:",
-                                                 "native presentation diagnostic:", "native draw:", "native renderer result:"]):
+                                                 "native presentation diagnostic:", "native draw:", "native renderer result:",
+                                                 "native uniform:", "native sampler:"]):
                 print(re.sub(r"https?://\S+", "[redacted-url]", line))
             if any(marker in line for marker in ["launch test:", "video result:", "orientation:", "viewport:", "decoder:",
                                                 "render context was not ready", "failed to initialize mpv",