enlightenment/enlightenment
enlightenment
/
enlightenment
10
9
Fork 12
Code Issues 24 Pull Requests 2 Projects Releases Wiki Activity
enlightenment/src/bin/e_randr.c

1420 lines
43 KiB
C
Raw Blame History

#include "e.h"
/* TODO: Handle orientation in stored config */
/* TODO: Ignore xrandr events triggered by changes in acpi cb */
/* TODO: Clone mode */
/* TODO: Lid at (x, y) == (0, 0) always */
/* TODO: Implement left-of, right-of, above and below placement relative for outputs */
/* local function prototypes */
static Eina_Bool _e_randr_config_load(void);
static void _e_randr_config_new(void);
static void _e_randr_config_free(void);
static void _e_randr_free(void);
static Eina_Bool _e_randr_config_cb_timer(void *data);
static void _e_randr_load(void);
static void _e_randr_apply(void);
static void _e_randr_output_mode_update(E_Randr_Output *cfg);
static E_Config_Randr_Output *_e_randr_config_output_new(void);
static E_Config_Randr_Output *_e_randr_config_output_find(E_Randr_Output *output);
static E_Randr_Crtc *_e_randr_crtc_find(Ecore_X_Randr_Crtc xid);
static E_Randr_Output *_e_randr_output_find(Ecore_X_Randr_Output xid);
static void _e_randr_output_crtc_find(E_Randr_Output *output);
static void _e_randr_config_mode_geometry(Ecore_X_Randr_Orientation orient, Eina_Rectangle *rect);
static void _e_randr_config_primary_update(void);
static Eina_Bool _e_randr_event_cb_screen_change(void *data, int type, void *event);
static Eina_Bool _e_randr_event_cb_crtc_change(void *data, int type, void *event);
static Eina_Bool _e_randr_event_cb_output_change(void *data, int type, void *event);
static void _e_randr_acpi_handler_add(void *data);
static int _e_randr_is_lid(E_Randr_Output *cfg);
static void _e_randr_crtc_from_outputs_set(E_Randr_Crtc *crtc);
static Eina_Bool _e_randr_lid_update(void);
static Eina_Bool _e_randr_output_mode_valid(Ecore_X_Randr_Mode mode, Ecore_X_Randr_Mode *modes, int nmodes);
static void _e_randr_output_active_set(E_Randr_Output *output, Eina_Bool connected);
//static int _e_randr_config_output_cmp(const void *a, const void *b);
static char *_e_randr_output_name_get(Ecore_X_Window root, Ecore_X_Randr_Output output);
/* local variables */
static Eina_List *_randr_event_handlers = NULL;
static E_Config_DD *_e_randr_edd = NULL;
static E_Config_DD *_e_randr_output_edd = NULL;
static int _e_randr_lid_is_closed = 0;
/* external variables */
EAPI E_Config_Randr *e_randr_cfg = NULL;
EAPI E_Randr *e_randr = NULL;
/* private internal functions */
EINTERN Eina_Bool
e_randr_init(void)
{
/* check if randr is available */
if (!ecore_x_randr_query()) return EINA_FALSE;
/* get initial lid status */
_e_randr_lid_is_closed = (e_acpi_lid_status_get() == E_ACPI_LID_CLOSED);
/* try to load config */
if (!_e_randr_config_load())
{
/* NB: We should probably print an error here */
return EINA_FALSE;
}
/* tell randr that we are interested in receiving events
*
* NB: Requires RandR >= 1.2 */
if (ecore_x_randr_version_get() >= E_RANDR_VERSION_1_2)
{
Ecore_X_Window root = 0;
if ((root = ecore_x_window_root_first_get()))
ecore_x_randr_events_select(root, EINA_TRUE);
/* setup randr event listeners */
E_LIST_HANDLER_APPEND(_randr_event_handlers,
ECORE_X_EVENT_SCREEN_CHANGE,
_e_randr_event_cb_screen_change, NULL);
E_LIST_HANDLER_APPEND(_randr_event_handlers,
ECORE_X_EVENT_RANDR_CRTC_CHANGE,
_e_randr_event_cb_crtc_change, NULL);
E_LIST_HANDLER_APPEND(_randr_event_handlers,
ECORE_X_EVENT_RANDR_OUTPUT_CHANGE,
_e_randr_event_cb_output_change, NULL);
}
/* delay setting up acpi handler, as acpi is init'ed after randr */
ecore_job_add(_e_randr_acpi_handler_add, NULL);
return EINA_TRUE;
}
EINTERN int
e_randr_shutdown(void)
{
/* check if randr is available */
if (!ecore_x_randr_query()) return 1;
if (ecore_x_randr_version_get() >= E_RANDR_VERSION_1_2)
{
Ecore_X_Window root = 0;
/* tell randr that we are not interested in receiving events anymore */
if ((root = ecore_x_window_root_first_get()))
ecore_x_randr_events_select(root, EINA_FALSE);
}
/* remove event listeners */
E_FREE_LIST(_randr_event_handlers, ecore_event_handler_del);
/* free config */
_e_randr_free();
_e_randr_config_free();
/* free edd */
E_CONFIG_DD_FREE(_e_randr_output_edd);
E_CONFIG_DD_FREE(_e_randr_edd);
return 1;
}
/* public API functions */
EAPI Eina_Bool
e_randr_config_save(void)
{
/* save the new config */
return e_config_domain_save("e_randr", _e_randr_edd, e_randr_cfg);
}
EAPI void
e_randr_config_apply(void)
{
Eina_List *l;
E_Randr_Output *output;
/* Update output mode */
EINA_LIST_FOREACH(e_randr->outputs, l, output)
{
printf("RR: apply out %p... [%s]\n", output, output->name);
if ((output->cfg) && (!output->cfg->connect))
{
printf("RR: output disabled\n");
_e_randr_output_active_set(output, EINA_FALSE);
}
else if ((output->cfg) && (output->status == ECORE_X_RANDR_CONNECTION_STATUS_CONNECTED))
{
if (output->cfg)
{
printf("RR: output enabled [%i %i %ix%i | %2.3f orient %i]\n",
output->cfg->geo.x, output->cfg->geo.y,
output->cfg->geo.w, output->cfg->geo.h,
output->cfg->refresh_rate, output->cfg->orient);
printf("RR: update mode\n");
_e_randr_output_mode_update(output);
printf("RR: active set...\n");
_e_randr_output_active_set(output, EINA_TRUE);
printf("RR: active set done\n");
}
else
printf("RR: no cfg\n");
}
else
{
printf("RR: ???\n");
}
}
printf("RR: ... lid update\n");
/* update lid status */
_e_randr_lid_update();
printf("RR: randr apply...\n");
/* apply randr settings */
_e_randr_apply();
printf("RR: update primary...\n");
/* update primary output */
_e_randr_config_primary_update();
}
EAPI double
e_randr_mode_refresh_rate_get(Ecore_X_Randr_Mode_Info *mode)
{
double rate = 0.0;
if (mode)
{
if ((mode->hTotal) && (mode->vTotal))
rate = ((double)mode->dotClock /
((double)mode->hTotal * (double)mode->vTotal));
rate = round(rate);
}
return rate;
}
/* local functions */
static Eina_Bool
_e_randr_config_load(void)
{
Eina_Bool do_restore = EINA_TRUE;
/* define edd for output config */
_e_randr_output_edd =
E_CONFIG_DD_NEW("E_Config_Randr_Output", E_Config_Randr_Output);
#undef T
#undef D
#define T E_Config_Randr_Output
#define D _e_randr_output_edd
E_CONFIG_VAL(D, T, name, STR);
E_CONFIG_VAL(D, T, edid, STR);
E_CONFIG_VAL(D, T, orient, UINT);
E_CONFIG_VAL(D, T, geo.x, INT);
E_CONFIG_VAL(D, T, geo.y, INT);
E_CONFIG_VAL(D, T, geo.w, INT);
E_CONFIG_VAL(D, T, geo.h, INT);
E_CONFIG_VAL(D, T, refresh_rate, DOUBLE);
E_CONFIG_VAL(D, T, connect, UCHAR);
/* define edd for randr config */
_e_randr_edd = E_CONFIG_DD_NEW("E_Config_Randr", E_Config_Randr);
#undef T
#undef D
#define T E_Config_Randr
#define D _e_randr_edd
E_CONFIG_VAL(D, T, version, INT);
E_CONFIG_LIST(D, T, outputs, _e_randr_output_edd);
E_CONFIG_VAL(D, T, restore, UCHAR);
E_CONFIG_VAL(D, T, config_timestamp, ULL);
// TODO: primary must be name + edid
E_CONFIG_VAL(D, T, primary, UINT);
/* try to load the randr config */
if ((e_randr_cfg = e_config_domain_load("e_randr", _e_randr_edd)))
{
/* check randr config version */
if (e_randr_cfg->version < (E_RANDR_CONFIG_FILE_EPOCH * 1000000))
{
/* config is too old */
do_restore = EINA_FALSE;
_e_randr_config_free();
ecore_timer_add(1.0, _e_randr_config_cb_timer,
_("Settings data needed upgrading. Your old settings have<br>"
"been wiped and a new set of defaults initialized. This<br>"
"will happen regularly during development, so don't report a<br>"
"bug. This simply means Enlightenment needs new settings<br>"
"data by default for usable functionality that your old<br>"
"settings simply lack. This new set of defaults will fix<br>"
"that by adding it in. You can re-configure things now to your<br>"
"liking. Sorry for the hiccup in your settings.<br>"));
}
else if (e_randr_cfg->version > E_RANDR_CONFIG_FILE_VERSION)
{
/* config is too new */
do_restore = EINA_FALSE;
_e_randr_config_free();
ecore_timer_add(1.0, _e_randr_config_cb_timer,
_("Your settings are NEWER than Enlightenment. This is very<br>"
"strange. This should not happen unless you downgraded<br>"
"Enlightenment or copied the settings from a place where<br>"
"a newer version of Enlightenment was running. This is bad and<br>"
"as a precaution your settings have been now restored to<br>"
"defaults. Sorry for the inconvenience.<br>"));
}
}
/* if config was too old or too new, then reload a fresh one */
if (!e_randr_cfg)
{
_e_randr_config_new();
do_restore = EINA_FALSE;
}
else
{
#define CONFIG_VERSION_CHECK(VERSION) \
if (e_randr_cfg->version - (E_RANDR_CONFIG_FILE_EPOCH * 1000000) < (VERSION))
CONFIG_VERSION_CHECK(4)
{
E_Config_Randr_Output *output;
Eina_List *l;
/* Set refresh_rate to 60 */
EINA_LIST_FOREACH(e_randr_cfg->outputs, l, output)
if (dblequal(output->refresh_rate, 0.0)) output->refresh_rate = 60.0;
}
}
if (!e_randr_cfg) return EINA_FALSE;
_e_randr_load();
e_randr_config_save();
if ((do_restore) && (e_randr_cfg->restore))
{
_e_randr_apply();
}
return EINA_TRUE;
}
static void
_e_randr_config_new(void)
{
Ecore_X_Window root = 0;
/* create new randr cfg */
if (!(e_randr_cfg = E_NEW(E_Config_Randr, 1)))
return;
/* grab the root window once */
root = ecore_x_window_root_first_get();
/* set version */
e_randr_cfg->version = E_RANDR_CONFIG_FILE_VERSION;
/* by default, restore config */
e_randr_cfg->restore = EINA_TRUE;
/* remember current primary */
e_randr_cfg->primary = ecore_x_randr_primary_output_get(root);
/* update recorded config timestamp */
e_randr_cfg->config_timestamp = ecore_x_randr_config_timestamp_get(root);
}
static void
_e_randr_config_free(void)
{
E_Config_Randr_Output *output = NULL;
/* safety check */
if (!e_randr_cfg) return;
/* loop the config outputs and free them */
EINA_LIST_FREE(e_randr_cfg->outputs, output)
{
E_FREE(output);
}
/* free the config */
E_FREE(e_randr_cfg);
}
static void
_e_randr_free(void)
{
E_Randr_Crtc *crtc = NULL;
E_Randr_Output *output = NULL;
/* safety check */
if (!e_randr) return;
/* loop the crtcs and free them */
EINA_LIST_FREE(e_randr->crtcs, crtc)
{
free(crtc);
}
/* loop the outputs and free them */
EINA_LIST_FREE(e_randr->outputs, output)
{
free(output->name);
free(output->edid);
free(output);
}
/* free the config */
E_FREE(e_randr);
}
static Eina_Bool
_e_randr_config_cb_timer(void *data)
{
e_util_dialog_show(_("Randr Settings Upgraded"), "%s", (char *)data);
return EINA_FALSE;
}
static char *
_e_randr_output_edid_string_get(Ecore_X_Window root, Ecore_X_Randr_Output output)
{
unsigned char *edid = NULL;
unsigned long edid_len = 0;
char *edid_str = NULL;
edid = ecore_x_randr_output_edid_get(root, output, &edid_len);
if (edid)
{
unsigned int k, kk;
edid_str = malloc((edid_len * 2) + 1);
if (edid_str)
{
const char *hexch = "0123456789abcdef";
for (kk = 0, k = 0; k < edid_len; k++)
{
edid_str[kk ] = hexch[(edid[k] >> 4) & 0xf];
edid_str[kk + 1] = hexch[ edid[k] & 0xf];
kk += 2;
}
edid_str[kk] = 0;
}
free(edid);
}
return edid_str;
}
/* function to map X's settings with E's settings */
static void
_e_randr_load(void)
{
Ecore_X_Window root = 0;
Ecore_X_Randr_Output *outputs = NULL;
int noutputs = 0;
Ecore_X_Randr_Crtc *crtcs = NULL;
int ncrtcs = 0, i = 0;
e_randr = E_NEW(E_Randr, 1);
if (!e_randr) return;
/* grab the root window once */
root = ecore_x_window_root_first_get();
/* try to get the list of crtcs from x */
if ((crtcs = ecore_x_randr_crtcs_get(root, &ncrtcs)))
{
/* loop the crtcs */
for (i = 0; i < ncrtcs; i++)
{
E_Randr_Crtc *crtc;
Ecore_X_Randr_Crtc_Info *cinfo;
crtc = E_NEW(E_Randr_Crtc, 1);
if (!crtc) continue;
e_randr->crtcs = eina_list_append(e_randr->crtcs, crtc);
crtc->xid = crtcs[i];
/* get crtc info from X */
if ((cinfo = ecore_x_randr_crtc_info_get(root, crtc->xid)))
{
crtc->geo.x = cinfo->x;
crtc->geo.y = cinfo->y;
crtc->geo.w = cinfo->width;
crtc->geo.h = cinfo->height;
crtc->mode = cinfo->mode;
crtc->orient = cinfo->rotation;
ecore_x_randr_crtc_info_free(cinfo);
}
printf("RR: crtc found %x | %i %i %ix%i - %x . %i\n",
crtc->xid,
crtc->geo.x, crtc->geo.y, crtc->geo.w, crtc->geo.h,
crtc->mode, crtc->orient);
}
free(crtcs);
}
printf("RR: ====================\n");
/* try to get the list of outputs from x */
if ((outputs = ecore_x_randr_outputs_get(root, &noutputs)))
{
int j = 0;
for (j = 0; j < noutputs; j++)
{
E_Randr_Output *output = NULL;
Eina_Bool unknown = EINA_FALSE;
output = E_NEW(E_Randr_Output, 1);
if (!output) continue;
e_randr->outputs = eina_list_append(e_randr->outputs, output);
output->xid = outputs[j];
output->name = _e_randr_output_name_get(root, output->xid);
output->is_lid = _e_randr_is_lid(output);
output->edid = _e_randr_output_edid_string_get(root, outputs[j]);
output->status = ecore_x_randr_output_connection_status_get(root, output->xid);
output->cfg = _e_randr_config_output_find(output);
if (!output->cfg)
{
output->cfg = _e_randr_config_output_new();
if (output->name) output->cfg->name = strdup(output->name);
if (output->edid) output->cfg->edid = strdup(output->edid);
unknown = EINA_TRUE;
}
printf("RR: output %x %s %i %p\n", output->xid, output->name, output->status, output->cfg);
/* find a crtc if we want this output connected */
if (output->cfg->connect &&
(output->status == ECORE_X_RANDR_CONNECTION_STATUS_CONNECTED))
{
_e_randr_output_active_set(output, EINA_TRUE);
if (output->crtc)
{
printf("RR: ouput on crtc = %p\n", output->crtc);
/* get orientation from crtc if not set */
if (!output->cfg->orient)
output->cfg->orient = output->crtc->orient;
/* find mode for output */
_e_randr_output_mode_update(output);
/* set position from crtc if unknown */
if (unknown)
{
output->cfg->geo.x = output->crtc->geo.x;
output->cfg->geo.y = output->crtc->geo.y;
}
}
}
}
free(outputs);
}
/* update lid status */
_e_randr_lid_update();
/* update primary output */
_e_randr_config_primary_update();
/* update recorded config timestamp */
e_randr_cfg->config_timestamp = ecore_x_randr_config_timestamp_get(root);
/* save the config */
e_randr_config_save();
}
static void
_e_randr_apply(void)
{
E_Randr_Crtc *crtc;
Eina_List *l;
Ecore_X_Window root = 0;
int nw = 0, nh = 0;
int minw = 0, minh = 0;
int maxw = 0, maxh = 0;
int nx = INT_MAX, ny = INT_MAX;
/* don't try to restore if we have fake screens */
if (e_xinerama_fake_screens_exist()) return;
/* grab the X server so that we can apply settings without triggering
* any randr event updates until we are done */
ecore_x_grab();
/* get the root window */
root = ecore_x_window_root_first_get();
/* get the min and max screen size */
ecore_x_randr_screen_size_range_get(root, &minw, &minh, &maxw, &maxh);
printf("RRR0: size range: %ix%i -> %ix%i\n", minw, minh, maxw, maxh);
nx = maxw;
ny = maxh;
nw = nh = 0;
EINA_LIST_FOREACH(e_randr->crtcs, l, crtc)
{
int x = 0, y = 0, w = 0, h = 0;
Ecore_X_Randr_Orientation orient = ECORE_X_RANDR_ORIENTATION_ROT_0;
Eina_Rectangle rect;
printf("RRR0: crtc: %x %i %i %ix%i rot: %i mode: %i\n", crtc->xid, crtc->geo.x, crtc->geo.y, crtc->geo.w, crtc->geo.h, crtc->orient, crtc->mode);
if (!crtc->outputs) continue;
_e_randr_crtc_from_outputs_set(crtc);
if (crtc->mode == 0) continue;
x = crtc->geo.x;
y = crtc->geo.y;
orient = crtc->orient;
rect = crtc->geo;
_e_randr_config_mode_geometry(orient, &rect);
w = rect.w;
h = rect.h;
if (((x + w) > maxw) || ((y + h) > maxh)) continue;
if ((x + w) > nw) nw = x + w;
if ((y + h) > nh) nh = y + h;
if (x < nx) nx = x;
if (y < ny) ny = y;
}
/* Adjust size according to origo */
nw -= nx;
nh -= ny;
/* apply the new screen size */
printf("RRR1: current screen size: %ix%i\n", nw, nh);
ecore_x_randr_screen_current_size_set(root, nw, nh, -1, -1);
nx = ny = nw = nh = 0;
/* loop our lists of crtcs */
EINA_LIST_FOREACH(e_randr->crtcs, l, crtc)
{
E_Randr_Output *output;
Eina_List *ll;
int x = 0, y = 0, w = 0, h = 0;
Ecore_X_Randr_Mode mode = 0;
Ecore_X_Randr_Orientation orient = ECORE_X_RANDR_ORIENTATION_ROT_0;
Eina_Rectangle rect;
int count = 0;
Ecore_X_Randr_Output *coutputs;
printf("RRR2: crtc: %x %i %i %ix%i rot: %i mode: %i\n", crtc->xid, crtc->geo.x, crtc->geo.y, crtc->geo.w, crtc->geo.h, crtc->orient, crtc->mode);
if (!crtc->outputs)
{
printf("RRR2: no outputs - off\n");
ecore_x_randr_crtc_settings_set(root, crtc->xid, NULL, 0, 0, 0, 0,
ECORE_X_RANDR_ORIENTATION_ROT_0);
continue;
}
/* set config from connected outputs */
_e_randr_crtc_from_outputs_set(crtc);
x = crtc->geo.x;
y = crtc->geo.y;
mode = crtc->mode;
orient = crtc->orient;
/* at this point, we should have geometry, mode and orientation.
* we can now proceed to calculate crtc size */
rect = crtc->geo;
_e_randr_config_mode_geometry(orient, &rect);
w = rect.w;
h = rect.h;
/* if the crtc does not fit, disable it */
if (((x + w) > maxw) || ((y + h) > maxh) || (mode == 0))
{
printf("RRR2: crtc dose not fit - off\n");
ecore_x_randr_crtc_settings_set(root, crtc->xid, NULL, 0, 0, 0, 0,
ECORE_X_RANDR_ORIENTATION_ROT_0);
continue;
}
/* find outputs to enable on crtc */
coutputs = calloc(eina_list_count(crtc->outputs), sizeof(Ecore_X_Randr_Output));
if (!coutputs)
{
printf("RRR2: cannot alloc coutputs\n");
continue;
}
EINA_LIST_FOREACH(crtc->outputs, ll, output)
{
/* TODO: If this condition isn't true, the output should not be in crtc->outputs.
* crtc->outputs should only contain valid outputs */
if ((output->cfg) && (output->crtc == crtc) && (output->mode) &&
(output->status == ECORE_X_RANDR_CONNECTION_STATUS_CONNECTED))
{
int i;
Eina_Bool ok;
ok = EINA_TRUE;
/* TODO: This is wrong, one output shouldn't be twice in crtc list */
for (i = 0; i < count; i++)
{
if (coutputs[i] == output->xid)
{
ok = EINA_FALSE;
printf("RRR: Error, same output twice on crtc.");
printf(" output: '%s' lid: %i active: %i status: %i\n", output->name, output->is_lid, output->active, output->status);
break;
}
}
if (ok)
{
printf("RRR2: add output %s\n", output->name);
coutputs[count] = output->xid;
count++;
}
}
}
printf("RRR2: set mode %x | %i %i %ix%i | %x | %i\n",
crtc->xid,
crtc->geo.x, crtc->geo.y, crtc->geo.w, crtc->geo.h,
crtc->mode, crtc->orient);
/* apply our stored crtc settings */
if (count > 0)
ecore_x_randr_crtc_settings_set(root, crtc->xid, coutputs,
count, crtc->geo.x, crtc->geo.y,
crtc->mode, crtc->orient);
else
{
printf("RRR2: no coutputs - off\n");
ecore_x_randr_crtc_settings_set(root, crtc->xid, NULL, 0, 0, 0, 0,
ECORE_X_RANDR_ORIENTATION_ROT_0);
}
/* cleanup */
free(coutputs);
}
/* this moves screen to (0, 0) */
ecore_x_randr_screen_reset(root);
/* release the server grab */
ecore_x_ungrab();
}
static Eina_Bool
_e_randr_event_cb_screen_change(void *data EINA_UNUSED, int type EINA_UNUSED, void *event)
{
Ecore_X_Event_Screen_Change *ev;
Eina_Bool changed = EINA_FALSE;
Ecore_X_Randr_Output primary = 0;
ev = event;
/* check if this event's root window is Our root window */
if (ev->root != e_manager_current_get()->root)
return ECORE_CALLBACK_RENEW;
primary = ecore_x_randr_primary_output_get(ev->root);
if (e_randr_cfg->primary != primary)
{
e_randr_cfg->primary = primary;
changed = EINA_TRUE;
}
if (e_randr_cfg->config_timestamp != ev->config_time)
{
e_randr_cfg->config_timestamp = ev->config_time;
changed = EINA_TRUE;
}
if (changed) e_randr_config_save();
return ECORE_CALLBACK_RENEW;
}
static Eina_Bool
_e_randr_event_cb_crtc_change(void *data EINA_UNUSED, int type EINA_UNUSED, void *event)
{
Ecore_X_Event_Randr_Crtc_Change *ev;
E_Randr_Crtc *crtc;
ev = event;
crtc = _e_randr_crtc_find(ev->crtc);
if (!crtc)
{
crtc = E_NEW(E_Randr_Crtc, 1);
if (crtc)
{
e_randr->crtcs = eina_list_append(e_randr->crtcs, crtc);
crtc->xid = ev->crtc;
crtc->geo = ev->geo;
crtc->mode = ev->mode;
crtc->orient = ev->orientation;
}
}
else
{
/* check (and update if needed) our crtc config */
if ((ev->mode != crtc->mode) ||
(ev->orientation != crtc->orient) ||
(ev->geo.x != crtc->geo.x) || (ev->geo.y != crtc->geo.y) ||
(ev->geo.w != crtc->geo.w) || (ev->geo.h != crtc->geo.h))
{
crtc->mode = ev->mode;
crtc->orient = ev->orientation;
crtc->geo = ev->geo;
}
}
return ECORE_CALLBACK_RENEW;
}
static Eina_Bool
_e_randr_event_cb_output_change(void *data EINA_UNUSED, int type EINA_UNUSED, void *event)
{
Ecore_X_Event_Randr_Output_Change *ev;
E_Randr_Output *output;
Eina_Bool changed = EINA_FALSE;
ev = event;
/* check if this event's root window is Our root window */
if (ev->win != e_manager_current_get()->root)
return ECORE_CALLBACK_RENEW;
/* loop our crtcs and try to find this output */
output = _e_randr_output_find(ev->output);
if (!output)
{
Ecore_X_Window root;
root = ecore_x_window_root_first_get();
output = E_NEW(E_Randr_Output, 1);
if (!output) goto error;
e_randr->outputs = eina_list_append(e_randr->outputs, output);
output->xid = ev->output;
output->name = _e_randr_output_name_get(root, output->xid);
output->is_lid = _e_randr_is_lid(output);
output->edid = _e_randr_output_edid_string_get(root, ev->output);
changed = EINA_TRUE;
output->cfg = _e_randr_config_output_find(output);
if (!output->cfg)
{
output->cfg = _e_randr_config_output_new();
if (output->name) output->cfg->name = strdup(output->name);
if (output->edid) output->cfg->edid = strdup(output->edid);
}
}
output->status = ev->connection;
/* we know this output */
if (output->is_lid && _e_randr_lid_is_closed)
{
/* ignore event from disconnected lid */
}
else if (ev->connection == ECORE_X_RANDR_CONNECTION_STATUS_CONNECTED)
{
Eina_Bool unknown = EINA_FALSE;
if ((!output->crtc) || (output->crtc->xid == 0)) unknown = EINA_TRUE;
/* connected */
if ((ev->crtc != 0) && ((!unknown) && (output->crtc->xid != ev->crtc)))
{
/* remove from old crtc */
_e_randr_output_active_set(output, EINA_FALSE);
}
if ((!output->active) && (output->cfg->connect))
{
_e_randr_output_active_set(output, EINA_TRUE);
if (output->crtc)
{
/* connect to crtc */
/* get orientation from crtc if not set */
if (!output->cfg->orient)
output->cfg->orient = output->crtc->orient;
/* validate output mode */
_e_randr_output_mode_update(output);
/* if unknown position at far right */
if (unknown)
{
E_Randr_Output *other;
Eina_List *l;
EINA_LIST_FOREACH(e_randr->outputs, l, other)
{
if ((other == output) || (!output->active)) continue;
if ((other->cfg->geo.x + other->cfg->geo.w) > output->cfg->geo.x)
output->cfg->geo.x = other->cfg->geo.x + other->cfg->geo.w;
}
}
}
changed = EINA_TRUE;
}
}
else if (ev->connection == ECORE_X_RANDR_CONNECTION_STATUS_DISCONNECTED)
{
/* disconnected */
if (output->active)
{
_e_randr_output_active_set(output, EINA_FALSE);
changed = EINA_TRUE;
}
}
/* save the config if anything changed or we added a new one */
if (changed)
{
_e_randr_lid_update();
_e_randr_config_primary_update();
_e_randr_apply();
e_randr_config_save();
}
return ECORE_CALLBACK_RENEW;
error:
free(output);
return ECORE_CALLBACK_RENEW;
}
static Eina_Bool
_e_randr_event_cb_acpi(void *data EINA_UNUSED, int type EINA_UNUSED, void *event)
{
E_Event_Acpi *ev;
ev = event;
if (ev->type == E_ACPI_TYPE_LID)
{
Eina_Bool changed;
_e_randr_lid_is_closed = (ev->status == E_ACPI_LID_CLOSED);
changed = _e_randr_lid_update();
if (changed)
{
/* force new evaluation of primary */
e_randr_cfg->primary = 0;
_e_randr_config_primary_update();
_e_randr_apply();
}
}
return ECORE_CALLBACK_RENEW;
}
static void
_e_randr_output_mode_update(E_Randr_Output *output)
{
Ecore_X_Window root = 0;
Ecore_X_Randr_Mode *modes = NULL;
int nmodes = 0, pref = 0;
Ecore_X_Randr_Mode_Info **mode_infos = NULL;
int nmode_infos = 0;
int i = 0;
/* grab the root window */
root = ecore_x_window_root_first_get();
printf("RR: ... 1 - %s\n", output->name);
/* get mode infos */
mode_infos = ecore_x_randr_modes_info_get(root, &nmode_infos);
if (nmode_infos == 0) goto error;
printf("RR: ... 2\n");
/* get the list of modes for this output */
modes = ecore_x_randr_output_modes_get(root, output->xid, &nmodes, &pref);
if (nmodes == 0) goto error;
printf("RR: ... 3\n");
/* try to find the matching mode */
output->mode = 0;
if ((output->cfg->geo.w != 0) && (output->cfg->geo.h != 0))
{
printf("RR: ... 4\n");
for (i = 0; i < nmode_infos; i++)
{
double rate = 0.0;
rate = e_randr_mode_refresh_rate_get(mode_infos[i]);
printf("RR: ... 4.1 ... %i %1.3f cfg=%p modes=%p nmodes=%i\n", i, rate, output->cfg, modes, nmodes);
if ((mode_infos[i]->width == (unsigned int)output->cfg->geo.w) &&
(mode_infos[i]->height == (unsigned int)output->cfg->geo.h) &&
(dblequal(rate, output->cfg->refresh_rate)) &&
(_e_randr_output_mode_valid(mode_infos[i]->xid, modes, nmodes)))
{
printf("RR: ... 4.2 - match %ix%i @ %2.3f\n", output->cfg->geo.w, output->cfg->geo.h, rate);
output->mode = mode_infos[i]->xid;
break;
}
printf("RR: ... 4.3\n");
}
}
printf("RR: ... 5\n");
/* see if we can use the mode of the crtc */
if ((!output->mode) && (output->crtc))
{
E_Randr_Crtc *crtc;
crtc = _e_randr_crtc_find(ecore_x_randr_output_crtc_get(root, output->xid));
printf("RR: ... 6\n");
if (crtc && crtc->mode)
{
printf("RR: ... 6.1\n");
if (_e_randr_output_mode_valid(crtc->mode, modes, nmodes))
output->mode = crtc->mode;
/* TODO: See if we have a mode of the same size with another mode id */
}
}
printf("RR: ... 7\n");
/* set preferred mode */
if (!output->mode)
{
printf("RR: ... 8\n");
if (pref > 0) output->mode = modes[pref - 1];
else output->mode = modes[0];
}
/* set width and height from mode */
for (i = 0; i < nmode_infos; i++)
{
printf("RR: ... 9\n");
if (mode_infos[i]->xid == output->mode)
{
output->cfg->geo.w = mode_infos[i]->width;
output->cfg->geo.h = mode_infos[i]->height;
output->cfg->refresh_rate = e_randr_mode_refresh_rate_get(mode_infos[i]);
printf("RR: ... 9.1 %ix%i @ %2.3f\n", output->cfg->geo.w, output->cfg->geo.h, output->cfg->refresh_rate);
break;
}
}
printf("RR: ... 10\n");
if (modes) free(modes);
if (mode_infos)
{
for (i = 0; i < nmode_infos; i++) free(mode_infos[i]);
free(mode_infos);
}
return;
error:
if (modes) free(modes);
if (mode_infos)
{
for (i = 0; i < nmode_infos; i++)
free(mode_infos[i]);
free(mode_infos);
}
output->cfg->geo.x = output->cfg->geo.y = output->cfg->geo.w = output->cfg->geo.h = 0;
output->cfg->refresh_rate = 0.0;
output->mode = 0;
return;
}
static E_Config_Randr_Output *
_e_randr_config_output_new(void)
{
E_Config_Randr_Output *cfg = NULL;
if ((cfg = E_NEW(E_Config_Randr_Output, 1)))
{
/* all new outputs should connect automatically */
/* TODO: config option */
cfg->connect = EINA_TRUE;
/* append this output config to randr config */
e_randr_cfg->outputs =
eina_list_append(e_randr_cfg->outputs, cfg);
}
return cfg;
}
static E_Config_Randr_Output *
_e_randr_config_output_find(E_Randr_Output *output)
{
Eina_List *l;
E_Config_Randr_Output *output_cfg;
char b1[4096], b2[4096];
/* TODO: We should not match outputs with unknown name and edid */
snprintf(b1, sizeof(b1), "%s.%s",
output->name ? output->name : "???",
output->edid ? output->edid : "???");
EINA_LIST_FOREACH(e_randr_cfg->outputs, l, output_cfg)
{
snprintf(b2, sizeof(b2), "%s.%s",
output_cfg->name ? output_cfg->name : "???",
output_cfg->edid ? output_cfg->edid : "???");
if (!strcmp(b1, b2)) return output_cfg;
}
return NULL;
}
static E_Randr_Crtc *
_e_randr_crtc_find(Ecore_X_Randr_Crtc xid)
{
Eina_List *l;
E_Randr_Crtc *crtc;
EINA_LIST_FOREACH(e_randr->crtcs, l, crtc)
{
if (crtc->xid == xid)
return crtc;
}
return NULL;
}
static E_Randr_Output *
_e_randr_output_find(Ecore_X_Randr_Output xid)
{
Eina_List *l;
E_Randr_Output *output;
EINA_LIST_FOREACH(e_randr->outputs, l, output)
{
if (output->xid == xid)
return output;
}
return NULL;
}
static void
_e_randr_output_crtc_find(E_Randr_Output *output)
{
Ecore_X_Window root = 0;
E_Randr_Crtc *crtc = NULL;
Ecore_X_Randr_Crtc *possible = NULL;
Ecore_X_Randr_Mode *modes = NULL;
Eina_List *l;
int num = 0, i = 0;
int nmodes, pref;
/* grab the root window */
root = ecore_x_window_root_first_get();
/* check if last is available */
if ((crtc = _e_randr_crtc_find(ecore_x_randr_output_crtc_get(root, output->xid))))
{
if (!crtc->outputs)
goto done;
}
/* get a list of possible crtcs for this output */
possible = ecore_x_randr_output_possible_crtcs_get(root, output->xid, &num);
if (num == 0) goto error;
/* loop the possible crtcs */
for (i = 0; i < num; i++)
{
if ((crtc = _e_randr_crtc_find(possible[i])))
{
if (!crtc->outputs)
goto done;
}
}
/* get the list of modes for this output */
modes = ecore_x_randr_output_modes_get(root, output->xid, &nmodes, &pref);
if (nmodes == 0)
goto error;
/* can we clone this output */
for (i = 0; i < num; i++)
{
if ((crtc = _e_randr_crtc_find(possible[i])))
{
/* check if mode is valid for this output */
if (_e_randr_output_mode_valid(crtc->mode, modes, nmodes))
goto done;
}
}
/* last resort, just loop crtcs to find available */
EINA_LIST_FOREACH(e_randr->crtcs, l, crtc)
{
if (!crtc->outputs) goto done;
crtc = NULL;
}
error:
free(possible);
free(modes);
output->crtc = NULL;
return;
done:
free(possible);
free(modes);
output->crtc = crtc;
}
static void
_e_randr_config_mode_geometry(Ecore_X_Randr_Orientation orient, Eina_Rectangle *rect)
{
int mw = 0, mh = 0;
/* based on orientation, calculate mode sizes */
switch (orient)
{
case ECORE_X_RANDR_ORIENTATION_ROT_0:
case ECORE_X_RANDR_ORIENTATION_ROT_180:
mw = rect->w;
mh = rect->h;
break;
case ECORE_X_RANDR_ORIENTATION_ROT_90:
case ECORE_X_RANDR_ORIENTATION_ROT_270:
mw = rect->h;
mh = rect->w;
break;
default:
break;
}
rect->x = 0;
rect->y = 0;
rect->w = mw;
rect->h = mh;
}
static void
_e_randr_config_primary_update(void)
{
Ecore_X_Window root = 0;
Eina_List *l;
E_Randr_Output *output;
Ecore_X_Randr_Output primary = 0;
/* check if we agree with system setup */
root = ecore_x_window_root_first_get();
primary = ecore_x_randr_primary_output_get(root);
/* see if our selected primary exists and is connected */
output = _e_randr_output_find(e_randr_cfg->primary);
if ((!output) || (!output->active))
e_randr_cfg->primary = 0;
/* check if system primary is the same as ours */
if ((primary > 0) && (primary == e_randr_cfg->primary)) return;
if ((e_randr_cfg->primary > 0) &&
output && output->active)
{
/* prefer our primary */
ecore_x_randr_primary_output_set(root, e_randr_cfg->primary);
}
else
{
/* find lid */
e_randr_cfg->primary = 0;
EINA_LIST_FOREACH(e_randr->outputs, l, output)
{
if (output->is_lid)
{
if (output->active)
e_randr_cfg->primary = output->xid;
break;
}
}
if (!e_randr_cfg->primary)
{
/* TODO: prefer top-left active monitor */
/* no lid, use first existing */
EINA_LIST_FOREACH(e_randr->outputs, l, output)
{
if (output->active)
{
e_randr_cfg->primary = output->xid;
break;
}
}
}
/* set primary */
ecore_x_randr_primary_output_set(root, e_randr_cfg->primary);
}
}
static void
_e_randr_acpi_handler_add(void *data EINA_UNUSED)
{
E_LIST_HANDLER_APPEND(_randr_event_handlers,
E_EVENT_ACPI,
_e_randr_event_cb_acpi, NULL);
}
static int
_e_randr_is_lid(E_Randr_Output *cfg)
{
/* TODO: ecore_x_randr_output_connector_type_get */
int ret = 0;
if (!cfg->name) return 0;
if (strstr(cfg->name, "LVDS")) ret = 1;
else if (strstr(cfg->name, "lvds")) ret = 1;
else if (strstr(cfg->name, "Lvds")) ret = 1;
else if (strstr(cfg->name, "LCD")) ret = 1;
else if (strstr(cfg->name, "eDP")) ret = 1;
else if (strstr(cfg->name, "edp")) ret = 1;
else if (strstr(cfg->name, "EDP")) ret = 1;
return ret;
}
static void
_e_randr_crtc_from_outputs_set(E_Randr_Crtc *crtc)
{
E_Randr_Output *output;
Eina_List *l;
EINA_LIST_FOREACH(crtc->outputs, l, output)
{
if (!output->active) continue;
/* TODO: If status != connected, active should not be set */
if (output->status != ECORE_X_RANDR_CONNECTION_STATUS_CONNECTED)
{
printf("RRR: Error, unconnected output which is active.");
printf(" output: '%s' lid: %i active: %i status: %i\n",
output->name, output->is_lid, output->active, output->status);
continue;
}
printf("RRR: output: '%s' lid: %i active: %i status: %i\n", output->name, output->is_lid, output->active, output->status);
/* TODO: Match all connected outputs, not only the first */
crtc->mode = output->mode;
crtc->orient = output->cfg->orient;
crtc->geo = output->cfg->geo;
break;
}
}
static Eina_Bool
_e_randr_lid_update(void)
{
E_Randr_Output *output;
Eina_List *l;
Eina_Bool changed = EINA_FALSE;
int active_nonlid = 0;
changed = EINA_FALSE;
/* Find all non-lids */
EINA_LIST_FOREACH(e_randr->outputs, l, output)
{
if (output->is_lid) continue;
if (!output->active) continue;
active_nonlid++;
}
if (_e_randr_lid_is_closed && (active_nonlid > 0))
{
/* Disable lids if closed and we have other monitors */
EINA_LIST_FOREACH(e_randr->outputs, l, output)
{
Eina_Bool active;
if (!output->is_lid) continue;
active = output->active;
_e_randr_output_active_set(output, EINA_FALSE);
if (active != output->active) changed = EINA_TRUE;
}
}
else
{
/* Enable lids */
EINA_LIST_FOREACH(e_randr->outputs, l, output)
{
Eina_Bool active;
if (!output->is_lid) continue;
if (output->cfg && output->cfg->connect)
{
active = output->active;
_e_randr_output_active_set(output, EINA_TRUE);
if (active != output->active) changed = EINA_TRUE;
}
}
}
return changed;
}
static Eina_Bool
_e_randr_output_mode_valid(Ecore_X_Randr_Mode mode, Ecore_X_Randr_Mode *modes, int nmodes)
{
Eina_Bool valid = EINA_FALSE;
int i;
for (i = 0; i < nmodes; i++)
{
if (modes[i] == mode)
{
valid = EINA_TRUE;
break;
}
}
return valid;
}
static void
_e_randr_output_active_set(E_Randr_Output *output, Eina_Bool active)
{
E_Randr_Crtc *crtc;
Eina_List *l;
printf("RR: _e_randr_output_active_set... [%s] %i %i\n", output->name, output->active, active);
output->active = EINA_FALSE;
/* Remove output from all crtcs */
/* TODO: In theory the output should be only on one crtc, but to be sure...
* And we always do this be sure we have a good crtc */
EINA_LIST_FOREACH(e_randr->crtcs, l, crtc)
{
crtc->outputs =
eina_list_remove(crtc->outputs, output);
}
output->crtc = NULL;
if (active)
{
/* Find a crtc for the output */
_e_randr_output_crtc_find(output);
if (output->crtc)
{
printf("RR: ... found crtc %i\n", active);
output->crtc->outputs =
eina_list_append(output->crtc->outputs, output);
output->active = EINA_TRUE;
}
}
printf("RR: _e_randr_output_active_set... done - %p\n", output->crtc);
/* Track all active outputs */
e_randr->active = 0;
EINA_LIST_FOREACH(e_randr->outputs, l, output)
{
if (output->active) e_randr->active++;
}
}
static char *
_e_randr_output_name_get(Ecore_X_Window root, Ecore_X_Randr_Output output)
{
char *name;
name = ecore_x_randr_output_name_get(root, output, NULL);
if (!name)
{
unsigned char *edid = NULL;
unsigned long edid_length = 0;
/* get the edid for this output */
if ((edid =
ecore_x_randr_output_edid_get(root, output, &edid_length)))
{
/* get output name */
name = ecore_x_randr_edid_display_name_get(edid, edid_length);
/* free any memory allocated from ecore_x_randr */
free(edid);
}
}
return name;
}
Reference in New Issue View Git Blame Copy Permalink