/phplist/admin/commonlib/pages/attributes.php
PHP | 368 lines | 289 code | 20 blank | 59 comment | 82 complexity | eed46325d71a73f6624bc974adce905c MD5 | raw file
Possible License(s): LGPL-2.1, GPL-2.0, BSD-3-Clause, LGPL-2.0, CC-BY-SA-3.0, AGPL-1.0
- <?
- $types = array('textline','checkbox','checkboxgroup','radio','select',"hidden","textarea","date");
- $formtable_exists = Sql_Table_exists("formfield");
- ob_end_flush();
- #foreach ($_POST as $key => $val) {
- # print "$key = ".print_r($val)."<br/>";
- #}
- #return;
- print '<script language="Javascript" src="js/progressbar.js" type="text/javascript"></script>';
- if (isset($_POST["action"])) {
- if (isset($_POST["name"])) {
- print '<script language="Javascript" type="text/javascript"> document.write(progressmeter); start();</script>';flush();
- while (list($id,$val) = each ($_POST["name"])) {
- if (!$id && isset($_POST["name"][0]) && $_POST["name"][0] != "") {
- # it is a new one
- $lc_name = getNewAttributeTablename($_POST["name"][0]);
- if ($lc_name == "email") { print Warn($GLOBALS['I18N']->get('warnemailattribute')); }
- #print "New attribute: ".$_POST["name"][0]."<br/>";
- $query = sprintf('insert into %s (name,type,listorder,default_value,required,tablename) values("%s","%s",%d,"%s",%d,"%s")',
- $tables["attribute"],addslashes($_POST["name"][0]),$_POST["type"][0],$_POST["listorder"][0],addslashes($_POST["default"][0]),$_POST["required"][0],$lc_name);
- Sql_Query($query);
- $insertid = Sql_Insert_id();
- # text boxes and hidden fields do not have their own table
- if ($_POST["type"][$id] != "textline" && $_POST["type"]["id"] != "hidden") {
- $query = "create table $table_prefix"."listattr_$lc_name (id integer not null primary key auto_increment, name varchar(255) unique,listorder integer default 0)";
- Sql_Query($query);
- } else {
- # and they cannot currently be required, changed 29/08/01, insert javascript to require them, except for hidden ones :-)
- if ($_POST["type"]["id"] == "hidden")
- Sql_Query("update {$tables['attribute']} set required = 0 where id = $insertid");
- }
- if ($_POST["type"][$id] == "checkbox") {
- # with a checkbox we know the values
- # Sql_Query('insert into '.$table_prefix.'listattr_'.$lc_name.' (name) values("Checked")');
- # Sql_Query('insert into '.$table_prefix.'listattr_'.$lc_name.' (name) values("Unchecked")');
- # we cannot "require" checkboxes, that does not make sense
- Sql_Query("update {$tables['attribute']} set required = 0 where id = $insertid");
- }
- if ($_POST["type"][$id] == "checkboxgroup")
- Sql_Query("update {$tables['attribute']} set required = 0 where id = $insertid");
- # fix all existing users to have a record for this attribute, even with empty data
- $req = Sql_Query("select id from {$tables["user"]}");
- while ($row = Sql_Fetch_Row($req)) {
- Sql_Query(sprintf('insert ignore into %s (attributeid,userid) values(%d,%d)',
- $tables["user_attribute"],$insertid,$row[0]));
- }
- } elseif ($_POST["name"][$id] != "") {
- # it is a change
- # get the original type
- $req = Sql_Fetch_Row_Query("select type,tablename from {$tables['attribute']} where id = $id");
- $existingtype = $req[0];
- #print "Existing attribute: ".$_POST["name"][$id]." new type:".$_POST["type"][$id]." existing type: ".$req[0]."<br/>";
- if ($_POST["type"][$id] != $existingtype)
- switch ($existingtype) {
- case "textline":case "hidden":case "date":
- print "Converting ".$_POST["name"][$id]." from $existingtype to ".$_POST["type"][$id]."<br/>";
- switch ($_POST["type"][$id]) {
- case "radio":
- case "checkboxgroup":
- case "select":
- $lc_name = getNewAttributeTablename($req[1]);
- Sql_Query("create table $table_prefix"."listattr_$lc_name (id integer not null primary key auto_increment, name varchar(255) unique,listorder integer default 0)");
- $attreq = Sql_Query("select distinct value from {$tables['user_attribute']} where attributeid = $id");
- while ($row = Sql_Fetch_Row($attreq)) {
- $attindexreq = Sql_Query("select id from $table_prefix"."listattr_$lc_name where name = \"$row[0]\"");
- if (!Sql_Affected_Rows()) {
- Sql_Query("insert into $table_prefix"."listattr_$lc_name (name) values(\"$row[0]\")");
- $attid = Sql_Insert_Id();
- } else {
- $attindex = Sql_Fetch_Row($attindexreq);
- $attid = $attindex[0];
- }
- Sql_Query("update {$tables['user_attribute']} set value = $attid where attributeid = $id and value = \"$row[0]\"");
- }
- break;
- case "checkbox":
- # in case of checkbox we just need to set the value to "on"
- Sql_Query("update {$tables['user_attribute']} set value = \"off\" where attributeid = $id and (value = 0 or value = \"off\")");
- Sql_Query("update {$tables['user_attribute']} set value = \"on\" where attributeid = $id and (value = 1 or value = \"on\") ");
- case "date":
- $attreq = Sql_Query("select * from {$tables['user_attribute']} where attributeid = $id");
- while ($row = Sql_Fetch_Array($attreq)) {
- # if (strlen($row["value"] > 5)) {
- Sql_Query(sprintf('update %s set value = "%s" where attributeid = %d and userid = %d',$tables["user_attribute"],parseDate($row["value"]),$row["attributeid"],$row["userid"]));
- # }
- }
- break;
- }
- break;
- case "radio":case "select": case "checkbox":
- if ($_POST["type"][$id] != "date" && $_POST["type"][$id] != "hidden" && $_POST["type"][$id] != "textline") break;
- print "Converting ".$_POST["name"][$id]." from $existingtype to ".$_POST["type"][$id]."<br/>";
- # we are turning a radio,select or checkbox into a hidden or textline field
- $valuereq = Sql_Query("select id,name from $table_prefix"."listattr_$req[1]");
- while ($row = Sql_Fetch_Row($valuereq))
- Sql_Query("update {$tables['user_attribute']} set value = \"$row[1]\" where attributeid = $id and value=\"$row[0]\"");
- Sql_Query("drop table $table_prefix"."listattr_$req[1]");
- break;
- case "checkboxgroup":
- if ($_POST["type"][$id] == "hidden" || $_POST["type"][$id] == "textline") {
- print $GLOBALS['I18N']->get('converting')." ".$_POST["name"][$id]." ".$GLOBALS['I18N']->get('from')." $existingtype ".$GLOBALS['I18N']->get('to')." ".$_POST["type"][$id]."<br/>";
- # we are changing a checkbox group into a hidden or textline
- # take the first value!
- $valuereq = Sql_Query("select id,name from $table_prefix"."listattr_$req[1]");
- while ($row = Sql_Fetch_Row($valuereq))
- Sql_Query("update {$tables['user_attribute']} set value = \"$row[1]\" where attributeid = $id and value like \"$row[0]%\"");
- Sql_Query("drop table if exists $table_prefix"."listattr_$req[1]");
- } elseif ($_POST["type"][$id] == "radio" || $_POST["type"][$id] == "select") {
- $valuereq = Sql_Query("select userid,value from {$tables["user_attribute"]} where attributeid = $id");
- # take the first value!
- while ($row = Sql_Fetch_Row($valuereq)) {
- $values = split(",",$row[1]);
- Sql_Query("update {$tables['user_attribute']} set value = \"$values[0]\" where attributeid = $id and userid = \"$row[0]\"");
- }
- }
- break;
- }
- $query = sprintf('update %s set name = "%s" ,type = "%s" ,listorder = %d,default_value = "%s" ,required = %d where id = %d',
- $tables["attribute"],addslashes($_POST["name"][$id]),$_POST["type"][$id],$listorder[$id],$default[$id],$required[$id],$id);
- Sql_Query($query);
- }
- }
- print '<script language="Javascript" type="text/javascript"> finish();</script>';flush();
- }
- } elseif (isset($_POST["tagaction"]) && is_array($_POST["tag"])) {
- ksort($_POST["tag"]);
- if ($_POST["tagaction"] == $GLOBALS['I18N']->get('delete')) {
- while (list($k,$id) = each ($_POST["tag"])) {
- # check for dependencies
- if ($formtable_exists) {
- $req = Sql_Query("select * from formfield where attribute = $id");
- $candelete = !Sql_Affected_Rows();
- } else {
- $candelete = 1;
- }
- if ($candelete) {
- print $GLOBALS['I18N']->get('deleting')." $id<br/>";
- $row = Sql_Fetch_Row_Query("select tablename,type from {$tables['attribute']} where id = $id");
- Sql_Query("drop table if exists $table_prefix"."listattr_$row[0]");
- Sql_Query("delete from {$tables['attribute']} where id = $id");
- # delete all user attributes as well
- Sql_Query("delete from {$tables['user_attribute']} where attributeid = $id");
- } else {
- print Error($GLOBALS['I18N']->get('cannotdelete')."<br/>");
- while ($row = Sql_Fetch_Array($req)) {
- print PageLink2("editelements&id=".$row["form"]."&option=edit_elements&pi=formbuilder","form ".$row["form"]."")."<br/>\n";
- }
- }
- }
- } elseif ($_POST["tagaction"] == $GLOBALS['I18N']->get('merge')) {
- $first = array_shift($_POST["tag"]);
- $firstdata = Sql_Fetch_Array_Query(sprintf('select * from %s where id = %d',$tables["attribute"],$first));
- if (!sizeof($_POST["tag"])) {
- print Error($GLOBALS['I18N']->get('cannotmergeone'));
- } else {
- $cbg_initiated = 0;
- foreach ($_POST["tag"] as $attid) {
- print $GLOBALS['I18N']->get('merging')." $attid ".$GLOBALS['I18N']->get('into')." $first<br/>";
-
- $attdata = Sql_Fetch_Array_Query(sprintf('select * from %s where id = %d',$tables["attribute"],$attid));
- if ($attdata["type"] != $firstdata["type"]) {
- print Error($GLOBALS['I18N']->get('notsametype'));
- } else {
- # debugging: check values for every user. This is very memory demanding, so you'll need to
- # add loads of memory to actually use it.
- /*
- $before = array();
- $second = array();
- $after = array();
- $req = Sql_Query(sprintf('select * from %s where attributeid = %d',$tables["user_attribute"],$first));
- while ($row = Sql_Fetch_Array($req)) {
- $before[$row["userid"]] = $row["value"];
- }
- $req = Sql_Query(sprintf('select * from %s where attributeid = %d',$tables["user_attribute"],$attid));
- while ($row = Sql_Fetch_Array($req)) {
- $second[$row["userid"]] = $row["value"];
- }
- */
- $valuestable = sprintf('%slistattr_%s',$table_prefix,$firstdata["tablename"]);
- if ($firstdata["type"] == "checkbox" && !$cbg_initiated) {
- # checkboxes are merged into a checkbox group
- # set that up first
- Sql_query(sprintf('create table %s
- (id integer not null primary key auto_increment, name varchar(255) unique,
- listorder integer default 0)',$valuestable),1);
- Sql_query(sprintf('insert into %s (name) values("%s")',$valuestable,$firstdata["name"]));
- $val = Sql_Insert_Id();
- Sql_query(sprintf('update %s set value="%s" where attributeid = %d',
- $tables["user_attribute"],$val,$first));
- Sql_query(sprintf('update %s set type="checkboxgroup" where id = %d',
- $tables["attribute"],$first));
- $cbg_initiated = 1;
- }
- switch ($firstdata["type"]) {
- case "textline":
- case "hidden":
- case "textarea":
- case "date":
- Sql_query(sprintf('delete from %s where attributeid = %d and value = ""',$tables["user_attribute"],$first));
- # we can just keep the data and mark it as the first attribute
- Sql_query(sprintf('update ignore %s set attributeid = %d where attributeid = %d',
- $tables["user_attribute"],$first,$attid),1);
- # delete the ones that didn't copy across, because there was a value already
- Sql_query(sprintf('delete from %s where id = %d',
- $tables["attribute"],$attid));
- # mark forms to use the merged attribute
- if ($formtable_exists)
- Sql_Query(sprintf('update formfield set attribute = %d where attribute = %d',$first,$attid),1);
- break;
- case "radio":
- case "select":
- # merge user values
- Sql_Query(sprintf('delete from %s where attributeid = %d and value = ""',$tables["user_attribute"],$first));
- $req = Sql_Query(sprintf('select * from %s',
- $table_prefix."listattr_".$attdata["tablename"]));
- while ($val = Sql_Fetch_Array($req)) {
- # check if it already exists
- $exists = Sql_Fetch_row_Query(sprintf('select id from %s where name = "%s"',
- $valuestable,$val["name"]));
- if (!$exists[0]) {
- Sql_Query(sprintf('insert into %s (name) values("%s")',
- $valuestable,$val["name"]));
- $val_index = Sql_Insert_id();
- } else {
- $val_index = $exists[0];
- }
- Sql_Query(sprintf('update %s set value = %d where attributeid = %d',
- $tables["user_attribute"],$val_index,$attid));
- }
- Sql_Query(sprintf('update %s set attributeid = %d where attributeid = %d',
- $tables["user_attribute"],$first,$attid),1);
- Sql_Query(sprintf('drop table %s',$table_prefix."listattr_".$attdata["tablename"]),1);
- Sql_Query(sprintf('delete from %s where id = %d',
- $tables["attribute"],$attid));
- # mark forms to use the merged attribute
- if ($formtable_exists)
- Sql_Query(sprintf('update formfield set attribute = %d where attribute = %d',$first,$attid),1);
- break;
- case "checkbox":
- $exists = Sql_Fetch_row_Query(sprintf('select id from %s where name = "%s"',
- $valuestable,$attdata["name"]));
- if (!$exists[0]) {
- Sql_Query(sprintf('insert into %s (name) values("%s")',
- $valuestable,$attdata["name"]));
- $val_index = Sql_Insert_id();
- } else {
- $val_index = $exists[0];
- }
- Sql_Query(sprintf('update %s set value = concat(value,",","%s") where attributeid = %d and (value != 0 or value != "off") ',
- $tables["user_attribute"],$val_index,$first));
- Sql_Query(sprintf('delete from %s where id = %d',
- $tables["attribute"],$attid));
- # mark forms to use the merged attribute
- if ($formtable_exists)
- Sql_Query(sprintf('update formfield set attribute = %d where attribute = %d',$first,$attid),1);
- break;
- case "checkboxgroup":
- # hmm, this is a tricky one.
- print Error($GLOBALS['I18N']->get('sorrymergingcbgroupnotimplemented'));
- break;
- }
- /*
- $req = Sql_Query(sprintf('select * from %s where attributeid = %d',$tables["user_attribute"],$first));
- while ($row = Sql_Fetch_Array($req)) {
- $after[$row["userid"]] = $row["value"];
- }
- foreach ($before as $userid => $value) {
- printf("\n".'<br/>%d before -> %s and %s<br/>after ->%s',$userid,$value,$second[$userid],$after[$userid]);
- }
- */
- }
- }
- }
- }
- }
- Sql_Query("update {$tables['attribute']} set required = 0 where type = \"checkbox\" or type = \"checkboxgroup\" or type = \"hidden\"");
- ?>
- <script language="Javascript" type="text/javascript">
- var warned = 0;
- function warn() {
- if (!warned)
- alert("<?php echo $GLOBALS['I18N']->get('warninglongtime')?>");
- warned = 1;
- }
- </script>
- <?=formStart()?>
- <?
- print $GLOBALS['I18N']->get('loadfrom')." ".PageLink2("defaults",$GLOBALS['I18N']->get('defaults')).'<br />';
- $res = Sql_Query("select * from {$tables['attribute']} order by listorder");
- if (Sql_Affected_Rows())
- print $GLOBALS['I18N']->get('existing').":<p>";
- else {
- print $GLOBALS['I18N']->get('noattributesdefined').'<br />';
- }
- $c= 0;
- while ($row = Sql_Fetch_array($res)) {
- $c++;
- print '<table border=1><tr><td colspan=2>'.
- $GLOBALS['I18N']->get('attribute').':'. $row["id"];
- if ($formtable_exists) {
- sql_query("select * from formfield where attribute = ".$row["id"]);
- print " (".$GLOBALS['I18N']->get('usedin').' '.Sql_affected_rows().' '.$GLOBALS['I18N']->get('forms');
- }
-
- print '</td><td colspan=2>'.$GLOBALS['I18N']->get('tag').' <input type="checkbox" name="tag['.$c.']" value="'.$row["id"].'"></td></tr>';
-
- print '<tr><td colspan=2>'.$GLOBALS['I18N']->get('name').': </td><td colspan=2><input type=text name="name['.$row["id"].']" value="'.htmlspecialchars(stripslashes($row["name"])).'" size=40></td></tr>';
- print '<tr><td colspan=2>'.$GLOBALS['I18N']->get('type').': </td><td colspan=2><!--input type=hidden name="type['.$row["id"].']" value="'.$row["type"].'">'.$row["type"].'-->';
- print '<select name="type['.$row["id"].']" onChange="warn();">';
- foreach($types as $key => $val) {
- printf('<option value="%s" %s>%s</option>',$val,$val == $row["type"] ? "selected": "",$GLOBALS['I18N']->get($val));
- }
- print '
- </select>';
- print '</td></tr>';
- print '<tr><td colspan=2>'.$GLOBALS['I18N']->get('defaultvalue').': </td><td colspan=2><input type=text name="default['.$row["id"].']" value="'.htmlspecialchars(stripslashes($row["default_value"])).'" size=40></td></tr>';
- print '<tr><td>'.$GLOBALS['I18N']->get('orderoflisting').': </td><td><input type=text name="listorder['.$row["id"].']" value="'.$row["listorder"].'" size=5></td>';
- print '<td>'.$GLOBALS['I18N']->get('isrequired').': </td><td><input type=checkbox name="required['.$row["id"].']" value="1" ';
- print $row["required"] ? "checked": "";
- print '></td></tr>';
- print '</table><hr>';
- }
- printf('<input type=submit name="action" value="%s">',$GLOBALS['I18N']->get('savechanges'));
- print '<br/><br/>
- <script language="Javascript" src="js/jslib.js" type="text/javascript"></script>';
- if ($c) {
- printf('<i>%s: </i><br/>',$GLOBALS['I18N']->get('withtagged'));
- printf('<input type=submit name="tagaction" value="%s">
- <input type=submit name="tagaction" value="%s"> %s<br/>
- <p><hr/></p>',$GLOBALS['I18N']->get('delete'),$GLOBALS['I18N']->get('merge'),Help("mergeattributes"));
- }
- print '
- <a name="new"></a>
- <h3>'.$GLOBALS['I18N']->get('addnew').':</h3>
- <table border=1>
- <tr><td colspan=2>'.$GLOBALS['I18N']->get('name').': </td><td colspan=2><input type=text name="name[0]" value="" size=40></td></tr>
- <tr><td colspan=2>'.$GLOBALS['I18N']->get('type').': </td><td colspan=2><select name="type[0]">';
- foreach($types as $key => $val) {
- printf('<option value="%s" %s>%s</option>',$val,"",$GLOBALS['I18N']->get($val));
- }
- print'
- </select></td></tr>
- <tr><td colspan=2>'.$GLOBALS['I18N']->get('defaultvalue').': </td><td colspan=2><input type=text name="default[0]" value="" size=40></td></tr>
- <tr><td>'.$GLOBALS['I18N']->get('orderoflisting').': </td><td><input type=text name="listorder[0]" value="" size=5></td>
- <td>'.$GLOBALS['I18N']->get('isrequired').': </td><td><input type=checkbox name="required[0]" value="1" checked></td></tr>
- </table><hr>
- <input type=submit name="action" value="'.$GLOBALS['I18N']->get('savechanges').'">
- </form>
- ';