handles urls with settings

[plewww.git] / planetlab / includes / plc_forms.php

diff --git a/planetlab/includes/plc_forms.php b/planetlab/includes/plc_forms.php
index 41c02e8..92de1e1 100644 (file)
--- a/planetlab/includes/plc_forms.php
+++ b/planetlab/includes/plc_forms.php
@@ -1,14 +1,26 @@
 <?php
 
-// $Id: plc_details.php 11645 2009-01-21 23:09:49Z thierry $
+// $Id$
 
 require_once 'plc_functions.php';
 
-function plc_form_start ($url, $values, $options=array()) {
+// the rationale behind having function names with _text is that
+// the first functions that we had were actually printing the stuff instead of returning it
+// so basically the foo (...) function should do ``print (foo_text(...))''
+
+// options unused so far
+function plc_form_start ($full_url, $values, $options=array()) {
+  if ( ! $values ) $values = array();
+  // extract var=value settings from url if any
+  $split=split_url($full_url);
+  $url=$split['url'];
+  $url_values=$split['values'];
+  if ( $url_values ) $values=array_merge($values,$url_values);
   $method = array_key_exists('method',$options) ? $options['method'] : 'POST';
   print "<form method=$method action='$url' enctype='multipart/form-data'>";
-  foreach ($values as $key=>$value) {
-    print "<input type=hidden name='$key' value='$value'>";
+  plc_debug('values',$values);
+  if ($values) foreach ($values as $key=>$value) {
+    print plc_form_hidden_text($key,$value);
   }
 }
 
@@ -16,21 +28,60 @@ function plc_form_end($options=array()) {
   print "</form>";
 }
 
+function plc_form_hidden_text ($key,$value) {
+  return "<input type=hidden name='$key' value='$value'/>";  
+}
+function plc_form_hidden ($key,$value) { print plc_form_hidden_text($key,$value); }
+  
 function plc_form_checkbox_text ($name,$value,$selected=false) {
   if ($selected) $xtra=" selected=selected";
-  return "<input type=checkbox name='$name' value='$value'$xtra>";
+  return "<input type=checkbox name='$name' value='$value'$xtra/>";
 }
 
 function plc_form_submit_text ($name,$display) {
-  return "<input type=submit name='$name' value='$display'>";
+  return "<input type=submit name='$name' value='$display'/>";
 }
+function plc_form_submit ($name, $display) { print plc_form_submit_text($name,$display); }
   
 function plc_form_file_text ($name,$size) {
-  return "<input type=file name='$name' size=$size>";
+  return "<input type=file name='$name' size=$size/>";
 }
 
-function plc_form_label_text ($label,$name) {
-  return "<label for=$name>$text </label>";
+function plc_form_label_text ($name,$display) {
+  return "<label for=$name>$display </label>";
+}
+
+function plc_form_text_text ($name,$value,$size) {
+  return "<input type=text name='$name' size=$size value='$value'>";
+}
+function plc_form_textarea_text ($name,$value,$cols,$rows) {
+  return "<textarea name='$name' cols=$cols rows=$rows>$value</textarea>";
 }
  
+function plc_form_select_text ($name,$values,$label="") {
+  $selector="";
+  $selector.="<select name='$name'>";
+  if ($label) 
+    $selector.="<option value=''>$label</option>";
+  foreach ($values as $chunk) {
+    $display=$chunk['display'];
+    $value=$chunk['value'];
+    $selector .= "<option value='$value'";
+    if ($chunk['selected']) $selector .= " selected=selected";
+    $selector .= ">$display</option>\n";
+  }
+  $selector .= "</select>";
+  return $selector;
+}
+
+function plc_form_simple_button ($full_url,$text,$method="POST") {
+  $split=split_url($full_url);
+  $url=$split['url'];
+  $values=$split['values'];
+  $button=plc_form_submit_text("anonymous",$text);
+  if ($values) foreach ($values as $key=>$value) 
+      $button .= plc_form_hidden_text($key,$value);
+  return "<form method=$method action=$url>$button</form>";
+}
+
 ?>