aboutsummaryrefslogtreecommitdiff
path: root/src/Parameters.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/Parameters.c')
-rw-r--r--src/Parameters.c485
1 files changed, 239 insertions, 246 deletions
diff --git a/src/Parameters.c b/src/Parameters.c
index f8f2420..1130d85 100644
--- a/src/Parameters.c
+++ b/src/Parameters.c
@@ -55,6 +55,7 @@ static int ParameterPage(cGH *cctkGH, httpRequest *request, void *data);
********************* Other Routine Prototypes *********************
********************************************************************/
+int HTTPi_RegisterParameterPages(void);
/********************************************************************
********************* Local Data *****************************
@@ -92,10 +93,9 @@ int HTTPi_RegisterParameterPages(void)
int first;
const char *thorn;
char pagename[27+20+100]; /* Thorns have maximum length
- then added 100 for parameters */
+ then added 100 for parameters */
char *namecopy;
const cParamData *pData;
- cParamData *datacopy;
/* Two ways to do this - can either just have one function
* registered as /Parameters which then checks request->residual,
@@ -126,9 +126,8 @@ int HTTPi_RegisterParameterPages(void)
while(CCTK_ParameterWalk(first, thorn, NULL, &pData) == 0)
{
first = 0;
- sprintf(pagename,"/Parameters/%s/%s",thorn,pData->name);
- datacopy = (cParamData *)pData;
- HTTP_RegisterPage(pagename, ParameterPage, datacopy);
+ sprintf(pagename,"/Parameters/%s/%s",thorn,pData->name);
+ HTTP_RegisterPage(pagename, ParameterPage, pData);
}
}
@@ -170,6 +169,9 @@ static int MainParameterPage(cGH *cctkGH, httpRequest *request, void *data)
int i;
const char *thorn;
+ /* avoid compiler warning about unused parameter */
+ data = data;
+
/* Status message */
strcpy(message,"HTTP/1.0 200 OK\r\n");
@@ -218,9 +220,9 @@ static int MainParameterPage(cGH *cctkGH, httpRequest *request, void *data)
{
sprintf(message,
"<TR>\n"
- "<TD VALIGN=TOP ALIGN=CENTER><A HREF=\"/Parameters/%s/\">%s</A></td>\n"
+ "<TD VALIGN=TOP ALIGN=CENTER><A HREF=\"/Parameters/%s/\">%s</A></td>\n"
"<TD VALIGN=TOP ALIGN=CENTER>%s</TD>\n"
- "</TR>\n",
+ "</TR>\n",
thorn, thorn,CCTK_ThornImplementation(thorn));
HTTP_Write(request, message, strlen(message));
@@ -279,7 +281,6 @@ static int ThornParameterPage(cGH *cctkGH, httpRequest *request, void *data)
int param_type;
int param_bool;
- char *param_keyword;
int nsteerable=0;
int nfixed=0;
@@ -299,7 +300,7 @@ static int ThornParameterPage(cGH *cctkGH, httpRequest *request, void *data)
{
/* Queue parameters for steering */
first = 1;
- while(argument = HTTP_ArgumentWalk(request, first))
+ while((argument = HTTP_ArgumentWalk(request, first)) != NULL)
{
first = 0;
fprintf(stderr, "Setting %s::%s to %s\n", thorn, argument->arg, argument->value);
@@ -390,9 +391,9 @@ static int ThornParameterPage(cGH *cctkGH, httpRequest *request, void *data)
menuthorn = CCTK_CompiledThorn (i);
if (CCTK_IsThornActive (menuthorn))
{
- sprintf(menu,
- "%s<DT> <A HREF=\"/Parameters/%s/\">%s</A>\n",
- menu,menuthorn, menuthorn);
+ sprintf(menu,
+ "%s<DT> <A HREF=\"/Parameters/%s/\">%s</A>\n",
+ menu,menuthorn, menuthorn);
}
}
HTTP_ContentHeader(cctkGH,0,4098,message,menu);
@@ -410,27 +411,27 @@ static int ThornParameterPage(cGH *cctkGH, httpRequest *request, void *data)
/* Steerable parameters can be edited in a FORM. */
sprintf(message,
"<center><H1>Check/Modify Parameters</H1>"
- "<H2>Thorn %s</H2></center>\n",
+ "<H2>Thorn %s</H2></center>\n",
thorn);
strcat(message,
"<p>Parameters in Cactus can be either <i>fixed</i> or <i>steerable</i>. "
- "Steerable parameters are those which can be modified during a "
- "simulation"
- "To change steerable parameters, edit the values and press \n"
+ "Steerable parameters are those which can be modified during a "
+ "simulation"
+ "To change steerable parameters, edit the values and press \n"
" the submit button."
- "Before applying the new parameter value, Cactus will check that"
- " the parameter lies in the allowed range. Note that there"
- " is currently no log of parameters which have been modified.</p>\n"
- "<p>The tables below show the parameter name, current value and description."
- "The default value of each parameter is shown in brackets at the end of the description.</p>"
+ "Before applying the new parameter value, Cactus will check that"
+ " the parameter lies in the allowed range. Note that there"
+ " is currently no log of parameters which have been modified.</p>\n"
+ "<p>The tables below show the parameter name, current value and description."
+ "The default value of each parameter is shown in brackets at the end of the description.</p>"
"<center>\n");
HTTP_Write(request, message, strlen(message));
if(!readonly )
{
- sprintf(message,"<FORM ACTION=\"/Parameters/%s/\">",thorn);
- HTTP_Write(request, message, strlen(message));
+ sprintf(message,"<FORM ACTION=\"/Parameters/%s/\">",thorn);
+ HTTP_Write(request, message, strlen(message));
}
/* Walk through all steerable parameters of given implementation. */
@@ -445,105 +446,104 @@ static int ThornParameterPage(cGH *cctkGH, httpRequest *request, void *data)
if(value)
{
if (pData->steerable == CCTK_STEERABLE_ALWAYS)
- {
-
- if (nsteerable == 0)
- {
- strcat(message,"<h2>Steerable Parameters</h2>");
- if (readonly)
- {
- strcat(message,"<p><i>The following parameters are steerable, "
- "but you do not have authorisation to change them. "
- "To change parameters you must first register on the "
- "<a href=\"/control.html\">Simulation Control Page</a>."
- "</i></p>");
- }
- strcat(message,"<table cellpadding=5 cellspacing=5>");
- }
- nsteerable++;
-
- if (!readonly)
- {
- if (pData->type == PARAMETER_BOOLEAN)
- {
- /* Steerable boolean */
- param_bool =
- *((CCTK_INT *)CCTK_ParameterGet(pData->name,thorn,&param_type));
- sprintf(message,
- "%s<TR>\n"
- "<TD ALIGN=LEFT VALIGN=CENTER>"
- "<A HREF=\"/Parameters/%s/%s\">%s</A></TD>\n"
- "<TD ALIGN=LEFT VALIGN=CENTER>"
- "Yes <INPUT TYPE=\"RADIO\" NAME=\"%s\" %s VALUE=\"1\">"
- "&nbsp;"
- "No <INPUT type=\"RADIO\" name=\"%s\" %s VALUE=\"0\">"
- "</TD>\n"
- "<TD><SMALL>%s (%s)</SMALL></TD>\n"
- "</TR>\n",
- message,pData->thorn,pData->name,
- pData->name,pData->name,
- param_bool ? "checked" : "", pData->name,
- param_bool ? "" : "checked",pData->description,pData->defval);
- }
- else if (pData->type == PARAMETER_KEYWORD)
- {
- /* Steerable keyword */
- param_keyword =
- ((char *)CCTK_ParameterGet(pData->name,thorn,&param_type));
-
- sprintf(message,"%s<TR>\n"
- "<TD ALIGN=LEFT VALIGN=CENTER>"
- "<A HREF=\"/Parameters/%s/%s\">%s</A></TD>\n"
- "<TD ALIGN=LEFT VALIGN=CENTER>\n",
- message,pData->thorn,pData->name,pData->name);
- sprintf(message,"%s <SELECT name=%s size=1>\n",
- message,pData->name);
- for(range = pData->range; range ; range = range->next)
- {
- if (CCTK_Equals(value,range->range))
- {
- sprintf(message,"%s<OPTION SELECTED>%s\n",
- message, range->range);
- }
- else
- {
- sprintf(message,"%s<OPTION>%s\n",
- message,range->range);
- }
- }
- strcat(message,"</SELECT>\n");
- sprintf(message,"%s</TD>\n"
- "<TD><SMALL>%s (%s)</SMALL></TD>\n"
- "</TR>\n",
- message,pData->description,pData->defval);
- }
- else
- {
- /* Steerable nonboolean */
- sprintf(message,
- "%s<TR>\n"
- "<TD align=left valign=center>"
- "<A HREF=\"/Parameters/%s/%s\">%s</A></TD>\n"
- "<TD align=left valign=center>"
- "<INPUT TYPE=TEXT NAME=\"%s\" VALUE=\"%s\"></TD>\n"
- "<TD><SMALL>%s (%s)</SMALL></TD>\n</TR>\n",
- message, pData->thorn, pData->name,
- pData->name, pData->name,
- value, pData->description,pData->defval);
- }
- }
- else
- {
- /* Steerable but no authority */
- sprintf(message,
- "%s<TR><TD align=left valign=center>"
- "<A HREF=\"/Parameters/%s/%s\">%s</A></TD>\n"
- "<TD align=left valign=center>%s</TD><TD>"
- "<SMALL>%s (%s)</SMALL></TD></TR>\n",
- message, pData->thorn, pData->name,
- pData->name, value, pData->description,pData->defval);
- }
- }
+ {
+
+ if (nsteerable == 0)
+ {
+ strcat(message,"<h2>Steerable Parameters</h2>");
+ if (readonly)
+ {
+ strcat(message,"<p><i>The following parameters are steerable, "
+ "but you do not have authorisation to change them. "
+ "To change parameters you must first register on the "
+ "<a href=\"/control.html\">Simulation Control Page</a>."
+ "</i></p>");
+ }
+ strcat(message,"<table cellpadding=5 cellspacing=5>");
+ }
+ nsteerable++;
+
+ if (!readonly)
+ {
+ if (pData->type == PARAMETER_BOOLEAN)
+ {
+ /* Steerable boolean */
+ param_bool =
+ *((CCTK_INT *)CCTK_ParameterGet(pData->name,thorn,&param_type));
+ sprintf(message,
+ "%s<TR>\n"
+ "<TD ALIGN=LEFT VALIGN=CENTER>"
+ "<A HREF=\"/Parameters/%s/%s\">%s</A></TD>\n"
+ "<TD ALIGN=LEFT VALIGN=CENTER>"
+ "Yes <INPUT TYPE=\"RADIO\" NAME=\"%s\" %s VALUE=\"1\">"
+ "&nbsp;"
+ "No <INPUT type=\"RADIO\" name=\"%s\" %s VALUE=\"0\">"
+ "</TD>\n"
+ "<TD><SMALL>%s (%s)</SMALL></TD>\n"
+ "</TR>\n",
+ message,pData->thorn,pData->name,
+ pData->name,pData->name,
+ param_bool ? "checked" : "", pData->name,
+ param_bool ? "" : "checked",pData->description,pData->defval);
+ }
+ else if (pData->type == PARAMETER_KEYWORD)
+ {
+ /* Steerable keyword */
+ CCTK_ParameterGet(pData->name,thorn,&param_type);
+
+ sprintf(message,"%s<TR>\n"
+ "<TD ALIGN=LEFT VALIGN=CENTER>"
+ "<A HREF=\"/Parameters/%s/%s\">%s</A></TD>\n"
+ "<TD ALIGN=LEFT VALIGN=CENTER>\n",
+ message,pData->thorn,pData->name,pData->name);
+ sprintf(message,"%s <SELECT name=%s size=1>\n",
+ message,pData->name);
+ for(range = pData->range; range ; range = range->next)
+ {
+ if (CCTK_Equals(value,range->range))
+ {
+ sprintf(message,"%s<OPTION SELECTED>%s\n",
+ message, range->range);
+ }
+ else
+ {
+ sprintf(message,"%s<OPTION>%s\n",
+ message,range->range);
+ }
+ }
+ strcat(message,"</SELECT>\n");
+ sprintf(message,"%s</TD>\n"
+ "<TD><SMALL>%s (%s)</SMALL></TD>\n"
+ "</TR>\n",
+ message,pData->description,pData->defval);
+ }
+ else
+ {
+ /* Steerable nonboolean */
+ sprintf(message,
+ "%s<TR>\n"
+ "<TD align=left valign=center>"
+ "<A HREF=\"/Parameters/%s/%s\">%s</A></TD>\n"
+ "<TD align=left valign=center>"
+ "<INPUT TYPE=TEXT NAME=\"%s\" VALUE=\"%s\"></TD>\n"
+ "<TD><SMALL>%s (%s)</SMALL></TD>\n</TR>\n",
+ message, pData->thorn, pData->name,
+ pData->name, pData->name,
+ value, pData->description,pData->defval);
+ }
+ }
+ else
+ {
+ /* Steerable but no authority */
+ sprintf(message,
+ "%s<TR><TD align=left valign=center>"
+ "<A HREF=\"/Parameters/%s/%s\">%s</A></TD>\n"
+ "<TD align=left valign=center>%s</TD><TD>"
+ "<SMALL>%s (%s)</SMALL></TD></TR>\n",
+ message, pData->thorn, pData->name,
+ pData->name, value, pData->description,pData->defval);
+ }
+ }
free (value);
}
HTTP_Write(request, message, strlen(message));
@@ -552,18 +552,18 @@ static int ThornParameterPage(cGH *cctkGH, httpRequest *request, void *data)
if (nsteerable>0)
{
- strcpy(message, "</TABLE>\n");
+ strcpy(message, "</TABLE>\n");
}
else
{
- strcpy(message, "<P>This thorn has no steerable parameters.</P>\n");
+ strcpy(message, "<P>This thorn has no steerable parameters.</P>\n");
}
HTTP_Write(request, message, strlen(message));
if(!readonly && nsteerable>0)
{
strcpy(message,
- "<INPUT TYPE=SUBMIT VALUE=\"Update all parameters\">\n"
+ "<INPUT TYPE=SUBMIT VALUE=\"Update all parameters\">\n"
"</FORM>\n");
HTTP_Write(request, message, strlen(message));
}
@@ -582,33 +582,33 @@ static int ThornParameterPage(cGH *cctkGH, httpRequest *request, void *data)
{
if (!(pData->steerable == CCTK_STEERABLE_ALWAYS))
{
-
- if (nfixed == 0)
- {
- strcat(message,"<h2>Fixed Parameters</h2>"
- "<table cellpadding=5 cellspacing=5>");
- }
- nfixed++;
-
- /* FIXME: This is a hack - should put in parameter tags. */
- if(strcmp(thorn,CCTK_THORNSTRING) ||
- (strcmp(pData->name,"user") &&
- strcmp(pData->name,"password") &&
- strcmp(pData->name,"encryption_scheme")))
- {
-
- sprintf(message,
- "%s<TR>\n"
- "<TD align=left valign=center>"
- "<A HREF=\"/Parameters/%s/%s\">%s</A></TD>\n"
- "<TD>%s</TD>\n"
- "<TD><SMALL>%s (%s)</SMALL></TD>\n"
- "</TR>\n",
- message, pData->thorn, pData->name,
- pData->name, value, pData->description,pData->defval);
- }
- }
- free(value);
+
+ if (nfixed == 0)
+ {
+ strcat(message,"<h2>Fixed Parameters</h2>"
+ "<table cellpadding=5 cellspacing=5>");
+ }
+ nfixed++;
+
+ /* FIXME: This is a hack - should put in parameter tags. */
+ if(strcmp(thorn,CCTK_THORNSTRING) ||
+ (strcmp(pData->name,"user") &&
+ strcmp(pData->name,"password") &&
+ strcmp(pData->name,"encryption_scheme")))
+ {
+
+ sprintf(message,
+ "%s<TR>\n"
+ "<TD align=left valign=center>"
+ "<A HREF=\"/Parameters/%s/%s\">%s</A></TD>\n"
+ "<TD>%s</TD>\n"
+ "<TD><SMALL>%s (%s)</SMALL></TD>\n"
+ "</TR>\n",
+ message, pData->thorn, pData->name,
+ pData->name, value, pData->description,pData->defval);
+ }
+ }
+ free(value);
}
HTTP_Write(request, message, strlen(message));
@@ -616,11 +616,11 @@ static int ThornParameterPage(cGH *cctkGH, httpRequest *request, void *data)
if (nfixed>0)
{
- strcpy(message, "</TABLE>\n");
+ strcpy(message, "</TABLE>\n");
}
else
{
- strcpy(message, "<p>This thorn has no fixed parameters.</p>\n");
+ strcpy(message, "<p>This thorn has no fixed parameters.</p>\n");
}
HTTP_Write(request, message, strlen(message));
@@ -660,10 +660,8 @@ static int ThornParameterPage(cGH *cctkGH, httpRequest *request, void *data)
static int ParameterPage(cGH *cctkGH, httpRequest *request, void *data)
{
int retval=0;
- int i;
char message[10000];
char menu[10000];
- const char *thorn, *menuthorn;
int first;
const cParamData *pData;
const cParamData *pDataWalk=NULL;
@@ -675,11 +673,6 @@ static int ParameterPage(cGH *cctkGH, httpRequest *request, void *data)
int notauthorised;
int readonly;
- int param_type;
- int param_bool;
- char *param_keyword;
- int nsteerable=0;
- int nfixed=0;
pData = (cParamData *)data;
@@ -697,7 +690,7 @@ static int ParameterPage(cGH *cctkGH, httpRequest *request, void *data)
{
/* Queue parameters for steering */
first = 1;
- while(argument = HTTP_ArgumentWalk(request, first))
+ while((argument = HTTP_ArgumentWalk(request, first)) != NULL)
{
first = 0;
fprintf(stderr, "Setting %s::%s to %s\n", pData->thorn, argument->arg, argument->value);
@@ -775,7 +768,7 @@ static int ParameterPage(cGH *cctkGH, httpRequest *request, void *data)
/* Start the page */
sprintf(message,
"<HTML><HEAD><TITLE>Cactus Parameter Request : %s</TITLE>"
- "</HEAD>\n", pData->name);
+ "</HEAD>\n", pData->name);
HTTP_Write(request, message, strlen(message));
@@ -786,12 +779,12 @@ static int ParameterPage(cGH *cctkGH, httpRequest *request, void *data)
{
if (first==1)
{
- sprintf(menu,"<DT><B>%s:</B>\n",pDataWalk->thorn);
+ sprintf(menu,"<DT><B>%s:</B>\n",pDataWalk->thorn);
}
first = 0;
sprintf(menu,
- "%s <DT> <A HREF=\"/Parameters/%s/%s\">%s</A>\n",
- menu,pDataWalk->thorn,pDataWalk->name,pDataWalk->name);
+ "%s <DT> <A HREF=\"/Parameters/%s/%s\">%s</A>\n",
+ menu,pDataWalk->thorn,pDataWalk->name,pDataWalk->name);
}
HTTP_ContentHeader(cctkGH,0,4098,message,menu);
@@ -801,95 +794,95 @@ static int ParameterPage(cGH *cctkGH, httpRequest *request, void *data)
HTTP_Write(request, message, strlen(message));
sprintf(message,
- "<CENTER><P>Return to all parameters for this "
- "<A HREF=\"Parameters/%s\">thorn</A>.</P></CENTER> ",
- pData->name, pData->thorn, CCTK_ThornImplementation(pData->thorn));
+ "<CENTER><P>Return to all parameters for this "
+ "<A HREF=\"Parameters/%s\">thorn</A>.</P></CENTER> ",
+ CCTK_ThornImplementation(pData->thorn));
HTTP_Write(request, message, strlen(message));
-
+
value = CCTK_ParameterValString (pData->name, pData->thorn);
/* FIXME: HACK need a tag on parameter definition */
if(strcmp(pData->thorn,CCTK_THORNSTRING) ||
(strcmp(pData->name,"user") &&
- strcmp(pData->name,"password") &&
- strcmp(pData->name,"encryption_scheme")))
+ strcmp(pData->name,"password") &&
+ strcmp(pData->name,"encryption_scheme")))
{
sprintf(message,"<CENTER><TABLE CELLPADDING=5 CELLSPACING=5 "
- " BORDER=1 NOSHADE>\n"
- "<TR>\n"
- "<TD ALIGN=RIGHT VALIGN=TOP><B>Name:</B></TD>\n"
- "<TD>%s</TD>\n"
- "</TR>\n"
- "<TR>\n"
- "<TD ALIGN=RIGHT VALIGN=TOP><B>Thorn:</B></TD>\n"
- "<TD>%s</TD>\n"
- "</TR>\n"
- "<TR>\n"
- "<TD ALIGN=RIGHT VALIGN=TOP><B>Implementation:</B></TD>\n"
- "<TD>%s</TD>\n"
- "</TR>\n"
- "<TR>\n"
- "<TD ALIGN=RIGHT VALIGN=TOP><B>Current value:</B></TD>\n"
- "<TD>%s</TD>\n"
- "</TR>"
- "<TR>\n"
- "<TD ALIGN=RIGHT VALIGN=TOP><B>Description:</B></TD>\n"
- "<TD>%s</TD>\n"
- "</TR>"
- "<TR>"
- "<TD ALIGN=RIGHT VALIGN=TOP><B>Default:</B></TD>\n"
- "<TD>%s</TD>\n"
- "</TR>",
- pData->name,pData->thorn,CCTK_ThornImplementation(pData->thorn),
- value,pData->description,pData->defval);
+ " BORDER=1 NOSHADE>\n"
+ "<TR>\n"
+ "<TD ALIGN=RIGHT VALIGN=TOP><B>Name:</B></TD>\n"
+ "<TD>%s</TD>\n"
+ "</TR>\n"
+ "<TR>\n"
+ "<TD ALIGN=RIGHT VALIGN=TOP><B>Thorn:</B></TD>\n"
+ "<TD>%s</TD>\n"
+ "</TR>\n"
+ "<TR>\n"
+ "<TD ALIGN=RIGHT VALIGN=TOP><B>Implementation:</B></TD>\n"
+ "<TD>%s</TD>\n"
+ "</TR>\n"
+ "<TR>\n"
+ "<TD ALIGN=RIGHT VALIGN=TOP><B>Current value:</B></TD>\n"
+ "<TD>%s</TD>\n"
+ "</TR>"
+ "<TR>\n"
+ "<TD ALIGN=RIGHT VALIGN=TOP><B>Description:</B></TD>\n"
+ "<TD>%s</TD>\n"
+ "</TR>"
+ "<TR>"
+ "<TD ALIGN=RIGHT VALIGN=TOP><B>Default:</B></TD>\n"
+ "<TD>%s</TD>\n"
+ "</TR>",
+ pData->name,pData->thorn,CCTK_ThornImplementation(pData->thorn),
+ value,pData->description,pData->defval);
HTTP_Write(request, message, strlen(message));
strcpy(message,"<TR>\n<TD ALIGN=RIGHT VALIGN=TOP>\n"
- "<B>Steerable:</B></TD>\n<TD>");
+ "<B>Steerable:</B></TD>\n<TD>");
switch(pData->steerable)
{
case CCTK_STEERABLE_ALWAYS :
- strcat(message,"Always");
- break;
+ strcat(message,"Always");
+ break;
case CCTK_STEERABLE_NEVER :
- strcat(message,"Never");
- break;
+ strcat(message,"Never");
+ break;
case CCTK_STEERABLE_RECOVER :
- strcat(message,"Recovery");
- break;
+ strcat(message,"Recovery");
+ break;
default :
- strcat(message,"Not matched");
+ strcat(message,"Not matched");
}
strcat(message,"</TD>\n</TR>\n");
HTTP_Write(request, message, strlen(message));
strcpy(message,"<TR>\n"
- "<TD ALIGN=RIGHT VALIGN=TOP><B>Type:</B></TD>\n<TD>\n");
+ "<TD ALIGN=RIGHT VALIGN=TOP><B>Type:</B></TD>\n<TD>\n");
switch(pData->type)
{
case PARAMETER_BOOLEAN :
- strcat(message,"Boolean");
- break;
+ strcat(message,"Boolean");
+ break;
case PARAMETER_REAL :
- strcat(message,"Real");
- break;
+ strcat(message,"Real");
+ break;
case PARAMETER_INTEGER :
- strcat(message,"Integer");
- break;
+ strcat(message,"Integer");
+ break;
case PARAMETER_SENTENCE :
- strcat(message,"Sentence");
- break;
+ strcat(message,"Sentence");
+ break;
case PARAMETER_STRING :
- strcat(message,"String");
- break;
+ strcat(message,"String");
+ break;
case PARAMETER_KEYWORD :
- strcat(message,"Keyword");
- break;
+ strcat(message,"Keyword");
+ break;
default :
- strcat(message,"Not matched");
+ strcat(message,"Not matched");
}
strcat(message,"</TD>\n</TR>\n");
@@ -900,16 +893,16 @@ static int ParameterPage(cGH *cctkGH, httpRequest *request, void *data)
switch(pData->scope)
{
case SCOPE_GLOBAL :
- strcat(message,"Global</TD></TR>");
- break;
+ strcat(message,"Global</TD></TR>");
+ break;
case SCOPE_RESTRICTED :
- strcat(message,"Restricted</TD></TR>");
- break;
+ strcat(message,"Restricted</TD></TR>");
+ break;
case SCOPE_PRIVATE :
- strcat(message,"Private</TD></TR>");
- break;
+ strcat(message,"Private</TD></TR>");
+ break;
default :
- strcat(message,"Not matched</TD></TR>");
+ strcat(message,"Not matched</TD></TR>");
}
HTTP_Write(request, message, strlen(message));
@@ -920,22 +913,22 @@ static int ParameterPage(cGH *cctkGH, httpRequest *request, void *data)
{
if (first==1)
{
- sprintf(message,
- "%s<TR>\n"
- "<TD ALIGN=RIGHT VALIGN=TOP>\n"
- "<B>Range:</B>"
- "</TD>\n<TD><DL>\n",
- message,range->range);
+ sprintf(message,
+ "%s<TR>\n"
+ "<TD ALIGN=RIGHT VALIGN=TOP>\n"
+ "<B>Range:</B>"
+ "</TD>\n<TD><DL>\n",
+ message);
}
first = 0;
sprintf(message,"%s<DT>%s\n<DD>%s\n",
- message,range->range,range->description);
+ message,range->range,range->description);
if (!CCTK_Equals(range->origin,pData->thorn))
{
- sprintf(message,"%s<BR>[Extended by thorn %s]\n",
- message,range->origin);
+ sprintf(message,"%s<BR>[Extended by thorn %s]\n",
+ message,range->origin);
}
- }
+ }
if(first==0)
{
strcat(message,"</DL></TD>\n</TR>\n");
@@ -944,12 +937,12 @@ static int ParameterPage(cGH *cctkGH, httpRequest *request, void *data)
HTTP_Write(request, message, strlen(message));
sprintf(message,
- "<TR>\n"
- "<TD ALIGN=RIGHT VALIGN=TOP><B>Times Set:</B></TD>\n"
- "<TD>%d</TD>\n"
- "</TR>\n"
- "</TABLE></CENTER>\n",
- pData->n_set);
+ "<TR>\n"
+ "<TD ALIGN=RIGHT VALIGN=TOP><B>Times Set:</B></TD>\n"
+ "<TD>%d</TD>\n"
+ "</TR>\n"
+ "</TABLE></CENTER>\n",
+ pData->n_set);
HTTP_Write(request, message, strlen(message));
}
@@ -964,7 +957,7 @@ static int ParameterPage(cGH *cctkGH, httpRequest *request, void *data)
HTTP_ContentFooter(cctkGH, 0, 4098, message);
retval = HTTP_Write(request, message, strlen(message));
-
- return retval;
}
+
+ return retval;
}
generated by cgit v1.2.3 (git 2.39.1) at 2024-07-01 16:20:29 +0000