imgui_impl_opengl2.cpp 18 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348
  1. // dear imgui: Renderer Backend for OpenGL2 (legacy OpenGL, fixed pipeline)
  2. // This needs to be used along with a Platform Backend (e.g. GLFW, SDL, Win32, custom..)
  3. // Implemented features:
  4. // [X] Renderer: User texture binding. Use 'GLuint' OpenGL texture as texture identifier. Read the FAQ about ImTextureID/ImTextureRef!
  5. // [X] Renderer: Texture updates support for dynamic font atlas (ImGuiBackendFlags_RendererHasTextures).
  6. // Missing features or Issues:
  7. // [ ] Renderer: Large meshes support (64k+ vertices) even with 16-bit indices (ImGuiBackendFlags_RendererHasVtxOffset).
  8. // You can use unmodified imgui_impl_* files in your project. See examples/ folder for examples of using this.
  9. // Prefer including the entire imgui/ repository into your project (either as a copy or as a submodule), and only build the backends you need.
  10. // Learn about Dear ImGui:
  11. // - FAQ https://dearimgui.com/faq
  12. // - Getting Started https://dearimgui.com/getting-started
  13. // - Documentation https://dearimgui.com/docs (same as your local docs/ folder).
  14. // - Introduction, links and more at the top of imgui.cpp
  15. // **DO NOT USE THIS CODE IF YOUR CODE/ENGINE IS USING MODERN OPENGL (SHADERS, VBO, VAO, etc.)**
  16. // **Prefer using the code in imgui_impl_opengl3.cpp**
  17. // This code is mostly provided as a reference to learn how ImGui integration works, because it is shorter to read.
  18. // If your code is using GL3+ context or any semi modern OpenGL calls, using this is likely to make everything more
  19. // complicated, will require your code to reset every single OpenGL attributes to their initial state, and might
  20. // confuse your GPU driver.
  21. // The GL2 code is unable to reset attributes or even call e.g. "glUseProgram(0)" because they don't exist in that API.
  22. // CHANGELOG
  23. // (minor and older changes stripped away, please see git history for details)
  24. // 2025-07-15: OpenGL: Set GL_UNPACK_ALIGNMENT to 1 before updating textures. (#8802)
  25. // 2025-06-11: OpenGL: Added support for ImGuiBackendFlags_RendererHasTextures, for dynamic font atlas. Removed ImGui_ImplOpenGL2_CreateFontsTexture() and ImGui_ImplOpenGL2_DestroyFontsTexture().
  26. // 2024-10-07: OpenGL: Changed default texture sampler to Clamp instead of Repeat/Wrap.
  27. // 2024-06-28: OpenGL: ImGui_ImplOpenGL2_NewFrame() recreates font texture if it has been destroyed by ImGui_ImplOpenGL2_DestroyFontsTexture(). (#7748)
  28. // 2022-10-11: Using 'nullptr' instead of 'NULL' as per our switch to C++11.
  29. // 2021-12-08: OpenGL: Fixed mishandling of the ImDrawCmd::IdxOffset field! This is an old bug but it never had an effect until some internal rendering changes in 1.86.
  30. // 2021-06-29: Reorganized backend to pull data from a single structure to facilitate usage with multiple-contexts (all g_XXXX access changed to bd->XXXX).
  31. // 2021-05-19: OpenGL: Replaced direct access to ImDrawCmd::TextureId with a call to ImDrawCmd::GetTexID(). (will become a requirement)
  32. // 2021-01-03: OpenGL: Backup, setup and restore GL_SHADE_MODEL state, disable GL_STENCIL_TEST and disable GL_NORMAL_ARRAY client state to increase compatibility with legacy OpenGL applications.
  33. // 2020-01-23: OpenGL: Backup, setup and restore GL_TEXTURE_ENV to increase compatibility with legacy OpenGL applications.
  34. // 2019-04-30: OpenGL: Added support for special ImDrawCallback_ResetRenderState callback to reset render state.
  35. // 2019-02-11: OpenGL: Projecting clipping rectangles correctly using draw_data->FramebufferScale to allow multi-viewports for retina display.
  36. // 2018-11-30: Misc: Setting up io.BackendRendererName so it can be displayed in the About Window.
  37. // 2018-08-03: OpenGL: Disabling/restoring GL_LIGHTING and GL_COLOR_MATERIAL to increase compatibility with legacy OpenGL applications.
  38. // 2018-06-08: Misc: Extracted imgui_impl_opengl2.cpp/.h away from the old combined GLFW/SDL+OpenGL2 examples.
  39. // 2018-06-08: OpenGL: Use draw_data->DisplayPos and draw_data->DisplaySize to setup projection matrix and clipping rectangle.
  40. // 2018-02-16: Misc: Obsoleted the io.RenderDrawListsFn callback and exposed ImGui_ImplOpenGL2_RenderDrawData() in the .h file so you can call it yourself.
  41. // 2017-09-01: OpenGL: Save and restore current polygon mode.
  42. // 2016-09-10: OpenGL: Uploading font texture as RGBA32 to increase compatibility with users shaders (not ideal).
  43. // 2016-09-05: OpenGL: Fixed save and restore of current scissor rectangle.
  44. #include "imgui.h"
  45. #ifndef IMGUI_DISABLE
  46. #include "imgui_impl_opengl2.h"
  47. #include <stdint.h> // intptr_t
  48. // Clang/GCC warnings with -Weverything
  49. #if defined(__clang__)
  50. #pragma clang diagnostic push
  51. #pragma clang diagnostic ignored "-Wunused-macros" // warning: macro is not used
  52. #pragma clang diagnostic ignored "-Wnonportable-system-include-path"
  53. #endif
  54. // Include OpenGL header (without an OpenGL loader) requires a bit of fiddling
  55. #if defined(_WIN32) && !defined(APIENTRY)
  56. #define APIENTRY __stdcall // It is customary to use APIENTRY for OpenGL function pointer declarations on all platforms. Additionally, the Windows OpenGL header needs APIENTRY.
  57. #endif
  58. #if defined(_WIN32) && !defined(WINGDIAPI)
  59. #define WINGDIAPI __declspec(dllimport) // Some Windows OpenGL headers need this
  60. #endif
  61. #if defined(__APPLE__)
  62. #define GL_SILENCE_DEPRECATION
  63. #include <OpenGL/gl.h>
  64. #else
  65. #include <GL/gl.h>
  66. #endif
  67. // [Debugging]
  68. //#define IMGUI_IMPL_OPENGL_DEBUG
  69. #ifdef IMGUI_IMPL_OPENGL_DEBUG
  70. #include <stdio.h>
  71. #define GL_CALL(_CALL) do { _CALL; GLenum gl_err = glGetError(); if (gl_err != 0) fprintf(stderr, "GL error 0x%x returned from '%s'.\n", gl_err, #_CALL); } while (0) // Call with error check
  72. #else
  73. #define GL_CALL(_CALL) _CALL // Call without error check
  74. #endif
  75. // OpenGL data
  76. struct ImGui_ImplOpenGL2_Data
  77. {
  78. ImGui_ImplOpenGL2_Data() { memset((void*)this, 0, sizeof(*this)); }
  79. };
  80. // Backend data stored in io.BackendRendererUserData to allow support for multiple Dear ImGui contexts
  81. // It is STRONGLY preferred that you use docking branch with multi-viewports (== single Dear ImGui context + multiple windows) instead of multiple Dear ImGui contexts.
  82. static ImGui_ImplOpenGL2_Data* ImGui_ImplOpenGL2_GetBackendData()
  83. {
  84. return ImGui::GetCurrentContext() ? (ImGui_ImplOpenGL2_Data*)ImGui::GetIO().BackendRendererUserData : nullptr;
  85. }
  86. // Functions
  87. bool ImGui_ImplOpenGL2_Init()
  88. {
  89. ImGuiIO& io = ImGui::GetIO();
  90. IMGUI_CHECKVERSION();
  91. IM_ASSERT(io.BackendRendererUserData == nullptr && "Already initialized a renderer backend!");
  92. // Setup backend capabilities flags
  93. ImGui_ImplOpenGL2_Data* bd = IM_NEW(ImGui_ImplOpenGL2_Data)();
  94. io.BackendRendererUserData = (void*)bd;
  95. io.BackendRendererName = "imgui_impl_opengl2";
  96. io.BackendFlags |= ImGuiBackendFlags_RendererHasTextures; // We can honor ImGuiPlatformIO::Textures[] requests during render.
  97. return true;
  98. }
  99. void ImGui_ImplOpenGL2_Shutdown()
  100. {
  101. ImGui_ImplOpenGL2_Data* bd = ImGui_ImplOpenGL2_GetBackendData();
  102. IM_ASSERT(bd != nullptr && "No renderer backend to shutdown, or already shutdown?");
  103. ImGuiIO& io = ImGui::GetIO();
  104. ImGui_ImplOpenGL2_DestroyDeviceObjects();
  105. io.BackendRendererName = nullptr;
  106. io.BackendRendererUserData = nullptr;
  107. io.BackendFlags &= ~(ImGuiBackendFlags_RendererHasTextures);
  108. IM_DELETE(bd);
  109. }
  110. void ImGui_ImplOpenGL2_NewFrame()
  111. {
  112. ImGui_ImplOpenGL2_Data* bd = ImGui_ImplOpenGL2_GetBackendData();
  113. IM_ASSERT(bd != nullptr && "Context or backend not initialized! Did you call ImGui_ImplOpenGL2_Init()?");
  114. IM_UNUSED(bd);
  115. }
  116. static void ImGui_ImplOpenGL2_SetupRenderState(ImDrawData* draw_data, int fb_width, int fb_height)
  117. {
  118. // Setup render state: alpha-blending enabled, no face culling, no depth testing, scissor enabled, vertex/texcoord/color pointers, polygon fill.
  119. glEnable(GL_BLEND);
  120. glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
  121. //glBlendFuncSeparate(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA, GL_ONE, GL_ONE_MINUS_SRC_ALPHA); // In order to composite our output buffer we need to preserve alpha
  122. glDisable(GL_CULL_FACE);
  123. glDisable(GL_DEPTH_TEST);
  124. glDisable(GL_STENCIL_TEST);
  125. glDisable(GL_LIGHTING);
  126. glDisable(GL_COLOR_MATERIAL);
  127. glEnable(GL_SCISSOR_TEST);
  128. glEnableClientState(GL_VERTEX_ARRAY);
  129. glEnableClientState(GL_TEXTURE_COORD_ARRAY);
  130. glEnableClientState(GL_COLOR_ARRAY);
  131. glDisableClientState(GL_NORMAL_ARRAY);
  132. glEnable(GL_TEXTURE_2D);
  133. glPolygonMode(GL_FRONT_AND_BACK, GL_FILL);
  134. glShadeModel(GL_SMOOTH);
  135. glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);
  136. // If you are using this code with non-legacy OpenGL header/contexts (which you should not, prefer using imgui_impl_opengl3.cpp!!),
  137. // you may need to backup/reset/restore other state, e.g. for current shader using the commented lines below.
  138. // (DO NOT MODIFY THIS FILE! Add the code in your calling function)
  139. // GLint last_program;
  140. // glGetIntegerv(GL_CURRENT_PROGRAM, &last_program);
  141. // glUseProgram(0);
  142. // ImGui_ImplOpenGL2_RenderDrawData(...);
  143. // glUseProgram(last_program)
  144. // There are potentially many more states you could need to clear/setup that we can't access from default headers.
  145. // e.g. glBindBuffer(GL_ARRAY_BUFFER, 0), glDisable(GL_TEXTURE_CUBE_MAP).
  146. // Setup viewport, orthographic projection matrix
  147. // Our visible imgui space lies from draw_data->DisplayPos (top left) to draw_data->DisplayPos+data_data->DisplaySize (bottom right). DisplayPos is (0,0) for single viewport apps.
  148. GL_CALL(glViewport(0, 0, (GLsizei)fb_width, (GLsizei)fb_height));
  149. glMatrixMode(GL_PROJECTION);
  150. glPushMatrix();
  151. glLoadIdentity();
  152. glOrtho(draw_data->DisplayPos.x, draw_data->DisplayPos.x + draw_data->DisplaySize.x, draw_data->DisplayPos.y + draw_data->DisplaySize.y, draw_data->DisplayPos.y, -1.0f, +1.0f);
  153. glMatrixMode(GL_MODELVIEW);
  154. glPushMatrix();
  155. glLoadIdentity();
  156. }
  157. // OpenGL2 Render function.
  158. // Note that this implementation is little overcomplicated because we are saving/setting up/restoring every OpenGL state explicitly.
  159. // This is in order to be able to run within an OpenGL engine that doesn't do so.
  160. void ImGui_ImplOpenGL2_RenderDrawData(ImDrawData* draw_data)
  161. {
  162. // Avoid rendering when minimized, scale coordinates for retina displays (screen coordinates != framebuffer coordinates)
  163. int fb_width = (int)(draw_data->DisplaySize.x * draw_data->FramebufferScale.x);
  164. int fb_height = (int)(draw_data->DisplaySize.y * draw_data->FramebufferScale.y);
  165. if (fb_width == 0 || fb_height == 0)
  166. return;
  167. // Catch up with texture updates. Most of the times, the list will have 1 element with an OK status, aka nothing to do.
  168. // (This almost always points to ImGui::GetPlatformIO().Textures[] but is part of ImDrawData to allow overriding or disabling texture updates).
  169. if (draw_data->Textures != nullptr)
  170. for (ImTextureData* tex : *draw_data->Textures)
  171. if (tex->Status != ImTextureStatus_OK)
  172. ImGui_ImplOpenGL2_UpdateTexture(tex);
  173. // Backup GL state
  174. GLint last_texture; glGetIntegerv(GL_TEXTURE_BINDING_2D, &last_texture);
  175. GLint last_polygon_mode[2]; glGetIntegerv(GL_POLYGON_MODE, last_polygon_mode);
  176. GLint last_viewport[4]; glGetIntegerv(GL_VIEWPORT, last_viewport);
  177. GLint last_scissor_box[4]; glGetIntegerv(GL_SCISSOR_BOX, last_scissor_box);
  178. GLint last_shade_model; glGetIntegerv(GL_SHADE_MODEL, &last_shade_model);
  179. GLint last_tex_env_mode; glGetTexEnviv(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, &last_tex_env_mode);
  180. glPushAttrib(GL_ENABLE_BIT | GL_COLOR_BUFFER_BIT | GL_TRANSFORM_BIT);
  181. // Setup desired GL state
  182. ImGui_ImplOpenGL2_SetupRenderState(draw_data, fb_width, fb_height);
  183. // Will project scissor/clipping rectangles into framebuffer space
  184. ImVec2 clip_off = draw_data->DisplayPos; // (0,0) unless using multi-viewports
  185. ImVec2 clip_scale = draw_data->FramebufferScale; // (1,1) unless using retina display which are often (2,2)
  186. // Render command lists
  187. for (const ImDrawList* draw_list : draw_data->CmdLists)
  188. {
  189. const ImDrawVert* vtx_buffer = draw_list->VtxBuffer.Data;
  190. const ImDrawIdx* idx_buffer = draw_list->IdxBuffer.Data;
  191. glVertexPointer(2, GL_FLOAT, sizeof(ImDrawVert), (const GLvoid*)((const char*)vtx_buffer + offsetof(ImDrawVert, pos)));
  192. glTexCoordPointer(2, GL_FLOAT, sizeof(ImDrawVert), (const GLvoid*)((const char*)vtx_buffer + offsetof(ImDrawVert, uv)));
  193. glColorPointer(4, GL_UNSIGNED_BYTE, sizeof(ImDrawVert), (const GLvoid*)((const char*)vtx_buffer + offsetof(ImDrawVert, col)));
  194. for (int cmd_i = 0; cmd_i < draw_list->CmdBuffer.Size; cmd_i++)
  195. {
  196. const ImDrawCmd* pcmd = &draw_list->CmdBuffer[cmd_i];
  197. if (pcmd->UserCallback)
  198. {
  199. // User callback, registered via ImDrawList::AddCallback()
  200. // (ImDrawCallback_ResetRenderState is a special callback value used by the user to request the renderer to reset render state.)
  201. if (pcmd->UserCallback == ImDrawCallback_ResetRenderState)
  202. ImGui_ImplOpenGL2_SetupRenderState(draw_data, fb_width, fb_height);
  203. else
  204. pcmd->UserCallback(draw_list, pcmd);
  205. }
  206. else
  207. {
  208. // Project scissor/clipping rectangles into framebuffer space
  209. ImVec2 clip_min((pcmd->ClipRect.x - clip_off.x) * clip_scale.x, (pcmd->ClipRect.y - clip_off.y) * clip_scale.y);
  210. ImVec2 clip_max((pcmd->ClipRect.z - clip_off.x) * clip_scale.x, (pcmd->ClipRect.w - clip_off.y) * clip_scale.y);
  211. if (clip_max.x <= clip_min.x || clip_max.y <= clip_min.y)
  212. continue;
  213. // Apply scissor/clipping rectangle (Y is inverted in OpenGL)
  214. glScissor((int)clip_min.x, (int)((float)fb_height - clip_max.y), (int)(clip_max.x - clip_min.x), (int)(clip_max.y - clip_min.y));
  215. // Bind texture, Draw
  216. glBindTexture(GL_TEXTURE_2D, (GLuint)(intptr_t)pcmd->GetTexID());
  217. glDrawElements(GL_TRIANGLES, (GLsizei)pcmd->ElemCount, sizeof(ImDrawIdx) == 2 ? GL_UNSIGNED_SHORT : GL_UNSIGNED_INT, idx_buffer + pcmd->IdxOffset);
  218. }
  219. }
  220. }
  221. // Restore modified GL state
  222. glDisableClientState(GL_COLOR_ARRAY);
  223. glDisableClientState(GL_TEXTURE_COORD_ARRAY);
  224. glDisableClientState(GL_VERTEX_ARRAY);
  225. glBindTexture(GL_TEXTURE_2D, (GLuint)last_texture);
  226. glMatrixMode(GL_MODELVIEW);
  227. glPopMatrix();
  228. glMatrixMode(GL_PROJECTION);
  229. glPopMatrix();
  230. glPopAttrib();
  231. glPolygonMode(GL_FRONT, (GLenum)last_polygon_mode[0]); glPolygonMode(GL_BACK, (GLenum)last_polygon_mode[1]);
  232. glViewport(last_viewport[0], last_viewport[1], (GLsizei)last_viewport[2], (GLsizei)last_viewport[3]);
  233. glScissor(last_scissor_box[0], last_scissor_box[1], (GLsizei)last_scissor_box[2], (GLsizei)last_scissor_box[3]);
  234. glShadeModel(last_shade_model);
  235. glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, last_tex_env_mode);
  236. }
  237. void ImGui_ImplOpenGL2_UpdateTexture(ImTextureData* tex)
  238. {
  239. if (tex->Status == ImTextureStatus_WantCreate)
  240. {
  241. // Create and upload new texture to graphics system
  242. //IMGUI_DEBUG_LOG("UpdateTexture #%03d: WantCreate %dx%d\n", tex->UniqueID, tex->Width, tex->Height);
  243. IM_ASSERT(tex->TexID == 0 && tex->BackendUserData == nullptr);
  244. IM_ASSERT(tex->Format == ImTextureFormat_RGBA32);
  245. const void* pixels = tex->GetPixels();
  246. GLuint gl_texture_id = 0;
  247. // Upload texture to graphics system
  248. // (Bilinear sampling is required by default. Set 'io.Fonts->Flags |= ImFontAtlasFlags_NoBakedLines' or 'style.AntiAliasedLinesUseTex = false' to allow point/nearest sampling)
  249. GLint last_texture;
  250. GL_CALL(glGetIntegerv(GL_TEXTURE_BINDING_2D, &last_texture));
  251. GL_CALL(glGenTextures(1, &gl_texture_id));
  252. GL_CALL(glBindTexture(GL_TEXTURE_2D, gl_texture_id));
  253. GL_CALL(glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR));
  254. GL_CALL(glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR));
  255. GL_CALL(glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP));
  256. GL_CALL(glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP));
  257. GL_CALL(glPixelStorei(GL_UNPACK_ROW_LENGTH, 0));
  258. GL_CALL(glPixelStorei(GL_UNPACK_ALIGNMENT, 1));
  259. GL_CALL(glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, tex->Width, tex->Height, 0, GL_RGBA, GL_UNSIGNED_BYTE, pixels));
  260. // Store identifiers
  261. tex->SetTexID((ImTextureID)(intptr_t)gl_texture_id);
  262. tex->SetStatus(ImTextureStatus_OK);
  263. // Restore state
  264. GL_CALL(glBindTexture(GL_TEXTURE_2D, last_texture));
  265. }
  266. else if (tex->Status == ImTextureStatus_WantUpdates)
  267. {
  268. // Update selected blocks. We only ever write to textures regions which have never been used before!
  269. // This backend choose to use tex->Updates[] but you can use tex->UpdateRect to upload a single region.
  270. GLint last_texture;
  271. GL_CALL(glGetIntegerv(GL_TEXTURE_BINDING_2D, &last_texture));
  272. GLuint gl_tex_id = (GLuint)(intptr_t)tex->TexID;
  273. GL_CALL(glBindTexture(GL_TEXTURE_2D, gl_tex_id));
  274. GL_CALL(glPixelStorei(GL_UNPACK_ROW_LENGTH, tex->Width));
  275. GL_CALL(glPixelStorei(GL_UNPACK_ALIGNMENT, 1));
  276. for (ImTextureRect& r : tex->Updates)
  277. GL_CALL(glTexSubImage2D(GL_TEXTURE_2D, 0, r.x, r.y, r.w, r.h, GL_RGBA, GL_UNSIGNED_BYTE, tex->GetPixelsAt(r.x, r.y)));
  278. GL_CALL(glPixelStorei(GL_UNPACK_ROW_LENGTH, 0));
  279. GL_CALL(glBindTexture(GL_TEXTURE_2D, last_texture)); // Restore state
  280. tex->SetStatus(ImTextureStatus_OK);
  281. }
  282. else if (tex->Status == ImTextureStatus_WantDestroy)
  283. {
  284. GLuint gl_tex_id = (GLuint)(intptr_t)tex->TexID;
  285. glDeleteTextures(1, &gl_tex_id);
  286. // Clear identifiers and mark as destroyed (in order to allow e.g. calling InvalidateDeviceObjects while running)
  287. tex->SetTexID(ImTextureID_Invalid);
  288. tex->SetStatus(ImTextureStatus_Destroyed);
  289. }
  290. }
  291. bool ImGui_ImplOpenGL2_CreateDeviceObjects()
  292. {
  293. return true;
  294. }
  295. void ImGui_ImplOpenGL2_DestroyDeviceObjects()
  296. {
  297. for (ImTextureData* tex : ImGui::GetPlatformIO().Textures)
  298. if (tex->RefCount == 1)
  299. {
  300. tex->SetStatus(ImTextureStatus_WantDestroy);
  301. ImGui_ImplOpenGL2_UpdateTexture(tex);
  302. }
  303. }
  304. //-----------------------------------------------------------------------------
  305. #if defined(__clang__)
  306. #pragma clang diagnostic pop
  307. #endif
  308. #endif // #ifndef IMGUI_DISABLE