*
* Copyright (c) 1997 Metro Link Incorporated
*
* Permission is hereby granted, free of charge, to any person obtaining a
* copy of this software and associated documentation files (the "Software"),
* to deal in the Software without restriction, including without limitation
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
* and/or sell copies of the Software, and to permit persons to whom the
* Software is furnished to do so, subject to the following conditions:
*
* The above copyright notice and this permission notice shall be included in
* all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
* THE X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
* WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF
* OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
* SOFTWARE.
*
* Except as contained in this notice, the name of the Metro Link shall not be
* used in advertising or otherwise to promote the sale, use or other dealings
* in this Software without prior written authorization from Metro Link.
*
*/
* Copyright (c) 1997-2003 by The XFree86 Project, Inc.
*
* Permission is hereby granted, free of charge, to any person obtaining a
* copy of this software and associated documentation files (the "Software"),
* to deal in the Software without restriction, including without limitation
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
* and/or sell copies of the Software, and to permit persons to whom the
* Software is furnished to do so, subject to the following conditions:
*
* The above copyright notice and this permission notice shall be included in
* all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
* THE COPYRIGHT HOLDER(S) OR AUTHOR(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR
* OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
* ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
* OTHER DEALINGS IN THE SOFTWARE.
*
* Except as contained in this notice, the name of the copyright holder(s)
* and author(s) shall not be used in advertising or otherwise to promote
* the sale, use or other dealings in this Software without prior written
* authorization from the copyright holder(s) and author(s).
*/
#include "xf86Parser.h"
#include "xf86tokens.h"
#include "Configint.h"
#include <string.h>
extern LexRec val;
static XConfigSymTabRec LayoutTab[] =
{
{ENDSECTION, "endsection"},
{SCREEN, "screen"},
{IDENTIFIER, "identifier"},
{INACTIVE, "inactive"},
{INPUTDEVICE, "inputdevice"},
{OPTION, "option"},
{-1, ""},
};
static XConfigSymTabRec AdjTab[] =
{
{RIGHTOF, "rightof"},
{LEFTOF, "leftof"},
{ABOVE, "above"},
{BELOW, "below"},
{RELATIVE, "relative"},
{ABSOLUTE, "absolute"},
{-1, ""},
};
static int addImpliedLayout(XConfigPtr config, const char *screenName);
#define CLEANUP xconfigFreeLayoutList
XConfigLayoutPtr
xconfigParseLayoutSection (void)
{
int has_ident = FALSE;
int token;
PARSE_PROLOGUE (XConfigLayoutPtr, XConfigLayoutRec)
while ((token = xconfigGetToken (LayoutTab)) != ENDSECTION)
{
switch (token)
{
case COMMENT:
ptr->comment = xconfigAddComment(ptr->comment, val.str);
break;
case IDENTIFIER:
if (xconfigGetSubToken (&(ptr->comment)) != STRING)
Error (QUOTE_MSG, "Identifier");
if (has_ident == TRUE)
Error (MULTIPLE_MSG, "Identifier");
ptr->identifier = val.str;
has_ident = TRUE;
break;
case INACTIVE:
{
XConfigInactivePtr iptr;
iptr = calloc (1, sizeof (XConfigInactiveRec));
iptr->next = NULL;
if (xconfigGetSubToken (&(ptr->comment)) != STRING)
Error (INACTIVE_MSG, NULL);
iptr->device_name = val.str;
xconfigAddListItem((GenericListPtr *)(&ptr->inactives),
(GenericListPtr) iptr);
}
break;
case SCREEN:
{
XConfigAdjacencyPtr aptr;
int absKeyword = 0;
aptr = calloc (1, sizeof (XConfigAdjacencyRec));
aptr->next = NULL;
aptr->scrnum = -1;
aptr->where = CONF_ADJ_OBSOLETE;
aptr->x = 0;
aptr->y = 0;
aptr->refscreen = NULL;
if ((token = xconfigGetSubToken (&(ptr->comment))) == NUMBER)
aptr->scrnum = val.num;
else
xconfigUnGetToken (token);
token = xconfigGetSubToken(&(ptr->comment));
if (token != STRING)
Error (SCREEN_MSG, NULL);
aptr->screen_name = val.str;
token = xconfigGetSubTokenWithTab(&(ptr->comment), AdjTab);
switch (token)
{
case RIGHTOF:
aptr->where = CONF_ADJ_RIGHTOF;
break;
case LEFTOF:
aptr->where = CONF_ADJ_LEFTOF;
break;
case ABOVE:
aptr->where = CONF_ADJ_ABOVE;
break;
case BELOW:
aptr->where = CONF_ADJ_BELOW;
break;
case RELATIVE:
aptr->where = CONF_ADJ_RELATIVE;
break;
case ABSOLUTE:
aptr->where = CONF_ADJ_ABSOLUTE;
absKeyword = 1;
break;
case EOF_TOKEN:
Error (UNEXPECTED_EOF_MSG, NULL);
break;
default:
xconfigUnGetToken (token);
token = xconfigGetSubToken(&(ptr->comment));
if (token == STRING)
aptr->where = CONF_ADJ_OBSOLETE;
else
aptr->where = CONF_ADJ_ABSOLUTE;
}
switch (aptr->where)
{
case CONF_ADJ_ABSOLUTE:
if (absKeyword)
token = xconfigGetSubToken(&(ptr->comment));
if (token == NUMBER)
{
aptr->x = val.num;
token = xconfigGetSubToken(&(ptr->comment));
if (token != NUMBER)
Error(INVALID_SCR_MSG, NULL);
aptr->y = val.num;
} else {
if (absKeyword)
Error(INVALID_SCR_MSG, NULL);
else
xconfigUnGetToken (token);
}
break;
case CONF_ADJ_RIGHTOF:
case CONF_ADJ_LEFTOF:
case CONF_ADJ_ABOVE:
case CONF_ADJ_BELOW:
case CONF_ADJ_RELATIVE:
token = xconfigGetSubToken(&(ptr->comment));
if (token != STRING)
Error(INVALID_SCR_MSG, NULL);
aptr->refscreen = val.str;
if (aptr->where == CONF_ADJ_RELATIVE)
{
token = xconfigGetSubToken(&(ptr->comment));
if (token != NUMBER)
Error(INVALID_SCR_MSG, NULL);
aptr->x = val.num;
token = xconfigGetSubToken(&(ptr->comment));
if (token != NUMBER)
Error(INVALID_SCR_MSG, NULL);
aptr->y = val.num;
}
break;
case CONF_ADJ_OBSOLETE:
aptr->top_name = val.str;
if (xconfigGetSubToken (&(ptr->comment)) != STRING)
Error (SCREEN_MSG, NULL);
aptr->bottom_name = val.str;
if (xconfigGetSubToken (&(ptr->comment)) != STRING)
Error (SCREEN_MSG, NULL);
aptr->left_name = val.str;
if (xconfigGetSubToken (&(ptr->comment)) != STRING)
Error (SCREEN_MSG, NULL);
aptr->right_name = val.str;
}
xconfigAddListItem((GenericListPtr *)(&ptr->adjacencies),
(GenericListPtr) aptr);
}
break;
case INPUTDEVICE:
{
XConfigInputrefPtr iptr;
iptr = calloc (1, sizeof (XConfigInputrefRec));
iptr->next = NULL;
iptr->options = NULL;
if (xconfigGetSubToken(&(ptr->comment)) != STRING)
Error (INPUTDEV_MSG, NULL);
iptr->input_name = val.str;
while ((token = xconfigGetSubToken(&(ptr->comment))) == STRING) {
xconfigAddNewOption(&iptr->options, val.str, NULL);
}
xconfigUnGetToken(token);
xconfigAddListItem((GenericListPtr *)(&ptr->inputs),
(GenericListPtr) iptr);
}
break;
case OPTION:
ptr->options = xconfigParseOption(ptr->options);
break;
case EOF_TOKEN:
Error (UNEXPECTED_EOF_MSG, NULL);
break;
default:
Error (INVALID_KEYWORD_MSG, xconfigTokenString ());
break;
}
}
if (!has_ident)
Error (NO_IDENT_MSG, NULL);
return ptr;
}
#undef CLEANUP
void
xconfigPrintLayoutSection (FILE * cf, XConfigLayoutPtr ptr)
{
XConfigAdjacencyPtr aptr;
XConfigInactivePtr iptr;
XConfigInputrefPtr inptr;
XConfigOptionPtr optr;
while (ptr)
{
fprintf (cf, "Section \"ServerLayout\"\n");
if (ptr->comment)
fprintf (cf, "%s", ptr->comment);
if (ptr->identifier)
fprintf (cf, " Identifier \"%s\"\n", ptr->identifier);
for (aptr = ptr->adjacencies; aptr; aptr = aptr->next)
{
fprintf (cf, " Screen ");
if (aptr->scrnum >= 0)
fprintf (cf, "%2d", aptr->scrnum);
else
fprintf (cf, " ");
fprintf (cf, " \"%s\"", aptr->screen_name);
switch(aptr->where)
{
case CONF_ADJ_OBSOLETE:
fprintf (cf, " \"%s\"", aptr->top_name);
fprintf (cf, " \"%s\"", aptr->bottom_name);
fprintf (cf, " \"%s\"", aptr->right_name);
fprintf (cf, " \"%s\"\n", aptr->left_name);
break;
case CONF_ADJ_ABSOLUTE:
if (aptr->x != -1)
fprintf (cf, " %d %d\n", aptr->x, aptr->y);
else
fprintf (cf, "\n");
break;
case CONF_ADJ_RIGHTOF:
fprintf (cf, " RightOf \"%s\"\n", aptr->refscreen);
break;
case CONF_ADJ_LEFTOF:
fprintf (cf, " LeftOf \"%s\"\n", aptr->refscreen);
break;
case CONF_ADJ_ABOVE:
fprintf (cf, " Above \"%s\"\n", aptr->refscreen);
break;
case CONF_ADJ_BELOW:
fprintf (cf, " Below \"%s\"\n", aptr->refscreen);
break;
case CONF_ADJ_RELATIVE:
fprintf (cf, " Relative \"%s\" %d %d\n", aptr->refscreen,
aptr->x, aptr->y);
break;
}
}
for (iptr = ptr->inactives; iptr; iptr = iptr->next)
fprintf (cf, " Inactive \"%s\"\n", iptr->device_name);
for (inptr = ptr->inputs; inptr; inptr = inptr->next)
{
fprintf (cf, " InputDevice \"%s\"", inptr->input_name);
for (optr = inptr->options; optr; optr = optr->next)
{
fprintf(cf, " \"%s\"", optr->name);
}
fprintf(cf, "\n");
}
xconfigPrintOptionList(cf, ptr->options, 1);
fprintf (cf, "EndSection\n\n");
ptr = ptr->next;
}
}
void
xconfigFreeLayoutList (XConfigLayoutPtr *ptr)
{
XConfigLayoutPtr prev;
if (ptr == NULL || *ptr == NULL)
return;
while (*ptr)
{
TEST_FREE ((*ptr)->identifier);
TEST_FREE ((*ptr)->comment);
xconfigFreeAdjacencyList (&((*ptr)->adjacencies));
xconfigFreeInputrefList (&((*ptr)->inputs));
prev = *ptr;
*ptr = (*ptr)->next;
free (prev);
}
}
void
xconfigFreeAdjacencyList (XConfigAdjacencyPtr *ptr)
{
XConfigAdjacencyPtr prev;
if (ptr == NULL || *ptr == NULL)
return;
while (*ptr)
{
TEST_FREE ((*ptr)->screen_name);
TEST_FREE ((*ptr)->top_name);
TEST_FREE ((*ptr)->bottom_name);
TEST_FREE ((*ptr)->left_name);
TEST_FREE ((*ptr)->right_name);
prev = *ptr;
*ptr = (*ptr)->next;
free (prev);
}
}
void
xconfigFreeInputrefList (XConfigInputrefPtr *ptr)
{
XConfigInputrefPtr prev;
if (ptr == NULL || *ptr == NULL)
return;
while (*ptr)
{
TEST_FREE ((*ptr)->input_name);
xconfigFreeOptionList (&((*ptr)->options));
prev = *ptr;
*ptr = (*ptr)->next;
free (prev);
}
}
#define CheckScreen(str, ptr)\
if (str[0] != '\0') \
{ \
screen = xconfigFindScreen (str, p->conf_screen_lst); \
if (!screen) \
{ \
xconfigErrorMsg(ValidationErrorMsg, UNDEFINED_SCREEN_MSG, \
str, layout->identifier); \
return (FALSE); \
} \
else \
ptr = screen; \
}
int
xconfigValidateLayout (XConfigPtr p)
{
XConfigLayoutPtr layout = p->layouts;
XConfigAdjacencyPtr adj;
XConfigInactivePtr iptr;
XConfigInputrefPtr inputRef;
XConfigScreenPtr screen;
XConfigDevicePtr device;
XConfigInputPtr input;
* if we do not have a layout, just return TRUE; we'll add a
* layout later during the Sanitize step
*/
if (!layout) return TRUE;
while (layout)
{
adj = layout->adjacencies;
while (adj)
{
screen = xconfigFindScreen (adj->screen_name, p->screens);
if (!screen)
{
xconfigErrorMsg(ValidationErrorMsg, UNDEFINED_SCREEN_MSG,
adj->screen_name, layout->identifier);
return (FALSE);
}
else
adj->screen = screen;
#if 0
CheckScreen (adj->top_name, adj->top);
CheckScreen (adj->bottom_name, adj->bottom);
CheckScreen (adj->left_name, adj->left);
CheckScreen (adj->right_name, adj->right);
#endif
adj = adj->next;
}
iptr = layout->inactives;
while (iptr)
{
device = xconfigFindDevice (iptr->device_name,
p->devices);
if (!device)
{
xconfigErrorMsg(ValidationErrorMsg, UNDEFINED_DEVICE_MSG,
iptr->device_name, layout->identifier);
return (FALSE);
}
else
iptr->device = device;
iptr = iptr->next;
}
* the layout->inputs list is also updated in
* getCoreInputDevice() when no core input device is found in
* the layout's input list
*/
inputRef = layout->inputs;
while (inputRef)
{
input = xconfigFindInput (inputRef->input_name,
p->inputs);
if (!input)
{
xconfigErrorMsg(ValidationErrorMsg, UNDEFINED_INPUT_MSG,
inputRef->input_name, layout->identifier);
return (FALSE);
}
else {
inputRef->input = input;
}
inputRef = inputRef->next;
}
layout = layout->next;
}
return (TRUE);
}
int
xconfigSanitizeLayout(XConfigPtr p,
const char *screenName,
GenerateOptions *gop)
{
XConfigLayoutPtr layout = p->layouts;
if (!p->layouts) {
if (!addImpliedLayout(p, screenName)) {
return FALSE;
}
}
for (layout = p->layouts; layout; layout = layout->next) {
if (!xconfigCheckCoreInputDevices(gop, p, layout)) {
return FALSE;
}
}
return TRUE;
}
XConfigLayoutPtr
xconfigFindLayout (const char *name, XConfigLayoutPtr list)
{
while (list)
{
if (xconfigNameCompare (list->identifier, name) == 0)
return (list);
list = list->next;
}
return (NULL);
}
static int addImpliedLayout(XConfigPtr config, const char *screenName)
{
XConfigScreenPtr screen;
XConfigLayoutPtr layout;
XConfigAdjacencyPtr adj;
if (config->layouts) return TRUE;
* which screen section is the active one?
*
* If there is a -screen option, use that one, otherwise use the first
* screen in the config's list.
*/
if (screenName) {
screen = xconfigFindScreen(screenName, config->screens);
if (!screen) {
xconfigErrorMsg(ErrorMsg, "No Screen section called \"%s\"\n",
screenName);
return FALSE;
}
} else {
screen = config->screens;
}
xconfigErrorMsg(WarnMsg, "No Layout specified, constructing implicit "
"layout section using screen \"%s\".\n",
screen->identifier);
layout = calloc(1, sizeof(XConfigLayoutRec));
layout->identifier = xconfigStrdup("Default Layout");
adj = calloc(1, sizeof(XConfigAdjacencyRec));
adj->scrnum = -1;
adj->screen = screen;
adj->screen_name = xconfigStrdup(screen->identifier);
layout->adjacencies = adj;
config->layouts = layout;
if (!xconfigValidateLayout(config)) return FALSE;
return TRUE;
}