1 | /** |
---|
2 | * Author : Gérald FENOY |
---|
3 | * |
---|
4 | * Copyright 2008-2009 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 | #include "service.h" |
---|
26 | #include "service_internal.h" |
---|
27 | |
---|
28 | extern "C" { |
---|
29 | #include <libxml/tree.h> |
---|
30 | #include <libxml/parser.h> |
---|
31 | #include <libxml/xpath.h> |
---|
32 | #include <libxml/xpathInternals.h> |
---|
33 | |
---|
34 | #include <libxslt/xslt.h> |
---|
35 | #include <libxslt/xsltInternals.h> |
---|
36 | #include <libxslt/transform.h> |
---|
37 | #include <libxslt/xsltutils.h> |
---|
38 | |
---|
39 | #include <dirent.h> |
---|
40 | |
---|
41 | /** |
---|
42 | * GetStatus ZOO Service : |
---|
43 | * This service is used in the ZOO-Project to get information about Services |
---|
44 | * running as background tasks. The service will first get the XML document |
---|
45 | * cached by the ZOO-Kernel before calling effectively the Service, then |
---|
46 | * will access the shared memory space created by the Kernel to extract the |
---|
47 | * current status of the running Service. Using a simple XSL file it will |
---|
48 | * finally produce the final ExecuteResponse including the updated |
---|
49 | * percentCompleted attribute of the ProcessStarted node of the cached |
---|
50 | * document if any (so if the Service is currently running) else it will |
---|
51 | * return the final ExecuteResponse stored on the Server file system. |
---|
52 | */ |
---|
53 | #ifdef WIN32 |
---|
54 | __declspec(dllexport) |
---|
55 | #endif |
---|
56 | int GetStatus(maps*& conf,maps*& inputs,maps*& outputs){ |
---|
57 | const char *params[4 + 1]; |
---|
58 | int xmlLoadExtDtdDefaultValue; |
---|
59 | map* tmpMap=NULL,*tmpMmap=NULL, *tmpTmap=NULL; |
---|
60 | |
---|
61 | tmpMap=getMapFromMaps(inputs,"sid","value"); |
---|
62 | tmpTmap=getMapFromMaps(conf,"main","tmpPath"); |
---|
63 | tmpMmap=getMapFromMaps(conf,"main","dataPath"); |
---|
64 | if(tmpMmap==NULL) |
---|
65 | tmpMmap=tmpTmap; |
---|
66 | xmlInitParser(); |
---|
67 | int hasFile=-1; |
---|
68 | char xslFileName[1024]; |
---|
69 | char* mem=_getStatusFile(conf,tmpMap->value); |
---|
70 | if(mem==NULL){ |
---|
71 | char tmp[1024]; |
---|
72 | snprintf(tmp,1024,_ss("GetStatus was unable to find any cache file for Service ID %s."),tmpMap->value); |
---|
73 | setMapInMaps(conf,"lenv","message",tmp); |
---|
74 | return SERVICE_FAILED; |
---|
75 | } |
---|
76 | sprintf(xslFileName,"%s/updateStatus.xsl",tmpMmap->value); |
---|
77 | xmlSubstituteEntitiesDefault(1); |
---|
78 | xmlLoadExtDtdDefaultValue = 0; |
---|
79 | xsltStylesheetPtr cur = NULL; |
---|
80 | xmlDocPtr doc, res; |
---|
81 | cur = xsltParseStylesheetFile(BAD_CAST xslFileName); |
---|
82 | doc = xmlParseMemory(mem,strlen(mem)); |
---|
83 | //doc = xmlParseFile(fileName); |
---|
84 | if(cur!=NULL && doc!=NULL){ |
---|
85 | /** |
---|
86 | * Parse Status to extract Status / Message |
---|
87 | */ |
---|
88 | char *tmpStr=_getStatus(conf,tmpMap->value); |
---|
89 | #ifdef DEBUG |
---|
90 | fprintf(stderr,"DEBUG: %s \n",tmpStr); |
---|
91 | #endif |
---|
92 | if(tmpStr!=NULL && strncmp(tmpStr,"-1",2)!=0){ |
---|
93 | char *tmpStr1=strdup(tmpStr); |
---|
94 | char *tmpStr0=strdup(strstr(tmpStr,"|")+1); |
---|
95 | free(tmpStr); |
---|
96 | tmpStr1[strlen(tmpStr1)-strlen(tmpStr0)-1]='\0'; |
---|
97 | char *tmpStrFinal=(char*)malloc((strlen(tmpStr0)+11)*sizeof(char)); |
---|
98 | sprintf(tmpStrFinal,"string(\"%s\")",tmpStr0); |
---|
99 | params[0]="value"; |
---|
100 | params[1]=tmpStr1; |
---|
101 | params[2]="message"; |
---|
102 | params[3]=tmpStrFinal; |
---|
103 | params[4]=NULL; |
---|
104 | res = xsltApplyStylesheet(cur, doc, params); |
---|
105 | xmlChar *xmlbuff; |
---|
106 | int buffersize; |
---|
107 | xmlDocDumpFormatMemory(res, &xmlbuff, &buffersize, 1); |
---|
108 | setMapInMaps(outputs,"Result","value",(char*)xmlbuff); |
---|
109 | xmlFree(xmlbuff); |
---|
110 | free(tmpStr1); |
---|
111 | free(tmpStr0); |
---|
112 | free(tmpStrFinal); |
---|
113 | }else{ |
---|
114 | xmlChar *xmlbuff; |
---|
115 | int buffersize; |
---|
116 | xmlDocDumpFormatMemory(doc, &xmlbuff, &buffersize, 1); |
---|
117 | setMapInMaps(outputs,"Result","value",(char*)xmlbuff); |
---|
118 | xmlFree(xmlbuff); |
---|
119 | } |
---|
120 | } |
---|
121 | else{ |
---|
122 | char tmp[1024]; |
---|
123 | sprintf(tmp,_ss("ZOO GetStatus Service was unable to parse the cache xml file available for the Service ID %s."),tmpMap->value); |
---|
124 | setMapInMaps(conf,"lenv","message",tmp); |
---|
125 | return SERVICE_FAILED; |
---|
126 | } |
---|
127 | return SERVICE_SUCCEEDED; |
---|
128 | } |
---|
129 | |
---|
130 | |
---|
131 | /** |
---|
132 | * longProcess ZOO Service : |
---|
133 | * Simple Service which just loop over 100 times then return a welcome message |
---|
134 | * string, at each step the service will sleep for one second. |
---|
135 | */ |
---|
136 | #ifdef WIN32 |
---|
137 | __declspec(dllexport) |
---|
138 | #endif |
---|
139 | int longProcess(maps*& conf,maps*& inputs,maps*& outputs){ |
---|
140 | int i=0; |
---|
141 | while(i<100){ |
---|
142 | char message[10]; |
---|
143 | sprintf(message,"Step %d",i); |
---|
144 | updateStatus(conf,i,message); |
---|
145 | #ifndef WIN32 |
---|
146 | sleep(1); |
---|
147 | #else |
---|
148 | Sleep(1000); |
---|
149 | #endif |
---|
150 | i+=5; |
---|
151 | } |
---|
152 | setOutputValue(outputs,"Result",(char*)"\"Long process run successfully\"",-1); |
---|
153 | return SERVICE_SUCCEEDED; |
---|
154 | } |
---|
155 | |
---|
156 | } |
---|