src/mesa/main/uniform_query.cpp

   1 /*
   2  * Mesa 3-D graphics library
   3  *
   4  * Copyright (C) 2004-2008  Brian Paul   All Rights Reserved.
   5  * Copyright (C) 2009-2010  VMware, Inc.  All Rights Reserved.
   6  * Copyright © 2010, 2011 Intel Corporation
   7  *
   8  * Permission is hereby granted, free of charge, to any person obtaining a
   9  * copy of this software and associated documentation files (the "Software"),
  10  * to deal in the Software without restriction, including without limitation
  11  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
  12  * and/or sell copies of the Software, and to permit persons to whom the
  13  * Software is furnished to do so, subject to the following conditions:
  14  *
  15  * The above copyright notice and this permission notice shall be included
  16  * in all copies or substantial portions of the Software.
  17  *
  18  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  19  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  20  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
  21  * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
  22  * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
  23  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  24  */
  25 #include "main/core.h"
  26 #include "ir.h"
  27 #include "../glsl/program.h"
  28
  29 extern "C" {
  30 #include "main/shaderapi.h"
  31 #include "main/shaderobj.h"
  32 #include "uniforms.h"
  33 }
  34
  35 extern "C" void GLAPIENTRY
  36 _mesa_GetActiveUniformARB(GLhandleARB program, GLuint index,
  37                           GLsizei maxLength, GLsizei *length, GLint *size,
  38                           GLenum *type, GLcharARB *nameOut)
  39 {
  40    GET_CURRENT_CONTEXT(ctx);
  41    struct gl_shader_program *shProg =
  42       _mesa_lookup_shader_program_err(ctx, program, "glGetActiveUniform");
  43    const struct gl_program_parameter *param;
  44
  45    if (!shProg)
  46       return;
  47
  48    if (!shProg->Uniforms || index >= shProg->Uniforms->NumUniforms) {
  49       _mesa_error(ctx, GL_INVALID_VALUE, "glGetActiveUniform(index)");
  50       return;
  51    }
  52
  53    param = get_uniform_parameter(shProg, index);
  54    if (!param)
  55       return;
  56
  57    const struct gl_uniform *const uni = &shProg->Uniforms->Uniforms[index];
  58
  59    if (nameOut) {
  60       _mesa_copy_string(nameOut, maxLength, length, param->Name);
  61    }
  62
  63    if (size) {
  64       GLint typeSize = _mesa_sizeof_glsl_type(uni->Type->gl_type);
  65       if ((GLint) param->Size > typeSize) {
  66          /* This is an array.
  67           * Array elements are placed on vector[4] boundaries so they're
  68           * a multiple of four floats.  We round typeSize up to next multiple
  69           * of four to get the right size below.
  70           */
  71          typeSize = (typeSize + 3) & ~3;
  72       }
  73       /* Note that the returned size is in units of the <type>, not bytes */
  74       *size = param->Size / typeSize;
  75    }
  76
  77    if (type) {
  78       *type = uni->Type->gl_type;
  79    }
  80 }