PHP-Code:
<?
/*
Transaktionsschnittstelle für Projekt Seth
Betreibersystem Klamm ExportForce²
Copyright bei Detlef Tiegel
http://www.projekt-seth.de
*/
// Klamm ExportForce² Fehlercodes
$trans_error[1001] = "Alles OK";
$trans_error[1011] = "Falsche Punkteart";
$trans_error[1012] = "Falsche Punkteanzahl (z.B. keine ganze Zahl oder negativ)";
$trans_error[1013] = "Betreff zu lang oder nicht angegeben";
$trans_error[1021] = "Falsche Schnittstellen-ID";
$trans_error[1022] = "Falsches Schnittstellen-Passwort";
$trans_error[1023] = "Zu wenig Punkte auf diesem Schnittstellenaccount";
$trans_error[1024] = "Falsche KennungsID";
$trans_error[1025] = "Keine Abfragen mehr auf dem Schnittstellenaccount";
$trans_error[1031] = "Keine oder falsche UserID bzw. Usernamen angegeben";
$trans_error[1032] = "UserID UND Username angegeben, benötigt wird nur eins!";
$trans_error[1033] = "Kein oder falsches User-Passwort angegeben";
$trans_error[1034] = "Dieser User ist gesperrt";
$trans_error[1035] = "Das Guthaben des Users reicht nicht aus";
$trans_error[1036] = "Neuer User (aus Sicherheitsgründen dürfen neue User in den ersten 7 Tagen ihrer Mitgliedschaft die Schnittstelle nicht benutzen)";
$trans_error[1098] = "Schnittstelle z.Z. nicht verfügbar (DB-Arbeiten o.ä.)";
$trans_error[1099] = "Unbekannter Fehler";
$trans_error[9998] = "Fehlerhafter Aufruf (falsche Reihenfolge o.ä.)";
$trans_error[9999] = "Timeout (Schnittstelle nicht erreichbar)";
// ExportForce² -> Klamm.de
function auszahlen ($betreiber_id,$betreiber_pw,$kunden_id,$kunden_pw,$betreiber_kennung,$trans_menge,$trans_betreff,$trans_code) {
global $error,$trans_ausgabe,$trans_error;
// SecVMS change begin
$trans_betreff = urlencode($trans_betreff);
$kunden_id = urlencode($kunden_id);
$kunden_pw = urlencode($kunden_pw);
$trans_menge = urlencode($trans_menge);
// SecVMS change end
$returned='';
$fp=@fopen("http://st.ebesucher.de/send.php?stid=".$betreiber_id."&stpw=".$betreiber_pw."&uid=".$kunden_id."&upw=".$kunden_pw."&k=".$betreiber_kennung."&a=1&p=".$trans_menge."&b=".$trans_betreff."","r");
if($fp){
while($line=fgets($fp,1000)){
$returned.=$line;
}
}
$trans_check = split("[|]",$returned,7);
if ($trans_check[0] != "1001") {
$trans_ausgabe = $trans_error[$trans_check[0]];
if ($trans_ausgabe == "") $trans_ausgabe = $trans_error[1099];
$error = "true";
}
return $error;
return $trans_ausgabe;
}
// Klamm.de -> ExportForce²
function einzahlen ($betreiber_id,$betreiber_pw,$kunden_id,$kunden_pw,$betreiber_kennung,$trans_menge,$trans_betreff,$trans_code){
global $error,$trans_ausgabe,$trans_error;
// SecVMS change begin
$trans_betreff = urlencode($trans_betreff);
$kunden_id = urlencode($kunden_id);
$kunden_pw = urlencode($kunden_pw);
$trans_menge = urlencode($trans_menge);
// SecVMS change end
$returned='';
$fp=@fopen("http://st.ebesucher.de/get.php?stid=".$betreiber_id."&stpw=".$betreiber_pw."&uid=".$kunden_id."&upw=".$kunden_pw."&k=".$betreiber_kennung."&a=1&p=".$trans_menge."&b=".$trans_betreff."","r");
if($fp){
while($line=fgets($fp,1000)){
$returned.=$line;
}
}
$trans_check = split("[|]",$returned,7);
if ($trans_check[0] != "1001") {
$trans_ausgabe = $trans_error[$trans_check[0]];
if ($trans_ausgabe == "") $trans_ausgabe = $trans_error[1099];
$error = "true";
}
return $error;
return $trans_ausgabe;
}
// Klammlose-Kontostand
function usercheck ($betreiber_id,$betreiber_pw,$kunden_id,$kunden_pw){
global $error,$trans_ausgabe,$trans_error,$user_saldo;
// SecVMS change begin
$kunden_id = urlencode($kunden_id);
$kunden_pw = urlencode($kunden_pw);
// SecVMS change end
$returned='';
$fp=@fopen("http://st.ebesucher.de/info.php?stid=".$betreiber_id."&stpw=".$betreiber_pw."&uid=".$kunden_id."&upw=".$kunden_pw."","r");
if($fp){
while($line=fgets($fp,1000)){
$returned.=$line;
}
}
$trans_check = split("[|]",$returned,7);
if ($trans_check[0] != "1001") {
$trans_ausgabe = $trans_error[$trans_check[0]];
if ($trans_ausgabe == "") $trans_ausgabe = $trans_error[1099];
$error = "true";
}
if ($error != "true") $user_saldo = $trans_check[1];
return $error;
return $trans_ausgabe;
return $user_saldo;
}
// Usercheck
function uservalidate ($betreiber_id,$betreiber_pw,$kunden_id,$kunden_pw){
global $error,$trans_ausgabe,$trans_error;
// SecVMS change begin
$kunden_id = urlencode($kunden_id);
$kunden_pw = urlencode($kunden_pw);
// SecVMS change end
$returned='';
$fp=@fopen("http://st.ebesucher.de/info.php?stid=".$betreiber_id."&stpw=".$betreiber_pw."&uid=".$kunden_id."&upw=".$kunden_pw."","r");
if($fp){
while($line=fgets($fp,1000)){
$returned.=$line;
}
}
$trans_check = split("[|]",$returned,7);
if ($trans_check[0] != "1001") {
$trans_ausgabe = $trans_error[$trans_check[0]];
if ($trans_ausgabe == "") $trans_ausgabe = $trans_error[1099];
$error = "true";
}
return $error;
return $trans_ausgabe;
}
?>