|
Packit |
992a25 |
/***********************************************************************
|
|
Packit |
992a25 |
* *
|
|
Packit |
992a25 |
* This software is part of the ast package *
|
|
Packit |
992a25 |
* Copyright (c) 1985-2011 AT&T Intellectual Property *
|
|
Packit |
992a25 |
* and is licensed under the *
|
|
Packit |
992a25 |
* Eclipse Public License, Version 1.0 *
|
|
Packit |
992a25 |
* by AT&T Intellectual Property *
|
|
Packit |
992a25 |
* *
|
|
Packit |
992a25 |
* A copy of the License is available at *
|
|
Packit |
992a25 |
* http://www.eclipse.org/org/documents/epl-v10.html *
|
|
Packit |
992a25 |
* (with md5 checksum b35adb5213ca9657e911e9befb180842) *
|
|
Packit |
992a25 |
* *
|
|
Packit |
992a25 |
* Information and Software Systems Research *
|
|
Packit |
992a25 |
* AT&T Research *
|
|
Packit |
992a25 |
* Florham Park NJ *
|
|
Packit |
992a25 |
* *
|
|
Packit |
992a25 |
* Glenn Fowler <gsf@research.att.com> *
|
|
Packit |
992a25 |
* David Korn <dgk@research.att.com> *
|
|
Packit |
992a25 |
* Phong Vo <kpv@research.att.com> *
|
|
Packit |
992a25 |
* *
|
|
Packit |
992a25 |
***********************************************************************/
|
|
Packit |
992a25 |
#pragma prototyped
|
|
Packit |
992a25 |
/*
|
|
Packit |
992a25 |
* Glenn Fowler
|
|
Packit |
992a25 |
* AT&T Research
|
|
Packit |
992a25 |
*
|
|
Packit |
992a25 |
* convert \X character constants in s in place
|
|
Packit |
992a25 |
* the length of the converted s is returned (may have embedded \0's)
|
|
Packit |
992a25 |
* wide chars absent locale guidance default to UTF-8
|
|
Packit |
992a25 |
* strexp() FMT_EXP_* flags passed to chrexp() for selective conversion
|
|
Packit |
992a25 |
*/
|
|
Packit |
992a25 |
|
|
Packit |
992a25 |
#include <ast.h>
|
|
Packit |
992a25 |
|
|
Packit |
992a25 |
int
|
|
Packit |
992a25 |
strexp(register char* s, int flags)
|
|
Packit |
992a25 |
{
|
|
Packit |
992a25 |
register char* t;
|
|
Packit |
992a25 |
register unsigned int c;
|
|
Packit |
992a25 |
char* b;
|
|
Packit |
992a25 |
char* e;
|
|
Packit |
992a25 |
int w;
|
|
Packit |
992a25 |
|
|
Packit |
992a25 |
b = t = s;
|
|
Packit |
992a25 |
while (c = *s++)
|
|
Packit |
992a25 |
{
|
|
Packit |
992a25 |
if (c == '\\')
|
|
Packit |
992a25 |
{
|
|
Packit |
992a25 |
c = chrexp(s - 1, &e, &w, flags);
|
|
Packit |
992a25 |
s = e;
|
|
Packit |
992a25 |
if (w)
|
|
Packit |
992a25 |
{
|
|
Packit |
992a25 |
t += mbwide() ? mbconv(t, c) : wc2utf8(t, c);
|
|
Packit |
992a25 |
continue;
|
|
Packit |
992a25 |
}
|
|
Packit |
992a25 |
}
|
|
Packit |
992a25 |
*t++ = c;
|
|
Packit |
992a25 |
}
|
|
Packit |
992a25 |
*t = 0;
|
|
Packit |
992a25 |
return t - b;
|
|
Packit |
992a25 |
}
|
|
Packit |
992a25 |
|
|
Packit |
992a25 |
int
|
|
Packit |
992a25 |
stresc(register char* s)
|
|
Packit |
992a25 |
{
|
|
Packit |
992a25 |
return strexp(s, FMT_EXP_CHAR|FMT_EXP_LINE|FMT_EXP_WIDE);
|
|
Packit |
992a25 |
}
|