reference	   #CDATA>
crm_msg_reference	   #CDATA>
createLrmdAnswer(const char *reference, const char *operation,		 const char *status, xmlNodePtr failed){    xmlNodePtr root, response, answer;/*<!ELEMENT lrm_response (cib_fragment, res_failed?)|ping_item><!ATTLIST lrm_response	  reference	   #CDATA> */        root = createEmptyMsg(reference);    xmlSetProp(root, XML_MSG_ATTR_SRCSUBSYS, "lrm");    response = xmlNewChild(root, NULL, XML_MSG_TAG_RESPONSE, NULL);    answer = xmlNewChild(response, NULL, XML_RESP_TAG_LRM, NULL);    if(operation == NULL) return root;        if(strcmp("ping", operation) == 0)    {	addLrmdPingAnswer(answer, status);    }    else    {	xmlNodePtr fragment = xmlNewChild(answer, NULL, XML_CIB_TAG_FRAGMENT, NULL);	xmlSetProp(fragment, XML_CIB_ATTR_SECTION, "status");	addLrmdFragment(fragment);		if(failed != NULL && failed->children != NULL)	{	    xmlAddChild(answer, failed);	}    }    return root;}