0019204: Add facility for exporting all an individual subscriber's da…

…ta including history (#313)

* export subscriber data

Signed-off-by: Xheni Myrtaj <myrtajxheni@gmail.com>

*  replace mysqli_fetch_assoc with the Sql_Fetch_Assoc

Signed-off-by: Xheni Myrtaj <myrtajxheni@gmail.com>

* remove unnecessary line

Signed-off-by: Xheni Myrtaj <myrtajxheni@gmail.com>

(cherry picked from commit ba4ea2e)

public_html/lists/admin/exportuserdata.php

@@ -0,0 +1,222 @@
+<?php
+require_once dirname(__FILE__).'/accesscheck.php';
+if (!defined('PHPLISTINIT')) {
+    exit;
+}
+if (!$_GET['id']) {
+    Fatal_Error(s('no such User'));
+
+    return;
+} else {
+    $id = (int)sprintf('%d', $_GET['id']);
+}
+
+$result = Sql_query("SELECT * FROM {$tables['user']} where id = $id");
+if (!Sql_Affected_Rows()) {
+    Fatal_Error(s('no such User'));
+
+    return;
+}
+$user = sql_fetch_array($result);
+
+ob_end_clean();
+header('Content-Type: text/csv; charset=utf-8');
+header('Content-Disposition: attachment; filename=subscriberdata.csv');
+// create a file pointer connected to the output stream
+ob_start();
+$output = fopen('php://output', 'w');
+
+// output the column headings
+fputcsv($output, array('','General Subscriber Info'));
+fputcsv($output, array('Email', 'Confirmed','Blacklisted', 'Opted in', 'Bounce count','Entered','Modified','Html email','Subscribe Page','rssfrequency','disabled','extradata'));
+
+
+$userrows = Sql_Query(
+    sprintf(
+        'select email, confirmed, blacklisted, optedin, bouncecount, entered, modified, htmlemail, subscribepage, rssfrequency, disabled, extradata 
+                from %s where id = %d'
+
+
+        , $GLOBALS['tables']['user'], $user['id'])
+);
+
+
+// loop over the rows, outputting them
+while ($row = Sql_Fetch_Assoc($userrows))
+    fputcsv($output, $row);
+
+fputcsv($output, array(' '));
+// output the column headings
+fputcsv($output, array('','User History Info'));
+fputcsv($output, array('ip address', 'Summary','Date', 'Details', 'System Information'));
+$userhistoryrows = Sql_Query(
+    sprintf(
+        'select ip, summary,date, detail, systeminfo 
+                from %s where userid = %d'
+
+
+        , $GLOBALS['tables']['user_history'], $user['id'])
+);
+
+
+// loop over the rows, outputting them
+while ($row = Sql_Fetch_Assoc($userhistoryrows))
+    fputcsv($output, $row);
+fputcsv($output, array(' '));
+fputcsv($output, array('','Campaign Info'));
+fputcsv($output, array('Message ID', 'Entered','Viewed', 'Response time'));
+$msgsrows = Sql_Query(sprintf('select messageid,entered,viewed,(viewed = 0 or viewed is null) as notviewed,
+    abs(unix_timestamp(entered) - unix_timestamp(viewed)) as responsetime from %s where userid = %d and status = "sent" order by entered desc',
+    $GLOBALS['tables']['usermessage'], $user['id']));
+
+
+// loop over the rows, outputting them
+while ($row = Sql_Fetch_Assoc($msgsrows))
+    fputcsv($output, $row);
+fputcsv($output, array(''));
+
+fputcsv($output, array('','Bounces Info'));
+fputcsv($output, array('Bounce ID', 'Bounce message','Time', 'Bounce','F time'));
+$bouncesrows = Sql_Query(sprintf('
+select 
+    message_bounce.id
+    , message_bounce.message
+    , time
+    , bounce
+    , date_format(time,"%%e %%b %%Y %%T") as ftime
+from 
+    %s as message_bounce
+where 
+    user = %d', $GLOBALS['tables']['user_message_bounce'], $user['id']));
+
+while ($row = Sql_Fetch_Assoc($bouncesrows))
+    fputcsv($output, $row);
+
+fputcsv($output, array(''));
+
+fputcsv($output, array('','Blacklist Info'));
+fputcsv($output, array('Email', 'Name','Data','Added'));
+$blacklistdata = $GLOBALS['tables']['user_blacklist_data'];
+$blacklist = $GLOBALS['tables']['user_blacklist'];
+$emailaddress = sql_escape($user['email']);
+
+$blacklistinforows = Sql_Query("select d.email, d.name, d.data, b.added from $blacklistdata as d 
+left join $blacklist as b on d.email = b.email
+where b.email = '$emailaddress';
+");
+
+while ($row = Sql_Fetch_Assoc($blacklistinforows))
+    fputcsv($output, $row);
+
+fputcsv($output, array(''));
+fputcsv($output, array('','Subscriber Attribute Info'));
+fputcsv($output, array('value','name', 'type','tablename'));
+
+$userattribute = $GLOBALS['tables']['user_attribute'];
+$attribute = $GLOBALS['tables']['attribute'];
+$userid = (int)$user['id'];
+
+$attributesrows = Sql_Query(
+    "select u.value, a.name, a.type, a.tablename from $userattribute as u 
+left join $attribute as a on u.attributeid = a.id
+where u.userid = '$userid';
+    
+");
+
+
+while ($row = Sql_Fetch_Assoc($attributesrows))
+    fputcsv($output, $row);
+
+$list = $GLOBALS['tables']['list'];
+$listuser = $GLOBALS['tables']['listuser'];
+
+fputcsv($output, array(''));
+
+
+fputcsv($output, array('','Lists Membership'));
+fputcsv($output, array('List name','description', 'entered','modified'));
+
+$listrows = Sql_Query(
+    "select l.name, l.description, u.entered, u.modified from $list as l 
+left join $listuser as u on l.id = u.listid
+where u.userid = '$userid';
+    
+");
+
+
+while ($row = Sql_Fetch_Assoc($listrows))
+    fputcsv($output, $row);
+
+
+fputcsv($output, array(' '));
+// output the column headings
+fputcsv($output, array('','Links tracking Info'));
+fputcsv($output, array('URL', 'Forward','First Clicked', 'Latest Clicked', 'clicked','Campaign ID'));
+$linkrows = Sql_Query(
+    sprintf(
+        'select url, forward, firstclick, latestclick, clicked, messageid 
+                from %s where userid = %d'
+
+
+        , $GLOBALS['tables']['linktrack'], $user['id'])
+);
+
+while ($row = Sql_Fetch_Assoc($linkrows))
+    fputcsv($output, $row);
+
+fputcsv($output, array(' '));
+// output the column headings
+fputcsv($output, array('','UML clicks Info'));
+fputcsv($output, array('Message ID', 'Forward ID','First Click', 'Latest Click', 'clicked','Html Clicked', 'Text Clicked'));
+$umlrows = Sql_Query(
+    sprintf(
+        'select messageid, forwardid, firstclick, latestclick, clicked, htmlclicked, textclicked 
+                from %s where userid = %d'
+
+
+        , $GLOBALS['tables']['linktrack_uml_click'], $user['id'])
+);
+
+while ($row = Sql_Fetch_Assoc($umlrows))
+    fputcsv($output, $row);
+
+fputcsv($output, array(' '));
+// output the column headings
+fputcsv($output, array(' ','User clicks Info'));
+fputcsv($output, array('Link ID', 'Message ID','Name', 'Data', 'Date'));
+$userclickrows = Sql_Query(
+    sprintf(
+        'select linkid, userid, messageid, name, data, date 
+                from %s where userid = %d'
+
+
+        , $GLOBALS['tables']['linktrack_userclick'], $user['id'])
+);
+
+while ($row = Sql_Fetch_Assoc($userclickrows))
+    fputcsv($output, $row);
+
+fputcsv($output, array(' '));
+// output the column headings
+fputcsv($output, array(' ','Message Forward Info'));
+fputcsv($output, array('Message ID','Forward', 'Status', 'Time'));
+$forwardrows = Sql_Query(
+    sprintf(
+        'select message, forward, status, time 
+                from %s where user = %d'
+
+
+        , $GLOBALS['tables']['user_message_forward'], $user['id'])
+);
+
+while ($row = Sql_Fetch_Assoc($forwardrows))
+    fputcsv($output, $row);
+
+
+
+fclose($output);
+exit;
+
+
+
+

public_html/lists/admin/user.php

@@ -15,7 +15,7 @@
 } else {
     $findby = '';
 }
-if (isset($_GET['find'])) { //# those notices are driving me nuts ...
+if (isset($_GET['find'])) {
     $find = $_GET['find']; //# I guess we should check on validity of it as well
 } else {
     $find = '';
@@ -326,7 +326,8 @@
     }
 
     echo '<div class="actions">';
-    echo PageLinkButton("userhistory&amp;id=$id", s('History'));
+    echo '&nbsp;&nbsp;'.PageLinkButton("userhistory&amp;id=$id", s('History'));
+    echo '&nbsp;&nbsp;'.PageLinkButton("exportuserdata&amp;id=$id", s('Download subscriber data'));
     echo 
         '<a 
             class="confirm btn btn-default"