void ATemplateNodeHandler_MODEL::Node::process(ATemplateContext& context, AOutputBuffer& output)
{
AAutoPtr<AEventVisitor::ScopedEvent> scoped;
if (context.useEventVisitor().isLogging(AEventVisitor::EL_DEBUG))
{
scoped.reset(new AEventVisitor::ScopedEvent(context.useEventVisitor(), ASW("ATemplateNodeHandler_MODEL",26), m_BlockData, AEventVisitor::EL_DEBUG));
}
if (m_BlockData.isEmpty())
return;
AXmlElement *pElement = context.useModel().useRoot().findElement(m_BlockData);
if (pElement)
{
//a_Found object
pElement->emitContent(output);
}
else
{
ARope rope("<!--Unable to find element for '",32);
rope.append(m_BlockData);
rope.append("'-->",4);
output.append(rope);
}
}
void ATemplateNodeHandler_RESOURCE::Node::process(ATemplateContext& ctx, AOutputBuffer& output)
{
AAutoPtr<AEventVisitor::ScopedEvent> scoped;
if (ctx.useEventVisitor().isLogging(AEventVisitor::EL_DEBUG))
{
scoped.reset(new AEventVisitor::ScopedEvent(ctx.useEventVisitor(), ASW("ATemplateNodeHandler_RESOURCE",28), m_BlockData, AEventVisitor::EL_DEBUG));
}
if (m_BlockData.isEmpty())
return;
// Get resource
AOSContext *pContext = ctx.useObjects().useAsPtr<AOSContext>(AOSContext::OBJECTNAME);
if (!pContext)
{
ARope rope("Must have AOSContext object named: ",35);
rope.append(AOSContext::OBJECTNAME);
ATHROW_EX(this, AException::NotFound, rope);
}
LIST_AString languages;
pContext->useRequestHeader().getAcceptLanguageList(languages);
const AXmlDocument *pDoc = pContext->useServices().useResourceManager().getResources(languages);
if (!pDoc)
{
if (pContext->useEventVisitor().isLogging(AEventVisitor::EL_WARN))
{
pContext->useEventVisitor().startEvent(ASW("Unable to find resource container for locales in Accept-Languages",65), AEventVisitor::EL_WARN);
}
return;
}
const AXmlElement *pElement = pDoc->getRoot().findElement(m_BlockData);
if (pElement)
{
//a_Found object
pElement->emitContent(output);
}
else
{
if (pContext->useEventVisitor().isLogging(AEventVisitor::EL_WARN))
{
ARope rope("Unable to find resource element: ",33);
rope.append(m_BlockData);
pContext->useEventVisitor().startEvent(rope, AEventVisitor::EL_WARN);
}
}
}
/*!
Uses the model to determine if element exists
thisfunction("<path to the AXmlElement>")
lua namespace: model
lua param: Path to element
lua return: true if exists, false otherwise
*/
static int alibrary_Objects_Model_existElement(lua_State *L)
{
ATemplateContext *pLuaContext = static_cast<ATemplateContext *>(L->acontext);
AASSERT(NULL, pLuaContext);
size_t len = AConstant::npos;
const char *s = luaL_checklstring(L, 1, &len);
const AString& xmlpath = AString::wrap(s, len);
if (pLuaContext->useModel().useRoot().exists(xmlpath))
lua_pushboolean(L, 1);
else
lua_pushboolean(L, 0);
return 1;
}
/*!
Uses the model to emit content for a path
thisfunction("<path to the AXmlElement to emit>", separate)
lua namespace: model
lua param: Path to emit
lua param: if non-nil then each element found will be returned by itself
lua return: Content at the given path or nil if element does not exist
*/
static int alibrary_Objects_Model_emitContentFromPath(lua_State *L)
{
ATemplateContext *pLuaContext = static_cast<ATemplateContext *>(L->acontext);
AASSERT(NULL, pLuaContext);
size_t len = AConstant::npos;
const char *s = luaL_checklstring(L, 1, &len);
const AString& xmlpath = AString::wrap(s, len);
int mode = 0;
if (lua_gettop(L) > 1)
mode = luaL_checkint(L, 2);
AXmlElement::CONST_CONTAINER nodes;
size_t ret = pLuaContext->useModel().useRoot().find(xmlpath, nodes);
if (mode)
{
//a_Return each as separate values
AString str;
for (AXmlElement::CONST_CONTAINER::const_iterator cit = nodes.begin(); cit != nodes.end(); ++cit)
{
(*cit)->emitContent(str);
lua_pushlstring(L, str.c_str(), str.getSize());
str.clear();
}
return (int)ret;
}
else
{
if (ret > 0)
{
//a_Return content concatinated
ARope rope;
for (AXmlElement::CONST_CONTAINER::const_iterator cit = nodes.begin(); cit != nodes.end(); ++cit)
(*cit)->emitContent(rope);
const AString& str = rope.toAString();
lua_pushlstring(L, str.c_str(), str.getSize());
return 1;
}
else
return 0;
}
}
/*!
Emits the entire model as JSON
thisfunction([indent = -1])
lua namespace: model
lua param: (Optional) if 0 or greater, will indent the output. Default -1 will inline it.
lua return: JSON string of default AXmlDocument model
*/
static int alibrary_Objects_Model_emitJson(lua_State *L)
{
ATemplateContext *pLuaContext = static_cast<ATemplateContext *>(L->acontext);
AASSERT(NULL, pLuaContext);
int indent = -1;
if (lua_gettop(L) > 0)
{
indent = luaL_checkint(L, 1);
}
AString str;
pLuaContext->useModel().useRoot().emitJson(str, indent);
lua_pushlstring(L, str.c_str(), str.getSize());
return 1;
}
void ATemplateNodeHandler_DADA::Node::process(ATemplateContext& context, AOutputBuffer& output)
{
AAutoPtr<AEventVisitor::ScopedEvent> scoped;
if (context.useEventVisitor().isLogging(AEventVisitor::EL_DEBUG))
{
scoped.reset(new AEventVisitor::ScopedEvent(context.useEventVisitor(), ASWNL("ATemplateNodeHandler_DADA::Node"), m_BlockData, AEventVisitor::EL_DEBUG));
}
if (m_BlockData.isEmpty())
return;
AString dataset;
if (!context.useModel().useRoot().emitContentFromPath(AOS_DadaData_Constants::DATASETPATH, dataset))
{
context.useEventVisitor().addEvent(ASWNL("ATemplateNodeHandler_DADA::Node:") + " dataset not defined for the node", AEventVisitor::EL_ERROR);
return;
}
ADadaDataHolder *pddh = ((ATemplateNodeHandler_DADA *)mp_Handler)->m_Objects.useAsPtr<ADadaDataHolder>(dataset);
if (!pddh)
{
context.useEventVisitor().addEvent(ASWNL("ATemplateNodeHandler_DADA::Node:") + " ADadaDataHolder not found for name: "+dataset, AEventVisitor::EL_ERROR);
return;
}
VARIABLEMAP *pGlobals = context.useObjects().useAsPtr<VARIABLEMAP>(AOS_DadaData_Constants::GLOBALSPATH);
if (NULL == pGlobals)
{
pGlobals = new VARIABLEMAP();
context.useObjects().insert(AOS_DadaData_Constants::GLOBALSPATH, pGlobals, true);
}
_generateLine(pddh, pGlobals->vmap, m_BlockData, context, output);
}
/*!
Adds a text value to an existing element at the given path or will create element
thisfunction("element path", "value")
lua param: Element path
lua param: Value to set
lua return: nil
*/
static int alibrary_Objects_Model_addText(lua_State *L)
{
ATemplateContext *pLuaContext = static_cast<ATemplateContext *>(L->acontext);
AASSERT(NULL, pLuaContext);
size_t len = AConstant::npos;
const char *s = luaL_checklstring(L, 1, &len);
const AString& xmlpath = AString::wrap(s, len);
AXmlElement &e = pLuaContext->useModel().useRoot().overwriteElement(xmlpath);
if (lua_gettop(L) > 1)
{
s = luaL_checklstring(L, 2, &len);
const AString& value = AString::wrap(s, len);
e.addData(value);
}
return 0;
}
void ATemplateNodeHandler_DADA::Node::_generateLine(ADadaDataHolder *pddh, MAP_AString_AString& globals, const AString& format, ATemplateContext& context, AOutputBuffer& output)
{
if (format.isEmpty())
return;
AFile_AString file(format);
size_t readresult;
char c = '\x0';
AString target(1024, 1024), strType(64,128);
while (AConstant::npos != file.readUntil(target, S_DELIM_START, true, true))
{
file.read(c);
readresult = file.readUntil(strType, S_DELIM_END, true, true);
if (0 == readresult)
{
file.readUntilEOF(target);
output.append(target);
target.clear();
break;
}
//a_If not EOF process type
if (AConstant::npos != readresult)
{
if (strType.getSize() > 1)
{
switch (c)
{
case '%':
//a_Process the tag {%type:tag,tag,...}
_appendWordType(pddh, globals, strType, target);
break;
case '$':
//a_ {$variable}
_appendVariable(pddh, globals, strType, target);
break;
default:
//a_Passthru of unknown tags
target.append('{');
target.append(strType);
target.append('}');
context.useEventVisitor().addEvent(ASWNL("ATemplateNodeHandler_DADA::Node:") + " unknown type:" + strType, AEventVisitor::EL_WARN);
break;
}
strType.clear();
}
}
}
file.readUntilEOF(target);
output.append(target);
target.clear();
}
/*!
Gets text value for a given path
thisfunction("element path")
lua param: Element path
lua return: Text content for a given element or nil if it doesn't exist
*/
static int alibrary_Objects_Model_getText(lua_State *L)
{
ATemplateContext *pLuaContext = static_cast<ATemplateContext *>(L->acontext);
AASSERT(NULL, pLuaContext);
size_t len = AConstant::npos;
const char *s = luaL_checklstring(L, 1, &len);
const AString& xmlpath = AString::wrap(s, len);
AXmlElement *pElement = pLuaContext->useModel().useRoot().findElement(xmlpath);
if (!pElement)
{
return 0;
}
else
{
AString str;
pElement->emitContent(str);
lua_pushlstring(L, str.c_str(), str.getSize());
return 1;
}
}
void ATemplateNodeHandler_LUA::Node::process(ATemplateContext& context, AOutputBuffer& output)
{
AAutoPtr<AEventVisitor::ScopedEvent> scoped;
if (context.useEventVisitor().isLogging(AEventVisitor::EL_DEBUG))
{
scoped.reset(new AEventVisitor::ScopedEvent(context.useEventVisitor(), ASW("ATemplateNodeHandler_LUA",24), m_BlockData, AEventVisitor::EL_DEBUG));
}
if (m_BlockData.isEmpty())
return;
ALuaTemplateContext *pLuaTemplateContext = dynamic_cast<ALuaTemplateContext *>(&context);
if (pLuaTemplateContext)
{
//a_Have a Lua context with its own interpreter
if (!pLuaTemplateContext->useLua().execute(m_BlockData, context, output))
{
output.append(" block(context)={{{\r\n",21);
output.append(m_BlockData);
output.append("}}}\r\n",5);
context.useEventVisitor().addEvent(output, AEventVisitor::EL_ERROR);
}
}
else
{
//a_Create a temporary interpreter, this is the less efficient way of doing it
ALuaEmbed lua;
if (!lua.execute(m_BlockData, context, output))
{
output.append(" block(local)={{{\r\n",19);
output.append(m_BlockData);
output.append("}}}\r\n",5);
context.useEventVisitor().addEvent(output, AEventVisitor::EL_ERROR);
}
}
}
