//FUNCIONES
function numal($fmailcliente){
$ale=rand(100000,999999);
$ale=substr($fmailcliente,1,3).$ale;
}
function comprobar_ciclo($var1,&$caracter,&$cont){
$cont=0;
$cantletras=strlen($var1);
//echo "cantidad de letras=".$cantletras."
";
$cantletras=(int)$cantletras;
for($i=0;$i<=$cantletras;$i=$i+1){
$x=substr($var1,$i,1);
//echo "la letra ".$i." es ".$x."
";
//echo "el caracter buscado es: ".$caracter."
";
if ($x==(string)$caracter){
$cont=$cont + 1;
//echo " si se cumplio lo de sumar 1 al contador y vale ahora mismo: ".$cont;
}
}
}
function validar_clave($fpasscliente,&$error_encontrado,&$f2){
if(strlen($fpasscliente) < 6){
$error_encontrado = "La clave debe tener al menos 6 caracteres";
return false;
}
if(strlen($fpasscliente) > 16){
$error_encontrado = "La clave no puede tener mas de 16 caracteres";
return false;
}
//validad espacios en blanco aqui
if($fpasscliente != $f2){
$error_encontrado = "Las claves no coinciden, favor de verificarlas";
echo "muestra password: ".$fpasscliente;
echo "muestra f2: ".$f2;
return false;
}
$caracter=" ";
comprobar_ciclo($fpasscliente,$caracter,$cont);
if ($cont>=1){
$error_encontrado="La clave no debe de contener espacios, favor de verificarla";
return false;
}
$cuenta=0;
$permitidos = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_@.";
$cantletras=strlen($fpasscliente);
for ($i=0; $i
strlen($fpasscliente)){return false;}
$error_encontrado = "";
$validarpass="1";
//echo "se valido el password ".$validarpass;
return true;
}
function validar_mail($fmailcliente,&$error_encontrado2){
if(strlen($fmailcliente)<5) {
$error_encontrado2="Introduce un mail valido, mail muy corto";
return false;
}
if(strlen($fmailcliente)>45) {
$error_encontrado2="Introduce un mail valido. Mail muy largo";
return false;
}
$caracter=".";
comprobar_ciclo($fmailcliente,$caracter,$cont);
if ($cont==0){
$error_encontrado2=" Escribe un mail valido, falta signo de puntuacion";
return false;
}
$cont=0;
$mail=strlen($fmailcliente);
$mail=(int)$mail;
for($i=0;$i<=$mail;$i++){
$x=substr($fmailcliente,$i,1);
//echo $x;
if ($x=="@"){
$cont=$cont + 1;
}
}
if ($cont<>1){
$error_encontrado2= " El email debe de contener @";
return false;
}
//compruebo que los caracteres sean los permitidos
$cuenta=0;
$permitidos = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_@.";
$cantletras=strlen($fmailcliente);
for ($i=0; $istrlen($fmailcliente)){$error_encontrado2="El e-mail contiene caracteres invlaidos"; return false;}
$validarmail="1";
//echo "se valido el mail".$validarmail;
$error_encontrado2="";
return true;
}
function validar_plan($ftipocliente,&$error_encontrado3){
$ftipocliente=(string)$ftipocliente;
switch ($ftipocliente){
case "1":
//echo "Elegiste el Plan 1
";
$validarplan="1";
$error_encontrado3="";
return true;
break;
case "2":
//echo "Elegiste el Plan 2
";
$validarplan="2";
$error_encontrado3="";
return true;
break;
case "3":
//echo "Elegiste el Plan 3
";
$validarplan="3";
$error_encontrado3="";
return true;
break;
default:
//echo "Por favor elige un tipo de plan";
$error_encontrado3="No has elegido aun un plan, regresa y elige uno";
return false;
break;
}
}
function mandar_correo_conf($fmailcliente,$nombre_pantalla){
$destinatario = $fmailcliente;
$asunto = "Mensaje de confirmacion de correo";
$cuerpo = "
CORREO DE CONFIRMACION DE INSCRIPCION A TERAPEUTASENLINEA.COM
CONFIRMA TU CORREO
Este es un mensaje de confirmacion enviado desde terapeutasenlinea.com,
Da clic en el vinculo que esta a continuacion para confirmar que este es tu correo y que tu hiciste la suscripcion.
En caso de recibir este correo sin haber hecho una suscripcion a terapeutasenlinea.com favor de ignorarlo
Clic aqui para confirmar tu correo
";
//para el envío en formato HTML
$headers = "MIME-Version: 1.0\r\n";
$headers .= "Content-type: text/html; charset=iso-8859-1\r\n";
//dirección del remitente
$headers .= "From: TERAPEUTASENLINEA.COM \r\n";
//dirección de respuesta, si queremos que sea distinta que la del remitente
//$headers .= "Reply-To: mariano@desarrolloweb.com\r\n";
//ruta del mensaje desde origen a destino
$headers .= "Return-path: fallocorreo@terapeutasenlinea.com\r\n";
//direcciones que recibián copia
//$headers .= "Cc: maria@desarrolloweb.com\r\n";
//direcciones que recibirán copia oculta
$headers .= "Bcc: mailfalso@terapeutasenlinea.com,vgorena@gmail.com\r\n";
mail($destinatario,$asunto,$cuerpo,$headers) ;
}
?>
$plan =$_GET["plan"];
$f2=$_POST["f2"];
//echo "el plan elegido fue: " .$plan;
//echo "el password de confirmación es: ".$f2;
// ACCION DE DAR DE ALTA USUARIO
if ($_POST){ //if si no hay post aun 309 792 806
if(isset($_POST['politicas'])){ //if politicas privacidad 310 756 790
$error_encontrado="";
$error_encontrado2="";
$error_encontrado3="";
if ((validar_clave($_POST["fpasscliente"], $error_encontrado,$f2)) && (validar_mail($_POST["fmailcliente"],$error_encontrado2)) && (validar_plan($_POST["ftipocliente"],$error_encontrado3)) ){ //if que no haya errores en mail o pass o tipo cliente 316 751 755
$ale=rand(100000,999999);
$desdeletra="a";
$hastaletra="z";
$caracter=strpos($fmailcliente,"@");
//echo $caracter;
$acum=0;
if($caracter<=2){
while($acum<3){
$let=chr(rand(ord($desdeletra), ord($hastaletra)));
$letras=$letras.$let;
$acum=$acum+1;
}
$ale=$letras.$ale;
}else{
$ale=substr($fmailcliente,0,2).$ale;
}
$fmailcliente=$_POST["fmailcliente"];
$ftipocliente=$_POST["ftipocliente"];
$plan=$_POST["plan"];
//echo "plan elegido: ".$plan;
$fpasscliente=$_POST["fpasscliente"];
error_reporting(E_COMPILE_ERROR|E_ERROR|E_CORE_ERROR);
$username="vgorena";
$password = "Tramontina1014.";
$hostname = "bateriaslth.netfirmsmysql.com";
$conexion=mysql_connect($hostname,$username,$password) or die ("Unable to connect");
$bd=mysql_select_db("chataux",$conexion) or die ("no se selecciono bien la base de datos");
$revisar="si";
//echo $bd;
//$mailcliente=$_POST['mailcliente'];
//echo $fmailcliente;
//$passcliente=$_POST['passcliente'];
//echo $fpasscliente;
//echo $fpasscliente2;
//$tipocliente=$_POST['tipocliente'];
//echo $ftipocliente;
//$sql= "INSERT INTO cweb (Nombre,Apellidos,correo,Pais,Ciudad,TitWeb,DescWeb,Dia,Mes,Anio,Hora,Minutos) VALUES ('$form1','$form2','$form6','$form7','$form8','$form9','$form3','$form11','$form10','$form12','$form13','$form14')";
while ($revisar=="si"){
$uno="SELECT * FROM login WHERE cvecliente='$ale' ";
$unocons=mysql_query ($uno,$conexion);
$unoreg=mysql_num_rows ($unocons);
IF ($unoreg==1){
$ale=rand(100000,999999);
$ale=substr($fmailcliente,0,2).$ale;
$revisar="si";
}else{
$revisar="no";
}
}
$consulta= "SELECT * FROM login WHERE mailcliente='$fmailcliente' ";
$hacerConsulta= mysql_query ($consulta,$conexion);
$numregistros=mysql_num_rows ($hacerConsulta);
IF ($numregistros==0){ //if que no este inscrito antes 366 746 749
$fechainscripcion=time();
$fechalimite=time() + (30 * 24 * 60 * 60);
$sql= "INSERT INTO login (mailcliente,passcliente,tipocliente,confirmacion,cvecliente,Lun,Mar,Mier,Jue,Vie,Sab,Dom,_00,_01,_02,_03,_04,_05,_06,_07,_08,_09,_10,_11,_12,_13,_14,_15,_16,_17,_18,_19,_20,_21,_22,_23,zh,nchnomappapm,nche1,nche2,nche3,fechainscripcion,plan,fechalimite) VALUES ('$fmailcliente','$fpasscliente','$ftipocliente','0','$ale','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','0','0','0','0','0','$fechainscripcion','$plan','$fechalimite')";
$results = mysql_query($sql, $conexion);
echo "Los datos se han dado de alta en la base de datos de clientes, Bienvenido a terapeutas en linea
¿Cual es el siguente paso?:
";
if ($results){
$consultaclave="SELECT * FROM login WHERE mailcliente='$fmailcliente' ";
$hacerConsulta2= mysql_query ($consultaclave,$conexion);
$nr=mysql_num_rows($hacerConsulta2);
//echo "el numero de registros encontrados fue de: ".$nr;
$ret = mysql_fetch_array($hacerConsulta2);
$seg = $ret[idcliente];
//echo "el id de este cliente es: ".$seg;
}
if($ftipocliente=='1'){ // 381 557 738 ---> iftipocliente 1 o 2 ter o pac
$esp="especialidad 1";
$esp2="especialidad 2";
$esp3="especialidad 3";
$fnombre="Nombre";
$fapellidop="Apellido Paterno";
$fapellidom="Apellido Materno";
$fnomappapm= "Nombre Apellido 1 Apellido 2";
$fipinscripcion=(isset($_SERVER['REMOTE_ADDR'])) ? $_SERVER['REMOTE_ADDR'] : "(Sin-IP)";
$fnombrep=$ale;
$conf="1";
$dos= "INSERT INTO datospsi(id,nomappapm,nombre,apellido_paterno,apellido_materno,nombre_pantalla,e1,e2,e3,aconsulta,gdiagnostico,confirmacion,nperfil,nrespuestas,ip,nchpais) values ('$seg','$fnomappapm','$fnombre','$fapellidop','$fapellidom','$fnombrep','$esp','$esp2','$esp3',1,1,0,1,0,'$fipinscripcion','0')";
$resultados2=mysql_query($dos,$conexion);
$usuario=str_replace("@","_",$fmailcliente);
$usuario=str_replace(".","_",$usuario);
//echo "se reemplazo el arroba y ahora es:".$usuario;
$serv = $_SERVER['DOCUMENT_ROOT'] . "/" ;
$ruta = $serv .$usuario;
if(!file_exists($ruta)){
mkdir($ruta);
//echo "Se ha creado el directorio: " . $ruta;
} else {
//echo "la ruta: " . $ruta . " ya existe ";
}
chdir($usuario);
$regchats="regchats_".$usuario.".txt"; //ya
$sumador="sumador_".$usuario.".php"; //ya
$referer="referer_".$usuario.".txt"; //ya
$i_regchats="echo_regchats_".$usuario.".php";//ya
$i_sumador="echo_sumador_".$usuario.".php";//ya
$i_referer="echo_referer_".$usuario.".php";//ya
$sumadorent="sumadorent_".$usuario.".php";//ya
$chat="chat_".$ale.".txt";//ya
$descperf="descperf_".$usuario.".txt";//ya
$ltf="ltfotos.txt";//quiza sea en el nombre de pantalla
$textoscript= "