tests/spec/arb_shader_subroutine/execution/simple-subroutine-dlist.shader_test

   1 # simple display list test using one shader subroutine.
   2
   3 [require]
   4 GL COMPAT >= 3.2
   5 GLSL >= 1.50
   6 GL_ARB_shader_subroutine
   7
   8 [vertex shader passthrough]
   9
  10 [fragment shader]
  11 #version 150
  12 #extension GL_ARB_shader_subroutine: enable
  13
  14 out vec4 color;
  15
  16 subroutine vec4 getcolor();
  17 subroutine uniform getcolor GetColor;
  18
  19 subroutine(getcolor)
  20 vec4 color_red()
  21 {
  22         return vec4(1.0, 0.0, 0.0, 1.0);
  23 }
  24
  25 subroutine(getcolor)
  26 vec4 color_green()
  27 {
  28         return vec4(0.0, 1.0, 0.0, 1.0);
  29 }
  30
  31 subroutine(getcolor)
  32 vec4 color_blue()
  33 {
  34         return vec4(0.0, 0.0, 1.0, 1.0);
  35 }
  36
  37 void main()
  38 {
  39         color = GetColor();
  40 }
  41
  42
  43 [test]
  44 clear color 0.1 0.1 0.1 0.1
  45 clear
  46
  47 # Initialise subroutine to make sure call list is respected
  48 subuniform GL_FRAGMENT_SHADER GetColor color_blue
  49 draw rect -1 -1 2 2
  50 probe all rgba 0.0 0.0 1.0 1.0
  51
  52 clear color 0.1 0.1 0.1 0.1
  53 clear
  54
  55 newlist GL_COMPILE
  56 subuniform GL_FRAGMENT_SHADER GetColor color_red
  57 draw rect -1 -1 2 2
  58 endlist
  59
  60 # make sure we haven't drawn anything yet
  61 probe all rgba 0.1 0.1 0.1 0.1
  62
  63 # Set wrong subroutine to make sure the call list is respected
  64 subuniform GL_FRAGMENT_SHADER GetColor color_blue
  65 draw rect -1 -1 2 2
  66 probe all rgba 0.0 0.0 1.0 1.0
  67
  68 calllist
  69 probe all rgba 1.0 0.0 0.0 1.0
  70
  71 deletelist
  72
  73 clear color 0.1 0.1 0.1 0.1
  74 clear
  75
  76 newlist GL_COMPILE_AND_EXECUTE
  77 subuniform GL_FRAGMENT_SHADER GetColor color_green
  78 draw rect -1 -1 2 2
  79 endlist
  80
  81 probe all rgba 0.0 1.0 0.0 1.0
  82
  83 # Set wrong subroutine to make sure the call list is respected
  84 subuniform GL_FRAGMENT_SHADER GetColor color_blue
  85 draw rect -1 -1 2 2
  86 probe all rgba 0.0 0.0 1.0 1.0
  87
  88 clear color 0.1 0.1 0.1 0.1
  89 clear
  90
  91 calllist
  92 probe all rgba 0.0 1.0 0.0 1.0