PHP Sql_Affected_rows函数代码示例

function fill($prefix, $listid)
{
    global $server_name, $tables, $table_prefix;
    # check for not too many
    $domain = getConfig('domain');
    $res = Sql_query("select count(*) from {$tables['user']}");
    $row = Sql_fetch_row($res);
    if ($row[0] > 50000) {
        error('Hmm, I think 50 thousand users is quite enough for a test<br/>This machine does need to do other things you know.');
        print '<script language="Javascript" type="text/javascript"> document.forms[0].output.value="Done. Now there are ' . $row[0] . ' users in the database";</script>' . "\n";
        return 0;
    }
    # fill the database with "users" who have any combination of attribute values
    $attributes = array();
    $res = Sql_query("select * from {$tables['attribute']} where type = \"select\" or type = \"checkbox\" or type=\"radio\"");
    $num_attributes = Sql_Affected_rows();
    $total_attr = 0;
    $total_val = 0;
    while ($row = Sql_fetch_array($res)) {
        array_push($attributes, $row['id']);
        ++$total_attr;
        $values[$row['id']] = array();
        $res2 = Sql_query("select * from {$table_prefix}" . 'listattr_' . $row['tablename']);
        while ($row2 = Sql_fetch_array($res2)) {
            array_push($values[$row['id']], $row2['id']);
            ++$total_val;
        }
    }
    $total = $total_attr * $total_val;
    if (!$total) {
        Fatal_Error('Can only do stress test when some attributes exist');
        return 0;
    }
    for ($i = 0; $i < $total; ++$i) {
        $data = array();
        reset($attributes);
        while (list($key, $val) = each($attributes)) {
            $data[$val] = current($values[$val]);
            if (!$data[$val]) {
                reset($values[$val]);
                $data[$val] = current($values[$val]);
            }
            next($values[$val]);
        }
        $query = sprintf('insert into %s (email,entered,confirmed) values("testuser%s",now(),1)', $tables['user'], $prefix . '-' . $i . '@' . $domain);
        $result = Sql_query($query, 0);
        $userid = Sql_insert_id();
        if ($userid) {
            $result = Sql_query("replace into {$tables['listuser']} (userid,listid,entered) values({$userid},{$listid},now())");
            reset($data);
            while (list($key, $val) = each($data)) {
                if ($key && $val) {
                    Sql_query("replace into {$tables['user_attribute']} (attributeid,userid,value) values(" . $key . ",{$userid}," . $val . ')');
                }
            }
        }
    }
    return 1;
}

