Gecko [ www.jdcpatala.org ]

Name	Size	Permission
html_tables	[ DIR ]	drwxr-xr-x
tests	[ DIR ]	drwxr-xr-x
Makefile.frag	518 B	-rw-r--r--
Makefile.frag.w32	484 B	-rw-r--r--
array.c	173.39 KB	-rw-r--r--
assert.c	8.25 KB	-rw-r--r--
base64.c	30.63 KB	-rw-r--r--
base64.h	3.59 KB	-rw-r--r--
basic_functions.c	67.72 KB	-rw-r--r--
basic_functions.h	5.03 KB	-rw-r--r--
basic_functions.stub.php	41.8 KB	-rw-r--r--
basic_functions_arginfo.h	123.78 KB	-rw-r--r--
browscap.c	20.65 KB	-rw-r--r--
config.m4	11.12 KB	-rw-r--r--
config.w32	1.79 KB	-rw-r--r--
crc32.c	3.11 KB	-rw-r--r--
crc32.h	4.5 KB	-rw-r--r--
crc32_x86.c	11.99 KB	-rw-r--r--
crc32_x86.h	1.82 KB	-rw-r--r--
credits.c	5.71 KB	-rw-r--r--
credits.h	1.53 KB	-rw-r--r--
credits_ext.h	5.24 KB	-rw-r--r--
credits_sapi.h	835 B	-rw-r--r--
crypt.c	6.73 KB	-rw-r--r--
crypt_blowfish.c	30.75 KB	-rw-r--r--
crypt_blowfish.h	790 B	-rw-r--r--
crypt_freesec.c	21.52 KB	-rw-r--r--
crypt_freesec.h	662 B	-rw-r--r--
crypt_sha256.c	21.6 KB	-rw-r--r--
crypt_sha512.c	26.25 KB	-rw-r--r--
css.c	2.24 KB	-rw-r--r--
css.h	1.04 KB	-rw-r--r--
datetime.c	3.28 KB	-rw-r--r--
datetime.h	1.14 KB	-rw-r--r--
dir.c	13.95 KB	-rw-r--r--
dir.stub.php	387 B	-rw-r--r--
dir_arginfo.h	746 B	-rw-r--r--
dl.c	8.21 KB	-rw-r--r--
dl.h	1.46 KB	-rw-r--r--
dl.stub.php	56 B	-rw-r--r--
dl_arginfo.h	269 B	-rw-r--r--
dns.c	28.31 KB	-rw-r--r--
dns_win32.c	14.9 KB	-rw-r--r--
exec.c	12.78 KB	-rw-r--r--
exec.h	1.27 KB	-rw-r--r--
file.c	64.34 KB	-rw-r--r--
file.h	3.91 KB	-rw-r--r--
filestat.c	26.73 KB	-rw-r--r--
filters.c	50.04 KB	-rw-r--r--
flock_compat.c	6.44 KB	-rw-r--r--
flock_compat.h	2.06 KB	-rw-r--r--
formatted_print.c	23.37 KB	-rw-r--r--
fsock.c	3.67 KB	-rw-r--r--
fsock.h	1.22 KB	-rw-r--r--
ftok.c	1.84 KB	-rw-r--r--
ftp_fopen_wrapper.c	31.59 KB	-rw-r--r--
head.c	10.66 KB	-rw-r--r--
head.h	1.53 KB	-rw-r--r--
hrtime.c	4.86 KB	-rw-r--r--
hrtime.h	2.31 KB	-rw-r--r--
html.c	44.87 KB	-rw-r--r--
html.h	2.35 KB	-rw-r--r--
html_tables.h	472.26 KB	-rw-r--r--
http.c	6.99 KB	-rw-r--r--
http_fopen_wrapper.c	32.39 KB	-rw-r--r--
image.c	41.83 KB	-rw-r--r--
incomplete_class.c	5.16 KB	-rw-r--r--
info.c	39.87 KB	-rw-r--r--
info.h	22.94 KB	-rw-r--r--
iptc.c	9.18 KB	-rw-r--r--
lcg.c	2.8 KB	-rw-r--r--
levenshtein.c	2.57 KB	-rw-r--r--
link.c	5.45 KB	-rw-r--r--
mail.c	16.25 KB	-rw-r--r--
math.c	27.2 KB	-rw-r--r--
md5.c	10.62 KB	-rw-r--r--
md5.h	1.92 KB	-rw-r--r--
metaphone.c	11.53 KB	-rw-r--r--
microtime.c	4.01 KB	-rw-r--r--
mt_rand.c	10.53 KB	-rw-r--r--
net.c	8.97 KB	-rw-r--r--
pack.c	31.01 KB	-rw-r--r--
pack.h	1.05 KB	-rw-r--r--
pageinfo.c	3.23 KB	-rw-r--r--
pageinfo.h	1.15 KB	-rw-r--r--
password.c	19.21 KB	-rw-r--r--
php_array.h	2.25 KB	-rw-r--r--
php_assert.h	1.18 KB	-rw-r--r--
php_browscap.h	1.11 KB	-rw-r--r--
php_crypt.h	1.37 KB	-rw-r--r--
php_crypt_r.c	5.74 KB	-rw-r--r--
php_crypt_r.h	1.63 KB	-rw-r--r--
php_dir.h	1.28 KB	-rw-r--r--
php_dns.h	2.58 KB	-rw-r--r--
php_ext_syslog.h	1.25 KB	-rw-r--r--
php_filestat.h	2.11 KB	-rw-r--r--
php_fopen_wrapper.c	11.47 KB	-rw-r--r--
php_fopen_wrappers.h	1.79 KB	-rw-r--r--
php_http.h	1.44 KB	-rw-r--r--
php_image.h	2.1 KB	-rw-r--r--
php_incomplete_class.h	2.15 KB	-rw-r--r--
php_lcg.h	1.31 KB	-rw-r--r--
php_mail.h	2.16 KB	-rw-r--r--
php_math.h	3.55 KB	-rw-r--r--
php_mt_rand.h	1.81 KB	-rw-r--r--
php_net.h	1.14 KB	-rw-r--r--
php_password.h	2.77 KB	-rw-r--r--
php_rand.h	3 KB	-rw-r--r--
php_random.h	1.87 KB	-rw-r--r--
php_smart_string.h	1.13 KB	-rw-r--r--
php_smart_string_public.h	1.14 KB	-rw-r--r--
php_standard.h	1.91 KB	-rw-r--r--
php_string.h	3.96 KB	-rw-r--r--
php_uuencode.h	1.18 KB	-rw-r--r--
php_var.h	3.41 KB	-rw-r--r--
php_versioning.h	1.18 KB	-rw-r--r--
proc_open.c	35.27 KB	-rw-r--r--
proc_open.h	1.66 KB	-rw-r--r--
quot_print.c	7.05 KB	-rw-r--r--
quot_print.h	1.23 KB	-rw-r--r--
rand.c	2.22 KB	-rw-r--r--
random.c	7.22 KB	-rw-r--r--
scanf.c	28.23 KB	-rw-r--r--
scanf.h	1.95 KB	-rw-r--r--
sha1.c	11.18 KB	-rw-r--r--
sha1.h	1.53 KB	-rw-r--r--
soundex.c	2.94 KB	-rw-r--r--
streamsfuncs.c	43.24 KB	-rw-r--r--
streamsfuncs.h	1.11 KB	-rw-r--r--
string.c	142.27 KB	-rw-r--r--
strnatcmp.c	4.34 KB	-rw-r--r--
syslog.c	6.05 KB	-rw-r--r--
type.c	10.49 KB	-rw-r--r--
uniqid.c	2.43 KB	-rw-r--r--
url.c	18.11 KB	-rw-r--r--
url.h	2.09 KB	-rw-r--r--
url_scanner_ex.c	38.41 KB	-rw-r--r--
url_scanner_ex.h	2.32 KB	-rw-r--r--
url_scanner_ex.re	27.63 KB	-rw-r--r--
user_filters.c	16.53 KB	-rw-r--r--
user_filters.stub.php	371 B	-rw-r--r--
user_filters_arginfo.h	987 B	-rw-r--r--
uuencode.c	6.35 KB	-rw-r--r--
var.c	37.2 KB	-rw-r--r--
var_unserializer.c	37.95 KB	-rw-r--r--
var_unserializer.re	30.26 KB	-rw-r--r--
versioning.c	5.61 KB	-rw-r--r--
winver.h	6.23 KB	-rw-r--r--

