@@ -17,6 +17,7 @@ add_library(${PROJECT_NAME} INTERFACE)

 include(common.cmake)

 common(

     CXX_STANDARD 11

+    DISABLE_CPPCHECK # GLTRAITS_TEST_OBJECT(template gen_objects<Args...>)

     PACKAGES

         glm

     FETCHCONTENT

@@ -154,6 +154,56 @@ alias for `glm::vec3`.

 [`glDisableVertexAttribArray`]: https://registry.khronos.org/OpenGL-Refpages/gl4/html/glEnableVertexAttribArray.xhtml

 [`glEnableVertexAttribArray`]: https://registry.khronos.org/OpenGL-Refpages/gl4/html/glEnableVertexAttribArray.xhtml

+### Object

+

+The [empty][] `struct GLTraits::Object<GLenum object_type>` is template

+specialized on the following values.

+

+-   `GL_TEXTURE`

+-   `GL_BUFFER`

+-   `GL_QUERY`

+-   `GL_PROGRAM`

+-   `GL_SHADER`

+-   `GL_VERTEX_ARRAY`

+-   `GL_FRAMEBUFFER`

+-   `GL_RENDERBUFFER`

+-   `GL_SAMPLER`

+-   `GL_TRANSFORM_FEEDBACK`

+-   `GL_PROGRAM_PIPELINE`

+

+`GLTraits::Object` contains the following `static constexpr` member variables.

+

+-   `char const name[]`

+

+`GLTraits::Object` contains the following `static` member functions.

+

+-   ```cpp

+    template<typename... Args>

+    void gen_objects(GLsizei n, GLuint * objects, Args... args)

+    ```

+

+    Generalization of `glGen*s` and `glCreate`.

+

+-   ```cpp

+    void delete_objects(GLsizei n, GLuint * objects)

+    ```

+

+    Generalization of `glDelete*s` and `glDelete*`.

+

+For `object_types` equal to  `GL_SHADER`, `GL_PROGRAM`, and

+`GL_PROGRAM_PIPELINE`, `GLTraits::Object` additionally contains the following

+`static` member functions.

+

+-   ```cpp

+    std::string info_log(GLuint object)

+    ```

+

+    Generalization of `glGet*InfoLog`.

+

+`GLTRAITS_OBJECT*` macros are defined to ease the definition of new template

+specializations of `GLTraits::Object`. Consult the source for the definitions

+and usage examples.

+

 ## Building

 See [`BUILDING.md`][].

@@ -5,6 +5,8 @@ class GLTraits

     template <typename> struct Value;

     template <GLenum id> struct ValueID;

+

+    template <GLenum object_type> struct Object;

 };

 template <> struct GLTraits::Value<GLfloat>

@@ -2382,3 +2384,252 @@ template <> struct GLTraits::ValueID<GLTraits::Value<glm::dmat4>::id>

     using Value = glm::dmat4;

 };

+template <> struct GLTraits::Object<GL_TEXTURE>

+{

+    auto static constexpr name = "GL_"

+                                 "TEXTURE";

+    template <typename... Args>

+    void static gen_objects(GLsizei n, GLuint * objects, Args... args)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({1, 1}, {});

+        glGenTextures(n, objects, args...);

+    }

+    void static delete_objects(GLsizei n, GLuint const * objects)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({1, 1}, {});

+        glDeleteTextures(n, objects);

+    }

+};

+

+template <> struct GLTraits::Object<GL_BUFFER>

+{

+    auto static constexpr name = "GL_"

+                                 "BUFFER";

+    template <typename... Args>

+    void static gen_objects(GLsizei n, GLuint * objects, Args... args)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({1, 5}, {});

+        glGenBuffers(n, objects, args...);

+    }

+    void static delete_objects(GLsizei n, GLuint const * objects)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({1, 5}, {});

+        glDeleteBuffers(n, objects);

+    }

+};

+

+template <> struct GLTraits::Object<GL_QUERY>

+{

+    auto static constexpr name = "GL_"

+                                 "QUERY";

+    template <typename... Args>

+    void static gen_objects(GLsizei n, GLuint * objects, Args... args)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({1, 5}, {});

+        glGenQueries(n, objects, args...);

+    }