function getUniqid($table = "") {
  global $tables;
  if (!$table) {
  	if ($tables["user"])
	  	$table = $tables["user"];
    else
    	$table = "user";
  }
  # make sure it is really unique
  $id = md5(uniqid(mt_rand()));
  $req = Sql_Query("select id from $table where uniqid = \"$id\"");
  while (Sql_Affected_rows()) {
    $id = md5(uniqid(mt_rand()));
    $req = Sql_Query("select id from $table where uniqid = \"$id\"");
  }
  return $id;
}

    reset($_SESSION['export']['cols']);
    while (list($key, $val) = each($_SESSION['export']['cols'])) {
        fwrite($exportfile, strtr($user[$val], $col_delim, ',') . $col_delim);
    }
    reset($attributes);
    while (list($key, $val) = each($attributes)) {
        $value = UserAttributeValue($user['id'], $val['id']);
        fwrite($exportfile, quoteEnclosed($value, $col_delim, $row_delim) . $col_delim);
    }
    if ($exporthistory) {
        fwrite($exportfile, quoteEnclosed($user['ip'], $col_delim, $row_delim) . $col_delim);
        fwrite($exportfile, quoteEnclosed($user['summary'], $col_delim, $row_delim) . $col_delim);
        fwrite($exportfile, quoteEnclosed($user['detail'], $col_delim, $row_delim) . $col_delim);
    }
    $lists = Sql_query("select listid,name from\n    {$tables['listuser']},{$tables['list']} where userid = " . $user['id'] . " and\n    {$tables['listuser']}.listid = {$tables['list']}.id {$listselect_and}");
    if (!Sql_Affected_rows($lists)) {
        fwrite($exportfile, 'No Lists');
    }
    while ($list = Sql_fetch_array($lists)) {
        fwrite($exportfile, stripslashes($list['name']) . '; ');
    }
    fwrite($exportfile, $row_delim);
}
print '<script type="text/javascript">
var parentJQuery = window.parent.jQuery;
parentJQuery("#progressbar").updateProgress("' . $todo . ',' . $todo . '");
parentJQuery("#busyimage").hide();
parentJQuery("#progresscount").html("' . s('All done') . '");
</script>';
flush();
$_SESSION['export']['fileready'] = $exportfileName;

 }
 flush();
 keepLock($send_process_id);
 $status = Sql_query('update ' . $tables["message"] . ' set status = "inprocess" where id = ' . $messageid);
 $sendstart = Sql_query('update ' . $tables["message"] . ' set sendstart = now() where sendstart is NULL and id = ' . $messageid);
 output($GLOBALS['I18N']->get('Looking for users'));
 if (Sql_Has_Error($database_connection)) {
     ProcessError(Sql_Error($database_connection));
 }
 # make selection on attribute, users who at least apply to the attributes
 # lots of ppl seem to use it as a normal mailinglist system, and do not use attributes.
 # Check this and take anyone in that case.
 $numattr = Sql_Fetch_Row_Query("select count(*) from " . $tables["attribute"]);
 if ($userselection && $numattr[0]) {
     $res = Sql_query($userselection);
     $num_users = Sql_Affected_rows($res);
     output($num_users . ' ' . $GLOBALS['I18N']->get('users apply for attributes, now checking lists'));
     $user_list = "";
     while ($row = Sql_Fetch_row($res)) {
         $user_list .= $row[0] . ",";
     }
     $user_list = substr($user_list, 0, -1);
     if ($user_list) {
         $user_attribute_query = " and listuser.userid in ({$user_list})";
     } else {
         output($GLOBALS['I18N']->get('No users apply for attributes'));
         $status = Sql_query("update {$tables["message"]} set status = \"sent\",sent = now() where id = \"{$messageid}\"");
         finish("info", "Message {$messageid}: \nNo users apply for attributes, ie nothing to do");
         $script_stage = 6;
         # we should actually continue with the next message
         return;

             $msg = $cnt . ' ' . $GLOBALS['I18N']->get("users were deleted from this list");
             break;
         default:
             # do nothing
             break;
     }
 }
 if ($_POST["tagaction_all"] != "nothing") {
     $req = Sql_Query(sprintf('select userid from %s where listid = %d', $tables["listuser"], $id));
     switch ($_POST["tagaction_all"]) {
         case "move":
             $cnt = 0;
             while ($user = Sql_Fetch_Row($req)) {
                 Sql_query("delete from {$tables["listuser"]} where listid = {$id} and userid =\n            {$user['0']}");
                 Sql_query("replace into {$tables["listuser"]} (listid,userid)\n            values({$_POST["movedestination_all"]},{$user['0']})");
                 if (Sql_Affected_rows() == 1) {
                     # 2 means they were already on the list
                     $cnt++;
                 }
             }
             $msg = $cnt . ' ' . $GLOBALS['I18N']->get("users were moved to") . ' ' . listName($_POST["movedestination_all"]);
             break;
         case "copy":
             $cnt = 0;
             while ($user = Sql_Fetch_Row($req)) {
                 Sql_query("replace into {$tables["listuser"]} (listid,userid)\n            values({$_POST["copydestination_all"]},{$user['0']})");
                 $cnt++;
             }
             $msg = $cnt . ' ' . $GLOBALS['I18N']->get("users were copied to") . ' ' . listName($_POST["copydestination_all"]);
             break;
         case "delete":

  }

  flush();
  keepLock($send_process_id);
  $status = Sql_query('update '.$tables["message"].' set status = "inprocess",sendstart = now() where id = '.$messageid);
  output( "Looking for users");
  if (Sql_Has_Error($database_connection)) {  ProcessError(Sql_Error($database_connection)); }

  # make selection on attribute, users who at least apply to the attributes
  # lots of ppl seem to use it as a normal mailinglist system, and do not use attributes.
  # Check this and take anyone in that case.
  $numattr = Sql_Fetch_Row_Query("select count(*) from ".$tables["attribute"]);

  if ($userselection && $numattr[0]) {
    $res = Sql_query($userselection);
    $num = Sql_Affected_rows($res);
    output("$num users apply for attributes, now checking lists");
    $user_list = "";
    while ($row = Sql_Fetch_row($res)) {
      $user_list .= $row[0] . ",";
    }
    $user_list = substr($user_list,0,-1);
    if ($user_list)
      $user_attribute_query = " and ".$tables["listuser"].".userid in ($user_list)";
    else {
      output("No users apply for attributes");
      $status = Sql_query("update {$tables["message"]} set status = \"sent\",sent = now() where id = \"$messageid\"");
      finish("info","Message $messageid: \nNo users apply for attributes, ie nothing to do");
      $script_stage = 6;
      return;
    }

			default: # do nothing
				break;
		}
	}

	if ($tagaction_all != "nothing") {
		$req = Sql_Query(sprintf('select userid from %s where listid = %d',$tables["listuser"],$id));
		switch ($tagaction_all) {
			case "move":
				$cnt = 0;
				while ($user = Sql_Fetch_Row($req)) {
					Sql_query("delete from {$tables["listuser"]} where listid = $id and userid =
						$user[0]");
					Sql_query("replace into {$tables["listuser"]} (listid,userid)
						values($movedestination_all,$user[0])");
					if (Sql_Affected_rows() == 1) # 2 means they were already on the list
						$cnt++;
				}
				$msg = $cnt . ' users were moved to '.listName($movedestination_all);
				break;
			case "copy":
				$cnt = 0;
				while ($user = Sql_Fetch_Row($req)) {
					Sql_query("replace into {$tables["listuser"]} (listid,userid)
						values($copydestination_all,$user[0])");
					$cnt++;
				}
				$msg = $cnt .' users were copied to '.listName($copydestination_all);
				break;
			case "delete":
				Sql_Query(sprintf('delete from %s where listid = %d',$tables["listuser"],$id));

function fill($prefix,$listid) {
  global $server_name,$tables,$table_prefix;
  # check for not too many
  $domain = getConfig("domain");
  $res = Sql_query("select count(*) from $tables[user]");
  $row = Sql_fetch_row($res);
  if ($row[0] > 50000) {
    error("Hmm, I think 50 thousand users is quite enough for a test<br>This machine does need to do other things you know.");
    print '<script language="Javascript" type="text/javascript">finish();</script>';
    print '<script language="Javascript" type="text/javascript"> document.forms[0].output.value="Done. Now there are '.$row[0].' users in the database";</script>'."\n";
    return 0;
  }

  # fill the database with "users" who have any combination of attribute values
  $attributes = array();
  $res = Sql_query("select * from $tables[attribute] where type = \"select\" or type = \"checkbox\" or type=\"radio\"");
  $num_attributes = Sql_Affected_rows();
  $total_attr = 0;
  $total_val = 0;

  while ($row = Sql_fetch_array($res)) {
    array_push($attributes,$row["id"]);
    $total_attr++;
    $values[$row["id"]] = array();
    $res2 = Sql_query("select * from $table_prefix"."listattr_".$row["tablename"]);
    while ($row2 = Sql_fetch_array($res2)) {
      array_push($values[$row["id"]],$row2["id"]);
      $total_val++;
    }
  }
  $total = $total_attr * $total_val;
  if (!$total) {
    print '<script language="Javascript" type="text/javascript"> finish(); </script>';
    Fatal_Error("Can only do stress test when some attributes exist");
		return 0;
  }

  for ($i = 0;$i< $total;$i++) {
    $data = array();
    reset($attributes);
    while (list($key,$val) = each ($attributes)) {
      $data[$val] = pos($values[$val]);
      if (!$data[$val]) {
        reset($values[$val]);
        $data[$val] = pos($values[$val]);
      }
      next($values[$val]);
    }

    $query = sprintf('insert into %s (email,entered,confirmed) values("testuser%s",now(),1)',
			$tables["user"], $prefix . '-' . $i . '@' . $domain);
    $result = Sql_query($query,0);

    $userid = Sql_insert_id();
		if ($userid) {
			$result = Sql_query("replace into $tables[listuser] (userid,listid,entered) values($userid,$listid,now())");
			reset($data);
			while (list($key,$val) = each ($data))
				if ($key && $val)
					Sql_query("replace into $tables[user_attribute] (attributeid,userid,value) values(".$key.",$userid,".$val.")");
		}
  }
  return 1;
}