From f82813bfa40193aec07e013b029eec6dc092ecdd Mon Sep 17 00:00:00 2001 From: zilio nicolas Date: Wed, 1 Jul 2015 16:18:45 +0200 Subject: registers and banks support in xml v1. pci -ll works fine, but got segfault on pci -r name and pci -r name gives 0 always. might be due to the order in pci.c ------> ask suren --- pcilib/CMakeLists.txt | 10 +- pcilib/bank.h | 2 + pcilib/pci.c | 33 +++ pcilib/register.h | 2 + pcilib/xml.c | 672 ++++++++++++++++++++++++++++++++++++++++++++++++++ pcilib/xml.h | 208 ++++++++++++++++ 6 files changed, 923 insertions(+), 4 deletions(-) create mode 100644 pcilib/xml.c create mode 100644 pcilib/xml.h (limited to 'pcilib') diff --git a/pcilib/CMakeLists.txt b/pcilib/CMakeLists.txt index c9bf0fb..881b44c 100644 --- a/pcilib/CMakeLists.txt +++ b/pcilib/CMakeLists.txt @@ -1,11 +1,13 @@ include_directories( ${CMAKE_SOURCE_DIR} + ${PYTHON_INCLUDE_DIRS} + ${XMLLIB_INCLUDE_DIRS} ${CMAKE_SOURCE_DIR}/pcilib ) -set(HEADERS pcilib.h pci.h export.h bar.h fifo.h model.h bank.h register.h kmem.h irq.h dma.h event.h plugin.h tools.h error.h debug.h env.h version.h config.h) -add_library(pcilib SHARED pci.c export.c bar.c fifo.c model.c bank.c register.c kmem.c irq.c dma.c event.c plugin.c tools.c error.c debug.c env.c) -target_link_libraries(pcilib dma protocols ${CMAKE_THREAD_LIBS_INIT} ${UFODECODE_LIBRARIES} ${CMAKE_DL_LIBS}) +set(HEADERS pcilib.h pci.h export.h bar.h fifo.h model.h bank.h register.h kmem.h irq.h dma.h event.h plugin.h tools.h error.h debug.h env.h version.h config.h xml.h) +add_library(pcilib SHARED pci.c export.c bar.c fifo.c model.c bank.c register.c kmem.c irq.c dma.c event.c plugin.c tools.c error.c debug.c env.c xml.c) +target_link_libraries(pcilib dma protocols ${CMAKE_THREAD_LIBS_INIT} ${UFODECODE_LIBRARIES} ${CMAKE_DL_LIBS} ${XMLLIB_LIBRARIES} ${PYTHON_LIBRARIES}) add_dependencies(pcilib dma protocols) install(TARGETS pcilib @@ -16,6 +18,6 @@ install(FILES pcilib.h DESTINATION include ) -install(FILES bar.h kmem.h bank.h register.h dma.h event.h model.h error.h debug.h env.h tools.h export.h version.h +install(FILES bar.h kmem.h bank.h register.h dma.h event.h model.h error.h debug.h env.h tools.h export.h version.h xml.h DESTINATION include/pcilib ) diff --git a/pcilib/bank.h b/pcilib/bank.h index a0ba9fe..e2174e9 100644 --- a/pcilib/bank.h +++ b/pcilib/bank.h @@ -62,6 +62,7 @@ typedef struct { const char *format; /**< printf format for the registers, either %lu for decimal output or 0x%lx for hexdecimal */ const char *name; /**< short bank name */ const char *description; /**< longer bank description */ + /* use it or not?*/ /*xmlNodePtr xmlNode;*/ /**model) ctx->model = strdup(model?model:"pci"); + if(registers){ + pcilib_xml_initialize_registers(doc,registers); + pcilib_xml_arrange_registers(registers,number_registers); + pcilib_add_registers(ctx,number_registers,registers); + }else pcilib_error("no memory for registers"); + + if(banks){ + pcilib_xml_initialize_banks(doc,banks); + pcilib_add_register_banks(ctx,number_banks,banks); + }else pcilib_error("no memory for banks"); + ctx->model_info.registers = ctx->registers; ctx->model_info.banks = ctx->banks; ctx->model_info.protocols = ctx->protocols; @@ -166,6 +198,7 @@ pcilib_t *pcilib_open(const char *device, const char *model) { pcilib_close(ctx); return NULL; } + err = pcilib_init_event_engine(ctx); if (err) { diff --git a/pcilib/register.h b/pcilib/register.h index 535e9d0..fc13e6a 100644 --- a/pcilib/register.h +++ b/pcilib/register.h @@ -40,11 +40,13 @@ typedef struct { const char *name; /**< The access name of the register */ const char *description; /**< Brief description of the register */ + /* use it or not? */ /*xmlNodePtr xmlNode;*/ /** +#include +#include +#include +#include + + +/** + * pcilib_xml_getdoc + * this function takes a string and will create an abtract syntax tree from the xml file represented by the string + * @param[in] filename the the name of the xml file containing registers and banks + */ +xmlDocPtr pcilib_xml_getdoc(char* filename){ + xmlDocPtr doc; + doc=xmlParseFile(filename); /**nodesetval)){ + xmlXPathFreeObject(result); +// pcilib_warning("warning : no results found for: %s",xpath); + return NULL; + } + + return result; +} + +/** pcilib_xml_getcontext. + * this function create a context in an AST (ie initialize XPAth for the AST). + * @param[in] doc the AST of the xml file. + */ +xmlXPathContextPtr pcilib_xml_getcontext(xmlDocPtr doc){ + xmlXPathContextPtr context; + context= xmlXPathNewContext(doc); /**addr=(pcilib_register_addr_t)strtol((char*)adress,&ptr,0); + myregister->offset=(pcilib_register_size_t)strtol((char*)offset,&ptr,0); + myregister->bits=(pcilib_register_size_t)strtol((char*)size,&ptr,0); + myregister->defvalue=(pcilib_register_value_t)strtol((char*)defvalue,&ptr,0); + + if(strcmp((char*)rwmask,"all bits")==0){ + myregister->rwmask=PCILIB_REGISTER_ALL_BITS; + }else if(strcmp((char*)rwmask,"0")==0){ + myregister->rwmask=0; + }else{ + myregister->rwmask=(pcilib_register_value_t)strtol((char*)rwmask,&ptr,0); + } + + if(strcmp((char*)mode,"R")==0){ + myregister->mode=PCILIB_REGISTER_R; + }else if(strcmp((char*)mode,"W")==0){ + myregister->mode=PCILIB_REGISTER_W; + }else if(strcmp((char*)mode,"RW")==0){ + myregister->mode=PCILIB_REGISTER_RW; + }else if(strcmp((char*)mode,"W")==0){ + myregister->mode=PCILIB_REGISTER_W; + }else if(strcmp((char*)mode,"RW1C")==0){ + myregister->mode=PCILIB_REGISTER_RW1C; + }else if(strcmp((char*)mode,"W1C")==0){ + myregister->mode=PCILIB_REGISTER_W1C; + } + + if(strcmp((char*)type,"standard")==0){ + myregister->type=PCILIB_REGISTER_STANDARD; + }else if(strcmp((char*)type,"bits")==0){ + myregister->type=PCILIB_REGISTER_BITS; + }else if(strcmp((char*)type,"fifo")==0){ + myregister->type=PCILIB_REGISTER_FIFO; + } + + if(strcmp((char*)bank,"bank 0")==0){ + myregister->bank=PCILIB_REGISTER_BANK0; + }else if(strcmp((char*)bank,"bank 1")==0){ + myregister->bank=PCILIB_REGISTER_BANK1; + }else if(strcmp((char*)bank,"bank 2")==0){ + myregister->bank=PCILIB_REGISTER_BANK2; + }else if(strcmp((char*)bank,"bank 3")==0){ + myregister->bank=PCILIB_REGISTER_BANK3; + }else if(strcmp((char*)bank,"DMA bank")==0){ + myregister->bank=PCILIB_REGISTER_BANK_DMA; + }else if (strcmp((char*)bank,"dynamic bank")==0){ + myregister->addr=PCILIB_REGISTER_BANK_DYNAMIC; + }else{ + myregister->bank=PCILIB_REGISTER_BANK_INVALID; + } + + myregister->name=(char*)name; + myregister->description=(char*)description; + /*should we include those xmlnodes?*/ + //myregister->xmlNode=node; +} + +/** pcilib_xml_getnumberbanks + * + * get the number of banks nodes in the AST, used to have some malloc in pci + * @param[in] doc the Xpath context of the xml file. + * @return the number of banks. + */ +int pcilib_xml_getnumberbanks(xmlXPathContextPtr doc){ + xmlNodeSetPtr nodesetadress=NULL; + xmlXPathObjectPtr temp; + temp=pcilib_xml_getsetproperty(doc,BANK_ADDR_PATH); /**< we first get a structure containing all the banks nodes*/ + if(temp!=NULL) nodesetadress=temp->nodesetval; + else pcilib_error("no bank in the xml file"); + return nodesetadress->nodeNr; /**< we then return the number of said nodes */ +} + +/** pcilib_xml_initialize_banks + * + * function to create the structures to store the banks from the AST + * @see pcilib_xml_create_bank(pcilib_register_bank_description_t *mybank,xmlChar* adress, xmlChar *bar, xmlChar *size, xmlChar *protocol,xmlChar *read_addr, xmlChar *write_addr, xmlChar *access, xmlChar *endianess, xmlChar *format, xmlChar *name,xmlChar *description, xmlNodePtr node). + * @param[in] doc the AST of the xml file. + * @param[in,out] mybanks the structure containing the banks. + */ +void pcilib_xml_initialize_banks(xmlDocPtr doc, pcilib_register_bank_description_t* mybanks){ + pcilib_register_bank_description_t mybank; + + xmlNodeSetPtr nodesetadress=NULL,nodesetbar=NULL,nodesetsize=NULL,nodesetprotocol=NULL,nodesetread_addr=NULL,nodesetwrite_addr=NULL,nodesetaccess=NULL,nodesetendianess=NULL,nodesetformat=NULL,nodesetname=NULL,nodesetdescription=NULL; + xmlChar *adress=NULL,*bar=NULL,*size=NULL,*protocol=NULL,*read_addr=NULL,*write_addr=NULL,*access=NULL,*endianess=NULL,*format=NULL,*name=NULL,*description=NULL; + xmlNodePtr mynode; + + xmlXPathContextPtr context; + context=pcilib_xml_getcontext(doc); + + int i; + + mynode=malloc(sizeof(xmlNode)); + + xmlXPathObjectPtr temp; + + /** we first get the nodes corresponding to the properties we want + * note: here a recursive algorithm may be more efficient but less evolutive*/ + temp=pcilib_xml_getsetproperty(context,BANK_ADDR_PATH); + if(temp!=NULL) nodesetadress=temp->nodesetval; + else pcilib_error("there is no adress for banks in the xml"); + + temp=pcilib_xml_getsetproperty(context,BANK_BAR_PATH); + if(temp!=NULL) nodesetbar=temp->nodesetval; + else pcilib_error("there is no bar for banks in the xml"); + + temp=pcilib_xml_getsetproperty(context,BANK_SIZE_PATH); + if(temp!=NULL) nodesetsize=temp->nodesetval; + else pcilib_error("there is no size for banks in the xml"); + + temp=pcilib_xml_getsetproperty(context,BANK_PROTOCOL_PATH); + if(temp!=NULL) nodesetprotocol= temp->nodesetval; + else pcilib_error("there is no protocol for banks in the xml"); + + temp=pcilib_xml_getsetproperty(context,BANK_READ_ADDR_PATH); + if(temp!=NULL) nodesetread_addr=temp->nodesetval; + else pcilib_error("there is no read_adress for banks in the xml"); + + temp=pcilib_xml_getsetproperty(context,BANK_WRITE_ADDR_PATH); + if(temp!=NULL)nodesetwrite_addr=temp->nodesetval; + else pcilib_error("there is no write_adress for banks in the xml"); + + temp=pcilib_xml_getsetproperty(context,BANK_ACCESS_PATH); + if(temp!=NULL)nodesetaccess=temp->nodesetval; + else pcilib_error("there is no access for banks in the xml"); + + temp=pcilib_xml_getsetproperty(context,BANK_ENDIANESS_PATH); + if(temp!=NULL) nodesetendianess=temp->nodesetval; + else pcilib_error("there is no endianess for banks in the xml"); + + temp=pcilib_xml_getsetproperty(context,BANK_FORMAT_PATH); + if(temp!=NULL) nodesetformat=temp->nodesetval; + else pcilib_error("there is no format for banks in the xml"); + + temp=pcilib_xml_getsetproperty(context,BANK_NAME_PATH); + if(temp!=NULL)nodesetname=temp->nodesetval; + else pcilib_error("there is no name for banks in the xml"); + + temp=pcilib_xml_getsetproperty(context,BANK_DESCRIPTION_PATH); + if(temp!=NULL)nodesetdescription=temp->nodesetval; + + for(i=0;inodeNr;i++){ + /** we then get each node from the structures above*/ + adress=xmlNodeListGetString(doc,nodesetadress->nodeTab[i]->xmlChildrenNode, 1); + bar=xmlNodeListGetString(doc,nodesetbar->nodeTab[i]->xmlChildrenNode, 1); + size=xmlNodeListGetString(doc,nodesetsize->nodeTab[i]->xmlChildrenNode, 1); + protocol=xmlNodeListGetString(doc,nodesetprotocol->nodeTab[i]->xmlChildrenNode, 1); + read_addr=xmlNodeListGetString(doc,nodesetread_addr->nodeTab[i]->xmlChildrenNode, 1); + write_addr=xmlNodeListGetString(doc,nodesetwrite_addr->nodeTab[i]->xmlChildrenNode, 1); + access=xmlNodeListGetString(doc,nodesetaccess->nodeTab[i]->xmlChildrenNode, 1); + endianess=xmlNodeListGetString(doc,nodesetendianess->nodeTab[i]->xmlChildrenNode, 1); + format=xmlNodeListGetString(doc,nodesetformat->nodeTab[i]->xmlChildrenNode, 1); + name=xmlNodeListGetString(doc,nodesetname->nodeTab[i]->xmlChildrenNode, 1); + description=xmlNodeListGetString(doc,nodesetdescription->nodeTab[i]->xmlChildrenNode, 1); + + mynode=nodesetadress->nodeTab[i]->parent; + /** the following function will create the given structure for banks*/ + pcilib_xml_create_bank(&mybank,adress,bar,size,protocol,read_addr,write_addr,access,endianess,format, name, description,mynode); + mybanks[i]=mybank; + } + +} + +/** pcilib_xml_create_bank + * + * this function create a bank structure from the results of xml parsing + * @param[out] mybank the created bank. + * @param[in] adress the adress of the bank that will be created. + * @param[in] bar the bar of the bank that will be created. + * @param[in] size the size of the bank that will be created. + * @param[in] protocol the protocol of the bank that will be created. + * @param[in] read_addr the read adress for protocol of the bank that will be created. + * @param[in] write_addr the write adress for the protocol of the bank that will be created. + * @param[in] access the word size of the bank that will be created. + * @param[in] endianess the endianess of the bank that will be created. + * @param[in] format the format of the bank that will be created. + * @param[in] name the name of the bank that will be created. + * @param[in] description the description of the bank that will be created. + * @param[in] node the xmlNodeptr referring to the bank_description node of the bank that will be created. + */ +void pcilib_xml_create_bank(pcilib_register_bank_description_t *mybank,xmlChar* adress, xmlChar *bar, xmlChar *size, xmlChar *protocol, xmlChar *read_addr, xmlChar *write_addr, xmlChar *access, xmlChar *endianess, xmlChar *format, xmlChar *name,xmlChar *description, xmlNodePtr node){ + + char* ptr; + + /** we recreate each sub property of banks' structure given the results of xml parsing + note : strtol is used here to get hexadecimal and decimal values from the xml file as well*/ + + if (strcmp((char*)adress,"bank 0")==0){ + mybank->addr=PCILIB_REGISTER_BANK0; + }else if (strcmp((char*)adress,"bank 1")==0){ + mybank->addr=PCILIB_REGISTER_BANK1; + }else if (strcmp((char*)adress,"bank 2")==0){ + mybank->addr=PCILIB_REGISTER_BANK2; + }else if (strcmp((char*)adress,"bank 3")==0){ + mybank->addr=PCILIB_REGISTER_BANK3; + }else if (strcmp((char*)adress,"DMA bank")==0){ + mybank->addr=PCILIB_REGISTER_BANK_DMA; + }else if (strcmp((char*)adress,"DMAconf bank")==0){ + mybank->addr=PCILIB_REGISTER_BANK_DMACONF; + }else if (strcmp((char*)adress,"dynamic bank")==0){ + mybank->addr=PCILIB_REGISTER_BANK_DYNAMIC; + }else{ + mybank->addr=PCILIB_REGISTER_BANK_INVALID; + } + + if(strcmp((char*)bar,"0")==0){ + mybank->bar=PCILIB_BAR0; + }else if(strcmp((char*)bar,"ipecamera_register")==0){ + mybank->bar=PCILIB_BAR1; + } + + mybank->bar=(pcilib_bar_t)strtol((char*)bar,&ptr,0); + mybank->size=(size_t)strtol((char*)size,&ptr,0); + + if(strcmp((char*)protocol,"default")==0){ + mybank->protocol=PCILIB_REGISTER_PROTOCOL_DEFAULT; + }else if(strcmp((char*)protocol,"0")==0){ + mybank->protocol=PCILIB_REGISTER_PROTOCOL0; + }else if(strcmp((char*)protocol,"dma")==0){ + mybank->protocol=PCILIB_REGISTER_PROTOCOL_DMA; + }else if(strcmp((char*)protocol,"dynamic")==0){ + mybank->protocol=PCILIB_REGISTER_PROTOCOL_DYNAMIC; + }else if (strcmp((char*)protocol,"software")==0){ + mybank->protocol=PCILIB_REGISTER_PROTOCOL_SOFTWARE; + }else mybank->protocol=PCILIB_REGISTER_PROTOCOL_INVALID; + + mybank->read_addr=(uintptr_t)strtol((char*)read_addr,&ptr,0); + mybank->write_addr=(uintptr_t)strtol((char*)write_addr,&ptr,0); + mybank->access=(uint8_t)strtol((char*)access,&ptr,0); + + if(strcmp((char*)endianess,"little")==0){ + mybank->endianess=PCILIB_LITTLE_ENDIAN; + }else if(strcmp((char*)endianess,"big")==0){ + mybank->endianess=PCILIB_BIG_ENDIAN; + }else if(strcmp((char*)endianess,"host")==0){ + mybank->endianess=PCILIB_HOST_ENDIAN; + } + + mybank->raw_endianess=mybank->endianess; + + mybank->name=(char*)name; + mybank->description=(char*)description; + /* to include or not?*/ + //mybank->xmlNode=node; +} + + +/** pcilib_xml_getnumberregisters + * + * get the number of registers in the xml document, for further mallocs + * @param[in] doc the xpath context of the xml file. + * @return the numbers of registers in xml file. + */ +int pcilib_xml_getnumberregisters(xmlXPathContextPtr doc){ + xmlNodeSetPtr nodesetadress=NULL,nodesetsuboffset=NULL; + xmlXPathObjectPtr temp,temp2; + temp=pcilib_xml_getsetproperty(doc,ADRESS_PATH); /**nodesetval; /**nodesetval;/**< we get the structure with all bits registers here */ + else nodesetsuboffset->nodeNr=0; + return nodesetadress->nodeNr + nodesetsuboffset->nodeNr; /**nodesetval; + else pcilib_error("no adress for registers found in xml"); + + temp=pcilib_xml_getsetproperty(context,OFFSET_PATH); + if(temp!=NULL)nodesetoffset=temp->nodesetval; + else pcilib_error("no offset for registers found in xml"); + + temp=pcilib_xml_getsetproperty(context,DEFVALUE_PATH); + if(temp!=NULL)nodesetdefvalue=temp->nodesetval; + else pcilib_error("no defvalue for registers found in xml"); + + temp=pcilib_xml_getsetproperty(context,RWMASK_PATH); + if(temp!=NULL)nodesetrwmask=temp->nodesetval; + else pcilib_error("no rwmask for registers found in xml"); + + temp=pcilib_xml_getsetproperty(context,SIZE_PATH); + if(temp!=NULL)nodesetsize=temp->nodesetval; + else pcilib_error("no size for registers found in xml"); + + temp=pcilib_xml_getsetproperty(context,MODE_PATH); + if(temp!=NULL)nodesetmode=temp->nodesetval; + else pcilib_error("no mode for registers found in xml"); + + temp=pcilib_xml_getsetproperty(context,NAME_PATH); + if(temp!=NULL)nodesetname=temp->nodesetval; + else pcilib_error("no name for registers found in xml"); + + xmlNodeSetPtr nodesetsuboffset=NULL,nodesetsubsize=NULL,nodesetsubmode=NULL,nodesetsubname=NULL; + xmlChar *subadress=NULL,*suboffset=NULL,*subdefvalue=NULL,*subrwmask=NULL,*subsize=NULL,*submode=NULL,*subname=NULL,*subbank=NULL,*subtype=NULL,*subdescription=NULL; + + /**get the structures containing each property of bits registers */ + temp=pcilib_xml_getsetproperty(context,SUB_OFFSET_PATH); + if(temp!=NULL)nodesetsuboffset=temp->nodesetval; + else pcilib_error("no offset for registers bits found in xml"); + + temp=pcilib_xml_getsetproperty(context,SUB_SIZE_PATH); + if(temp!=NULL)nodesetsubsize=temp->nodesetval; + else pcilib_error("no size for registers bits found in xml"); + + temp=pcilib_xml_getsetproperty(context,SUB_MODE_PATH); + if(temp!=NULL)nodesetsubmode=temp->nodesetval; + else pcilib_error("no mode for registers bits found in xml"); + + temp=pcilib_xml_getsetproperty(context,SUB_NAME_PATH); + if(temp!=NULL)nodesetsubname=temp->nodesetval; + else pcilib_error("no name for registers bits found in xml"); + + + pcilib_register_description_t myregister; + + int i,j; + + for(i=0;inodeNr;i++){ + /** get each sub property of each standard registers*/ + adress=xmlNodeListGetString(doc,nodesetadress->nodeTab[i]->xmlChildrenNode, 1); + tempnode=xmlFirstElementChild(xmlFirstElementChild(nodesetadress->nodeTab[i]->parent->parent->parent)); + if(strcmp("adress",(char*)tempnode->name)==0) bank=xmlNodeListGetString(doc,tempnode->xmlChildrenNode,1); + else pcilib_error("the xml file is malformed"); + offset=xmlNodeListGetString(doc,nodesetoffset->nodeTab[i]->xmlChildrenNode, 1); + size=xmlNodeListGetString(doc,nodesetsize->nodeTab[i]->xmlChildrenNode, 1); + defvalue=xmlNodeListGetString(doc,nodesetdefvalue->nodeTab[i]->xmlChildrenNode, 1); + rwmask=xmlNodeListGetString(doc,nodesetrwmask->nodeTab[i]->xmlChildrenNode, 1); + mode=xmlNodeListGetString(doc,nodesetmode->nodeTab[i]->xmlChildrenNode, 1); + name=xmlNodeListGetString(doc,nodesetname->nodeTab[i]->xmlChildrenNode, 1); + type=(xmlChar*)"standard"; + if(nodesetname->nodeTab[i]->next->next!= NULL && strcmp((char*)nodesetname->nodeTab[i]->next->next->name,"description")==0){ + description=xmlNodeListGetString(doc,nodesetname->nodeTab[i]->next->next->xmlChildrenNode,1); + }else{ + description=(xmlChar*)""; + } + mynode=nodesetadress->nodeTab[i]->parent; + /**creation of a register with the given previous properties*/ + pcilib_xml_create_register(&myregister,adress,offset,size,defvalue,rwmask,mode, type, bank, name, description,mynode); + registers[i]=myregister; + } + + j=i; + + for(i=0;inodeNr;i++){ + /** we get there each subproperty of each bits register*/ + tempnode=xmlFirstElementChild(nodesetsuboffset->nodeTab[i]->parent->parent->parent); + if(strcmp((char*)tempnode->name,"adress")==0)subadress=xmlNodeListGetString(doc,tempnode->xmlChildrenNode, 1); + else pcilib_error("xml file is malformed"); + tempnode= xmlFirstElementChild(xmlFirstElementChild(nodesetsuboffset->nodeTab[i]->parent->parent->parent->parent->parent)); + if(strcmp((char*)tempnode->name,"adress")==0) subbank=xmlNodeListGetString(doc,tempnode->xmlChildrenNode,1); + else pcilib_error("xml file is malformed"); + suboffset=xmlNodeListGetString(doc,nodesetsuboffset->nodeTab[i]->xmlChildrenNode, 1); + subsize=xmlNodeListGetString(doc,nodesetsubsize->nodeTab[i]->xmlChildrenNode, 1); + tempnode=xmlFirstElementChild(nodesetsuboffset->nodeTab[i]->parent->parent->parent)->next->next->next->next->next->next; + if(strcmp((char*)tempnode->name,"default")==0)subdefvalue=xmlNodeListGetString(doc,tempnode->xmlChildrenNode, 1); + else pcilib_error("xml file is malformed"); + subrwmask=xmlNodeListGetString(doc,nodesetsuboffset->nodeTab[i]->parent->parent->prev->prev->prev->prev->prev->prev->xmlChildrenNode, 1); + submode=xmlNodeListGetString(doc,nodesetsubmode->nodeTab[i]->xmlChildrenNode, 1); + subname=xmlNodeListGetString(doc,nodesetsubname->nodeTab[i]->xmlChildrenNode, 1); + subtype=(xmlChar*)"bits"; + if(nodesetsubname->nodeTab[i]->next->next!= NULL && strcmp((char*)nodesetsubname->nodeTab[i]->next->next->name,"sub_description")==0){ + subdescription=xmlNodeListGetString(doc,nodesetsubname->nodeTab[i]->next->next->xmlChildrenNode,1); + }else{ + subdescription=(xmlChar*)""; + } + mynode=nodesetsuboffset->nodeTab[i]->parent; + /** creation of a bits register given the previous properties*/ + pcilib_xml_create_register(&myregister,subadress,suboffset,subsize,subdefvalue,subrwmask,submode, subtype, subbank, subname, subdescription,mynode); + registers[i+j]=myregister; + } +} + + +/* + * next 3 functions are for the implementation of a merge sort algorithm + */ +void topdownmerge(pcilib_register_description_t *A, int start, int middle, int end, pcilib_register_description_t *B){ + int i0,i1,j; + i0= start; + i1=middle; + + for(j=start;j=end || A[i0].addr<=A[i1].addr)){ + B[j]=A[i0]; + i0++; + } + else{ + B[j]=A[i1]; + i1++; + } + } +} + +void copyarray(pcilib_register_description_t *B, int start,int end, pcilib_register_description_t *A){ + int k; + for (k=start; k +/** validation + * + * function to validate the xml file against the xsd, so that it does not require extern software + */ +void validation() +{ +xmlDocPtr doc; +xmlSchemaPtr schema = NULL; +xmlSchemaParserCtxtPtr ctxt; + +char *XMLFileName; + pcilib_xml_read_config(&XMLFileName,3); +char *XSDFileName; + pcilib_xml_read_config(&XSDFileName,12); +int ret=1; + +ctxt = xmlSchemaNewParserCtxt(XSDFileName); + +schema = xmlSchemaParse(ctxt); +xmlSchemaFreeParserCtxt(ctxt); + +doc = xmlReadFile(XMLFileName, NULL, 0); + +if (doc == NULL) +{ + pcilib_error("Could not parse xml document "); +} +else +{ +xmlSchemaValidCtxtPtr ctxt; +/** validation here*/ +ctxt = xmlSchemaNewValidCtxt(schema); +ret = xmlSchemaValidateDoc(ctxt, doc); +xmlSchemaFreeValidCtxt(ctxt); +xmlFreeDoc(doc); +} + +//! free the resource +if(schema != NULL) +xmlSchemaFree(schema); + +xmlSchemaCleanupTypes(); +/** print results */ +if (ret == 0) +{ + printf("xml file validates\n"); +} +else +{ + printf("xml file does not validate against the schema\n"); +} + +} + +/** pcilib_xml_read_config + * + * function to get the config we want at line j, in order to be able to have a configuration file with pwd to files we want +* @param[in,out] xmlfile the string representating a pwd to a file we want to access in:uninitilized out: the pwd. +* @param[in] i the line at which the function should read the file to get the pwd. + */ +void pcilib_xml_read_config(char** xmlfile, int j){ + FILE *fp; + + fp=fopen("config.txt","r"); + char line[60]; + memset(line,'\0',60); + int i=0,k; + char *temp1; + if(fp==NULL) pcilib_error("can't find the configuration file: it must be near the executable"); + + while(fgets(line,60,fp)!=NULL){ + if(i==j) { + k=0; + temp1=calloc((strlen(line)),sizeof(char)); + while(line[k]!='\n'){ + temp1[k]=line[k]; + k++; + } + temp1[k]='\0'; + *xmlfile=temp1; + } + i++; + memset(line,'\0',60); + } +} +/* to include or not?*/ +/** pcilib_xml_init_nodeset_register_ctx + * + * function to get all registers nodes in a structure and put it in registers context +* @param[in] ctx the register context running. + * +void pcilib_xml_init_nodeset_register_ctx(pcilib_register_context_t *ctx){ + char* xmlfile; + pcilib_xml_read_config(&xmlfile,3); + xmlDocPtr doc; + doc=pcilib_xml_getdoc(xmlfile); + xmlXPathContextPtr context; + context=pcilib_xml_getcontext(doc); + + xmlNodeSetPtr registers; + registers = pcilib_xml_getsetproperty(context, REGISTERS_PATH)->nodesetval; + ctx->registers_nodes=registers; +} + +** pcilib_xml_init_nodeset_bank_ctx + * + *function to get all banks nodes in a structure and put it in banks context +* @param[in] ctx the bank context running. + * +void pcilib_xml_init_nodeset_bank_ctx(pcilib_register_bank_context_t *ctx){ + char* xmlfile; + pcilib_xml_read_config(&xmlfile,3); + xmlDocPtr doc; + doc=pcilib_xml_getdoc(xmlfile); + xmlXPathContextPtr context; + context=pcilib_xml_getcontext(doc); + + xmlNodeSetPtr banks; + banks = pcilib_xml_getsetproperty(context, BANKS_PATH)->nodesetval; + ctx->banks_nodes=banks; + +} +*/ diff --git a/pcilib/xml.h b/pcilib/xml.h new file mode 100644 index 0000000..da540b5 --- /dev/null +++ b/pcilib/xml.h @@ -0,0 +1,208 @@ +/** + * @file xml.h + * @version 1.0 + * @brief header file to support of xml configuration. + * + * @details this file is the header file for the implementation of dynamic registers using xml and several funtionalities for the "pci-tool" line command tool from XML files. the xml part has been implemented using libxml2. + * + * this code was meant to be evolutive as the XML files evolute. In this meaning, most of the xml parsing is realized with XPath expressions(when it was possible), so that changing the xml xould result mainly in changing the XPAth pathes present here. + * @todo cf compilation chain + */ + +#ifndef _XML_ +#define _XML_ + +//#include +//#include +//#include +//#include + +#include +#include +#include +#include + +#include "pcilib.h" +#include "register.h" +#include "model.h" +#include "bank.h" + +//#include + +#define REGISTERS_PATH ((xmlChar*)"/model/banks/bank/registers/register") /**