<?
######################################################################
# phpRS Plug-in modul: Pridaj Článok 2.0.0-B addarticle.php
######################################################################
// Copyright (c) 2001-2004 by Jiri Lukas (jirilukas@supersvet.cz)
// http://www.supersvet.cz/phprs/
// Created by: MSTEVE - (msteve@zoznam.sk)
// http://www.webinfo.sk/
// This program is free software. - Toto je bezplatny a svobodny software.

// vyuzivane tabulky: rs_clanky

define('IN_CODE',true); // inic. ochranne konstanty

include_once("config.php");
include_once("specfce.php");
include_once("myweb.php");
include_once("sl.php");
//$rs_main_sablona="download";
include_once("trlayout.php");
include_once($adrlayoutu);

include_once("admin/astdlib_comment.php"); // standardna knihovna komentarovych funkcii

$jazykaddarticle="lang/user/".$vybranyjazyk."/user_sl_addarticle_".$vybranyjazyk.".php";
include_once($jazykaddarticle);

$AddClanokVersion="2.0.0-B";        // verzia pridania clanku
$DateVydania="26.06.2005";          // datum Vydania
$phprsversion="phpRS 2.6.5";        // phpRS version
$ip_adresa=$_SERVER["REMOTE_ADDR"]; // ip adresa citatela
$aktdatum=Date("Y-m-d H:i:s");      // aktualný datum


function ZoznamRubrik($pocatecnihodnota = 0)
{
// generuje a tridi pole hierarchicky na sobe zavislych rubrik; vystup obsahuje uplnou cestu k jednotlivym rubrikam
$dotazsez=mysql_query("select idt,nazev,id_predka from ".$GLOBALS["rspredpona"]."topic order by level,nazev",$GLOBALS["dbspojeni"]);
$pocetsez=mysql_num_rows($dotazsez);

for ($pom=0;$pom<$pocetsez;$pom++):
  $pole_data = mysql_fetch_assoc($dotazsez);
  // pole informaci
  $vstdata[$pom][0]=$pole_data["idt"];       // id
  $vstdata[$pom][1]=$pole_data["nazev"];     // nazev polozky
  $vstdata[$pom][2]=$pole_data["id_predka"]; // id rodice
  $vstdata[$pom][3]=0;                       // prepinace pouzito pole
endfor;

if ($pocetsez>0): $trideni=1; else: $trideni=0; endif;

$polehist[0]=$pocatecnihodnota; // historie prohledavani
$polecesta[0]="";
$polex=0; // poloha v poly historie prohledavani

$vysledekcislo=0; // akt. volna posledni pozice ve vysledkovem poli

while ($trideni==1):
  $nasel=0; // 0 = prvek nenalezen, 1 = prvek nalezen

  for ($pom=0;$pom<$pocetsez;$pom++):
    if ($vstdata[$pom][3]==0): // kdyz nebylo akt. radek jeste pouzit
      if ($vstdata[$pom][2]==$polehist[$polex]): // kdyz nalezi hledanemu predku
            // ulozeni vysledku
            $vysledek[$vysledekcislo][0]=$vstdata[$pom][0]; // id prvku
            $vysledek[$vysledekcislo][1]=$polecesta[$polex].$vstdata[$pom][1]; // nazev prvku
            $vysledek[$vysledekcislo][2]=$polex; // uroven vnoreni prvku
            // nastaveni dalsich promennych
            $vysledekcislo++; // prechod na dalsi radek ve vysledkovem poli
            $vstdata[$pom][3]=1; // nastaveni prepinace na pouzito
            $polex++; // prechod na vyssi uroven v historii
            $polehist[$polex]=$vstdata[$pom][0];
            $polecesta[$polex]=$polecesta[$polex-1].$vstdata[$pom][1]." - ";
            $nasel=1;
            break;
      endif;
    endif;
  endfor;

  if ($nasel==0): // kdyz nebyl v celem poli nalezen zadny odpovidajici prvek
    if ($polehist[$polex]==$pocatecnihodnota):
      // vysledek hledani na zakladni urovni, ktera byla stanovena na zacatku, je prazdny -> neexistuje zadna dalsi vetev
      $trideni=0;
    else:
      $polex--; // prechod na nizsi uroven v historii
    endif;
  endif;
endwhile;

/*
   $vysledek[X][0] - id prkvu
               [1] - nazev prvku
               [2] - cislo urovne
*/
if ($pocetsez>0):
  return $vysledek;
else:
  return 0;
endif;
}

