//==========================================================================
|
//==========================================================================
|
//
|
//
|
// alias.c
|
// alias.c
|
//
|
//
|
// RedBoot - alias support
|
// RedBoot - alias support
|
//
|
//
|
//==========================================================================
|
//==========================================================================
|
//####ECOSGPLCOPYRIGHTBEGIN####
|
//####ECOSGPLCOPYRIGHTBEGIN####
|
// -------------------------------------------
|
// -------------------------------------------
|
// This file is part of eCos, the Embedded Configurable Operating System.
|
// This file is part of eCos, the Embedded Configurable Operating System.
|
// Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
|
// Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
|
//
|
//
|
// eCos is free software; you can redistribute it and/or modify it under
|
// eCos is free software; you can redistribute it and/or modify it under
|
// the terms of the GNU General Public License as published by the Free
|
// the terms of the GNU General Public License as published by the Free
|
// Software Foundation; either version 2 or (at your option) any later version.
|
// Software Foundation; either version 2 or (at your option) any later version.
|
//
|
//
|
// eCos is distributed in the hope that it will be useful, but WITHOUT ANY
|
// eCos is distributed in the hope that it will be useful, but WITHOUT ANY
|
// WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
// WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
// for more details.
|
// for more details.
|
//
|
//
|
// You should have received a copy of the GNU General Public License along
|
// You should have received a copy of the GNU General Public License along
|
// with eCos; if not, write to the Free Software Foundation, Inc.,
|
// with eCos; if not, write to the Free Software Foundation, Inc.,
|
// 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
|
// 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
|
//
|
//
|
// As a special exception, if other files instantiate templates or use macros
|
// As a special exception, if other files instantiate templates or use macros
|
// or inline functions from this file, or you compile this file and link it
|
// or inline functions from this file, or you compile this file and link it
|
// with other works to produce a work based on this file, this file does not
|
// with other works to produce a work based on this file, this file does not
|
// by itself cause the resulting work to be covered by the GNU General Public
|
// by itself cause the resulting work to be covered by the GNU General Public
|
// License. However the source code for this file must still be made available
|
// License. However the source code for this file must still be made available
|
// in accordance with section (3) of the GNU General Public License.
|
// in accordance with section (3) of the GNU General Public License.
|
//
|
//
|
// This exception does not invalidate any other reasons why a work based on
|
// This exception does not invalidate any other reasons why a work based on
|
// this file might be covered by the GNU General Public License.
|
// this file might be covered by the GNU General Public License.
|
//
|
//
|
// Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
|
// Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
|
// at http://sources.redhat.com/ecos/ecos-license/
|
// at http://sources.redhat.com/ecos/ecos-license/
|
// -------------------------------------------
|
// -------------------------------------------
|
//####ECOSGPLCOPYRIGHTEND####
|
//####ECOSGPLCOPYRIGHTEND####
|
//==========================================================================
|
//==========================================================================
|
//#####DESCRIPTIONBEGIN####
|
//#####DESCRIPTIONBEGIN####
|
//
|
//
|
// Author(s): gthomas
|
// Author(s): gthomas
|
// Contributors: gthomas, jskov
|
// Contributors: gthomas, jskov
|
// Date: 2002-05-15
|
// Date: 2002-05-15
|
// Purpose:
|
// Purpose:
|
// Description:
|
// Description:
|
//
|
//
|
// This code is part of RedBoot (tm).
|
// This code is part of RedBoot (tm).
|
//
|
//
|
//####DESCRIPTIONEND####
|
//####DESCRIPTIONEND####
|
//
|
//
|
//==========================================================================
|
//==========================================================================
|
|
|
#include <redboot.h>
|
#include <redboot.h>
|
|
|
#ifdef CYGNUM_REDBOOT_FLASH_STRING_SIZE
|
#ifdef CYGNUM_REDBOOT_FLASH_STRING_SIZE
|
# define MAX_STRING_LENGTH CYGNUM_REDBOOT_FLASH_STRING_SIZE
|
# define MAX_STRING_LENGTH CYGNUM_REDBOOT_FLASH_STRING_SIZE
|
#else
|
#else
|
# define MAX_STRING_LENGTH 32
|
# define MAX_STRING_LENGTH 32
|
#endif
|
#endif
|
|
|
// Lookup an alias. First try plain string aliases. If that fails try
|
// Lookup an alias. First try plain string aliases. If that fails try
|
// other types so allowing access to all configured values. This allows
|
// other types so allowing access to all configured values. This allows
|
// for alias (macro) expansion of normal 'fconfig' data, such as the
|
// for alias (macro) expansion of normal 'fconfig' data, such as the
|
// board IP address.
|
// board IP address.
|
static char *
|
static char *
|
lookup_alias(char *alias, char *alias_buf)
|
lookup_alias(char *alias, char *alias_buf)
|
{
|
{
|
if (0 == strcasecmp("FREEMEMLO", alias)) {
|
if (0 == strcasecmp("FREEMEMLO", alias)) {
|
diag_sprintf(alias_buf,"%p", ((CYG_ADDRWORD)user_ram_start + 0x03ff) & ~0x03ff);
|
diag_sprintf(alias_buf,"%p", ((CYG_ADDRWORD)user_ram_start + 0x03ff) & ~0x03ff);
|
return alias_buf;
|
return alias_buf;
|
} else if (0 == strcasecmp("FREEMEMHI", alias)) {
|
} else if (0 == strcasecmp("FREEMEMHI", alias)) {
|
diag_sprintf(alias_buf,"%p", ((CYG_ADDRWORD)user_ram_end) & ~0x03ff);
|
diag_sprintf(alias_buf,"%p", ((CYG_ADDRWORD)user_ram_end) & ~0x03ff);
|
return alias_buf;
|
return alias_buf;
|
}
|
}
|
|
|
#ifdef CYGSEM_REDBOOT_FLASH_ALIASES
|
#ifdef CYGSEM_REDBOOT_FLASH_ALIASES
|
return flash_lookup_alias(alias, alias_buf);
|
return flash_lookup_alias(alias, alias_buf);
|
#else
|
#else
|
return NULL;
|
return NULL;
|
#endif
|
#endif
|
}
|
}
|
|
|
// Expand aliases, this is recursive. ie if one alias contains other
|
// Expand aliases, this is recursive. ie if one alias contains other
|
// aliases, these will also be expanded from the insertion point
|
// aliases, these will also be expanded from the insertion point
|
// onwards.
|
// onwards.
|
//
|
//
|
// If 'iter' is zero, then quoted strings are not expanded
|
// If 'iter' is zero, then quoted strings are not expanded
|
//
|
//
|
static bool
|
static bool
|
_expand_aliases(char *line, int len, int iter)
|
_expand_aliases(char *line, int len, int iter)
|
{
|
{
|
char *lp = line;
|
char *lp = line;
|
char *ms, *me, *ep;
|
char *ms, *me, *ep;
|
char *alias;
|
char *alias;
|
char c;
|
char c;
|
int offset, line_len, alias_len;
|
int offset, line_len, alias_len;
|
char alias_buf[MAX_STRING_LENGTH];
|
char alias_buf[MAX_STRING_LENGTH];
|
bool macro_found = false;
|
bool macro_found = false;
|
|
|
if ((line_len = strlen(line)) != 0) {
|
if ((line_len = strlen(line)) != 0) {
|
while (*lp) {
|
while (*lp) {
|
c = *lp++;
|
c = *lp++;
|
if ((c == '%') && (*lp == '{')) {
|
if ((c == '%') && (*lp == '{')) {
|
// Found a macro/alias to expand
|
// Found a macro/alias to expand
|
ms = lp+1;
|
ms = lp+1;
|
lp += 2;
|
lp += 2;
|
while (*lp && (*lp != '}')) lp++;
|
while (*lp && (*lp != '}')) lp++;
|
if (!*lp) {
|
if (!*lp) {
|
diag_printf("Invalid macro/alias '%s'\n", ms);
|
diag_printf("Invalid macro/alias '%s'\n", ms);
|
line[0] = '\0'; // Destroy line
|
line[0] = '\0'; // Destroy line
|
return false;
|
return false;
|
}
|
}
|
me = lp;
|
me = lp;
|
*me = '\0';
|
*me = '\0';
|
lp++;
|
lp++;
|
if ((alias = lookup_alias(ms,alias_buf)) != (char *)NULL) {
|
if ((alias = lookup_alias(ms,alias_buf)) != (char *)NULL) {
|
alias_len = strlen(alias);
|
alias_len = strlen(alias);
|
// See if there is room in the line to expand this macro/alias
|
// See if there is room in the line to expand this macro/alias
|
if ((line_len+alias_len) < len) {
|
if ((line_len+alias_len) < len) {
|
// Make a hole by moving data within the line
|
// Make a hole by moving data within the line
|
offset = alias_len-strlen(ms)-2; // Number of bytes being inserted
|
offset = alias_len-strlen(ms)-2; // Number of bytes being inserted
|
ep = &lp[strlen(lp)-1];
|
ep = &lp[strlen(lp)-1];
|
if (offset > 1) {
|
if (offset > 1) {
|
ep[offset] = '\0';
|
ep[offset] = '\0';
|
while (ep != (lp-1)) {
|
while (ep != (lp-1)) {
|
ep[offset-1] = *ep;
|
ep[offset-1] = *ep;
|
ep--;
|
ep--;
|
}
|
}
|
} else {
|
} else {
|
if (offset <=0) {
|
if (offset <=0) {
|
while ((lp-1) != ep) {
|
while ((lp-1) != ep) {
|
lp[offset-1] = *lp;
|
lp[offset-1] = *lp;
|
lp++;
|
lp++;
|
}
|
}
|
lp[offset-1]='\0';
|
lp[offset-1]='\0';
|
}
|
}
|
}
|
}
|
// Insert the macro/alias data
|
// Insert the macro/alias data
|
lp = ms-2;
|
lp = ms-2;
|
while (*alias) {
|
while (*alias) {
|
if ((alias[0] == '%') && (alias[1] == '{')) macro_found = true;
|
if ((alias[0] == '%') && (alias[1] == '{')) macro_found = true;
|
*lp++ = *alias++;
|
*lp++ = *alias++;
|
}
|
}
|
line_len = strlen(line);
|
line_len = strlen(line);
|
lp = lp - alias_len;
|
lp = lp - alias_len;
|
} else {
|
} else {
|
diag_printf("No room to expand '%s'\n", ms);
|
diag_printf("No room to expand '%s'\n", ms);
|
line[0] = '\0'; // Destroy line
|
line[0] = '\0'; // Destroy line
|
return false;
|
return false;
|
}
|
}
|
} else {
|
} else {
|
diag_printf("Alias '%s' not defined\n", ms);
|
diag_printf("Alias '%s' not defined\n", ms);
|
*me = '|';
|
*me = '|';
|
}
|
}
|
} else if ((c == '"') && (iter == 0)) {
|
} else if ((c == '"') && (iter == 0)) {
|
// Skip quoted strings
|
// Skip quoted strings
|
while (*lp && (*lp != '"')) lp++;
|
while (*lp && (*lp != '"')) lp++;
|
}
|
}
|
}
|
}
|
}
|
}
|
return macro_found;
|
return macro_found;
|
}
|
}
|
|
|
void
|
void
|
expand_aliases(char *line, int len)
|
expand_aliases(char *line, int len)
|
{
|
{
|
int iter = 0;
|
int iter = 0;
|
|
|
while (_expand_aliases(line, len, iter++)) {
|
while (_expand_aliases(line, len, iter++)) {
|
}
|
}
|
}
|
}
|
|
|