Code Editor : iptc.c

/*
   +----------------------------------------------------------------------+
   | Copyright (c) The PHP Group                                          |
   +----------------------------------------------------------------------+
   | This source file is subject to version 3.01 of the PHP license,      |
   | that is bundled with this package in the file LICENSE, and is        |
   | available through the world-wide-web at the following url:           |
   | http://www.php.net/license/3_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.               |
   +----------------------------------------------------------------------+
   | Author: Thies C. Arntzen <thies@thieso.net>                          |
   +----------------------------------------------------------------------+
 */

/*
 * Functions to parse & compse IPTC data.
 * PhotoShop >= 3.0 can read and write textual data to JPEG files.
 * ... more to come .....
 *
 * i know, parts of this is now duplicated in image.c
 * but in this case i think it's okay!
 */

/*
 * TODO:
 *  - add IPTC translation table
 */

#include "php.h"
#include "ext/standard/head.h"

#include <sys/stat.h>

#include <stdint.h>
#ifndef PHP_WIN32
# include <inttypes.h>
#endif

/* some defines for the different JPEG block types */
#define M_SOF0  0xC0            /* Start Of Frame N */
#define M_SOF1  0xC1            /* N indicates which compression process */
#define M_SOF2  0xC2            /* Only SOF0-SOF2 are now in common use */
#define M_SOF3  0xC3
#define M_SOF5  0xC5            /* NB: codes C4 and CC are NOT SOF markers */
#define M_SOF6  0xC6
#define M_SOF7  0xC7
#define M_SOF9  0xC9
#define M_SOF10 0xCA
#define M_SOF11 0xCB
#define M_SOF13 0xCD
#define M_SOF14 0xCE
#define M_SOF15 0xCF
#define M_SOI   0xD8
#define M_EOI   0xD9            /* End Of Image (end of datastream) */
#define M_SOS   0xDA            /* Start Of Scan (begins compressed data) */
#define M_APP0  0xe0
#define M_APP1  0xe1
#define M_APP2  0xe2
#define M_APP3  0xe3
#define M_APP4  0xe4
#define M_APP5  0xe5
#define M_APP6  0xe6
#define M_APP7  0xe7
#define M_APP8  0xe8
#define M_APP9  0xe9
#define M_APP10 0xea
#define M_APP11 0xeb
#define M_APP12 0xec
#define M_APP13 0xed
#define M_APP14 0xee
#define M_APP15 0xef