+    void static delete_objects(GLsizei n, GLuint const * objects)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({1, 5}, {});

+        glDeleteQueries(n, objects);

+    }

+};

+

+template <> struct GLTraits::Object<GL_PROGRAM>

+{

+    auto static constexpr name = "GL_"

+                                 "PROGRAM";

+    template <typename... Args>

+    void static gen_objects(GLsizei n, GLuint * objects, Args... args)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({2, 0}, {});

+        while (n--)

+            objects[n] = glCreateProgram(args...);

+    }

+    void static delete_objects(GLsizei n, GLuint const * objects)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({2, 0}, {});

+        while (n--)

+            glDeleteProgram(objects[n]);

+    }

+    std::string static info_log(GLuint object)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({2, 0}, {});

+        auto length = GLint{};

+        glGetProgramiv(object, GL_INFO_LOG_LENGTH, &length);

+        if (length != 0)

+            --length;

+        auto info_log = std::string((std::size_t)length, char{});

+        glGetProgramInfoLog(object, length + 1, nullptr, &info_log[0]);

+        return info_log;

+    }

+};

+

+template <> struct GLTraits::Object<GL_SHADER>

+{

+    auto static constexpr name = "GL_"

+                                 "SHADER";

+    template <typename... Args>

+    void static gen_objects(GLsizei n, GLuint * objects, Args... args)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({2, 0}, {});

+        while (n--)

+            objects[n] = glCreateShader(args...);

+    }

+    void static delete_objects(GLsizei n, GLuint const * objects)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({2, 0}, {});

+        while (n--)

+            glDeleteShader(objects[n]);

+    }

+    std::string static info_log(GLuint object)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({2, 0}, {});

+        auto length = GLint{};

+        glGetShaderiv(object, GL_INFO_LOG_LENGTH, &length);

+        if (length != 0)

+            --length;

+        auto info_log = std::string((std::size_t)length, char{});

+        glGetShaderInfoLog(object, length + 1, nullptr, &info_log[0]);

+        return info_log;

+    }

+};

+

+template <> struct GLTraits::Object<GL_VERTEX_ARRAY>

+{

+    auto static constexpr name = "GL_"

+                                 "VERTEX_ARRAY";

+    template <typename... Args>

+    void static gen_objects(GLsizei n, GLuint * objects, Args... args)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({3, 0}, "GL_ARB_vertex_array_object");

+        glGenVertexArrays(n, objects, args...);

+    }

+    void static delete_objects(GLsizei n, GLuint const * objects)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({3, 0}, "GL_ARB_vertex_array_object");

+        glDeleteVertexArrays(n, objects);

+    }

+};

+

+template <> struct GLTraits::Object<GL_FRAMEBUFFER>

+{

+    auto static constexpr name = "GL_"

+                                 "FRAMEBUFFER";

+    template <typename... Args>

+    void static gen_objects(GLsizei n, GLuint * objects, Args... args)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({3, 0}, "GL_ARB_framebuffer_object");

+        glGenFramebuffers(n, objects, args...);

+    }

+    void static delete_objects(GLsizei n, GLuint const * objects)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({3, 0}, "GL_ARB_framebuffer_object");

+        glDeleteFramebuffers(n, objects);

+    }

+};

+

+template <> struct GLTraits::Object<GL_RENDERBUFFER>

+{

+    auto static constexpr name = "GL_"

+                                 "RENDERBUFFER";

+    template <typename... Args>

+    void static gen_objects(GLsizei n, GLuint * objects, Args... args)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({3, 0}, "GL_ARB_framebuffer_object");

+        glGenRenderbuffers(n, objects, args...);

+    }

+    void static delete_objects(GLsizei n, GLuint const * objects)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({3, 0}, "GL_ARB_framebuffer_object");

+        glDeleteRenderbuffers(n, objects);

+    }

+};

+

+template <> struct GLTraits::Object<GL_SAMPLER>

+{

+    auto static constexpr name = "GL_"

+                                 "SAMPLER";

+    template <typename... Args>

+    void static gen_objects(GLsizei n, GLuint * objects, Args... args)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({3, 3}, "GL_ARB_sampler_objects");

+        glGenSamplers(n, objects, args...);

+    }

