]>
git.ipfire.org Git - thirdparty/cups.git/blob - cgi-bin/var.c
2 * "$Id: var.c 10996 2013-05-29 11:51:34Z msweet $"
4 * CGI form variable and array functions for CUPS.
6 * Copyright 2007-2011 by Apple Inc.
7 * Copyright 1997-2005 by Easy Software Products.
9 * These coded instructions, statements, and computer programs are the
10 * property of Apple Inc. and are protected by Federal copyright
11 * law. Distribution and use rights are outlined in the file "LICENSE.txt"
12 * which should have been included with this file. If this file is
13 * file is missing or damaged, see the license at "http://www.cups.org/".
17 * cgiCheckVariables() - Check for the presence of "required"
19 * cgiClearVariables() - Clear all form variables.
20 * cgiGetArray() - Get an element from a form array.
21 * cgiGetCookie() - Get a cookie value.
22 * cgiGetFile() - Get the file (if any) that was submitted in
24 * cgiGetSize() - Get the size of a form array value.
25 * cgiGetVariable() - Get a CGI variable from the database.
26 * cgiInitialize() - Initialize the CGI variable "database".
27 * cgiIsPOST() - Determine whether this page was POSTed.
28 * cgiSetArray() - Set array element N to the specified string.
29 * cgiSetCookie() - Set a cookie value.
30 * cgiSetSize() - Set the array size.
31 * cgiSetVariable() - Set a CGI variable in the database.
32 * cgi_add_variable() - Add a form variable.
33 * cgi_compare_variables() - Compare two variables.
34 * cgi_find_variable() - Find a variable.
35 * cgi_initialize_cookies() - Initialize cookies.
36 * cgi_initialize_get() - Initialize form variables using the GET
38 * cgi_initialize_multipart() - Initialize variables and file using the POST
40 * cgi_initialize_post() - Initialize variables using the POST method.
41 * cgi_initialize_string() - Initialize form variables from a string.
42 * cgi_passwd() - Catch authentication requests and notify the
44 * cgi_set_sid() - Set the CUPS session ID.
45 * cgi_sort_variables() - Sort all form variables for faster lookup.
46 * cgi_unlink_file() - Remove the uploaded form.
50 #include "cgi-private.h"
51 #include <cups/http.h>
52 #include <cups/md5-private.h>
59 #define CUPS_SID "org.cups.sid"
63 * Data structure to hold all the CGI form variables and arrays...
66 typedef struct /**** Form variable structure ****/
68 const char *name
; /* Name of variable */
69 int nvalues
, /* Number of values */
70 avalues
; /* Number of values allocated */
71 const char **values
; /* Value(s) of variable */
79 static int num_cookies
= 0;/* Number of cookies */
80 static cups_option_t
*cookies
= NULL
;/* Cookies */
81 static int form_count
= 0, /* Form variable count */
82 form_alloc
= 0; /* Number of variables allocated */
83 static _cgi_var_t
*form_vars
= NULL
;
85 static cgi_file_t
*form_file
= NULL
;
93 static void cgi_add_variable(const char *name
, int element
,
95 static int cgi_compare_variables(const _cgi_var_t
*v1
,
96 const _cgi_var_t
*v2
);
97 static _cgi_var_t
*cgi_find_variable(const char *name
);
98 static void cgi_initialize_cookies(void);
99 static int cgi_initialize_get(void);
100 static int cgi_initialize_multipart(const char *boundary
);
101 static int cgi_initialize_post(void);
102 static int cgi_initialize_string(const char *data
);
103 static const char *cgi_passwd(const char *prompt
);
104 static const char *cgi_set_sid(void);
105 static void cgi_sort_variables(void);
106 static void cgi_unlink_file(void);
110 * 'cgiCheckVariables()' - Check for the presence of "required" variables.
112 * Names may be separated by spaces and/or commas.
115 int /* O - 1 if all variables present, 0 otherwise */
116 cgiCheckVariables(const char *names
) /* I - Variables to look for */
118 char name
[255], /* Current variable name */
119 *s
; /* Pointer in string */
120 const char *val
; /* Value of variable */
121 int element
; /* Array element number */
127 while (*names
!= '\0')
129 while (*names
== ' ' || *names
== ',')
132 for (s
= name
; *names
!= '\0' && *names
!= ' ' && *names
!= ','; s
++, names
++)
139 if ((s
= strrchr(name
, '-')) != NULL
)
142 element
= atoi(s
+ 1) - 1;
143 val
= cgiGetArray(name
, element
);
146 val
= cgiGetVariable(name
);
152 return (0); /* Can't be blank, either! */
160 * 'cgiClearVariables()' - Clear all form variables.
164 cgiClearVariables(void)
166 int i
, j
; /* Looping vars */
167 _cgi_var_t
*v
; /* Current variable */
170 fputs("DEBUG: cgiClearVariables called.\n", stderr
);
172 for (v
= form_vars
, i
= form_count
; i
> 0; v
++, i
--)
174 _cupsStrFree(v
->name
);
175 for (j
= 0; j
< v
->nvalues
; j
++)
177 _cupsStrFree(v
->values
[j
]);
187 * 'cgiGetArray()' - Get an element from a form array.
190 const char * /* O - Element value or NULL */
191 cgiGetArray(const char *name
, /* I - Name of array variable */
192 int element
) /* I - Element number (0 to N) */
194 _cgi_var_t
*var
; /* Pointer to variable */
197 if ((var
= cgi_find_variable(name
)) == NULL
)
200 if (element
< 0 || element
>= var
->nvalues
)
203 return (_cupsStrRetain(var
->values
[element
]));
208 * 'cgiGetCookie()' - Get a cookie value.
211 const char * /* O - Value or NULL */
212 cgiGetCookie(const char *name
) /* I - Name of cookie */
214 return (cupsGetOption(name
, num_cookies
, cookies
));
219 * 'cgiGetFile()' - Get the file (if any) that was submitted in the form.
222 const cgi_file_t
* /* O - Attached file or NULL */
230 * 'cgiGetSize()' - Get the size of a form array value.
233 int /* O - Number of elements */
234 cgiGetSize(const char *name
) /* I - Name of variable */
236 _cgi_var_t
*var
; /* Pointer to variable */
239 if ((var
= cgi_find_variable(name
)) == NULL
)
242 return (var
->nvalues
);
247 * 'cgiGetVariable()' - Get a CGI variable from the database.
249 * Returns NULL if the variable doesn't exist. If the variable is an
250 * array of values, returns the last element.
253 const char * /* O - Value of variable */
254 cgiGetVariable(const char *name
) /* I - Name of variable */
256 const _cgi_var_t
*var
; /* Returned variable */
259 var
= cgi_find_variable(name
);
263 DEBUG_printf(("cgiGetVariable(\"%s\") is returning NULL...\n", name
));
265 DEBUG_printf(("cgiGetVariable(\"%s\") is returning \"%s\"...\n", name
,
266 var
->values
[var
->nvalues
- 1]));
269 return ((var
== NULL
) ? NULL
: _cupsStrRetain(var
->values
[var
->nvalues
- 1]));
274 * 'cgiInitialize()' - Initialize the CGI variable "database".
277 int /* O - Non-zero if there was form data */
280 const char *method
, /* Form posting method */
281 *content_type
, /* Content-Type of post data */
282 *cups_sid_cookie
, /* SID cookie */
283 *cups_sid_form
; /* SID form variable */
287 * Setup a password callback for authentication...
290 cupsSetPasswordCB(cgi_passwd
);
293 * Set the locale so that times, etc. are formatted properly...
296 setlocale(LC_ALL
, "");
300 * Disable output buffering to find bugs...
303 setbuf(stdout
, NULL
);
310 cgi_initialize_cookies();
312 if ((cups_sid_cookie
= cgiGetCookie(CUPS_SID
)) == NULL
)
314 fputs("DEBUG: " CUPS_SID
" cookie not found, initializing!\n", stderr
);
315 cups_sid_cookie
= cgi_set_sid();
318 fprintf(stderr
, "DEBUG: " CUPS_SID
" cookie is \"%s\"\n", cups_sid_cookie
);
321 * Get the request method (GET or POST)...
324 method
= getenv("REQUEST_METHOD");
325 content_type
= getenv("CONTENT_TYPE");
330 * Grab form data from the corresponding location...
333 if (!_cups_strcasecmp(method
, "GET"))
334 return (cgi_initialize_get());
335 else if (!_cups_strcasecmp(method
, "POST") && content_type
)
337 const char *boundary
= strstr(content_type
, "boundary=");
342 if (content_type
&& !strncmp(content_type
, "multipart/form-data; ", 21))
344 if (!cgi_initialize_multipart(boundary
))
347 else if (!cgi_initialize_post())
350 if ((cups_sid_form
= cgiGetVariable(CUPS_SID
)) == NULL
||
351 strcmp(cups_sid_cookie
, cups_sid_form
))
354 fprintf(stderr
, "DEBUG: " CUPS_SID
" form variable is \"%s\"\n",
357 fputs("DEBUG: " CUPS_SID
" form variable is not present.\n", stderr
);
371 * 'cgiIsPOST()' - Determine whether this page was POSTed.
374 int /* O - 1 if POST, 0 if GET */
377 const char *method
; /* REQUEST_METHOD environment variable */
380 if ((method
= getenv("REQUEST_METHOD")) == NULL
)
383 return (!strcmp(method
, "POST"));
388 * 'cgiSetArray()' - Set array element N to the specified string.
390 * If the variable array is smaller than (element + 1), the intervening
391 * elements are set to NULL.
395 cgiSetArray(const char *name
, /* I - Name of variable */
396 int element
, /* I - Element number (0 to N) */
397 const char *value
) /* I - Value of variable */
399 int i
; /* Looping var */
400 _cgi_var_t
*var
; /* Returned variable */
403 if (name
== NULL
|| value
== NULL
|| element
< 0 || element
> 100000)
406 fprintf(stderr
, "DEBUG: cgiSetArray: %s[%d]=\"%s\"\n", name
, element
, value
);
408 if ((var
= cgi_find_variable(name
)) == NULL
)
410 cgi_add_variable(name
, element
, value
);
411 cgi_sort_variables();
415 if (element
>= var
->avalues
)
417 const char **temp
; /* Temporary pointer */
419 temp
= (const char **)realloc((void *)(var
->values
),
420 sizeof(char *) * (element
+ 16));
424 var
->avalues
= element
+ 16;
428 if (element
>= var
->nvalues
)
430 for (i
= var
->nvalues
; i
< element
; i
++)
431 var
->values
[i
] = NULL
;
433 var
->nvalues
= element
+ 1;
435 else if (var
->values
[element
])
436 _cupsStrFree((char *)var
->values
[element
]);
438 var
->values
[element
] = _cupsStrAlloc(value
);
444 * 'cgiSetCookie()' - Set a cookie value.
448 cgiSetCookie(const char *name
, /* I - Name */
449 const char *value
, /* I - Value */
450 const char *path
, /* I - Path (typically "/") */
451 const char *domain
, /* I - Domain name */
452 time_t expires
, /* I - Expiration date (0 for session) */
453 int secure
) /* I - Require SSL */
455 num_cookies
= cupsAddOption(name
, value
, num_cookies
, &cookies
);
457 printf("Set-Cookie: %s=%s;", name
, value
);
459 printf(" path=%s;", path
);
461 printf(" domain=%s;", domain
);
464 char date
[256]; /* Date string */
466 printf(" expires=%s;", httpGetDateString2(expires
, date
, sizeof(date
)));
476 * 'cgiSetSize()' - Set the array size.
480 cgiSetSize(const char *name
, /* I - Name of variable */
481 int size
) /* I - Number of elements (0 to N) */
483 int i
; /* Looping var */
484 _cgi_var_t
*var
; /* Returned variable */
487 if (name
== NULL
|| size
< 0 || size
> 100000)
490 if ((var
= cgi_find_variable(name
)) == NULL
)
493 if (size
>= var
->avalues
)
495 const char **temp
; /* Temporary pointer */
497 temp
= (const char **)realloc((void *)(var
->values
),
498 sizeof(char *) * (size
+ 16));
502 var
->avalues
= size
+ 16;
506 if (size
> var
->nvalues
)
508 for (i
= var
->nvalues
; i
< size
; i
++)
509 var
->values
[i
] = NULL
;
511 else if (size
< var
->nvalues
)
513 for (i
= size
; i
< var
->nvalues
; i
++)
515 _cupsStrFree((void *)(var
->values
[i
]));
523 * 'cgiSetVariable()' - Set a CGI variable in the database.
525 * If the variable is an array, this truncates the array to a single element.
529 cgiSetVariable(const char *name
, /* I - Name of variable */
530 const char *value
) /* I - Value of variable */
532 int i
; /* Looping var */
533 _cgi_var_t
*var
; /* Returned variable */
536 if (name
== NULL
|| value
== NULL
)
539 fprintf(stderr
, "cgiSetVariable: %s=\"%s\"\n", name
, value
);
541 if ((var
= cgi_find_variable(name
)) == NULL
)
543 cgi_add_variable(name
, 0, value
);
544 cgi_sort_variables();
548 for (i
= 0; i
< var
->nvalues
; i
++)
550 _cupsStrFree((char *)var
->values
[i
]);
552 var
->values
[0] = _cupsStrAlloc(value
);
559 * 'cgi_add_variable()' - Add a form variable.
563 cgi_add_variable(const char *name
, /* I - Variable name */
564 int element
, /* I - Array element number */
565 const char *value
) /* I - Variable value */
567 _cgi_var_t
*var
; /* New variable */
570 if (name
== NULL
|| value
== NULL
|| element
< 0 || element
> 100000)
573 DEBUG_printf(("cgi_add_variable: Adding variable \'%s\' with value "
574 "\'%s\'...\n", name
, value
));
576 if (form_count
>= form_alloc
)
578 _cgi_var_t
*temp_vars
; /* Temporary form pointer */
582 temp_vars
= malloc(sizeof(_cgi_var_t
) * 16);
584 temp_vars
= realloc(form_vars
, (form_alloc
+ 16) * sizeof(_cgi_var_t
));
589 form_vars
= temp_vars
;
593 var
= form_vars
+ form_count
;
595 if ((var
->values
= calloc(element
+ 1, sizeof(char *))) == NULL
)
598 var
->name
= _cupsStrAlloc(name
);
599 var
->nvalues
= element
+ 1;
600 var
->avalues
= element
+ 1;
601 var
->values
[element
] = _cupsStrAlloc(value
);
608 * 'cgi_compare_variables()' - Compare two variables.
611 static int /* O - Result of comparison */
612 cgi_compare_variables(
613 const _cgi_var_t
*v1
, /* I - First variable */
614 const _cgi_var_t
*v2
) /* I - Second variable */
616 return (_cups_strcasecmp(v1
->name
, v2
->name
));
621 * 'cgi_find_variable()' - Find a variable.
624 static _cgi_var_t
* /* O - Variable pointer or NULL */
625 cgi_find_variable(const char *name
) /* I - Name of variable */
627 _cgi_var_t key
; /* Search key */
630 if (form_count
< 1 || name
== NULL
)
635 return ((_cgi_var_t
*)bsearch(&key
, form_vars
, form_count
, sizeof(_cgi_var_t
),
636 (int (*)(const void *, const void *))cgi_compare_variables
));
641 * 'cgi_initialize_cookies()' - Initialize cookies.
645 cgi_initialize_cookies(void)
647 const char *cookie
; /* HTTP_COOKIE environment variable */
648 char name
[128], /* Name string */
649 value
[512], /* Value string */
650 *ptr
; /* Pointer into name/value */
653 if ((cookie
= getenv("HTTP_COOKIE")) == NULL
)
659 * Skip leading whitespace...
662 while (isspace(*cookie
& 255))
671 for (ptr
= name
; *cookie
&& *cookie
!= '=';)
672 if (ptr
< (name
+ sizeof(name
) - 1))
689 for (cookie
++, ptr
= value
; *cookie
&& *cookie
!= '\"';)
690 if (ptr
< (value
+ sizeof(value
) - 1))
700 for (ptr
= value
; *cookie
&& *cookie
!= ';';)
701 if (ptr
< (value
+ sizeof(value
) - 1))
715 * Then add the cookie to an array as long as the name doesn't start with
720 num_cookies
= cupsAddOption(name
, value
, num_cookies
, &cookies
);
726 * 'cgi_initialize_get()' - Initialize form variables using the GET method.
729 static int /* O - 1 if form data read */
730 cgi_initialize_get(void)
732 char *data
; /* Pointer to form data string */
735 DEBUG_puts("cgi_initialize_get: Initializing variables using GET method...");
738 * Check to see if there is anything for us to read...
741 data
= getenv("QUERY_STRING");
742 if (data
== NULL
|| strlen(data
) == 0)
746 * Parse it out and return...
749 return (cgi_initialize_string(data
));
754 * 'cgi_initialize_multipart()' - Initialize variables and file using the POST
757 * TODO: Update to support files > 2GB.
760 static int /* O - 1 if form data was read */
761 cgi_initialize_multipart(
762 const char *boundary
) /* I - Boundary string */
764 char line
[10240], /* MIME header line */
765 name
[1024], /* Form variable name */
766 filename
[1024], /* Form filename */
767 mimetype
[1024], /* MIME media type */
768 bstring
[256], /* Boundary string to look for */
769 *ptr
, /* Pointer into name/filename */
770 *end
; /* End of buffer */
771 int ch
, /* Character from file */
772 fd
, /* Temporary file descriptor */
773 blen
; /* Length of boundary string */
776 DEBUG_printf(("cgi_initialize_multipart(boundary=\"%s\")\n", boundary
));
779 * Read multipart form data until we run out...
786 snprintf(bstring
, sizeof(bstring
), "\r\n--%s", boundary
);
787 blen
= strlen(bstring
);
789 while (fgets(line
, sizeof(line
), stdin
))
791 if (!strcmp(line
, "\r\n"))
794 * End of headers, grab value...
800 * Read an embedded file...
806 * Remove previous file...
813 * Allocate memory for the new file...
816 if ((form_file
= calloc(1, sizeof(cgi_file_t
))) == NULL
)
819 form_file
->name
= strdup(name
);
820 form_file
->filename
= strdup(filename
);
821 form_file
->mimetype
= strdup(mimetype
);
823 fd
= cupsTempFd(form_file
->tempfile
, sizeof(form_file
->tempfile
));
828 atexit(cgi_unlink_file
);
831 * Copy file data to the temp file...
836 while ((ch
= getchar()) != EOF
)
840 if ((ptr
- line
) >= blen
&& !memcmp(ptr
- blen
, bstring
, blen
))
846 if ((ptr
- line
- blen
) >= 8192)
849 * Write out the first 8k of the buffer...
852 write(fd
, line
, 8192);
853 memmove(line
, line
+ 8192, ptr
- line
- 8192);
859 * Write the rest of the data and close the temp file...
863 write(fd
, line
, ptr
- line
);
870 * Just get a form variable; the current code only handles
871 * form values up to 10k in size...
875 end
= line
+ sizeof(line
) - 1;
877 while ((ch
= getchar()) != EOF
)
882 if ((ptr
- line
) >= blen
&& !memcmp(ptr
- blen
, bstring
, blen
))
892 * Set the form variable...
895 if ((ptr
= strrchr(name
, '-')) != NULL
&& isdigit(ptr
[1] & 255))
898 * Set a specific index in the array...
903 cgiSetArray(name
, atoi(ptr
) - 1, line
);
905 else if (cgiGetVariable(name
))
908 * Add another element in the array...
911 cgiSetArray(name
, cgiGetSize(name
), line
);
916 * Just set the line...
919 cgiSetVariable(name
, line
);
924 * Read the rest of the current line...
927 fgets(line
, sizeof(line
), stdin
);
930 * Clear the state vars...
937 else if (!_cups_strncasecmp(line
, "Content-Disposition:", 20))
939 if ((ptr
= strstr(line
+ 20, " name=\"")) != NULL
)
941 strlcpy(name
, ptr
+ 7, sizeof(name
));
943 if ((ptr
= strchr(name
, '\"')) != NULL
)
947 if ((ptr
= strstr(line
+ 20, " filename=\"")) != NULL
)
949 strlcpy(filename
, ptr
+ 11, sizeof(filename
));
951 if ((ptr
= strchr(filename
, '\"')) != NULL
)
955 else if (!_cups_strncasecmp(line
, "Content-Type:", 13))
957 for (ptr
= line
+ 13; isspace(*ptr
& 255); ptr
++);
959 strlcpy(mimetype
, ptr
, sizeof(mimetype
));
961 for (ptr
= mimetype
+ strlen(mimetype
) - 1;
962 ptr
> mimetype
&& isspace(*ptr
& 255);
968 * Return 1 for "form data found"...
976 * 'cgi_initialize_post()' - Initialize variables using the POST method.
979 static int /* O - 1 if form data was read */
980 cgi_initialize_post(void)
982 char *content_length
, /* Length of input data (string) */
983 *data
; /* Pointer to form data string */
984 int length
, /* Length of input data */
985 nbytes
, /* Number of bytes read this read() */
986 tbytes
, /* Total number of bytes read */
987 status
; /* Return status */
990 DEBUG_puts("cgi_initialize_post: Initializing variables using POST method...");
993 * Check to see if there is anything for us to read...
996 content_length
= getenv("CONTENT_LENGTH");
997 if (content_length
== NULL
|| atoi(content_length
) <= 0)
1001 * Get the length of the input stream and allocate a buffer for it...
1004 length
= atoi(content_length
);
1005 data
= malloc(length
+ 1);
1011 * Read the data into the buffer...
1014 for (tbytes
= 0; tbytes
< length
; tbytes
+= nbytes
)
1015 if ((nbytes
= read(0, data
+ tbytes
, length
- tbytes
)) < 0)
1017 if (errno
!= EAGAIN
)
1025 else if (nbytes
== 0)
1028 * CUPS STR #3176: OpenBSD: Early end-of-file on POST data causes 100% CPU
1030 * This should never happen, but does on OpenBSD. If we see early end-of-
1031 * file, treat this as an error and process no data.
1038 data
[length
] = '\0';
1044 status
= cgi_initialize_string(data
);
1047 * Free the data and return...
1057 * 'cgi_initialize_string()' - Initialize form variables from a string.
1060 static int /* O - 1 if form data was processed */
1061 cgi_initialize_string(const char *data
) /* I - Form data string */
1063 int done
; /* True if we're done reading a form variable */
1064 char *s
, /* Pointer to current form string */
1065 ch
, /* Temporary character */
1066 name
[255], /* Name of form variable */
1067 value
[65536]; /* Variable value */
1078 * Loop until we've read all the form data...
1081 while (*data
!= '\0')
1084 * Get the variable name...
1087 for (s
= name
; *data
!= '\0'; data
++)
1090 else if (*data
>= ' ' && s
< (name
+ sizeof(name
) - 1))
1100 * Read the variable value...
1103 for (s
= value
, done
= 0; !done
&& *data
!= '\0'; data
++)
1106 case '&' : /* End of data... */
1110 case '+' : /* Escaped space character */
1111 if (s
< (value
+ sizeof(value
) - 1))
1115 case '%' : /* Escaped control character */
1117 * Read the hex code...
1120 if (!isxdigit(data
[1] & 255) || !isxdigit(data
[2] & 255))
1123 if (s
< (value
+ sizeof(value
) - 1))
1141 default : /* Other characters come straight through */
1142 if (*data
>= ' ' && s
< (value
+ sizeof(value
) - 1))
1147 *s
= '\0'; /* nul terminate the string */
1150 * Remove trailing whitespace...
1156 while (s
>= value
&& isspace(*s
& 255))
1160 * Add the string to the variable "database"...
1163 if ((s
= strrchr(name
, '-')) != NULL
&& isdigit(s
[1] & 255))
1167 cgiSetArray(name
, atoi(s
) - 1, value
);
1169 else if (cgiGetVariable(name
) != NULL
)
1170 cgiSetArray(name
, cgiGetSize(name
), value
);
1172 cgiSetVariable(name
, value
);
1180 * 'cgi_passwd()' - Catch authentication requests and notify the server.
1182 * This function sends a Status header and exits, forcing authentication
1186 static const char * /* O - NULL (no return) */
1187 cgi_passwd(const char *prompt
) /* I - Prompt (not used) */
1191 fprintf(stderr
, "DEBUG: cgi_passwd(prompt=\"%s\") called!\n",
1192 prompt
? prompt
: "(null)");
1195 * Send a 401 (unauthorized) status to the server, so it can notify
1196 * the client that authentication is required.
1199 puts("Status: 401\n");
1203 * This code is never executed, but is present to satisfy the compiler.
1211 * 'cgi_set_sid()' - Set the CUPS session ID.
1214 static const char * /* O - New session ID */
1217 char buffer
[512], /* SID data */
1218 sid
[33]; /* SID string */
1219 _cups_md5_state_t md5
; /* MD5 state */
1220 unsigned char sum
[16]; /* MD5 sum */
1221 const char *remote_addr
, /* REMOTE_ADDR */
1222 *server_name
, /* SERVER_NAME */
1223 *server_port
; /* SERVER_PORT */
1226 if ((remote_addr
= getenv("REMOTE_ADDR")) == NULL
)
1227 remote_addr
= "REMOTE_ADDR";
1228 if ((server_name
= getenv("SERVER_NAME")) == NULL
)
1229 server_name
= "SERVER_NAME";
1230 if ((server_port
= getenv("SERVER_PORT")) == NULL
)
1231 server_port
= "SERVER_PORT";
1233 CUPS_SRAND(time(NULL
));
1234 snprintf(buffer
, sizeof(buffer
), "%s:%s:%s:%02X%02X%02X%02X%02X%02X%02X%02X",
1235 remote_addr
, server_name
, server_port
,
1236 (unsigned)CUPS_RAND() & 255, (unsigned)CUPS_RAND() & 255,
1237 (unsigned)CUPS_RAND() & 255, (unsigned)CUPS_RAND() & 255,
1238 (unsigned)CUPS_RAND() & 255, (unsigned)CUPS_RAND() & 255,
1239 (unsigned)CUPS_RAND() & 255, (unsigned)CUPS_RAND() & 255);
1241 _cupsMD5Append(&md5
, (unsigned char *)buffer
, (int)strlen(buffer
));
1242 _cupsMD5Finish(&md5
, sum
);
1244 cgiSetCookie(CUPS_SID
, httpMD5String(sum
, sid
), "/", NULL
, 0, 0);
1246 return (cupsGetOption(CUPS_SID
, num_cookies
, cookies
));
1251 * 'cgi_sort_variables()' - Sort all form variables for faster lookup.
1255 cgi_sort_variables(void)
1261 DEBUG_puts("cgi_sort_variables: Sorting variables...");
1267 qsort(form_vars
, form_count
, sizeof(_cgi_var_t
),
1268 (int (*)(const void *, const void *))cgi_compare_variables
);
1271 DEBUG_puts("cgi_sort_variables: Sorted variable list is:");
1272 for (i
= 0; i
< form_count
; i
++)
1273 DEBUG_printf(("cgi_sort_variables: %d: %s (%d) = \"%s\" ...\n", i
,
1274 form_vars
[i
].name
, form_vars
[i
].nvalues
,
1275 form_vars
[i
].values
[0]));
1281 * 'cgi_unlink_file()' - Remove the uploaded form.
1285 cgi_unlink_file(void)
1290 * Remove the temporary file...
1293 unlink(form_file
->tempfile
);
1296 * Free memory used...
1299 free(form_file
->name
);
1300 free(form_file
->filename
);
1301 free(form_file
->mimetype
);
1310 * End of "$Id: var.c 10996 2013-05-29 11:51:34Z msweet $".