/* {{{ php_iptc_put1 */
static int php_iptc_put1(FILE *fp, int spool, unsigned char c, unsigned char **spoolbuf)
{
	if (spool > 0)
		PUTC(c);

if (spoolbuf) *(*spoolbuf)++ = c;

return c;
}
/* }}} */

/* {{{ php_iptc_get1 */
static int php_iptc_get1(FILE *fp, int spool, unsigned char **spoolbuf)
{
	int c;
	char cc;

c = getc(fp);

if (c == EOF) return EOF;

if (spool > 0) {
		cc = c;
		PUTC(cc);
	}

if (spoolbuf) *(*spoolbuf)++ = c;

return c;
}
/* }}} */

/* {{{ php_iptc_read_remaining */
static int php_iptc_read_remaining(FILE *fp, int spool, unsigned char **spoolbuf)
{
  	while (php_iptc_get1(fp, spool, spoolbuf) != EOF) continue;

return M_EOI;
}
/* }}} */

/* {{{ php_iptc_skip_variable */
static int php_iptc_skip_variable(FILE *fp, int spool, unsigned char **spoolbuf)
{
	unsigned int  length;
	int c1, c2;

if ((c1 = php_iptc_get1(fp, spool, spoolbuf)) == EOF) return M_EOI;

if ((c2 = php_iptc_get1(fp, spool, spoolbuf)) == EOF) return M_EOI;

length = (((unsigned char) c1) << 8) + ((unsigned char) c2);

length -= 2;

while (length--)
		if (php_iptc_get1(fp, spool, spoolbuf) == EOF) return M_EOI;

return 0;
}
/* }}} */