+    void static delete_objects(GLsizei n, GLuint const * objects)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({3, 3}, "GL_ARB_sampler_objects");

+        glDeleteSamplers(n, objects);

+    }

+};

+

+template <> struct GLTraits::Object<GL_TRANSFORM_FEEDBACK>

+{

+    auto static constexpr name = "GL_"

+                                 "TRANSFORM_FEEDBACK";

+    template <typename... Args>

+    void static gen_objects(GLsizei n, GLuint * objects, Args... args)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({4, 0}, "GL_ARB_transform_feedback2");

+        glGenTransformFeedbacks(n, objects, args...);

+    }

+    void static delete_objects(GLsizei n, GLuint const * objects)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({4, 0}, "GL_ARB_transform_feedback2");

+        glDeleteTransformFeedbacks(n, objects);

+    }

+};

+

+template <> struct GLTraits::Object<GL_PROGRAM_PIPELINE>

+{

+    auto static constexpr name = "GL_"

+                                 "PROGRAM_PIPELINE";

+    template <typename... Args>

+    void static gen_objects(GLsizei n, GLuint * objects, Args... args)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({4, 1}, "GL_ARB_separate_shader_objects");

+        glGenProgramPipelines(n, objects, args...);

+    }

+    void static delete_objects(GLsizei n, GLuint const * objects)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({4, 1}, "GL_ARB_separate_shader_objects");

+        glDeleteProgramPipelines(n, objects);

+    }

+    std::string static info_log(GLuint object)

+    {

+        if (GLBase::debug() >= 1)

+            GLBase::check_supported({4, 1}, "GL_ARB_separate_shader_objects");

+        auto length = GLint{};

+        glGetProgramPipelineiv(object, GL_INFO_LOG_LENGTH, &length);

+        if (length != 0)

+            --length;

+        auto info_log = std::string((std::size_t)length, char{});

+        glGetProgramPipelineInfoLog(object, length + 1, nullptr, &info_log[0]);

+        return info_log;

+    }

+};

+

@@ -7,6 +7,7 @@

 /// Includes

 #include <cstddef>

+#include <string>

 #include <glbase.hpp>

@@ -26,6 +27,11 @@ public:

     template<GLenum id>

     struct ValueID;

+    //// Object

+

+    template<GLenum object_type>

+    struct Object;

+

 };

 //// Helpers

@@ -171,6 +177,80 @@ GLTRAITS_VALUE_VECTOR( glm::dvec, DOUBLE,         glm::value_ptr,           ,

 GLTRAITS_VALUE_MATRIX( glm::dmat, DOUBLE,         glm::value_ptr, GL_FALSE, ,     d,  L, ,         OMIT, 4, 0, 4, 1, "GL_ARB_gpu_shader_fp64", "GL_ARB_vertex_attrib_64bit")

 #endif

+//// Object

+

+#define GLTRAITS_OBJECT_( \

+    OBJECT_TYPE, OBJECT, \

+    GEN_OBJECTS, DELETE_OBJECTS, \

+    INFO_LOG_ARGS, \

+    V1, V2, EXT \

+) \

+    template<> \

+    struct GLTraits::Object<GL_##OBJECT_TYPE> \

+    { \

+        auto static constexpr name = "GL_" #OBJECT_TYPE; \

+        template<typename... Args> \

+        void static gen_objects(GLsizei n, GLuint * objects, Args... args) \

+        { \

+            if (GLBase::debug() >= 1) \

+                GLBase::check_supported({V1, V2}, EXT); \

+            GEN_OBJECTS; \

+        } \

+        void static delete_objects(GLsizei n, GLuint const * objects) \

+        { \

+            if (GLBase::debug() >= 1) \

+                GLBase::check_supported({V1, V2}, EXT); \

+            DELETE_OBJECTS; \

+        } \

+        GLTRAITS_##INFO_LOG_ARGS( \

+        std::string static info_log(GLuint object) \

+        { \

+            if (GLBase::debug() >= 1) \

+                GLBase::check_supported({V1, V2}, EXT); \

+            auto length = GLint{}; \

+            glGet##OBJECT##iv(object, GL_INFO_LOG_LENGTH, &length); \

+            if (length != 0) \

+                --length; \

+            auto info_log = std::string((std::size_t)length, char{}); \

+            glGet##OBJECT##InfoLog( \

+                object, \

+                length+1, \

+                nullptr, \

+                &info_log[0] \

+            ); \

+            return info_log; \

+        } \

