Yuku free message boards

I found a tool to help me find out which files I might need to modify by searching for Arb_Imaging. I posted a link to the program here Text search tool

I found conv.erl under esdl-1.0.1\api_gen and added GL_EXT_blend_color to the bottom of the list.

%% The extensions we want to have..
skip_extensions("GL_ARB_vertex_blend",_R) ->    false;
skip_extensions("GL_ARB_imaging",_R) ->         false;
skip_extensions("GL_ARB_matrix_palette",_R) ->  false;
skip_extensions("GL_ARB_shadow_ambient",_R) ->  false;
skip_extensions("GL_ARB_vertex_program",_R) ->  false;
skip_extensions("GL_ARB_fragment_program",_R) ->  false;
skip_extensions("GL_NV_depth_clamp",_R) ->  false;
%% skip_extensions("GL_ARB_vertex_shader",_R) ->  false;
%% skip_extensions("GL_ARB_fragment_shader", _R) ->  false;
%% skip_extensions("GL_ARB_shading_language_100",_R) ->  false;
%% skip_extensions("GL_ARB_texture_non_power_of_two",_R) ->  false;
%% skip_extensions("GL_ARB_point_sprite",_R) ->  false;
skip_extensions("GL_ARB_shader_objects",_R) ->  false;
%% skip_extensions("GL_ARB_draw_buffers",_R) ->  false;
skip_extensions("GL_ABGR_EXT", _R) -> false;
skip_extensions("GL_ATI_separate_stencil",_R) -> false;   
%% skip_extensions("",_R) -> false;
skip_extensions("GL_NV_float_buffer",_R) -> false;
skip_extensions("GL_ATI_texture_float",_R) -> false;
skip_extensions("GL_EXT_texture_mirror_clamp",_R) -> false;
skip_extensions("GL_EXT_framebuffer_object",_) -> false;
skip_extensions("GL_EXT_blend_color",_) -> false;

A search for blendFunc and blendColor gave me the file esdl-1.0.1\src\gl.erl. I added BlendColorEXT and tried to Make esdl.

%% @spec blendColor(Red::float(), Green::float(), Blue::float(), Alpha::float()) -> ok
%% @doc <a href="http://www.google.com/search?btnI=I%27m+Feeling+Lucky&amp;q=manual+pages+glBlendColor">External manpage: blendColor</a>
%% C-API func: void glBlendColor(GLclampf red, GLclampf green, GLclampf blue, GLclampf alpha)
blendColor(Red, Green, Blue, Alpha) ->
 cast(?glBlendColor, <<Red:32/?FN, Green:32/?FN, Blue:32/?FN, Alpha:32/?FN>>).
BlendColorEXT(Red, Green, Blue, Alpha) ->
 cast(?glBlendColorEXT, <<Red:32/?FN, Green:32/?FN, Blue:32/?FN, Alpha:32/?FN>>).

I get an "undefined macro glBlendColorEXT" error.

Edit: I found glBlendColor in esdl-1.0.1\src\glext_funcs.hrl. I will modify it and see what happens...

Edit2: I added the following to glext_funcs.hrl:

-define(glBlendColorEXT, ?SDL_OPENGL_EXTS_HRL + 253).
-define(glBlendFuncEXT, ?SDL_OPENGL_EXTS_HRL + 254).

That got rid of the undefined macro errors when I make esdl.
Now  I am left with a "syntax error before BlendColorEXT" in the gl.erl file.
oort

I will check out AstroGreep. Nice that you can assign jEdit as the editor. Not sure if I can do that in DocFetcher or not.

I was hoping to avoid modifying esdl but I was having trouble finding another way to get to use GL_EXT_blend_color. I hope you can find another way.

oort

Just posting to say I looked at those functions a little bit last night. I need to study them a lot more since they require a lot more coding knowledge than I have at this time.

Also, I like AstroGrep very much.

