
<?php
////////////////////////////////////////////////////////////////////////////////
//Модуль предоставляет интерфейс для генератора паролей
////////////////////////////////////////////////////////////////////////////////
?>
<?php
  //Выбираем все файлы с префиксом 'onepassd_emailaddr' из директории txt
  $TimeStamp = str_replace('../txt/pswds', '', $PswdFile);
  $dr = opendir("../txt");
  while($FileName = readdir($dr))
  {
    if(strpos($FileName, 'pswds') !== false)
      if(strpos($FileName, $TimeStamp) === false)
        $PollPswdFiles[] = $FileName;
  }
  closedir($dr);
  //

  $OptionsStr = '';
  for($i = 0; $i < count($PollPswdFiles); $i++)
  {
    $PswFile = $PollPswdFiles[$i];
    //Временная метка
    $TimeStamp = str_replace('pswds', '', $PswFile);
    //находим основной файл голосования
    if(file_exists("../txt/cp".$TimeStamp))
      $PollFile = "../txt/cp".$TimeStamp;
    else
      $PollFile = "../txt/arch".$TimeStamp;

    //извлекаем вопрос из основного файла голосования
    $PollArr = file($PollFile);
    $Quest = StripBBCode($PollArr[0]);
    $Quest = substr($Quest, 0, 25);
    //Четные элементы массива - имена файлов-баз почт. адресов,  нечетные - вопрос
    $OptionsStr .= "<option value={$PswFile}>{$Quest}";
  }
  //Форма настроек генератора паролей
  print "<h4><i>{$Heading_GeneratePasswds}</i></h4>";
  print "<h5><i>{$Question}</i></h5>";
  if($ShowTips == 'yes')
      ShowTips($Page);
  print "<form action='' method=post>";
  print "<fieldset class=MiniField align=center>";
  print "<table class=General align=center border=0 cellspacing=0 cellpadding=0 width=100%>";
    print "<tr>";
       print "<td width=40%>{$Cpt_gen_LoginsSource}</td>";
       print "<td>";
         print "<select name=source>";
           print "<option value=PollUsersDataBase>{$Cpt_PollUsersDataBase}";
           print $OptionsStr;
         print "</select>";
       print "</td>";
    print "</tr>";
    print "<tr>";
       //загрузка из файла
       print "<td>{$Cpt_gen_PassLength}</td>";
       print "<td>";
         print "<select name=passwdlength>";
           print "<option value=10>10";
           print "<option value=11>11";
           print "<option value=12>12";
           print "<option value=13>13";
           print "<option value=14>14";
           print "<option value=15>15";
           print "<option value=16>16";
           print "<option value=17>17";
           print "<option value=18>18";
           print "<option value=19>19";
           print "<option value=20>20";
           print "<option value=21>21";
           print "<option value=22>22";
           print "<option value=23>23";
           print "<option value=24>24";
           print "<option value=25>25";
           print "<option value=26>26";
           print "<option value=27>27";
           print "<option value=28>28";
           print "<option value=29>29";
           print "<option value=30>30";
         print "</select>";
       print "</td>";
    print "</tr>";
    print "<tr>";
       //импортировать
       print "<td>{$Cpt_gen_action}</td>";
       print "<td>";
         print "<select name=action>";
           print "<option value=supply>{$Opt_gen_Supply}";
           print "<option value=rewrite>{$Opt_gen_Rewrite}";
         print "</select>";
       print "</td>";
    print "</tr>";
    print "<tr>";
      print "<td colspan=2 align=center><input class=button type=submit name=Generate value='{$Button_Generate}'></td>";
    print "</tr>";
  print "</table>";
  print "</fieldset>";
  print "<input type=hidden name=page value='ch_passwords_generate'>";
  print "</form>";


?>