]> granicus.if.org Git - php/commitdiff
Remove PHP3 conversion scripts
authorJohannes Schlüter <johannes@php.net>
Wed, 17 Jul 2013 21:32:23 +0000 (23:32 +0200)
committerJohannes Schlüter <johannes@php.net>
Wed, 17 Jul 2013 21:32:23 +0000 (23:32 +0200)
scripts/dev/conv_proto [deleted file]
scripts/dev/conv_z_macros [deleted file]
scripts/dev/extern_c.php [deleted file]

diff --git a/scripts/dev/conv_proto b/scripts/dev/conv_proto
deleted file mode 100755 (executable)
index fad9cfa..0000000
+++ /dev/null
@@ -1,30 +0,0 @@
-#! /bin/sh
-#
-# do some automatic conversion of prototypes
-#
-
-if test "$1" = "" ; then
-       echo "usage: $0 list-of-files"
-       exit 1
-fi
-
-tmpfile=`mktemp -q /tmp/asd.XXXXXX`
-
-if test "$?" != "0" ; then
-       echo "$0: cannot create temporary file"
-       exit 1
-fi
-
-for file in ${1+"$@"} ; do
-       echo "working on $file"
-       cat $file | \
-       sed -e \
-       's/void php3_\(.*\)(INTERNAL_FUNCTION_PARAMETERS)/PHP_FUNCTION(\1)/' \
-    -e 's/^extern void /void /' \
-       -e 's/^extern PHP_FUNCTION/PHP_FUNCTION/' > $tmpfile
-       cp $tmpfile $file
-done
-
-rm -f $tmpfile
-
-exit 0
diff --git a/scripts/dev/conv_z_macros b/scripts/dev/conv_z_macros
deleted file mode 100755 (executable)
index ea45bc2..0000000
+++ /dev/null
@@ -1,61 +0,0 @@
-#! /bin/sh
-#
-#  +----------------------------------------------------------------------+
-#  | PHP Version 5                                                        |
-#  +----------------------------------------------------------------------+
-#  | Copyright (c) 1997-2007 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: Sascha Schumann <sascha@schumann.cx>                         |
-#  +----------------------------------------------------------------------+
-#
-# $Id$
-
-for i in $@; do
-       echo -n "Processing $i... "
-       sed \
-       -e 's/(\*\([^()]\+\))->type/Z_TYPE_PP(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)->type/Z_TYPE_P(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)\.type/Z_TYPE(\1)/g' \
-       -e 's/(\*\([^()]\+\))->value\.dval/Z_DVAL_PP(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)->value\.dval/Z_DVAL_P(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)\.value\.dval/Z_DVAL(\1)/g' \
-       -e 's/(\*\([^()]\+\))->value\.lval/Z_LVAL_PP(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)->value\.lval/Z_LVAL_P(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)\.value\.lval/Z_LVAL(\1)/g' \
-       -e 's/(\*\([^()]\+\))->value\.ht/Z_ARRVAL_PP(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)->value\.ht/Z_ARRVAL_P(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)\.value\.ht/Z_ARRVAL(\1)/g' \
-       -e 's/(\*\([^()]\+\))->value\.str\.val/Z_STRVAL_PP(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)->value\.str\.val/Z_STRVAL_P(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)\.value\.str\.val/Z_STRVAL(\1)/g' \
-       -e 's/(\*\([^()]\+\))->value\.str\.len/Z_STRLEN_PP(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)->value\.str\.len/Z_STRLEN_P(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)\.value\.str\.len/Z_STRLEN(\1)/g' \
-       -e 's/(\*\([^()]\+\))->value\.obj\.properties/Z_OBJPROP_PP(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)->value\.obj\.properties/Z_OBJPROP_P(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)\.value\.obj\.properties/Z_OBJPROP(\1)/g' \
-       -e 's/(\*\([^()]\+\))->value\.obj\.ce/Z_OBJCE_PP(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)->value\.obj\.ce/Z_OBJCE_P(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)\.value\.obj\.ce/Z_OBJCE(\1)/g' \
-       -e 's/(\*\([^()]\+\))->value\.obj/Z_OBJ_PP(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)->value\.obj/Z_OBJ_P(\1)/g' \
-       -e 's/\([a-z_][]a-z_0-9\[]*\)\.value\.obj/Z_OBJ(\1)/g' \
-       -e 's/\([a-zA-Z_][a-zA-Z_0-9]*\)->Z_\([A-Z_]\+\)(/Z_\2(\1->/g' \
-       -e 's/\([a-zA-Z_][a-zA-Z_0-9]*\)->Z_\([A-Z_]\+\)(/Z_\2(\1->/g' \
-       -e 's/\([a-zA-Z_][a-zA-Z_0-9]*\)->Z_\([A-Z_]\+\)(/Z_\2(\1->/g' \
-       -e 's/\([a-zA-Z_][a-zA-Z_0-9]*\)\.Z_\([A-Z_]\+\)(/Z_\2(\1./g' \
-       -e 's/\([a-zA-Z_][a-zA-Z_0-9]*\)\.Z_\([A-Z_]\+\)(/Z_\2(\1./g' \
-       -e 's/\([a-zA-Z_][a-zA-Z_0-9]*\)\.Z_\([A-Z_]\+\)(/Z_\2(\1./g' \
-       < $i > tmp && cp tmp $i
-       echo "DONE"
-done
-
-rm -f tmp
diff --git a/scripts/dev/extern_c.php b/scripts/dev/extern_c.php
deleted file mode 100644 (file)
index 72c7edc..0000000
+++ /dev/null
@@ -1,45 +0,0 @@
-<?php
-
-function scan_dir($dir) {
-       if (!is_dir($dir)) return;
-
-       foreach (glob("$dir/*") as $file) {
-               if (is_dir($file)) {
-                       if (basename($file) != "CVS") {
-                               scan_dir($file);
-                       }
-               } else if (fnmatch("*.h", $file)) {
-                       scan_file($file); 
-               }
-       }
-}
-       
-function scan_file($file) {
-       $flag = false;
-       
-       foreach (file($file) as $nr => $line) {
-               if (ereg("^[[:space:]]*BEGIN_EXTERN_C", $line)) {
-#                  echo "$file:".($nr+1)." $line";
-                       $flag = true;
-               } else if (ereg("^[[:space:]]*END_EXTERN_C", $line)) {
-#                  echo "$file:".($nr+1)." $line";
-                       $flag = false;
-               } else if (  (ereg("^[[:space:]]*PHPAPI[[:space:]]*", $line)) 
-                                        ||(ereg("^[[:space:]]*ZEND_API[[:space:]]*", $line))) {
-                 if (strstr($line,"(")) { 
-                         if (!$flag) echo "$file:".($nr+1)." $line";
-                 }
-               }
-       }
-}
-
-array_shift($_SERVER["argv"]);
-
-if (count($_SERVER["argv"])) {
-       foreach ($_SERVER["argv"] as $dir) {
-               scan_dir($dir);
-       }
-} else {
-       scan_dir(".");
-}
-?>
\ No newline at end of file