source: trunk/zoo-kernel/zoo_loader.c @ 114

Last change on this file since 114 was 114, checked in by djay, 13 years ago

Code cleanup to avoid most of the warning messages at compilation time.

File size: 7.7 KB
Line 
1/**
2 * Author : Gérald FENOY
3 *
4 *  Copyright 2008-2011 GeoLabs SARL. All rights reserved.
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
15 *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
19 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22 * THE SOFTWARE.
23 */
24
25#define MALLOC_CHECK_ 0
26#define MALLOC_CHECK 0
27
28/**
29 * Specific includes
30 */
31#include "fcgio.h"
32#include "fcgi_config.h"
33#include "fcgi_stdio.h"
34#include <sys/types.h>
35#include <unistd.h>
36#include "service_internal.h"
37
38extern "C" {
39#include "cgic.h"
40#include <libxml/tree.h>
41#include <libxml/xmlmemory.h>
42#include <libxml/parser.h>
43#include <libxml/xpath.h>
44#include <libxml/xpathInternals.h>
45}
46
47xmlXPathObjectPtr extractFromDoc(xmlDocPtr,const char*);
48int runRequest(map*);
49
50using namespace std;
51
52/* ************************************************************************* */
53
54int errorException(maps *m, const char *message, const char *errorcode) 
55{
56  map* errormap = createMap("text", message);
57  addToMap(errormap,"code", errorcode);
58  printExceptionReportResponse(m,errormap);
59  freeMap(&errormap);
60  free(errormap);
61  return -1;
62}
63
64/* ************************************************************************* */
65
66#ifndef STRTOK_R
67char *
68strtok_r (char *s1, const char *s2, char **lasts)
69{
70  char *ret;
71
72  if (s1 == NULL)
73    s1 = *lasts;
74  while (*s1 && strchr(s2, *s1))
75    ++s1;
76  if (*s1 == '\0')
77    return NULL;
78  ret = s1;
79  while (*s1 && !strchr(s2, *s1))
80    ++s1;
81  if (*s1)
82    *s1++ = '\0';
83  *lasts = s1;
84  return ret;
85}
86
87#endif
88
89#define TRUE 1
90#define FALSE -1
91
92int cgiMain(){
93  /**
94   * We'll use cgiOut as the default output (stdout) to produce plain text
95   * response.
96   */
97  dup2(fileno(cgiOut),fileno(stdout));
98#ifdef DEBUG
99  fprintf(cgiOut,"Content-Type: text/plain; charset=utf-8\r\nStatus: 200 OK\r\n\r\n");
100  fprintf(cgiOut,"Welcome on ZOO verbose debuging mode \r\n\r\n");
101  fflush(cgiOut);
102#endif
103 
104#ifdef DEBUG
105  fprintf (stderr, "Addr:%s\n", cgiRemoteAddr); 
106  fprintf (stderr, "RequestMethod:%s\n", cgiRequestMethod); 
107  fprintf (stderr, "Request: %s\n", cgiQueryString);
108#endif
109
110  map* tmpMap=NULL;
111
112  if(strncmp(cgiContentType,"text/xml",8)==0 || 
113     strncasecmp(cgiRequestMethod,"post",4)==0){
114    char *buffer=new char[cgiContentLength+1];
115    if(fread(buffer,1,cgiContentLength,cgiIn)){
116      buffer[cgiContentLength]=0;
117      tmpMap=createMap("request",buffer);
118    }else{
119      char **array, **arrayStep;
120      if (cgiFormEntries(&array) != cgiFormSuccess) {
121        return 1;
122      }
123      arrayStep = array;
124      while (*arrayStep) {
125        char *value=new char[cgiContentLength];
126        cgiFormStringNoNewlines(*arrayStep, value, cgiContentLength);
127        char* tmpValueFinal=(char*) malloc((strlen(*arrayStep)+strlen(value)+1)*sizeof(char));
128        sprintf(tmpValueFinal,"%s=%s",*arrayStep,value);
129        tmpMap=createMap("request",tmpValueFinal);
130        free(tmpValueFinal);
131#ifdef DEBUG
132        fprintf(stderr,"(( \n %s \n %s \n ))",*arrayStep,value);
133#endif
134        delete[]value;
135        arrayStep++;
136      }
137    }
138    delete[]buffer;
139  }
140  else{
141    char **array, **arrayStep;
142    if (cgiFormEntries(&array) != cgiFormSuccess) {
143      return 1;
144    }
145    arrayStep = array;
146    while (*arrayStep) {
147      char *value=new char[cgiContentLength];
148      cgiFormStringNoNewlines(*arrayStep, value, cgiContentLength);
149#ifdef DEBUG
150      fprintf(stderr,"(( \n %s \n %s \n ))",*arrayStep,value);
151#endif
152      if(tmpMap!=NULL)
153        addToMap(tmpMap,*arrayStep,value);
154      else
155        tmpMap=createMap(*arrayStep,value);
156      arrayStep++;
157      delete[]value;
158    }
159    cgiStringArrayFree(array);
160  }
161
162  /**
163   * In case that the POST method was used, then check if params came in XML
164   * format else try to use the attribute "request" which should be the only
165   * one.
166   */
167  if(strncasecmp(cgiRequestMethod,"post",4)==0 || 
168     (count(tmpMap)==1 && strncmp(tmpMap->value,"<",1)==0)){
169    /**
170     * First include the MetaPath and the ServiceProvider default parameters
171     * (which should be always available in GET params so in cgiQueryString)
172     */
173    char *str1;
174    str1=cgiQueryString;
175    /**
176     * Store the original XML request in xrequest map
177     */
178    map* t1=getMap(tmpMap,"request");
179    if(t1!=NULL){
180      addToMap(tmpMap,"xrequest",t1->value);
181      xmlInitParser();
182      xmlDocPtr doc = xmlParseMemory(t1->value,cgiContentLength);
183      xmlNodePtr cur = xmlDocGetRootElement(doc);
184      char *tval;
185      tval=NULL;
186      tval = (char*) xmlGetProp(cur,BAD_CAST "service");
187      if(tval!=NULL)
188        addToMap(tmpMap,"service",tval);
189      tval=NULL;
190      tval = (char*) xmlGetProp(cur,BAD_CAST "language");
191      if(tval!=NULL)
192        addToMap(tmpMap,"language",tval);
193     
194      const char* requests[3];
195      requests[0]="GetCapabilities";
196      requests[1]="DescribeProcess";
197      requests[2]="Execute";
198      for(int j=0;j<3;j++){
199        char tt[35];
200        sprintf(tt,"/*[local-name()='%s']",requests[j]);
201        xmlXPathObjectPtr reqptr=extractFromDoc(doc,tt);
202        if(reqptr!=NULL){
203          xmlNodeSet* req=reqptr->nodesetval;
204#ifdef DEBUG
205          fprintf(stderr,"%i",req->nodeNr);
206#endif
207          if(req!=NULL && req->nodeNr==1){
208            t1->value=strdup(requests[j]);
209            j=2;
210          }
211          xmlXPathFreeObject(reqptr);
212        }
213        //xmlFree(req);
214      }
215      if(strncasecmp(t1->value,"GetCapabilities",15)==0){
216        xmlXPathObjectPtr versptr=extractFromDoc(doc,"/*/*/*[local-name()='Version']");
217        xmlNodeSet* vers=versptr->nodesetval;
218        xmlChar* content=xmlNodeListGetString(doc, vers->nodeTab[0]->xmlChildrenNode,1);
219        addToMap(tmpMap,"version",(char*)content);
220        xmlXPathFreeObject(versptr);
221        //xmlFree(vers);
222        xmlFree(content);
223      }else{
224        tval=NULL;
225        tval = (char*) xmlGetProp(cur,BAD_CAST "version");
226        if(tval!=NULL)
227          addToMap(tmpMap,"version",tval);
228        xmlFree(tval);
229        tval = (char*) xmlGetProp(cur,BAD_CAST "language");
230        if(tval!=NULL)
231          addToMap(tmpMap,"language",tval);
232        xmlXPathObjectPtr idptr=extractFromDoc(doc,"/*/*[local-name()='Identifier']");
233        if(idptr!=NULL){
234          xmlNodeSet* id=idptr->nodesetval;
235          if(id!=NULL){
236            char* identifiers=NULL;
237            identifiers=(char*)calloc(cgiContentLength,sizeof(char));
238            identifiers[0]=0;
239            for(int k=0;k<id->nodeNr;k++){
240              xmlChar* content=xmlNodeListGetString(doc, id->nodeTab[k]->xmlChildrenNode,1);
241              if(strlen(identifiers)>0){
242                char *tmp=strdup(identifiers);
243                snprintf(identifiers,strlen(tmp)+xmlStrlen(content)+2,"%s,%s",tmp,content);
244                free(tmp);
245              }
246              else{
247                snprintf(identifiers,xmlStrlen(content)+1,"%s",content);
248              }
249              xmlFree(content);
250            }
251            xmlXPathFreeObject(idptr);
252            addToMap(tmpMap,"Identifier",identifiers);
253            free(identifiers);
254          }
255        }
256        //xmlFree(id);
257      }
258      xmlFree(tval);
259      xmlFreeDoc(doc);
260      xmlCleanupParser();
261    }
262  }
263
264  runRequest(tmpMap);
265
266  /**
267   * Required but can't be made after executing a process using POST requests.
268   */
269  if(strncasecmp(cgiRequestMethod,"post",4)!=0 && count(tmpMap)!=1 && tmpMap!=NULL){
270    freeMap(&tmpMap);
271    free(tmpMap);
272  }
273  return 0;
274
275}
Note: See TracBrowser for help on using the repository browser.

Search

ZOO Sponsors

http://www.zoo-project.org/trac/chrome/site/img/geolabs-logo.pnghttp://www.zoo-project.org/trac/chrome/site/img/neogeo-logo.png http://www.zoo-project.org/trac/chrome/site/img/apptech-logo.png http://www.zoo-project.org/trac/chrome/site/img/3liz-logo.png http://www.zoo-project.org/trac/chrome/site/img/gateway-logo.png

Become a sponsor !

Knowledge partners

http://www.zoo-project.org/trac/chrome/site/img/ocu-logo.png http://www.zoo-project.org/trac/chrome/site/img/gucas-logo.png http://www.zoo-project.org/trac/chrome/site/img/polimi-logo.png http://www.zoo-project.org/trac/chrome/site/img/fem-logo.png http://www.zoo-project.org/trac/chrome/site/img/supsi-logo.png http://www.zoo-project.org/trac/chrome/site/img/cumtb-logo.png

Become a knowledge partner

Related links

http://zoo-project.org/img/ogclogo.png http://zoo-project.org/img/osgeologo.png