/* {{{ php_iptc_next_marker */
static int php_iptc_next_marker(FILE *fp, int spool, unsigned char **spoolbuf)
{
    int c;

/* skip unimportant stuff */

c = php_iptc_get1(fp, spool, spoolbuf);

if (c == EOF) return M_EOI;

while (c != 0xff) {
        if ((c = php_iptc_get1(fp, spool, spoolbuf)) == EOF)
            return M_EOI; /* we hit EOF */
    }

/* get marker byte, swallowing possible padding */
    do {
        c = php_iptc_get1(fp, 0, 0);
		if (c == EOF)
            return M_EOI;       /* we hit EOF */
		else
		if (c == 0xff)
			php_iptc_put1(fp, spool, (unsigned char)c, spoolbuf);
    } while (c == 0xff);

return (unsigned int) c;
}
/* }}} */

static char psheader[] = "\xFF\xED\0\0Photoshop 3.0\08BIM\x04\x04\0\0\0\0";

/* {{{ Embed binary IPTC data into a JPEG image. */
PHP_FUNCTION(iptcembed)
{
	char *iptcdata, *jpeg_file;
	size_t iptcdata_len, jpeg_file_len;
	zend_long spool = 0;
	FILE *fp;
	unsigned int marker, done = 0;
	size_t inx;
	zend_string *spoolbuf = NULL;
	unsigned char *poi = NULL;
	zend_stat_t sb;
	zend_bool written = 0;

ZEND_PARSE_PARAMETERS_START(2, 3)
		Z_PARAM_STRING(iptcdata, iptcdata_len)
		Z_PARAM_PATH(jpeg_file, jpeg_file_len)
		Z_PARAM_OPTIONAL
		Z_PARAM_LONG(spool)
	ZEND_PARSE_PARAMETERS_END();

if (php_check_open_basedir(jpeg_file)) {
		RETURN_FALSE;
	}

if (iptcdata_len >= SIZE_MAX - sizeof(psheader) - 1025) {
		zend_argument_value_error(1, "is too large");
		RETURN_THROWS();
	}

if ((fp = VCWD_FOPEN(jpeg_file, "rb")) == 0) {
		php_error_docref(NULL, E_WARNING, "Unable to open %s", jpeg_file);
		RETURN_FALSE;
	}

if (spool < 2) {
		if (zend_fstat(fileno(fp), &sb) != 0) {
			RETURN_FALSE;
		}

spoolbuf = zend_string_safe_alloc(1, iptcdata_len + sizeof(psheader) + 1024 + 1, sb.st_size, 0);
		poi = (unsigned char*)ZSTR_VAL(spoolbuf);
		memset(poi, 0, iptcdata_len + sizeof(psheader) + sb.st_size + 1024 + 1);
	}

if (php_iptc_get1(fp, spool, poi?&poi:0) != 0xFF) {
		fclose(fp);
		if (spoolbuf) {
			zend_string_efree(spoolbuf);
		}
		RETURN_FALSE;
	}

if (php_iptc_get1(fp, spool, poi?&poi:0) != 0xD8) {
		fclose(fp);
		if (spoolbuf) {
			zend_string_efree(spoolbuf);
		}
		RETURN_FALSE;
	}

while (!done) {
		marker = php_iptc_next_marker(fp, spool, poi?&poi:0);

if (marker == M_EOI) { /* EOF */
			break;
		} else if (marker != M_APP13) {
			php_iptc_put1(fp, spool, (unsigned char)marker, poi?&poi:0);
		}

switch (marker) {
			case M_APP13:
				/* we are going to write a new APP13 marker, so don't output the old one */
				php_iptc_skip_variable(fp, 0, 0);
				fgetc(fp); /* skip already copied 0xFF byte */
				php_iptc_read_remaining(fp, spool, poi?&poi:0);
				done = 1;
				break;

case M_APP0:
				/* APP0 is in each and every JPEG, so when we hit APP0 we insert our new APP13! */
			case M_APP1:
				if (written) {
					/* don't try to write the data twice */
					break;
				}
				written = 1;

php_iptc_skip_variable(fp, spool, poi?&poi:0);

if (iptcdata_len & 1) {
					iptcdata_len++; /* make the length even */
				}

psheader[ 2 ] = (char) ((iptcdata_len+28)>>8);
				psheader[ 3 ] = (iptcdata_len+28)&0xff;

for (inx = 0; inx < 28; inx++) {
					php_iptc_put1(fp, spool, psheader[inx], poi?&poi:0);
				}

php_iptc_put1(fp, spool, (unsigned char)(iptcdata_len>>8), poi?&poi:0);
				php_iptc_put1(fp, spool, (unsigned char)(iptcdata_len&0xff), poi?&poi:0);

for (inx = 0; inx < iptcdata_len; inx++) {
					php_iptc_put1(fp, spool, iptcdata[inx], poi?&poi:0);
				}
				break;

case M_SOS:
				/* we hit data, no more marker-inserting can be done! */
				php_iptc_read_remaining(fp, spool, poi?&poi:0);
				done = 1;
				break;

default:
				php_iptc_skip_variable(fp, spool, poi?&poi:0);
				break;
		}
	}

fclose(fp);

if (spool < 2) {
		spoolbuf = zend_string_truncate(spoolbuf, poi - (unsigned char*)ZSTR_VAL(spoolbuf), 0);
		RETURN_NEW_STR(spoolbuf);
	} else {
		RETURN_TRUE;
	}
}
/* }}} */