+        ) \

+    };

+

+#define GLTRAITS_OBJECT(OBJECT_TYPE, OBJECT, OBJECTS, ...) \

+    GLTRAITS_OBJECT_( \

+        OBJECT_TYPE, OBJECT, \

+        glGen##OBJECTS(n, objects, args...), \

+        glDelete##OBJECTS(n, objects), \

+        __VA_ARGS__ \

+    )

+

+#define GLTRAITS_OBJECT_GLSL(OBJECT_TYPE, OBJECT, OBJECTS, ...) \

+    GLTRAITS_OBJECT_( \

+        OBJECT_TYPE, OBJECT, \

+        while (n--) objects[n] = glCreate##OBJECT(args...), \

+        while (n--) glDelete##OBJECT(objects[n]), \

+        __VA_ARGS__ \

+    )

+

+GLTRAITS_OBJECT(     TEXTURE,            Texture,           Textures,           OMIT, 1, 1, {})

+GLTRAITS_OBJECT(     BUFFER,             Buffer,            Buffers,            OMIT, 1, 5, {})

+GLTRAITS_OBJECT(     QUERY,              Query,             Queries,            OMIT, 1, 5, {})

+GLTRAITS_OBJECT_GLSL(PROGRAM,            Program,           Programs,           KEEP, 2, 0, {})

+GLTRAITS_OBJECT_GLSL(SHADER,             Shader,            Shaders,            KEEP, 2, 0, {})

+GLTRAITS_OBJECT(     VERTEX_ARRAY,       VertexArray,       VertexArrays,       OMIT, 3, 0, "GL_ARB_vertex_array_object")

+GLTRAITS_OBJECT(     FRAMEBUFFER,        Framebuffer,       Framebuffers,       OMIT, 3, 0, "GL_ARB_framebuffer_object")

+GLTRAITS_OBJECT(     RENDERBUFFER,       Renderbuffer,      Renderbuffers,      OMIT, 3, 0, "GL_ARB_framebuffer_object")

+GLTRAITS_OBJECT(     SAMPLER,            Sampler,           Samplers,           OMIT, 3, 3, "GL_ARB_sampler_objects")

+GLTRAITS_OBJECT(     TRANSFORM_FEEDBACK, TransformFeedback, TransformFeedbacks, OMIT, 4, 0, "GL_ARB_transform_feedback2")

+GLTRAITS_OBJECT(     PROGRAM_PIPELINE,   ProgramPipeline,   ProgramPipelines,   KEEP, 4, 1, "GL_ARB_separate_shader_objects")

+

 /// Guards

@@ -61,6 +61,26 @@ struct GLTraitsTest : protected GLBase

             << "  " << GLTraits::Value<typename Traits::Value>::name << "\n";

     }

+    template<GLenum object_type, typename... Args>

+    void static test_object()

+    {

+        using Traits = GLTraits::Object<object_type>;

+        static_assert(

+            std::is_empty<Traits>::value,

+            "GLTraits::Object must be empty"

+        );

+        #define GLTRAITS_TEST_OBJECT(NAME) \

+            << std::left << std::setw(33) \

+            << "  " #NAME ":" \

+            << (void *)Traits::NAME \

+            << "\n"

+        std::cout

+            << "Object<" << Traits::name << ">" << "\n"

+            GLTRAITS_TEST_OBJECT(template gen_objects<Args...>)

+            GLTRAITS_TEST_OBJECT(delete_objects)

+            GLTRAITS_TEST_OBJECT(info_log);

+    }

+

 };

@@ -81,4 +101,7 @@ int main()

     GLTraitsTest::test_value_id<GL_FLOAT_MAT4x3>();

     GLTraitsTest::test_value_id<GL_UNSIGNED_INT_VEC2>();

     GLTraitsTest::test_value_id<GL_DOUBLE_VEC2>();

+

+    GLTraitsTest::test_object<GL_SHADER, GLenum>();

+    GLTraitsTest::test_object<GL_PROGRAM_PIPELINE>();

 }