better-staridc-MNBT
1<?php
2/************************************************
3 * Amysql FTP - AMFTP 3.0
4 * amh.sh
5 * Update:2021-01-15
6 *
7 */
8
9
10// --------------------------------------------------------------------------------
11// PhpConcept Library (PCL) Error 1.0
12// --------------------------------------------------------------------------------
13// License GNU/GPL - Vincent Blavet - Mars 2001
14// http://www.phpconcept.net & http://phpconcept.free.fr
15// --------------------------------------------------------------------------------
16// Franais :
17// La description de l'usage de la librairie PCL Error 1.0 n'est pas encore
18// disponible. Celle-ci n'est pour le moment distribue qu'avec les
19// dveloppements applicatifs de PhpConcept.
20// Une version indpendante sera bientot disponible sur http://www.phpconcept.net
21//
22// English :
23// The PCL Error 1.0 library description is not available yet. This library is
24// released only with PhpConcept application and libraries.
25// An independant release will be soon available on http://www.phpconcept.net
26//
27// --------------------------------------------------------------------------------
28//
29// * Avertissement :
30//
31// Cette librairie a t?cre de faon non professionnelle.
32// Son usage est au risque et pril de celui qui l'utilise, en aucun cas l'auteur
33// de ce code ne pourra tre tenu pour responsable des ventuels dgats qu'il pourrait
34// engendrer.
35// Il est entendu cependant que l'auteur a ralis?ce code par plaisir et n'y a
36// cach?aucun virus, ni malveillance.
37// Cette libairie est distribue sous la license GNU/GPL (http://www.gnu.org)
38//
39// * Auteur :
40//
41// Ce code a t?crit par Vincent Blavet (vincent@blavet.net) sur son temps
42// de loisir.
43//
44// --------------------------------------------------------------------------------
45
46// ----- Look for double include
47if (!defined("PCLERROR_LIB"))
48{
49 define( "PCLERROR_LIB", 1 );
50
51 // ----- Version
52 $g_pcl_error_version = "1.0";
53
54 // ----- Internal variables
55 // These values must only be change by PclError library functions
56 $g_pcl_error_string = "";
57 $g_pcl_error_code = 1;
58
59
60 // --------------------------------------------------------------------------------
61 // Function : PclErrorLog()
62 // Description :
63 // Parameters :
64 // --------------------------------------------------------------------------------
65 function PclErrorLog($p_error_code=0, $p_error_string="")
66 {
67 global $g_pcl_error_string;
68 global $g_pcl_error_code;
69
70 $g_pcl_error_code = $p_error_code;
71 $g_pcl_error_string = $p_error_string;
72
73 }
74 // --------------------------------------------------------------------------------
75
76 // --------------------------------------------------------------------------------
77 // Function : PclErrorFatal()
78 // Description :
79 // Parameters :
80 // --------------------------------------------------------------------------------
81 function PclErrorFatal($p_file, $p_line, $p_error_string="")
82 {
83 global $g_pcl_error_string;
84 global $g_pcl_error_code;
85
86 $v_message = "<html><body>";
87 $v_message .= "<p align=center><font color=red bgcolor=white><b>PclError Library has detected a fatal error on file '$p_file', line $p_line</b></font></p>";
88 $v_message .= "<p align=center><font color=red bgcolor=white><b>$p_error_string</b></font></p>";
89 $v_message .= "</body></html>";
90 die($v_message);
91 }
92 // --------------------------------------------------------------------------------
93
94 // --------------------------------------------------------------------------------
95 // Function : PclErrorReset()
96 // Description :
97 // Parameters :
98 // --------------------------------------------------------------------------------
99 function PclErrorReset()
100 {
101 global $g_pcl_error_string;
102 global $g_pcl_error_code;
103
104 $g_pcl_error_code = 1;
105 $g_pcl_error_string = "";
106 }
107 // --------------------------------------------------------------------------------
108
109 // --------------------------------------------------------------------------------
110 // Function : PclErrorCode()
111 // Description :
112 // Parameters :
113 // --------------------------------------------------------------------------------
114 function PclErrorCode()
115 {
116 global $g_pcl_error_string;
117 global $g_pcl_error_code;
118
119 return($g_pcl_error_code);
120 }
121 // --------------------------------------------------------------------------------
122
123 // --------------------------------------------------------------------------------
124 // Function : PclErrorString()
125 // Description :
126 // Parameters :
127 // --------------------------------------------------------------------------------
128 function PclErrorString()
129 {
130 global $g_pcl_error_string;
131 global $g_pcl_error_code;
132
133 return($g_pcl_error_string." [code $g_pcl_error_code]");
134 }
135 // --------------------------------------------------------------------------------
136
137
138// ----- End of double include look
139}
140?>