function KorekciaNadpisu($str)
{
// tento riadok nahrazuje uvodzovky za - &quot;
return str_replace('"','&quot;',$str);
}

// ----------------------------- PRIDANIE CLANKU ----------------------------_//
// Pridanie clanku
function AddArticle()
{
if ($GLOBALS["prmyctenar"]->ctenarstav==1):
echo "<form action=\"addarticle.php\" method=\"post\">
<table border=\"0\" cellspacing=\"5\" cellpadding=\"0\" align=\"center\">
<tr class=\"z\"><td align=\"left\"><b>".RS_CLA_NADPIS_CLANKU.":</b></td>
<td align=\"left\"><input type=\"text\" name=\"aetitulek\" size=\"40\" class=\"textpole\" /> <b class=\"redtext\">*</b></td></tr>
<tr class=\"z\"><td align=\"left\" colspan=\"2\"><b>".RS_CLA_FORM_UVOD."</b> <b class=\"redtext\">*</b><br />
<textarea name=\"aeuvod\" rows=\"6\" cols=\"58\" class=\"textbox\">".RS_CLA_FORM_UVOD_INFO."</textarea></td></tr>
<tr class=\"z\"><td align=\"left\" colspan=\"2\"><b>".RS_CLA_FORM_HLA_TEXT."</b> <b class=\"redtext\">*</b><br />
<textarea name=\"aetext\" rows=\"10\" cols=\"58\" class=\"textbox\">".RS_CLA_FORM_HLA_TEXT_INFO."</textarea></td></tr>
<tr class=\"z\"><td align=\"left\"><b>".RS_CLA_FORM_TEMA.":</b></td>
<td align=\"left\">";
$poletopic=ZoznamRubrik();
if (!is_array($poletopic)):
  echo RS_CLA_ZIADNA_RUBRIKA; // chyba; neexistuje rubrika
else:
  echo "<select name=\"aetema\" size=\"1\">";
  $pocettopic=count($poletopic);
  for ($pom=0;$pom<$pocettopic;$pom++):
    echo "<option value=\"".$poletopic[$pom][0]."\">".$poletopic[$pom][1]."</option>\n";
  endfor;
  echo "</select>";
endif;
echo "</td></tr>
<tr class=\"z\"><td align=\"left\"><b>".RS_CLA_FORM_ZDROJ.":</b></td>
<td align=\"left\"><input type=\"text\" name=\"aezdroj\" size=\"35\" class=\"textpole\" /></td></tr>
</table>
<input type=\"hidden\" name=\"akce\" value=\"AddSaveArticle\" /><input type=\"hidden\" name=\"modul\" value=\"clanky\" />
<p align=\"center\"><input type=\"submit\" value=\" ".RS_TL_PRIDAT_CLANOK." \" class=\"tl\" /></p>
</form>\n";
echo "<p align=\"center\" class=\"z\"><i><b class=\"redtext\">*</b> ".RS_CLA_POVINNE_POLIA."</i></p>\n";
// navrat
else:
   echo"<p align=\"center\" class=\"clanadpis\">".RS_CLA_NIE_SI_REGISTROVANY."</p>\n";
   echo"<p align=\"center\" class=\"clanadpis\">".RS_CLA_POTREBNA_REGISTERED."</p>\n";
   echo"<p align=\"center\" class=\"txt\"><a class=\"\" href=\"readers.php?akce=new\" title=\"".RS_CLA_NEW_USER_REG."\">".RS_CLA_NEW_USER_REG."</a></p>\n";
 endif;
echo "<p align=\"center\" class=\"txt\"><a href=\"index.php\">".RS_CLA_NASPAT."</a></p>\n";
}