Edit:
I found out why I was getting the "variable 'BlendFunc' is unbound" error. I needed to use "glBlendFunc" and "glBlendColorEXT". Somehow I missed seeing the gl. The official documentation for OpenGL does not show the gl. I restored all the esdl_1.0.1 files to the official release and Wings3d compiles with the wings_proxy.erl code below.


    case wings_gl:is_ext('GL_EXT_blend_color') of
    false -> ok;
    true ->
        case wings_pref:get_value(Key) of
        1.0 -> ok;
        Opacity ->
            gl:enable(?GL_BLEND_COLOR_EXT),
            gl:glBlendFunc(?GL_CONSTANT_ALPHA_EXT, ?GL_ONE_MINUS_CONSTANT_ALPHA_EXT),
            gl:glBlendColorEXT(0, 0, 0, Opacity)
        end

Hopefully this gets me away from using GL_ARB_imaging and instead using GL_EXT_blend_color. Now on to figuring out the rest...

Edit2: Here is the crash dump that I get now when I do Shift Tab followed by Tab.

Dump written 2012-2-9_22-48
Version: 1.4.1
Window: geom
Reason: undef

Short stack trace:
[{gl,glBlendFunc,2},
 {wings_proxy,draw_1,6},
 {wings_render,render_plain,3},
 {wings_render,render_work_objects,3},
 {wings_render,render,1},
 {wings,'-redraw/2-fun-0-',2},
 {wings,handle_event_3,2},
 {wings_wm,handle_event,3}]

Long stack trace:
[{gl,glBlendFunc,[32771,32772]},
 {wings_proxy,draw_1,6},
 {wings_render,render_plain,3},
 {wings_render,render_work_objects,3},
 {wings_render,render,1},
 {wings,'-redraw/2-fun-0-',2},
 {wings,handle_event_3,2},
 {wings_wm,handle_event,3}]

oort

I found out that it was the "gl:blendColor(0, 0, 0, Opacity)" in the code that was causing the Shift Tab > Tab crashes. If blendFunc is part of the core it looks like blendColor is not. That part doesn't seem to work without ARB_imaging. I copied some other code to replace it and now I have proxy mode moving opacity working to some degree. It still needs some more work.

oort

I tried again tonight to get this working with the CONSTANT functions and gl:blendColor. I didn't get it to work but I came up with some cleaner code.
This doesn't crash but the Preferences > Misc >Proxymode > Moving and Stationary Opacity settings still only function as on/off switches.

    case wings_gl:is_ext('GL_EXT_blend_color') of
    false -> ok;
    true ->
        case wings_pref:get_value(Key) of
        1.0 -> ok;
        Opacity ->
        gl:enable(?GL_BLEND),
        gl:blendFunc(?GL_SRC_ALPHA, ?GL_ONE_MINUS_SRC_ALPHA),       
        gl:color4f(0, 0, 0, Opacity),       
        gl:depthMask(?GL_FALSE)
        end
    end,

Micheus,
I think you are right. Is it possible to change the else statement so that it tests for OpenGL 1.4 instead of GL_ARB_imaging (Current code) and GL_EXT_blend_color (Current fix for you). That way anyone with a card that supports the minimum of OpenGL 1.4 will get the code that works for you (true result). Then add the code that partly works for me to help people who do not have OpenGL 1.4 (false result). This will get rid of the obscure GL_ARB_imaging (imaging subset) that is currently in the code.

Funny that post1 is one that I had come across. Post2 is a very helpful one.

Thanks,
oort

You are probably right. Test for GL_ARB_imaging ... if that fails test for OpenGL 1.4... if that fails use the method that hopefully works for all other cards with the Moving/Stationary Opacity missing. Maybe have the info about this in the information line. Something like... "Moving/Stationary Opacity requires GL_ARB_imaging or minimum OpenGL 1.4. otherwise 1= 100%, <1= Material Opacity."

Maybe you can come up with some better information line statement?
It is probably an easy thing for you but I got the information line to work with the code here Fix Moving/Opacity information line text.

Thanks,
oort

By the fixed version of wings I assume your fixed version and not the code listed in my last post. You saying the sliders are disabled makes me worry that you are using the code exactly as I posted it. Hopefully this is not the case. If you already have a fixed version that checks for OpenGL 1.4 but also works on systems without it, I can test it to see what happens on my system.

The code in my last post was to only check for ARB_imaging and disable the sliders when it is not present.

oort