mirror of
https://github.com/php/php-src.git
synced 2024-11-25 19:05:31 +08:00
286 lines
6.6 KiB
C
286 lines
6.6 KiB
C
/*
|
|
+----------------------------------------------------------------------+
|
|
| PHP version 4.0 |
|
|
+----------------------------------------------------------------------+
|
|
| Copyright (c) 1997, 1998, 1999, 2000 The PHP Group |
|
|
+----------------------------------------------------------------------+
|
|
| This source file is subject to version 2.01 of the PHP license, |
|
|
| that is bundled with this package in the file LICENSE, and is |
|
|
| available at through the world-wide-web at |
|
|
| http://www.php.net/license/2_01.txt. |
|
|
| If you did not receive a copy of the PHP license and are unable to |
|
|
| obtain it through the world-wide-web, please send a note to |
|
|
| license@php.net so we can mail you a copy immediately. |
|
|
+----------------------------------------------------------------------+
|
|
| Authors: Rasmus Lerdorf <rasmus@lerdorf.on.ca> |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
/* $Id$ */
|
|
|
|
#include <stdio.h>
|
|
#include "php.h"
|
|
#include "ext/standard/php_standard.h"
|
|
#include "SAPI.h"
|
|
#include "main.h"
|
|
#include "head.h"
|
|
#include "SAPI.h"
|
|
#ifdef TM_IN_SYS_TIME
|
|
#include <sys/time.h>
|
|
#else
|
|
#include <time.h>
|
|
#endif
|
|
|
|
#include "php_globals.h"
|
|
#include "safe_mode.h"
|
|
|
|
|
|
/* need to figure out some nice way to get rid of these */
|
|
#ifndef THREAD_SAFE
|
|
static int php_header_printed = 0;
|
|
static int php_print_header = 1;
|
|
static CookieList *top = NULL;
|
|
static char *cont_type = NULL;
|
|
static int header_called = 0;
|
|
#endif
|
|
|
|
void php_push_cookie_list(char *, char *, time_t, char *, char *, int);
|
|
CookieList *php_pop_cookie_list(void);
|
|
|
|
PHP_RINIT_FUNCTION(head)
|
|
{
|
|
php_header_printed = 0;
|
|
if (header_called == 0)
|
|
php_print_header = 1;
|
|
top = NULL;
|
|
cont_type = NULL;
|
|
|
|
return SUCCESS;
|
|
}
|
|
|
|
|
|
void php4i_add_header_information(char *header_information, uint header_length)
|
|
{
|
|
sapi_add_header(header_information, header_length);
|
|
}
|
|
|
|
|
|
/* Implementation of the language Header() function */
|
|
PHP_FUNCTION(Header)
|
|
{
|
|
pval **arg1;
|
|
|
|
if (zend_get_parameters_ex(1, &arg1) == FAILURE) {
|
|
WRONG_PARAM_COUNT;
|
|
}
|
|
convert_to_string_ex(arg1);
|
|
php4i_add_header_information((*arg1)->value.str.val,(*arg1)->value.str.len);
|
|
(*arg1)->type = IS_LONG; /* change arg1's type so that it doesn't get freed */
|
|
(*arg1)->value.lval = 0;
|
|
}
|
|
|
|
|
|
PHPAPI int php_header()
|
|
{
|
|
SLS_FETCH();
|
|
|
|
if (sapi_send_headers()==FAILURE || SG(request_info).headers_only) {
|
|
return 0; /* don't allow output */
|
|
} else {
|
|
return 1; /* allow output */
|
|
}
|
|
}
|
|
|
|
|
|
void php_push_cookie_list(char *name, char *value, time_t expires, char *path, char *domain, int secure)
|
|
{
|
|
CookieList *new;
|
|
|
|
new = emalloc(sizeof(CookieList));
|
|
new->next = top;
|
|
new->name = name;
|
|
new->value = value;
|
|
new->expires = expires;
|
|
new->path = path;
|
|
new->domain = domain;
|
|
new->secure = secure;
|
|
top = new;
|
|
}
|
|
|
|
CookieList *php_pop_cookie_list(void)
|
|
{
|
|
CookieList *ret;
|
|
|
|
ret = top;
|
|
if (top)
|
|
top = top->next;
|
|
return (ret);
|
|
}
|
|
|
|
/* php_set_cookie(name,value,expires,path,domain,secure) */
|
|
PHP_FUNCTION(setcookie)
|
|
{
|
|
char *cookie, *encoded_value = NULL;
|
|
int len=sizeof("Set-Cookie: ");
|
|
time_t t;
|
|
char *dt;
|
|
char *name = NULL, *value = NULL, *path = NULL, *domain = NULL;
|
|
time_t expires = 0;
|
|
int secure = 0;
|
|
pval **arg[6];
|
|
int arg_count;
|
|
|
|
arg_count = ARG_COUNT(ht);
|
|
if (arg_count < 1 || arg_count > 6 || zend_get_parameters_array_ex(arg_count, arg) == FAILURE) {
|
|
WRONG_PARAM_COUNT;
|
|
}
|
|
if (php_header_printed == 1) {
|
|
php_error(E_WARNING, "Oops, php_set_cookie called after header has been sent\n");
|
|
return;
|
|
}
|
|
switch (arg_count) {
|
|
case 6:
|
|
convert_to_boolean_ex(arg[5]);
|
|
secure = (*arg[5])->value.lval;
|
|
/* break missing intentionally */
|
|
case 5:
|
|
convert_to_string_ex(arg[4]);
|
|
domain = estrndup((*arg[4])->value.str.val,(*arg[4])->value.str.len);
|
|
/* break missing intentionally */
|
|
case 4:
|
|
convert_to_string_ex(arg[3]);
|
|
path = estrndup((*arg[3])->value.str.val,(*arg[3])->value.str.len);
|
|
/* break missing intentionally */
|
|
case 3:
|
|
convert_to_long_ex(arg[2]);
|
|
expires = (*arg[2])->value.lval;
|
|
/* break missing intentionally */
|
|
case 2:
|
|
convert_to_string_ex(arg[1]);
|
|
value = estrndup((*arg[1])->value.str.val,(*arg[1])->value.str.len);
|
|
/* break missing intentionally */
|
|
case 1:
|
|
convert_to_string_ex(arg[0]);
|
|
name = estrndup((*arg[0])->value.str.val,(*arg[0])->value.str.len);
|
|
break;
|
|
}
|
|
#if 0
|
|
php_push_cookie_list(name, value, expires, path, domain, secure);
|
|
#else
|
|
if (name) {
|
|
len += strlen(name);
|
|
}
|
|
if (value) {
|
|
encoded_value = php_url_encode(value, strlen (value));
|
|
len += strlen(encoded_value);
|
|
}
|
|
if (path) {
|
|
len += strlen(path);
|
|
}
|
|
if (domain) {
|
|
len += strlen(domain);
|
|
}
|
|
cookie = emalloc(len + 100);
|
|
if (!value || (value && !*value)) {
|
|
/*
|
|
* MSIE doesn't delete a cookie when you set it to a null value
|
|
* so in order to force cookies to be deleted, even on MSIE, we
|
|
* pick an expiry date 1 year and 1 second in the past
|
|
*/
|
|
sprintf(cookie, "Set-Cookie: %s=deleted", name);
|
|
strcat(cookie, "; expires=");
|
|
t = time(NULL) - 31536001;
|
|
dt = php_std_date(t);
|
|
strcat(cookie, dt);
|
|
efree(dt);
|
|
} else {
|
|
/* FIXME: XXX: this is not binary data safe */
|
|
sprintf(cookie, "Set-Cookie: %s=%s", name, value ? encoded_value : "");
|
|
if (value) efree(value);
|
|
value=NULL;
|
|
if (name) efree(name);
|
|
name=NULL;
|
|
if (expires > 0) {
|
|
strcat(cookie, "; expires=");
|
|
dt = php_std_date(expires);
|
|
strcat(cookie, dt);
|
|
efree(dt);
|
|
}
|
|
}
|
|
|
|
if (encoded_value) efree(encoded_value);
|
|
|
|
if (path && strlen(path)) {
|
|
strcat(cookie, "; path=");
|
|
strcat(cookie, path);
|
|
efree(path);
|
|
path=NULL;
|
|
}
|
|
if (domain && strlen(domain)) {
|
|
strcat(cookie, "; domain=");
|
|
strcat(cookie, domain);
|
|
efree(domain);
|
|
domain=NULL;
|
|
}
|
|
if (secure) {
|
|
strcat(cookie, "; secure");
|
|
}
|
|
|
|
|
|
if (sapi_add_header(cookie, strlen(cookie))==SUCCESS) {
|
|
RETVAL_TRUE;
|
|
} else {
|
|
RETVAL_FALSE;
|
|
}
|
|
|
|
if (domain) {
|
|
efree(domain);
|
|
}
|
|
if (path) {
|
|
efree(path);
|
|
}
|
|
if (name) {
|
|
efree(name);
|
|
}
|
|
if (value) {
|
|
efree(value);
|
|
}
|
|
#endif
|
|
}
|
|
|
|
|
|
int php_headers_unsent(void)
|
|
{
|
|
if (php_header_printed!=1 || !php_print_header) {
|
|
return 1;
|
|
} else {
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
PHP_FUNCTION(headers_sent)
|
|
{
|
|
SLS_FETCH();
|
|
|
|
if (SG(headers_sent)) {
|
|
RETURN_TRUE;
|
|
} else {
|
|
RETURN_FALSE;
|
|
}
|
|
}
|
|
|
|
function_entry php_header_functions[] = {
|
|
{NULL, NULL, NULL}
|
|
};
|
|
|
|
|
|
zend_module_entry php_header_module_entry = {
|
|
"PHP_head", php_header_functions, NULL, NULL, PHP_RINIT(head), NULL, NULL, STANDARD_MODULE_PROPERTIES
|
|
};
|
|
|
|
/*
|
|
* Local variables:
|
|
* tab-width: 4
|
|
* c-basic-offset: 4
|
|
* End:
|
|
*/
|