function AddSaveArticle()
{
// bezpecnostni korekce
$GLOBALS["aetitulek"]=KorekciaNadpisu($GLOBALS["aetitulek"]); // korekce titulku na uvodzovky
$GLOBALS["aetitulek"]=mysql_escape_string($GLOBALS["aetitulek"]);

$GLOBALS["aeuvod"]=KorekceVstupu($GLOBALS["aeuvod"]);
$GLOBALS["aeuvod"]=PrelozKomZnacky($GLOBALS["aeuvod"]); // prelozenie kom. znaciek
$GLOBALS["aeuvod"]=KorekceVelikosti($GLOBALS["aeuvod"]); // obmezenie velkosti
$GLOBALS["aeuvod"]=nl2br($GLOBALS["aeuvod"]);
$GLOBALS["aeuvod"]=mysql_escape_string($GLOBALS["aeuvod"]);

$GLOBALS["aetext"]=KorekceVstupu($GLOBALS["aetext"]);
$GLOBALS["aetext"]=PrelozKomZnacky($GLOBALS["aetext"]); // prelozenie kom. znaciek
//$GLOBALS["aetext"]=KorekceVelikosti($GLOBALS["aetext"]); // obmezenie velkosti
$GLOBALS["aetext"]=nl2br($GLOBALS["aetext"]);
$GLOBALS["aetext"]=mysql_escape_string($GLOBALS["aetext"]);

$GLOBALS["aezdroj"]=mysql_escape_string($GLOBALS["aezdroj"]);

$aedatum="".Date("Y-m-d H:i:s")."";  // dnesný datum

// vytvoreni "linku" z "$aedatum"
$datum_cas=split(" ",$aedatum);
list($rr,$mm,$dd)=split("-",$datum_cas[0]);
$linkclanku=date("Ymd",mktime(0,0,0,$mm,$dd,$rr))."01"; // inic. linku
$linkkonec=date("Ymd",mktime(0,0,0,$mm,$dd,$rr))."99";
$dotazzjisti=mysql_query("select link from ".$GLOBALS["rspredpona"]."clanky where link>='".$linkclanku."' and link<'".$linkkonec."' order by link",$GLOBALS["dbspojeni"]);
$pocetzjisti=mysql_num_rows($dotazzjisti);
if ($pocetzjisti>0):
  for ($pom=0;$pom<$pocetzjisti;$pom++):
    $linkclanku=mysql_result($dotazzjisti,$pom,"link");
  endfor;
  $linkclanku++;
endif;
$GLOBALS["aelink"]=$linkclanku;

$nast_kom=0;
$nast_visit=0;
$nast_hod=0;
$nast_mn_hod=0;

$aeautor="1";     // nastavenie autora default admin
$aepriorita="1";  // priorita clanku default 1
$aedatum="".Date("Y-m-d H:i:s")."";  // dnesný datum
$aedatumpl="".Date("Y-m-d H:i:s",(Time()+864000))."";
$aetypcla=1;  // typ clanku default 1
$aesablona=2; // typ sablony default 2

// test na pritomnost vsetkych povinnych poli
if ($GLOBALS["aetitulek"]==''||$GLOBALS["aeuvod"]==''||$GLOBALS["aetext"]==''):
 echo"<p align=\"center\" class=\"clanadpis\">".RS_CLA_NIECO_POVINYCH_POLI_PRAZDNE."</p>\n";
 echo"<p align=\"center\" class=\"txt\">".RS_CLA_VTRATIT_SPAT."</p>\n";
 echo"<p align=\"center\" class=\"txt\"><a class=\"\" href=\"javascript:history.go(-1);\" title=\"".RS_CLA_BACK."\">".RS_CLA_BACK."</a></p>\n";

 
else:
// pridanie clanku
$dotaz="insert into ".$GLOBALS["rspredpona"]."clanky ";
$dotaz.="values(null,'".$GLOBALS["aelink"]."','".$GLOBALS["aetitulek"]."','".$GLOBALS["aeuvod"]."','".$GLOBALS["aetext"]."','".$GLOBALS["aetema"]."',";
$dotaz.="'".$aedatum."','".$aeautor."',".$nast_kom.",".$nast_visit.",'".$GLOBALS["aeslova"]."','".$nast_visible."','".$GLOBALS["aezdroj"]."',";
$dotaz.="'".$aepriorita."','".$aedatumpl."','".$GLOBALS["aeskupina"]."',".$nast_hod.",'".$nast_mn_hod."','".$GLOBALS["aeznacky"]."',";
$dotaz.="'".$aetypcla."','".$aesablona."')";

@$error=mysql_query($dotaz,$GLOBALS["dbspojeni"]);
$pridc=mysql_insert_id($GLOBALS["dbspojeni"]); // zjisteni id clanku
if (!$error):
  echo "<p align=\"center\" class=\"txt\"><b>Error:</b> ".RS_CLA_ERR_DB_SQL_DOTAZ."</p>\n"; // chyba
else:
$newclanok=RS_CLA_HELO_ADMIN." ".$GLOBALS["wwwname"]."\n".$GLOBALS["baseadr"]."\n".RS_CLA_IP_CITATELA." ".$GLOBALS["ip_adresa"]."\n".RS_CLA_DATUM_VLOZENIA." ".$GLOBALS["aktdatum"]."";
$newclanok=Base64_Encode($newclanok);
$newclanokhlavicka .="From: ".$GLOBALS["redakceadr"]."\n".
                     "MIME-Version: 1.0\n".
                     "Content-Type: text/plain; charset=\"windows-1250\"\n".
                     "Content-Transfer-Encoding: base64";
$newclanokpredmet=RS_CLA_NEW_PREDMET." ".$GLOBALS["wwwname"];
@Mail($GLOBALS["redakceadr"],$newclanokpredmet,$newclanok,$newclanokhlavicka);
  echo "<p align=\"center\" class=\"clanadpis\">".RS_CLA_DAKUJEME."</p>\n";
  echo "<p align=\"center\" class=\"txt\">".RS_CLA_OK_ADD_NEW_CLA."<br /><br />".RS_CLA_VOLACI_LINK." ".$GLOBALS["aelink"]."</p>\n";
  echo "<p align=\"center\" class=\"txt\"><a href=\"addarticle.php\">".RS_CLA_PRIDAJ_NEW."</a></p>\n";
endif;
endif;
// navrat
echo "<p align=\"center\" class=\"txt\"><a href=\"index.php\">".RS_CLA_NASPAT."</a></p>\n";

}

function VerziaAddArticle ()
{
echo "<div align=\"center\">Verzia pridania článku: ".$GLOBALS["AddClanokVersion"]."<br />Dátum Vydania: ".$GLOBALS["DateVydania"]."<br />Koordinátor a vedúci vydania: <b>MSteve Makker Štefan</b><br>Home page: <b><a class=\"\" href=\"http://www.webinfo.sk\" target=\"blank\">http://www.webinfo.sk</a></b><br />Určené pre: ".$GLOBALS["phprsversion"]."</div>\n";
}



// Tvorba stranky
$vzhledwebu->Generuj();
ObrTabulka();  // Vlozenie layoutu prvku

echo "<p class=\"nadpis\">".RS_PRIDAJ_CLANOK_NADPIS."</p>\n"; // nadpis

switch ($GLOBALS['akce']):
  case 'verzia': VerziaAddArticle(); break; // Verzia addarticle
  case 'AddSaveArticle': AddSaveArticle(); break; // save članok
  default:         AddArticle(); break; // pridaj članok
endswitch;
KonecObrTabulka();  // Vlozenie layout prvku
$vzhledwebu->Generuj();
?>