CVS update: php3/functions
| From: | steinm | Date: | Mon, 19 Oct 1998 17:53:03 +0000 |
| Subject: | CVS update: php3/functions | ||
| Groups: | php.dev | ||
| Request: | Send a blank email to php-dev+get-1913@lists.php.net to get a copy of this message | ||
Date: Monday October 19, 1998 @ 13:53
Author: steinm
Update of /repository/php3/functions
In directory asf:/u2/tmp/cvs-serv28782/functions
Modified Files:
pdf.c php3_pdf.h
Log Message:
added more functions to pdf module
Index: php3/functions/pdf.c
diff -c php3/functions/pdf.c:1.1 php3/functions/pdf.c:1.2
*** php3/functions/pdf.c:1.1 Mon Oct 19 13:19:10 1998
--- php3/functions/pdf.c Mon Oct 19 13:53:02 1998
***************
*** 27,33 ****
+----------------------------------------------------------------------+
*/
! /* $Id: pdf.c,v 1.1 1998/10/19 17:19:10 steinm Exp $ */
/* pdflib 0.4 is subject to the ALADDIN FREE PUBLIC LICENSE.
Copyright (C) 1997 Thomas Merz. */
--- 27,33 ----
+----------------------------------------------------------------------+
*/
! /* $Id: pdf.c,v 1.2 1998/10/19 17:53:02 steinm Exp $ */
/* pdflib 0.4 is subject to the ALADDIN FREE PUBLIC LICENSE.
Copyright (C) 1997 Thomas Merz. */
***************
*** 95,101 ****
{"pdf_set_text_pos", php3_pdf_set_text_pos, NULL},
{"pdf_continue_text", php3_pdf_continue_text, NULL},
{"pdf_stringwidth", php3_pdf_stringwidth, NULL},
! /* {"pdf_save", php3_pdf_save, NULL},
{"pdf_restore", php3_pdf_restore, NULL},
{"pdf_translate", php3_pdf_translate, NULL},
{"pdf_scale", php3_pdf_scale, NULL},
--- 95,101 ----
{"pdf_set_text_pos", php3_pdf_set_text_pos, NULL},
{"pdf_continue_text", php3_pdf_continue_text, NULL},
{"pdf_stringwidth", php3_pdf_stringwidth, NULL},
! {"pdf_save", php3_pdf_save, NULL},
{"pdf_restore", php3_pdf_restore, NULL},
{"pdf_translate", php3_pdf_translate, NULL},
{"pdf_scale", php3_pdf_scale, NULL},
***************
*** 120,126 ****
{"pdf_closepath_fill_stroke", php3_pdf_closepath_fill_stroke, NULL},
{"pdf_endpath", php3_pdf_endpath, NULL},
{"pdf_clip", php3_pdf_clip, NULL},
! */ {NULL, NULL, NULL}
};
php3_module_entry pdf_module_entry = {
--- 120,126 ----
{"pdf_closepath_fill_stroke", php3_pdf_closepath_fill_stroke, NULL},
{"pdf_endpath", php3_pdf_endpath, NULL},
{"pdf_clip", php3_pdf_clip, NULL},
! {NULL, NULL, NULL}
};
php3_module_entry pdf_module_entry = {
***************
*** 596,601 ****
--- 596,1218 ----
}
#endif
+
+ void php3_pdf_save(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 1 || getParameters(ht, 1, &arg1) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_save(pdf);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_restore(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 1 || getParameters(ht, 1, &arg1) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_restore(pdf);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_translate(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2, *arg3;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 3 || getParameters(ht, 3, &arg1, &arg2, &arg3) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ convert_to_double(arg3);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_translate(pdf, (float) arg2->value.dval, (float) arg3->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_scale(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2, *arg3;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 3 || getParameters(ht, 3, &arg1, &arg2, &arg3) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ convert_to_double(arg3);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_scale(pdf, (float) arg2->value.dval, (float) arg3->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_rotate(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 2 || getParameters(ht, 2, &arg1, &arg2) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_rotate(pdf, (float) arg2->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_setflat(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 2 || getParameters(ht, 2, &arg1, &arg2) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_setflat(pdf, (float) arg2->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_setlinejoin(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 2 || getParameters(ht, 2, &arg1, &arg2) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_long(arg2);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_setlinejoin(pdf, (byte) arg2->value.lval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_setlinecap(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 2 || getParameters(ht, 2, &arg1, &arg2) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_long(arg2);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_setlinecap(pdf, (byte) arg2->value.lval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_setmiterlimit(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 2 || getParameters(ht, 2, &arg1, &arg2) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_setmiterlimit(pdf, (float) arg2->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_setlinewidth(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 2 || getParameters(ht, 2, &arg1, &arg2) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_setlinewidth(pdf, (float) arg2->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_setdash(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2, *arg3;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 3 || getParameters(ht, 3, &arg1, &arg2, &arg3) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ convert_to_double(arg3);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_setdash(pdf, (float) arg2->value.dval, (float) arg3->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_moveto(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2, *arg3;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 3 || getParameters(ht, 3, &arg1, &arg2, &arg3) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ convert_to_double(arg3);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_moveto(pdf, (float) arg2->value.dval, (float) arg3->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_curveto(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2, *arg3, *arg4, *arg5, *arg6, *arg7;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 7 || getParameters(ht, 7, &arg1, &arg2, &arg3, &arg4,
&arg5, &arg6, &arg7) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ convert_to_double(arg3);
+ convert_to_double(arg4);
+ convert_to_double(arg5);
+ convert_to_double(arg6);
+ convert_to_double(arg7);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_curveto(pdf, (float) arg2->value.dval,
+ (float) arg3->value.dval,
+ (float) arg4->value.dval,
+ (float) arg5->value.dval,
+ (float) arg6->value.dval,
+ (float) arg7->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_lineto(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2, *arg3;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 3 || getParameters(ht, 3, &arg1, &arg2, &arg3) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ convert_to_double(arg3);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_lineto(pdf, (float) arg2->value.dval, (float) arg3->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_circle(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2, *arg3, *arg4;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 4 || getParameters(ht, 4, &arg1, &arg2, &arg3, &arg4) ==
FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ convert_to_double(arg3);
+ convert_to_double(arg4);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_circle(pdf, (float) arg2->value.dval, (float) arg3->value.dval, (float)
arg4->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_arc(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2, *arg3, *arg4, *arg5, *arg6;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 4 || getParameters(ht, 4, &arg1, &arg2, &arg3, &arg4) ==
FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ convert_to_double(arg3);
+ convert_to_double(arg4);
+ convert_to_double(arg5);
+ convert_to_double(arg6);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_arc(pdf, (float) arg2->value.dval, (float) arg3->value.dval, (float)
arg4->value.dval, (float) arg5->value.dval, (float) arg6->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_rect(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1, *arg2, *arg3, *arg4, *arg5;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 5 || getParameters(ht, 5, &arg1, &arg2, &arg3, &arg4,
&arg5) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ convert_to_double(arg2);
+ convert_to_double(arg3);
+ convert_to_double(arg4);
+ convert_to_double(arg5);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_rect(pdf, (float) arg2->value.dval,
+ (float) arg3->value.dval,
+ (float) arg4->value.dval,
+ (float) arg5->value.dval);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_closepath(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 1 || getParameters(ht, 1, &arg1) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_closepath(pdf);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_closepath_stroke(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 1 || getParameters(ht, 1, &arg1) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_closepath_stroke(pdf);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_stroke(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 1 || getParameters(ht, 1, &arg1) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_stroke(pdf);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_fill(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 1 || getParameters(ht, 1, &arg1) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_fill(pdf);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_fill_stroke(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 1 || getParameters(ht, 1, &arg1) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_fill_stroke(pdf);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_closepath_fill_stroke(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 1 || getParameters(ht, 1, &arg1) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_closepath_fill_stroke(pdf);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_endpath(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 1 || getParameters(ht, 1, &arg1) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_endpath(pdf);
+
+ RETURN_TRUE;
+ }
+
+ void php3_pdf_clip(INTERNAL_FUNCTION_PARAMETERS) {
+ pval *arg1;
+ int id, type;
+ PDF *pdf;
+ PDF_TLS_VARS;
+
+ if (ARG_COUNT(ht) != 1 || getParameters(ht, 1, &arg1) == FAILURE) {
+ WRONG_PARAM_COUNT;
+ }
+
+ convert_to_long(arg1);
+ id=arg1->value.lval;
+ pdf = php3_list_find(id,&type);
+ if(!pdf || type!=PDF_GLOBAL(le_pdf)) {
+ php3_error(E_WARNING,"Unable to find file identifier %d",id);
+ RETURN_FALSE;
+ }
+
+ PDF_clip(pdf);
+
+ RETURN_TRUE;
+ }
/*
Index: php3/functions/php3_pdf.h
diff -c php3/functions/php3_pdf.h:1.1 php3/functions/php3_pdf.h:1.2
*** php3/functions/php3_pdf.h:1.1 Mon Oct 19 13:19:10 1998
--- php3/functions/php3_pdf.h Mon Oct 19 13:53:02 1998
***************
*** 26,32 ****
| Authors: Uwe Steinmann |
+----------------------------------------------------------------------+
*/
! /* $Id: php3_pdf.h,v 1.1 1998/10/19 17:19:10 steinm Exp $ */
#ifndef _PHP3_PDF_H
#define _PHP3_PDF_H
--- 26,32 ----
| Authors: Uwe Steinmann |
+----------------------------------------------------------------------+
*/
! /* $Id: php3_pdf.h,v 1.2 1998/10/19 17:53:02 steinm Exp $ */
#ifndef _PHP3_PDF_H
#define _PHP3_PDF_H
***************
*** 58,63 ****
--- 58,88 ----
extern void php3_pdf_set_text_pos(INTERNAL_FUNCTION_PARAMETERS);
extern void php3_pdf_continue_text(INTERNAL_FUNCTION_PARAMETERS);
extern void php3_pdf_stringwidth(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_save(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_restore(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_translate(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_scale(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_rotate(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_setflat(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_setlinejoin(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_setlinecap(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_setmiterlimit(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_setlinewidth(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_setdash(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_moveto(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_curveto(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_lineto(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_circle(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_arc(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_rect(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_closepath(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_closepath_stroke(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_stroke(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_fill(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_fill_stroke(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_closepath_fill_stroke(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_endpath(INTERNAL_FUNCTION_PARAMETERS);
+ extern void php3_pdf_clip(INTERNAL_FUNCTION_PARAMETERS);
#else
#define pdf_module_ptr NULL
#endif
--
PHP Development Mailing List http://www.php.net/
To unsubscribe send an empty message to php-dev-unsubscribe@lists.php.net
For help: php-dev-help@lists.php.net