/* {{{ Parse binary IPTC-data into associative array */
PHP_FUNCTION(iptcparse)
{
	size_t inx = 0, len;
	unsigned int tagsfound = 0;
	unsigned char *buffer, recnum, dataset;
	char *str, key[16];
	size_t str_len;
	zval values, *element;

ZEND_PARSE_PARAMETERS_START(1, 1)
		Z_PARAM_STRING(str, str_len)
	ZEND_PARSE_PARAMETERS_END();

buffer = (unsigned char *)str;

while (inx < str_len) { /* find 1st tag */
		if ((buffer[inx] == 0x1c) && ((buffer[inx+1] == 0x01) || (buffer[inx+1] == 0x02))){
			break;
		} else {
			inx++;
		}
	}

while (inx < str_len) {
		if (buffer[ inx++ ] != 0x1c) {
			break;   /* we ran against some data which does not conform to IPTC - stop parsing! */
		}

if ((inx + 4) >= str_len)
			break;

dataset = buffer[ inx++ ];
		recnum = buffer[ inx++ ];

if (buffer[ inx ] & (unsigned char) 0x80) { /* long tag */
			if((inx+6) >= str_len) {
				break;
			}
			len = (((zend_long) buffer[ inx + 2 ]) << 24) + (((zend_long) buffer[ inx + 3 ]) << 16) +
				  (((zend_long) buffer[ inx + 4 ]) <<  8) + (((zend_long) buffer[ inx + 5 ]));
			inx += 6;
		} else { /* short tag */
			len = (((unsigned short) buffer[ inx ])<<8) | (unsigned short)buffer[ inx+1 ];
			inx += 2;
		}

if ((len > str_len) || (inx + len) > str_len) {
			break;
		}

snprintf(key, sizeof(key), "%d#%03d", (unsigned int) dataset, (unsigned int) recnum);

if (tagsfound == 0) { /* found the 1st tag - initialize the return array */
			array_init(return_value);
		}

if ((element = zend_hash_str_find(Z_ARRVAL_P(return_value), key, strlen(key))) == NULL) {
			array_init(&values);

element = zend_hash_str_update(Z_ARRVAL_P(return_value), key, strlen(key), &values);
		}

add_next_index_stringl(element, (char *) buffer+inx, len);
		inx += len;
		tagsfound++;
	}

if (! tagsfound) {
		RETURN_FALSE;
	}
}
/* }}} */

${this.title}

Code Editor : iptc.c