// This routine does all OS specific shutdown procedures for the OpenGL
// subsystem. This means deleting the rendering context, destroying the
// window and restoring video mode. The state structure is also nulled out.
void GLimp_Shutdown() {
IN_DeactivateMouse();
if ( dpy ) {
GLW_DeleteDefaultLists();
if ( ctx ) {
glXDestroyContext( dpy, ctx );
}
if ( win ) {
XDestroyWindow( dpy, win );
}
if ( vidmode_active ) {
XF86VidModeSwitchToMode( dpy, scrnum, vidmodes[ 0 ] );
}
if ( glConfig.deviceSupportsGamma ) {
XF86VidModeSetGamma( dpy, scrnum, &vidmode_InitialGamma );
}
// NOTE TTimo opening/closing the display should be necessary only once per run
// but it seems QGL_Shutdown gets called in a lot of occasion
// in some cases, this XCloseDisplay is known to raise some X errors
// ( https://zerowing.idsoftware.com/bugzilla/show_bug.cgi?id=33 )
XCloseDisplay( dpy );
}
vidmode_active = false;
dpy = NULL;
win = 0;
ctx = NULL;
Com_Memset( &glConfig, 0, sizeof ( glConfig ) );
Com_Memset( &glState, 0, sizeof ( glState ) );
}
BOOL X11DRV_XF86VM_SetGammaRamp(LPDDGAMMARAMP ramp)
{
#ifdef X_XF86VidModeSetGamma
XF86VidModeGamma gamma;
if (xf86vm_major < 2) return FALSE; /* no gamma control */
#ifdef X_XF86VidModeSetGammaRamp
else if (xf86vm_use_gammaramp)
{
Bool ret;
wine_tsx11_lock();
ret = XF86VidModeSetGammaRamp(gdi_display, DefaultScreen(gdi_display), 256,
ramp->red, ramp->green, ramp->blue);
wine_tsx11_unlock();
return ret;
}
#endif
else
{
if (ComputeGammaFromRamp(ramp->red, &gamma.red) &&
ComputeGammaFromRamp(ramp->green, &gamma.green) &&
ComputeGammaFromRamp(ramp->blue, &gamma.blue)) {
Bool ret;
wine_tsx11_lock();
ret = XF86VidModeSetGamma(gdi_display, DefaultScreen(gdi_display), &gamma);
wine_tsx11_unlock();
return ret;
}
}
#endif /* X_XF86VidModeSetGamma */
return FALSE;
}
/*
** GLimp_Shutdown
**
** This routine does all OS specific shutdown procedures for the OpenGL
** subsystem. Under OpenGL this means NULLing out the current DC and
** HGLRC, deleting the rendering context, and releasing the DC acquired
** for the window. The state structure is also nulled out.
**
*/
void GLimp_Shutdown( void ) {
#ifdef HAVE_GLES
if (!g_EGLWindowSurface || !dpy)
#else
if ( !ctx || !dpy )
#endif
{
return;
}
IN_DeactivateMouse();
// bk001206 - replaced with H2/Fakk2 solution
// XAutoRepeatOn(dpy);
// autorepeaton = qfalse; // bk001130 - from cvs1.17 (mkv)
if ( dpy ) {
#ifdef HAVE_GLES
eglMakeCurrent( g_EGLDisplay, NULL, NULL, EGL_NO_CONTEXT );
if (g_EGLContext)
eglDestroyContext(g_EGLDisplay, g_EGLContext);
if (g_EGLWindowSurface)
eglDestroySurface(g_EGLDisplay, g_EGLWindowSurface);
eglTerminate(g_EGLDisplay);
#else
if ( ctx ) {
qglXDestroyContext( dpy, ctx );
}
#endif
if ( win ) {
XDestroyWindow( dpy, win );
}
if ( vidmode_active ) {
XF86VidModeSwitchToMode( dpy, scrnum, vidmodes[0] );
}
if ( glConfig.deviceSupportsGamma ) {
XF86VidModeSetGamma( dpy, scrnum, &vidmode_InitialGamma );
}
// NOTE TTimo opening/closing the display should be necessary only once per run
// but it seems QGL_Shutdown gets called in a lot of occasion
// in some cases, this XCloseDisplay is known to raise some X errors
// ( show_bug.cgi?id=33 )
XCloseDisplay( dpy );
}
vidmode_active = qfalse;
dpy = NULL;
win = 0;
#ifdef HAVE_GLES
g_EGLWindowSurface = NULL;
g_EGLContext = NULL;
g_EGLDisplay = NULL;
#else
ctx = NULL;
#endif
memset( &glConfig, 0, sizeof( glConfig ) );
memset( &glState, 0, sizeof( glState ) );
QGL_Shutdown();
}
/*
** GLimp_SetGamma
**
** This routine should only be called if glConfig.deviceSupportsGamma is TRUE
*/
void GLimp_SetGamma( unsigned char red[256], unsigned char green[256], unsigned char blue[256] ) {
// NOTE TTimo we get the gamma value from cvar, because we can't work with the s_gammatable
// the API wasn't changed to avoid breaking other OSes
float g = Cvar_Get( "r_gamma", "1.0", 0 )->value;
XF86VidModeGamma gamma;
assert( glConfig.deviceSupportsGamma );
gamma.red = g;
gamma.green = g;
gamma.blue = g;
XF86VidModeSetGamma( dpy, scrnum, &gamma );
}
void xgamma_set_gamma (XF86VidModeGamma *pGamma)
{
g_return_if_fail (pGamma != NULL);
const Display *dpy = cairo_dock_get_Xdisplay ();
g_return_if_fail (XF86VidModeSetGamma != NULL);
if (!XF86VidModeSetGamma(dpy, DefaultScreen (dpy), pGamma))
{
cd_warning ("Xgamma : unable to set gamma correction");
}
}
void
UpdateHardwareGamma(void)
{
float gamma;
XF86VidModeGamma x11_gamma;
gamma = vid_gamma->value;
x11_gamma.red = gamma;
x11_gamma.green = gamma;
x11_gamma.blue = gamma;
XF86VidModeSetGamma(dpy, screen, &x11_gamma);
/* This forces X11 to update the gamma tables */
XF86VidModeGetGamma(dpy, screen, &x11_gamma);
}
/*
* Shuts the SDL render backend down
*/
void
GLimp_Shutdown(void)
{
/* Clear the backbuffer and make it
current. This may help some broken
video drivers like the AMD Catalyst
to avoid artifacts in unused screen
areas. */
if (SDL_WasInit(SDL_INIT_VIDEO))
{
glClearColor(0.0, 0.0, 0.0, 0.0);
glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
GLimp_EndFrame();
}
if (surface)
{
SDL_FreeSurface(surface);
}
surface = NULL;
if (SDL_WasInit(SDL_INIT_EVERYTHING) == SDL_INIT_VIDEO)
{
SDL_Quit();
}
else
{
SDL_QuitSubSystem(SDL_INIT_VIDEO);
}
#ifdef X11GAMMA
if (gl_state.hwgamma == true)
{
XF86VidModeSetGamma(dpy, screen, &x11_oldgamma);
/* This forces X11 to update the gamma tables */
XF86VidModeGetGamma(dpy, screen, &x11_oldgamma);
}
#endif
//gl_state.hwgamma = false;
}
void xgamma_set_gamma (XF86VidModeGamma *pGamma)
{
g_return_if_fail (pGamma != NULL);
Display *dpy = gdk_x11_get_default_xdisplay ();
g_return_if_fail (_xf86vidmode_supported ());
if (!XF86VidModeSetGamma(dpy, DefaultScreen (dpy), pGamma))
{
cd_warning ("Xgamma : unable to set gamma correction");
}
else
{
if (myConfig.cDefaultTitle == NULL)
{
double fGamma = (pGamma->red + pGamma->blue + pGamma->green) / 3;
cd_gamma_display_gamma_on_label (fGamma);
}
}
}
/*
** GLimp_Shutdown
**
** This routine does all OS specific shutdown procedures for the OpenGL
** subsystem. Under OpenGL this means NULLing out the current DC and
** HGLRC, deleting the rendering context, and releasing the DC acquired
** for the window. The state structure is also nulled out.
**
*/
void GLimp_Shutdown( void )
{
if (!ctx || !dpy)
return;
IN_DeactivateMouse();
// bk001206 - replaced with H2/Fakk2 solution
// XAutoRepeatOn(dpy);
// autorepeaton = qfalse; // bk001130 - from cvs1.17 (mkv)
if (dpy)
{
if (ctx)
qglXDestroyContext(dpy, ctx);
if (win)
XDestroyWindow(dpy, win);
#ifdef HAVE_XF86DGA
if (vidmode_active)
XF86VidModeSwitchToMode(dpy, scrnum, vidmodes[0]);
if (glConfig.deviceSupportsGamma)
{
XF86VidModeSetGamma(dpy, scrnum, &vidmode_InitialGamma);
}
#endif /* HAVE_XF86DGA */
// NOTE TTimo opening/closing the display should be necessary only once per run
// but it seems QGL_Shutdown gets called in a lot of occasion
// in some cases, this XCloseDisplay is known to raise some X errors
// ( https://zerowing.idsoftware.com/bugzilla/show_bug.cgi?id=33 )
XCloseDisplay(dpy);
}
vidmode_active = qfalse;
dpy = NULL;
win = 0;
ctx = NULL;
memset( &glConfig, 0, sizeof( glConfig ) );
memset( &glState, 0, sizeof( glState ) );
QGL_Shutdown();
}
int
main(int argc, char *argv[])
{
int i, ret;
char *displayname = NULL;
Display *dpy;
float gam = -1., rgam = -1., ggam = -1., bgam = -1.;
XF86VidModeGamma gamma;
Bool quiet = False;
int screen = -1;
ProgramName = argv[0];
for (i = 1; i < argc; i++) {
char *arg = argv[i];
if (arg[0] == '-') {
if (isabbreviation ("-display", arg, 1)) {
if (++i >= argc) Syntax ("-display requires an argument");
displayname = argv[i];
continue;
} else if (isabbreviation ("-quiet", arg, 1)) {
quiet = True;
continue;
} else if (isabbreviation ("-version", arg, 1)) {
puts(PACKAGE_STRING);
exit(0);
} else if (isabbreviation ("-screen", arg, 1)) {
if (++i >= argc) Syntax ("-screen requires an argument");
screen = atoi(argv[i]);
continue;
} else if (isabbreviation ("-gamma", arg, 2)) {
if (++i >= argc) Syntax ("-gamma requires an argument");
if ((rgam >= 0.) || (ggam >= 0.) || (bgam >= 0.))
Syntax ("-gamma cannot be used with -rgamma, -ggamma, or -bgamma");
gam = (float)atof(argv[i]);
if ((gam < GAMMA_MIN) || (gam > GAMMA_MAX)) {
fprintf(stderr,
"Gamma values must be between %6.3f and %6.3f\n",
GAMMA_MIN, GAMMA_MAX);
exit(1);
}
continue;
} else if (isabbreviation ("-rgamma", arg, 2)) {
if (++i >= argc) Syntax ("-rgamma requires an argument");
if (gam >= 0.) Syntax ("cannot set both -gamma and -rgamma");
rgam = (float)atof(argv[i]);
if ((rgam < GAMMA_MIN) || (rgam > GAMMA_MAX)) {
fprintf(stderr,
"Gamma values must be between %6.3f and %6.3f\n",
GAMMA_MIN, GAMMA_MAX);
exit(1);
}
continue;
} else if (isabbreviation ("-ggamma", arg, 2)) {
if (++i >= argc) Syntax ("-ggamma requires an argument");
if (gam >= 0.) Syntax ("cannot set both -gamma and -ggamma");
ggam = (float)atof(argv[i]);
if ((ggam < GAMMA_MIN) || (ggam > GAMMA_MAX)) {
fprintf(stderr,
"Gamma values must be between %6.3f and %6.3f\n",
GAMMA_MIN, GAMMA_MAX);
exit(1);
}
continue;
} else if (isabbreviation ("-bgamma", arg, 2)) {
if (++i >= argc) Syntax ("-bgamma requires an argument");
if (gam >= 0.) Syntax ("cannot set both -gamma and -bgamma");
bgam = (float)atof(argv[i]);
if ((bgam < GAMMA_MIN) || (bgam > GAMMA_MAX)) {
fprintf(stderr,
"Gamma values must be between %6.3f and %6.3f\n",
GAMMA_MIN, GAMMA_MAX);
exit(1);
}
continue;
} else {
if (!isabbreviation ("-help", arg, 1))
fprintf (stderr, "%s: unrecognized argument %s\n\n",
ProgramName, arg);
Syntax (NULL);
}
} else {
fprintf (stderr, "%s: unrecognized argument %s\n\n",
ProgramName, arg);
Syntax (NULL);
}
}
if ((dpy = XOpenDisplay(displayname)) == NULL) {
fprintf (stderr, "%s: unable to open display '%s'\n",
ProgramName, XDisplayName (displayname));
exit(1);
} else if (screen == -1)
screen = DefaultScreen(dpy);
if (!XF86VidModeQueryVersion(dpy, &MajorVersion, &MinorVersion)) {
fprintf(stderr, "Unable to query video extension version\n");
exit(2);
}
if (!XF86VidModeQueryExtension(dpy, &EventBase, &ErrorBase)) {
fprintf(stderr, "Unable to query video extension information\n");
exit(2);
}
/* Fail if the extension version in the server is too old */
if (MajorVersion < MINMAJOR ||
(MajorVersion == MINMAJOR && MinorVersion < MINMINOR)) {
fprintf(stderr,
"Xserver is running an old XFree86-VidModeExtension version"
" (%d.%d)\n", MajorVersion, MinorVersion);
fprintf(stderr, "Minimum required version is %d.%d\n",
MINMAJOR, MINMINOR);
exit(2);
}
if (!XF86VidModeGetGamma(dpy, screen, &gamma)) {
fprintf(stderr, "Unable to query gamma correction\n");
XCloseDisplay (dpy);
exit (2);
} else if (!quiet)
fprintf(stderr, "-> Red %6.3f, Green %6.3f, Blue %6.3f\n", gamma.red,
gamma.green, gamma.blue);
ret = 0;
if (gam >= 0.) {
gamma.red = gam;
gamma.green = gam;
gamma.blue = gam;
if (!XF86VidModeSetGamma(dpy, screen, &gamma)) {
fprintf(stderr, "Unable to set gamma correction\n");
ret = 2;
} else {
if (!XF86VidModeGetGamma(dpy, screen, &gamma)) {
fprintf(stderr, "Unable to query gamma correction\n");
ret = 2;
} else if (!quiet)
fprintf(stderr, "<- Red %6.3f, Green %6.3f, Blue %6.3f\n",
gamma.red, gamma.green, gamma.blue);
}
} else if ((rgam >= 0.) || (ggam >= 0.) || (bgam >= 0.)) {
if (rgam >= 0.) gamma.red = rgam;
if (ggam >= 0.) gamma.green = ggam;
if (bgam >= 0.) gamma.blue = bgam;
if (!XF86VidModeSetGamma(dpy, screen, &gamma)) {
fprintf(stderr, "Unable to set gamma correction\n");
ret = 2;
} else {
if (!XF86VidModeGetGamma(dpy, screen, &gamma)) {
fprintf(stderr, "Unable to query gamma correction\n");
ret = 2;
} else if (!quiet)
fprintf(stderr, "<- Red %6.3f, Green %6.3f, Blue %6.3f\n",
gamma.red, gamma.green, gamma.blue);
}
}
XCloseDisplay (dpy);
exit (ret);
}
int
main (int argc, char *argv[])
{
char in_name[256] = { '\000' };
char tag_name[40] = { '\000' };
int found;
u_int16_t *r_ramp = NULL, *g_ramp = NULL, *b_ramp = NULL;
int i;
int clear = 0;
int alter = 0;
int donothing = 0;
int printramps = 0;
int calcloss = 0;
int invert = 0;
int correction = 0;
u_int16_t tmpRampVal = 0;
unsigned int r_res, g_res, b_res;
int screen = -1;
#ifdef FGLRX
unsigned
#endif
int ramp_size = 256;
#ifndef _WIN32
/* X11 */
XF86VidModeGamma gamma;
Display *dpy = NULL;
char *displayname = NULL;
#ifdef FGLRX
int controller = -1;
FGLRX_X11Gamma_C16native fglrx_gammaramps;
#endif
#else
char win_default_profile[MAX_PATH+1];
DWORD win_profile_len;
typedef struct _GAMMARAMP {
WORD Red[256];
WORD Green[256];
WORD Blue[256];
} GAMMARAMP;
GAMMARAMP winGammaRamp;
HDC hDc = NULL;
#endif
xcalib_state.verbose = 0;
/* begin program part */
#ifdef _WIN32
for(i=0; i< ramp_size; i++) {
winGammaRamp.Red[i] = i << 8;
winGammaRamp.Blue[i] = i << 8;
winGammaRamp.Green[i] = i << 8;
}
#endif
/* command line parsing */
#ifndef _WIN32
if (argc < 2)
usage ();
#endif
for (i = 1; i < argc; ++i) {
/* help */
if (!strcmp (argv[i], "-h") || !strcmp (argv[i], "-help")) {
usage ();
exit (0);
}
/* verbose mode */
if (!strcmp (argv[i], "-v") || !strcmp (argv[i], "-verbose")) {
xcalib_state.verbose = 1;
continue;
}
/* version */
if (!strcmp (argv[i], "-version")) {
fprintf(stdout, "xcalib " XCALIB_VERSION "\n");
exit (0);
}
#ifndef _WIN32
/* X11 display */
if (!strcmp (argv[i], "-d") || !strcmp (argv[i], "-display")) {
if (++i >= argc)
usage ();
displayname = argv[i];
continue;
}
#endif
/* X11 screen / Win32 monitor index */
if (!strcmp (argv[i], "-s") || !strcmp (argv[i], "-screen")) {
if (++i >= argc)
usage ();
screen = atoi (argv[i]);
continue;
}
#ifdef FGLRX
/* ATI controller index (for FGLRX only) */
if (!strcmp (argv[i], "-x") || !strcmp (argv[i], "-controller")) {
if (++i >= argc)
usage ();
controller = atoi (argv[i]);
continue;
}
#endif
/* print ramps to stdout */
if (!strcmp (argv[i], "-p") || !strcmp (argv[i], "-printramps")) {
printramps = 1;
continue;
}
/* print error introduced by applying ramps to stdout */
if (!strcmp (argv[i], "-l") || !strcmp (argv[i], "-loss")) {
calcloss = 1;
continue;
}
/* invert the LUT */
if (!strcmp (argv[i], "-i") || !strcmp (argv[i], "-invert")) {
invert = 1;
continue;
}
/* clear gamma lut */
if (!strcmp (argv[i], "-c") || !strcmp (argv[i], "-clear")) {
clear = 1;
continue;
}
#ifndef FGLRX
/* alter existing lut */
if (!strcmp (argv[i], "-a") || !strcmp (argv[i], "-alter")) {
alter = 1;
continue;
}
#endif
/* do not alter video-LUTs : work's best in conjunction with -v! */
if (!strcmp (argv[i], "-n") || !strcmp (argv[i], "-noaction")) {
donothing = 1;
if (++i >= argc)
usage();
ramp_size = atoi(argv[i]);
continue;
}
/* global gamma correction value (use 2.2 for WinXP Color Control-like behaviour) */
if (!strcmp (argv[i], "-gc") || !strcmp (argv[i], "-gammacor")) {
if (++i >= argc)
usage();
xcalib_state.gamma_cor = atof (argv[i]);
correction = 1;
continue;
}
/* take additional brightness into account */
if (!strcmp (argv[i], "-b") || !strcmp (argv[i], "-brightness")) {
double brightness = 0.0;
if (++i >= argc)
usage();
brightness = atof(argv[i]);
if(brightness < 0.0 || brightness > 99.0)
{
warning("brightness is out of range 0.0-99.0");
continue;
}
xcalib_state.redMin = xcalib_state.greenMin = xcalib_state.blueMin = brightness / 100.0;
xcalib_state.redMax = xcalib_state.greenMax = xcalib_state.blueMax =
(1.0 - xcalib_state.blueMin) * xcalib_state.blueMax + xcalib_state.blueMin;
correction = 1;
continue;
}
/* take additional contrast into account */
if (!strcmp (argv[i], "-co") || !strcmp (argv[i], "-contrast")) {
double contrast = 100.0;
if (++i >= argc)
usage();
contrast = atof(argv[i]);
if(contrast < 1.0 || contrast > 100.0)
{
warning("contrast is out of range 1.0-100.0");
continue;
}
xcalib_state.redMax = xcalib_state.greenMax = xcalib_state.blueMax = contrast / 100.0;
xcalib_state.redMax = xcalib_state.greenMax = xcalib_state.blueMax =
(1.0 - xcalib_state.blueMin) * xcalib_state.blueMax + xcalib_state.blueMin;
correction = 1;
continue;
}
/* additional red calibration */
if (!strcmp (argv[i], "-red")) {
double gamma = 1.0, brightness = 0.0, contrast = 100.0;
if (++i >= argc)
usage();
gamma = atof(argv[i]);
if(gamma < 0.1 || gamma > 5.0)
{
warning("gamma is out of range 0.1-5.0");
continue;
}
if (++i >= argc)
usage();
brightness = atof(argv[i]);
if(brightness < 0.0 || brightness > 99.0)
{
warning("brightness is out of range 0.0-99.0");
continue;
}
if (++i >= argc)
usage();
contrast = atof(argv[i]);
if(contrast < 1.0 || contrast > 100.0)
{
warning("contrast is out of range 1.0-100.0");
continue;
}
xcalib_state.redMin = brightness / 100.0;
xcalib_state.redMax =
(1.0 - xcalib_state.redMin) * (contrast / 100.0) + xcalib_state.redMin;
xcalib_state.redGamma = gamma;
correction = 1;
continue;
}
/* additional green calibration */
if (!strcmp (argv[i], "-green")) {
double gamma = 1.0, brightness = 0.0, contrast = 100.0;
if (++i >= argc)
usage();
gamma = atof(argv[i]);
if(gamma < 0.1 || gamma > 5.0)
{
warning("gamma is out of range 0.1-5.0");
continue;
}
if (++i >= argc)
usage();
brightness = atof(argv[i]);
if(brightness < 0.0 || brightness > 99.0)
{
warning("brightness is out of range 0.0-99.0");
continue;
}
if (++i >= argc)
usage();
contrast = atof(argv[i]);
if(contrast < 1.0 || contrast > 100.0)
{
warning("contrast is out of range 1.0-100.0");
continue;
}
xcalib_state.greenMin = brightness / 100.0;
xcalib_state.greenMax =
(1.0 - xcalib_state.greenMin) * (contrast / 100.0) + xcalib_state.greenMin;
xcalib_state.greenGamma = gamma;
correction = 1;
continue;
}
/* additional blue calibration */
if (!strcmp (argv[i], "-blue")) {
double gamma = 1.0, brightness = 0.0, contrast = 100.0;
if (++i >= argc)
usage();
gamma = atof(argv[i]);
if(gamma < 0.1 || gamma > 5.0)
{
warning("gamma is out of range 0.1-5.0");
continue;
}
if (++i >= argc)
usage();
brightness = atof(argv[i]);
if(brightness < 0.0 || brightness > 99.0)
{
warning("brightness is out of range 0.0-99.0");
continue;
}
if (++i >= argc)
usage();
contrast = atof(argv[i]);
if(contrast < 1.0 || contrast > 100.0)
{
warning("contrast is out of range 1.0-100.0");
continue;
}
xcalib_state.blueMin = brightness / 100.0;
xcalib_state.blueMax =
(1.0 - xcalib_state.blueMin) * (contrast / 100.0) + xcalib_state.blueMin;
xcalib_state.blueGamma = gamma;
correction = 1;
continue;
}
if (i != argc - 1 && !clear && i) {
usage ();
}
if(!clear || !alter)
{
if(strlen(argv[i]) < 255)
strcpy (in_name, argv[i]);
else
usage ();
}
}
#ifdef _WIN32
if ((!clear || !alter) && (in_name[0] == '\0')) {
hDc = FindMonitor(screen);
win_profile_len = MAX_PATH;
win_default_profile[0] = '\0';
SetICMMode(hDc, ICM_ON);
if(GetICMProfileA(hDc, (LPDWORD) &win_profile_len, (LPSTR)win_default_profile))
{
if(strlen(win_default_profile) < 255)
strcpy (in_name, win_default_profile);
else
usage();
}
else
usage();
}
#endif
#ifndef _WIN32
/* X11 initializing */
if ((dpy = XOpenDisplay (displayname)) == NULL) {
if(!donothing)
error ("Can't open display %s", XDisplayName (displayname));
else
warning("Can't open display %s", XDisplayName (displayname));
}
else if (screen == -1)
screen = DefaultScreen (dpy);
int xrr_version = -1;
int crtc = 0;
int major_versionp = 0;
int minor_versionp = 0;
int n = 0;
Window root = RootWindow(dpy, DefaultScreen( dpy ));
XRRQueryVersion( dpy, &major_versionp, &minor_versionp );
xrr_version = major_versionp*100 + minor_versionp;
if(xrr_version >= 102)
{
XRRScreenResources * res = XRRGetScreenResources( dpy, root );
int ncrtc = 0;
n = res->noutput;
for( i = 0; i < n; ++i )
{
RROutput output = res->outputs[i];
XRROutputInfo * output_info = XRRGetOutputInfo( dpy, res,
output);
if(output_info->crtc)
if(ncrtc++ == screen)
{
crtc = output_info->crtc;
ramp_size = XRRGetCrtcGammaSize( dpy, crtc );
message ("XRandR output: \t%s\n", output_info->name);
}
XRRFreeOutputInfo( output_info ); output_info = 0;
}
//XRRFreeScreenResources(res); res = 0;
}
/* clean gamma table if option set */
gamma.red = 1.0;
gamma.green = 1.0;
gamma.blue = 1.0;
if (clear) {
#ifndef FGLRX
if(xrr_version >= 102)
{
XRRCrtcGamma * gamma = XRRAllocGamma (ramp_size);
if(!gamma)
warning ("Unable to clear screen gamma");
else
{
for(i=0; i < ramp_size; ++i)
gamma->red[i] = gamma->green[i] = gamma->blue[i] = i * 65535 / ramp_size;
XRRSetCrtcGamma (dpy, crtc, gamma);
XRRFreeGamma (gamma);
}
} else
if (!XF86VidModeSetGamma (dpy, screen, &gamma))
{
#else
for(i = 0; i < 256; i++) {
fglrx_gammaramps.RGamma[i] = i << 2;
fglrx_gammaramps.GGamma[i] = i << 2;
fglrx_gammaramps.BGamma[i] = i << 2;
}
if (!FGLRX_X11SetGammaRamp_C16native_1024(dpy, screen, controller, 256, &fglrx_gammaramps)) {
#endif
XCloseDisplay (dpy);
error ("Unable to reset display gamma");
}
goto cleanupX;
}
/* get number of entries for gamma ramps */
if(!donothing)
{
#ifndef FGLRX
if (xrr_version < 102 && !XF86VidModeGetGammaRampSize (dpy, screen, &ramp_size)) {
#else
if (!FGLRX_X11GetGammaRampSize(dpy, screen, &ramp_size)) {
#endif
XCloseDisplay (dpy);
if(!donothing)
error ("Unable to query gamma ramp size");
else {
warning ("Unable to query gamma ramp size - assuming 256");
ramp_size = 256;
}
}
}
#else /* _WIN32 */
if(!donothing) {
if(!hDc)
hDc = FindMonitor(screen);
if (clear) {
if (!SetDeviceGammaRamp(hDc, &winGammaRamp))
error ("Unable to reset display gamma");
goto cleanupX;
}
}
#endif
/* check for ramp size being a power of 2 and inside the supported range */
switch(ramp_size)
{
case 16:
case 32:
case 64:
case 128:
case 256:
case 512:
case 1024:
case 2048:
case 4096:
case 8192:
case 16384:
case 32768:
case 65536:
break;
default:
error("unsupported ramp size %u", ramp_size);
}
r_ramp = (unsigned short *) malloc (ramp_size * sizeof (unsigned short));
g_ramp = (unsigned short *) malloc (ramp_size * sizeof (unsigned short));
b_ramp = (unsigned short *) malloc (ramp_size * sizeof (unsigned short));
if(!alter)
{
if( (i = read_vcgt_internal(in_name, r_ramp, g_ramp, b_ramp, ramp_size)) <= 0) {
if(i<0)
warning ("Unable to read file '%s'", in_name);
if(i == 0)
warning ("No calibration data in ICC profile '%s' found", in_name);
free(r_ramp);
free(g_ramp);
free(b_ramp);
exit(0);
}
} else {
#ifndef _WIN32
if (xrr_version >= 102)
{
XRRCrtcGamma * gamma = 0;
if((gamma = XRRGetCrtcGamma(dpy, crtc)) != 0 )
warning ("Unable to get display calibration");
for (i = 0; i < ramp_size; i++) {
r_ramp[i] = gamma->red[i];
g_ramp[i] = gamma->green[i];
b_ramp[i] = gamma->blue[i];
}
}
else if (!XF86VidModeGetGammaRamp (dpy, screen, ramp_size, r_ramp, g_ramp, b_ramp))
warning ("Unable to get display calibration");
#else
if (!GetDeviceGammaRamp(hDc, &winGammaRamp))
warning ("Unable to get display calibration");
for (i = 0; i < ramp_size; i++) {
r_ramp[i] = winGammaRamp.Red[i];
g_ramp[i] = winGammaRamp.Green[i];
b_ramp[i] = winGammaRamp.Blue[i];
}
#endif
}
{
float redBrightness = 0.0;
float redContrast = 100.0;
float redMin = 0.0;
float redMax = 1.0;
redMin = (double)r_ramp[0] / 65535.0;
redMax = (double)r_ramp[ramp_size - 1] / 65535.0;
redBrightness = redMin * 100.0;
redContrast = (redMax - redMin) / (1.0 - redMin) * 100.0;
message("Red Brightness: %f Contrast: %f Max: %f Min: %f\n", redBrightness, redContrast, redMax, redMin);
}
{
float greenBrightness = 0.0;
float greenContrast = 100.0;
float greenMin = 0.0;
float greenMax = 1.0;
greenMin = (double)g_ramp[0] / 65535.0;
greenMax = (double)g_ramp[ramp_size - 1] / 65535.0;
greenBrightness = greenMin * 100.0;
greenContrast = (greenMax - greenMin) / (1.0 - greenMin) * 100.0;
message("Green Brightness: %f Contrast: %f Max: %f Min: %f\n", greenBrightness, greenContrast, greenMax, greenMin);
}
{
float blueBrightness = 0.0;
float blueContrast = 100.0;
float blueMin = 0.0;
float blueMax = 1.0;
blueMin = (double)b_ramp[0] / 65535.0;
blueMax = (double)b_ramp[ramp_size - 1] / 65535.0;
blueBrightness = blueMin * 100.0;
blueContrast = (blueMax - blueMin) / (1.0 - blueMin) * 100.0;
message("Blue Brightness: %f Contrast: %f Max: %f Min: %f\n", blueBrightness, blueContrast, blueMax, blueMin);
}
if(correction != 0)
{
for(i=0; i<ramp_size; i++)
{
r_ramp[i] = 65536.0 * (((double) pow (((double) r_ramp[i]/65536.0),
xcalib_state.redGamma * (double) xcalib_state.gamma_cor
) * (xcalib_state.redMax - xcalib_state.redMin)) + xcalib_state.redMin);
g_ramp[i] = 65536.0 * (((double) pow (((double) g_ramp[i]/65536.0),
xcalib_state.greenGamma * (double) xcalib_state.gamma_cor
) * (xcalib_state.greenMax - xcalib_state.greenMin)) + xcalib_state.greenMin);
b_ramp[i] = 65536.0 * (((double) pow (((double) b_ramp[i]/65536.0),
xcalib_state.blueGamma * (double) xcalib_state.gamma_cor
) * (xcalib_state.blueMax - xcalib_state.blueMin)) + xcalib_state.blueMin);
}
message("Altering Red LUTs with Gamma %f Min %f Max %f\n",
xcalib_state.redGamma, xcalib_state.redMin, xcalib_state.redMax);
message("Altering Green LUTs with Gamma %f Min %f Max %f\n",
xcalib_state.greenGamma, xcalib_state.greenMin, xcalib_state.greenMax);
message("Altering Blue LUTs with Gamma %f Min %f Max %f\n",
xcalib_state.blueGamma, xcalib_state.blueMin, xcalib_state.blueMax);
}
if(!invert) {
/* ramps should be monotonic - otherwise content is nonsense! */
for (i = 0; i < ramp_size - 1; i++) {
if (r_ramp[i + 1] < r_ramp[i])
warning ("red gamma table not monotonic");
if (g_ramp[i + 1] < g_ramp[i])
warning ("green gamma table not monotonic");
if (b_ramp[i + 1] < b_ramp[i])
warning ("blue gamma table not monotonic");
}
} else {
for (i = 0; i < ramp_size; i++) {
if(i >= ramp_size / 2)
break;
tmpRampVal = r_ramp[i];
r_ramp[i] = r_ramp[ramp_size - i - 1];
r_ramp[ramp_size - i - 1] = tmpRampVal;
tmpRampVal = g_ramp[i];
g_ramp[i] = g_ramp[ramp_size - i - 1];
g_ramp[ramp_size - i - 1] = tmpRampVal;
tmpRampVal = b_ramp[i];
b_ramp[i] = b_ramp[ramp_size - i - 1];
b_ramp[ramp_size - i - 1] = tmpRampVal;
}
}
if(calcloss) {
fprintf(stdout, "Resolution loss for %d entries:\n", ramp_size);
r_res = 0;
g_res = 0;
b_res = 0;
tmpRampVal = 0xffff;
for(i = 0; i < ramp_size; i++) {
if ((r_ramp[i] & 0xff00) != (tmpRampVal & 0xff00)) {
r_res++;
}
tmpRampVal = r_ramp[i];
}
tmpRampVal = 0xffff;
for(i = 0; i < ramp_size; i++) {
if ((g_ramp[i] & 0xff00) != (tmpRampVal & 0xff00)) {
g_res++;
}
tmpRampVal = g_ramp[i];
}
tmpRampVal = 0xffff;
for(i = 0; i < ramp_size; i++) {
if ((b_ramp[i] & 0xff00) != (tmpRampVal & 0xff00)) {
b_res++;
}
tmpRampVal = b_ramp[i];
}
fprintf(stdout, "R: %d\tG: %d\t B: %d\t colors lost\n", ramp_size - r_res, ramp_size - g_res, ramp_size - b_res );
}
#ifdef _WIN32
for (i = 0; i < ramp_size; i++) {
winGammaRamp.Red[i] = r_ramp[i];
winGammaRamp.Green[i] = g_ramp[i];
winGammaRamp.Blue[i] = b_ramp[i];
}
#endif
if(printramps)
for(i=0; i<ramp_size; i++)
fprintf(stdout,"%d %d %d\n", r_ramp[i], g_ramp[i], b_ramp[i]);
if(!donothing) {
/* write gamma ramp to X-server */
#ifndef _WIN32
# ifdef FGLRX
for(i = 0; i < ramp_size; i++) {
fglrx_gammaramps.RGamma[i] = r_ramp[i] >> 6;
fglrx_gammaramps.GGamma[i] = g_ramp[i] >> 6;
fglrx_gammaramps.BGamma[i] = b_ramp[i] >> 6;
}
if (!FGLRX_X11SetGammaRamp_C16native_1024(dpy, screen, controller, ramp_size, &fglrx_gammaramps))
# else
if(xrr_version >= 102)
{
XRRCrtcGamma * gamma = XRRAllocGamma (ramp_size);
if(!gamma)
warning ("Unable to calibrate display");
else
{
for(i=0; i < ramp_size; ++i)
{
gamma->red[i] = r_ramp[i];
gamma->green[i] = g_ramp[i];
gamma->blue[i] = b_ramp[i];
}
XRRSetCrtcGamma (dpy, crtc, gamma);
XRRFreeGamma (gamma);
}
} else
if (!XF86VidModeSetGammaRamp (dpy, screen, ramp_size, r_ramp, g_ramp, b_ramp))
# endif
#else
if (!SetDeviceGammaRamp(hDc, &winGammaRamp))
#endif
warning ("Unable to calibrate display");
}
message ("X-LUT size: \t%d\n", ramp_size);
free(r_ramp);
free(g_ramp);
free(b_ramp);
cleanupX:
#ifndef _WIN32
if(dpy)
if(!donothing)
XCloseDisplay (dpy);
#endif
return 0;
}
/* Basic printf type error() and warning() routines */
/* errors are printed to stderr */
void
error (char *fmt, ...)
{
va_list args;
fprintf (stderr, "Error - ");
va_start (args, fmt);
vfprintf (stderr, fmt, args);
va_end (args);
fprintf (stderr, "\n");
exit (-1);
}
/* warnings are printed to stdout */
void
warning (char *fmt, ...)
{
va_list args;
fprintf (stdout, "Warning - ");
va_start (args, fmt);
vfprintf (stdout, fmt, args);
va_end (args);
fprintf (stdout, "\n");
}
