openbash-org-cvs

[Javier B. <jb...@us...>]

Update of /cvsroot/openbash-org/openbash-org/modules
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11677/modules

Modified Files:
	common.php 
Added Files:
	Quote.php 
Log Message:
import inicial de la clase quote + cambios en index

--- NEW FILE: Quote.php ---
<?php

  /*
   * Quote class
   * 15/11/04
   */

class Quote
{
  function ask_quote()
  { 
    global $add;?>
    <form id="addquote" action="" method="post">
    <p><textarea id="quote" name="quote" class="textarea" cols="60%" rows="10"></textarea></p>
    <p>
      <input type="button" id="preview" value="<?=$add['preview'];?>" />
      <input type="submit" id="submit" value="<?=$add['submit'];?>" />
      <input type="button" id="reset" value="<?=$add['reset'];?>" />
    </p>
    </form>
    <p><?=$add['tip'];?></p>
    <p><?=$add['privacy'];?></p><?
  }

  function validate_quote($quote)
  {
  }

  function insert_quote()
  {
    
  }

  function show_quote($id)
  {
    include ("config.php");
    $sql = "SELECT points,quote,author,channel,network,ip FROM quote WHERE id='$id'";
    $quote = $bd->_Execute($sql);
    if($quote->RecordCount() == 1) { ?>
      <p class="quote">
        <a href="" title="Permanent link to this quote."><b>#<?=$id?></b></a>
        <a href="./?le=bbb35129920419b934023f4eb0de854b&amp;rox=312" class="qa">+</a>(<?=$quote->fields['points']?>)
        <a href="./?le=bbb35129920419b934023f4eb0de854b&amp;sox=312" class="qa">-</a> 
        <a href="./?le=bbb35129920419b934023f4eb0de854b&amp;sux=312" onClick="return confirm('Flag quote for review?');" class="qa">[X]</a>
      </p>
      <p class="qt"><?=$quote->fields['quote']?></p><?php
    } else { return (0); }
  }

  function show_quotes_by_id($order, $start, $end)
  {
    include ("config.php");
    $sql = "SELECT id FROM quote ORDER BY id $order LIMIT $start,$end";
    $ids = $bd->_Execute($sql);
    if($ids->RecordCount()) {
          while (!$ids->EOF) { $this->show_quote($ids->fields['id']); $ids->MoveNext(); }
    } else { return (0); }
  }

  function show_quotes_by_top($top)
  {
    include ("config.php");
    $sql = "SELECT id FROM quote ORDER BY points LIMIT $top";
    $ids = $bd->_Execute($sql);
    if($ids->RecordCount()) { ?>
      <table cellpadding="2" cellspacing="0" width="80%">
        <tr><td><?php
          while (!$ids->EOF) { $this->show_quote($ids->fields['id']); $ids->MoveNext(); } ?>
        </td></tr>
        </table><?php
    } else { return (0); }
  }
}

Index: common.php
===================================================================
RCS file: /cvsroot/openbash-org/openbash-org/modules/common.php,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** common.php	30 Jul 2004 20:47:12 -0000	1.1
--- common.php	15 Nov 2004 12:09:43 -0000	1.2
***************
*** 1,4 ****
--- 1,17 ----
  <?php
  
+ function variable_clean($var)
+ {
+   $allowed='<a><br><b><h1><h2>'.
+            '<h3><h4><i><code>' .
+            '<li><ol><p><strong>' .
+            '<u><ul><span><pre>';
+   $tmp = str_replace ('--', '', $var);
+   $tmp = htmlentities($tmp);
+   $tmp = strip_tags ($tmp, $allowed);
+   //$tmp = addslashes ($tmp);
+   return ($tmp);
+ }
+ 
  /*
   * arregla una cadena para quitarle