From 71a6e83b2e06f357e6d759c50703a81847065755 Mon Sep 17 00:00:00 2001
From: Gina Peter Banyard <girgias@php.net>
Date: Tue, 5 Dec 2023 04:45:52 +0000
Subject: [PATCH] Remove process.php script and related apply scripts

Those are clearly not used anymore as they use ereg/eregi functions which have been removed in PHP 7.0.
---
 scripts/apply/README             |   8 --
 scripts/apply/fix_modelines.php  |  76 ----------------
 scripts/apply/func2methodsyn.php | 147 -------------------------------
 scripts/apply/lower.php          |  20 -----
 scripts/apply/tfn.php            |  42 ---------
 scripts/process.php              | 116 ------------------------
 6 files changed, 409 deletions(-)
 delete mode 100644 scripts/apply/README
 delete mode 100644 scripts/apply/fix_modelines.php
 delete mode 100644 scripts/apply/func2methodsyn.php
 delete mode 100644 scripts/apply/lower.php
 delete mode 100644 scripts/apply/tfn.php
 delete mode 100755 scripts/process.php

diff --git a/scripts/apply/README b/scripts/apply/README
deleted file mode 100644
index 33fb586cf..000000000
--- a/scripts/apply/README
+++ /dev/null
@@ -1,8 +0,0 @@
-Some useful scripts for maintaining consistency in phpdoc.
-
-Use these scripts with scripts/process.php to consequently
-modify/test things in XML source files. These are mostly
-one-time scripts, but instead of writing each time a new
-script, it's better to base it on an existing one.
-
-Note, that these scripts cannot be used standalone.
diff --git a/scripts/apply/fix_modelines.php b/scripts/apply/fix_modelines.php
deleted file mode 100644
index 24b1b94c1..000000000
--- a/scripts/apply/fix_modelines.php
+++ /dev/null
@@ -1,76 +0,0 @@
-<?php
-
-// Fix the modelines of xml files. If no modelines were given, it is assumed
-// that the xml is two levels deeper than the root of the phpdoc dir, otherwise
-// it's copied from the emacs property sgml-default-dtd-file
-function apply($input)
-{
-	$lines = explode("\n",$input);
-	$numlines = count($lines);
-	$modeline_started = FALSE;
-	$manual_ced_line = NULL;
-	$output = "";
-	foreach ($lines as $nr=>$line) {
-		if (preg_match("/Keep this comment at the end of the file/i", $line)) {
-
-			// we're on top of the comment
-			if ($nr + 20 < $numlines) {
-				// there's too much of lines left, bail out
-				?>
-		ERROR in this file, modelines seems to be not at end of file!
-				<?php
-				exit;
-			}
-			
-			// break out of for-loop
-
-			$modeline_started = TRUE;
-
-		}
-
-		if ($modeline_started) {
-			$found_ced = preg_match("sgml-default-dtd-file:.*manual\.ced", $line);
-			}
-		}
-						
-						
-
-		if (1 !== $found_ced) {
-			$output .= "$line\n";
-		}
-	}
-
-	if (!$modeline_started) {
-		echo "WARNING: did NOT found start of modelines!\n";
-	}
-
-	if (!$manual_ced_line) {
-		echo "WARNING: did NOT found a ced-line!\n";
-	}
-
-	$output .= <<<HEREDOC
-<!-- Keep this comment at the end of the file
-Local variables:
-mode: sgml
-sgml-omittag:t
-sgml-shorttag:t
-sgml-minimize-attributes:nil
-sgml-always-quote-attributes:t
-sgml-indent-step:1
-sgml-indent-data:t
-indent-tabs-mode:nil
-sgml-parent-document:nil
-sgml-default-dtd-file:"~/.phpdoc/manual.ced"
-sgml-exposed-tags:nil
-sgml-local-catalogs:nil
-sgml-local-ecat-files:nil
-End:
-vim600: syn=xml fen fdm=syntax fdl=2 si
-vim: et tw=78 syn=sgml
-vi: ts=1 sw=1
--->
-
-HEREDOC;
-	
-	return $output;
-}
diff --git a/scripts/apply/func2methodsyn.php b/scripts/apply/func2methodsyn.php
deleted file mode 100644
index 9e913b3f9..000000000
--- a/scripts/apply/func2methodsyn.php
+++ /dev/null
@@ -1,147 +0,0 @@
-<?php
-
-$conversion_xsl='
-<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
-                version="1.0">
-
-<xsl:output method="xml" />
-
-<!-- default rule -> copy element, attributes and recursive content -->
-<xsl:template match="*">
-  <xsl:copy>
-    <xsl:copy-of select="@*"/>
-    <xsl:apply-templates/>
-  </xsl:copy>
-</xsl:template>
-
-<!-- ignore funcsynopsis tags -->
-<xsl:template match="/funcsynopsis">
-     <xsl:apply-templates/>   
-</xsl:template>
-
-<!-- convert foncprototype to methodsynopsis -->
-<xsl:template match="/funcsynopsis/funcprototype">
-   <methodsynopsis>
-    <xsl:apply-templates/>
-   </methodsynopsis>
-</xsl:template>
-
-<!-- ignore funcdef tag -->
-<xsl:template match="/funcsynopsis/funcprototype/funcdef">
-    <xsl:apply-templates/>
-</xsl:template>
-
-<!-- function is now methodname in this context -->
-<xsl:template match="/funcsynopsis/funcprototype/funcdef/function">
-<methodname><xsl:apply-templates/></methodname>
-</xsl:template>
-
-<!-- replaceable is now methodname.replaceable in this context -->
-<xsl:template match="/funcsynopsis/funcprototype/funcdef/replaceable">
-<methodname><replaceable><xsl:apply-templates/></replaceable></methodname>
-</xsl:template>
-
-<!-- first text element is the return type
-     needs to be enclosed in type tags now
--->
-<xsl:template match="/funcsynopsis/funcprototype/funcdef/text()[1]">
-  <xsl:if test="position() = 1"> <!-- first only -->
-    <type>
-     <xsl:value-of select="normalize-space(.)"/>
-    </type>
-  </xsl:if>
-</xsl:template>
-
-<!-- paramdef is now methodparam, empty paramdef should be void/ -->
-<xsl:template match="/funcsynopsis/funcprototype/paramdef">
-  <xsl:choose>
-    <xsl:when test="count(parameter)>0">
-    <methodparam>
-     <xsl:if test="*/optional"> <!-- optional is now attribute and not special tag -->
-      <xsl:attribute name="choice">opt</xsl:attribute>
-     </xsl:if>
-     <xsl:apply-templates/>
-    </methodparam>
-  </xsl:when>
-  <xsl:otherwise>
-    <void/>
-  </xsl:otherwise>
-  </xsl:choose>
-</xsl:template>
-
-<!-- first text in paramdef is paramter type and needs type tags -->
-<xsl:template match="/funcsynopsis/funcprototype/paramdef/text()[1]">
-  <xsl:if test="position() = 1">
-     <type>
-      <xsl:value-of select="normalize-space(.)"/>
-     </type>
-  </xsl:if>
-</xsl:template>
-
-<!-- ignore optional tag here, already processed above -->
-<xsl:template match="/funcsynopsis/funcprototype/paramdef/parameter/optional">
-      <xsl:apply-templates/>
-</xsl:template>
-
-<!-- there is no varargs in methodsynopsis, but a rep attribute for methodparam -->
-<xsl:template match="/funcsynopsis/funcprototype/varargs">
-     <methodparam rep="repeat"><type>mixed</type><parameter>...</parameter></methodparam>
-</xsl:template>
-
-</xsl:stylesheet>
-';
-
-$xslt_processor = false;
-
-function apply($input) {
-	global $conversion_xsl, $xslt_processor;
-	$output="";
-	$flag=false;
-
-	if(!function_exists("xslt_create")) {
-		die("this conversion requires a PHP executable with XSLT extension");
-	}
-
-	$xmlhead="<?xml version='1.0' encoding='iso-8859-1' ?>\n";
-
-	$lines = explode("\n",$input);
-	for($nr=0;$nr<sizeof($lines);$nr++) {
-		$line = $lines[$nr]."\n";
-
-		if(strstr($line,("<funcsynopsis>"))) {
-			$flag=true;
-			$funcsyn = $xmlhead."\n".str_replace("&","&amp;",$line);
-			do {
-				$line=$lines[++$nr]."\n";;
-				$funcsyn .= str_replace("&","&amp;",$line);
-			} while(!strstr($line,("</funcsynopsis>")));
-			$arguments = array('/_xml' => $funcsyn,
-												 '/_xsl' => $conversion_xsl
-												 );
-			if(!is_resource($xslt_processor)) {
-				$xslt_processor = xslt_create();
-			}
-			$result = xslt_process($xslt_processor, 'arg:/_xml', 'arg:/_xsl', NULL, $arguments);
-			
-			if(is_string($result)) {
-				$result = str_replace("&amp;","&",$result);
-				$result = explode("\n",$result);
-				unset($result[0]);
-				$output .= rtrim(utf8_decode(join("\n",$result)))."\n";
-			} else {
-				echo "line $nr\n";
-				echo $funcsyn;
-				return false;
-			}
-		} else if (strstr($line,("<?xml"))&&($nr==1)) {
-			$xmlhead=$line;
-			$output .= $line;
-		} else {
-			$output .= $line;
-		}
-	}
-
-	return $flag ? $output : false;
-}
-
-?>
diff --git a/scripts/apply/lower.php b/scripts/apply/lower.php
deleted file mode 100644
index 63d6cf30e..000000000
--- a/scripts/apply/lower.php
+++ /dev/null
@@ -1,20 +0,0 @@
-<?php
-
-# convert function refnames to lowercase
-
-function apply($input) {
-	$flag = false;
-
-	if( ereg("<refname>([^<]*)</refname>", $input, $matches)) {
-		$name = $matches[1];
-		$lower = strtolower($name);
-		if($lower != $name) {
-			$input = str_replace("<refname>$name</refname>", "<refname>$lower</refname>", $input);
-			$flag = true;
-		}
-	}
-
-	return $flag ? $input : false ;
-}
-
-?>
diff --git a/scripts/apply/tfn.php b/scripts/apply/tfn.php
deleted file mode 100644
index be8cc76e3..000000000
--- a/scripts/apply/tfn.php
+++ /dev/null
@@ -1,42 +0,0 @@
-<?php // vim: ts=4 sw=4
-
-// For use in process.php
-
-// true,false,null -> entities
-
-function apply($input)
-{
-	$from = '/([^a-zA-Z$._-])(true|false|null)([^a-zA-Z$_-])/i';
-	$to = "\\1&\\2;\\3";
-
-	$lines = explode("\n",$input);
-
-	$active = TRUE;
-
-	foreach ($lines as $nr => $line)
-	{
-		$active = $active && !ereg('<programlisting',$line);
-		$active = $active ||  ereg('</programlisting',$line);
-        if ($active)
-			$lines[$nr] = substr(preg_replace( $from , $to , $line.' ' ),0,-1);
-	}
-
-	$output = implode("\n",$lines);
-
-	// lowercase the entities:
-	$output = eregi_replace('&true;','&true;',$output);
-	$output = eregi_replace('&false;','&false;',$output);
-	$output = eregi_replace('&null;','&null;',$output);
-
-	$from = '/(<constant>)?(<literal>)?&(true|false|null);(<\/constant>)?(<\/literal>)?/';
-	$to = "&\\3;";
-	
-
-	$output = preg_replace($from,$to,$output);
-
-
-	$output = ereg_replace('<type>&null;</type>','<type>null</type>',$output);
-
-	return $output;
-
-}
diff --git a/scripts/process.php b/scripts/process.php
deleted file mode 100755
index 3b483c11f..000000000
--- a/scripts/process.php
+++ /dev/null
@@ -1,116 +0,0 @@
-#!/usr/bin/php -q
-<?php 
-/*
-  +----------------------------------------------------------------------+
-  | Copyright (c) 1997-2023 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:           |
-  | https://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.              |
-  +----------------------------------------------------------------------+
-  | Authors:    Jeroen van Wolffelaar <jeroen@php.net>                   |
-  +----------------------------------------------------------------------+
-
-  $Id$
-*/
-
-set_time_limit(0);
-ob_implicit_flush();
-
-if ($argc < 2 || $argc > 3) { ?>
-Process the manual to do some replacements.
-
-  Usage:
-  <?php echo $argv[0]; ?> <apply-script> [<startdir>]
-
-  <apply-script> must contain the function apply($input),
-  which recieves a whole xml-file, and should return
-  the new file, or false if no modification needed.
-  Apply scripts reside in the apply folder below this
-  script. You only need to give the file name.
-
-  With <startdir> you can specify in which dir
-  to start looking recursively for xml files.
-
-  Written by jeroen@php.net
-
-<?php
-    exit;
-}
-
-echo "Starting with manual-process\n";
-echo "Including $argv[1]...";
-include("apply/$argv[1]");
-echo " done\n";
-if (!function_exists('apply')) {
-?>
-
-### FATAL ERROR ###
-
-In <?=$argv[1]?> you should define a function:
-  string apply(string $string)
-
-<?php
-    exit;
-}
-
-$startdir = isset($argv[2]) ? $argv[2] : '.';
-
-echo "Constructing list of all xml-files (may take a while)...";
-$files = all_xml_files($startdir);
-echo " done (".count($files)." xml files found)\n";
-
-foreach ($files as $file) {
-
-    echo "[Processing $file]\n";
-    $fp = fopen($file,'r');
-    $old = fread($fp,filesize($file));
-    fclose($fp);
-
-    if (!$old) {
-        echo "WARNING: problem reading $file, skipping\n";
-        continue;
-    }
-
-    $new = apply($old);
-    if ($new === FALSE) { echo "NO MODIFICATION: $file not modified\n"; }
-    else {
-        $fp = fopen($file,'w');
-        $res = fwrite($fp,$new);
-        fclose($fp);
-        if (!$res) {
-            echo "WARNING: problem writing $file, file might be damaged\n";
-            continue;
-        }
-    }
-}
-
-    
-/* Utility functions: */
-
-function all_xml_files($startdir)
-{
-    $startdir = ereg_replace('/+$','',$startdir);
-    //echo "\$startdir = $startdir\n";
-    $entries = array();
-
-    $handle=opendir($startdir);
-    while ($file = readdir($handle)) {
-
-        $ffile = "$startdir/$file"; // full file(path)
-        //echo "$file\n";
-        if (ereg('\.xml$',$file))
-            $entries[] = $ffile;
-        if ($file[0] != '.' && is_dir($ffile))
-            $entries = array_merge($entries,all_xml_files($ffile));
-    }
-    closedir($handle);
-
-    return $entries;
-}
-    
-