Proyectos de Subversion Moodle

Rev

| Ultima modificación | Ver Log |

Rev Autor Línea Nro. Línea
1 efrain 1
<?php
2
// This file is part of Moodle - http://moodle.org/
3
//
4
// Moodle is free software: you can redistribute it and/or modify
5
// it under the terms of the GNU General Public License as published by
6
// the Free Software Foundation, either version 3 of the License, or
7
// (at your option) any later version.
8
//
9
// Moodle is distributed in the hope that it will be useful,
10
// but WITHOUT ANY WARRANTY; without even the implied warranty of
11
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12
// GNU General Public License for more details.
13
//
14
// You should have received a copy of the GNU General Public License
15
// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
16
 
17
/**
18
 * Data provider.
19
 *
20
 * @package    tool_messageinbound
21
 * @copyright  2018 Frédéric Massart
22
 * @author     Frédéric Massart <fred@branchup.tech>
23
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
24
 */
25
 
26
namespace tool_messageinbound\privacy;
27
defined('MOODLE_INTERNAL') || die();
28
 
29
use context;
30
use context_user;
31
use core_privacy\local\metadata\collection;
32
use core_privacy\local\request\approved_contextlist;
33
use core_privacy\local\request\approved_userlist;
34
use core_privacy\local\request\transform;
35
use core_privacy\local\request\userlist;
36
use core_privacy\local\request\writer;
37
 
38
/**
39
 * Data provider class.
40
 *
41
 * @package    tool_messageinbound
42
 * @copyright  2018 Frédéric Massart
43
 * @author     Frédéric Massart <fred@branchup.tech>
44
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
45
 */
46
class provider implements
47
    \core_privacy\local\metadata\provider,
48
    \core_privacy\local\request\core_userlist_provider,
49
    \core_privacy\local\request\plugin\provider {
50
 
51
    /**
52
     * Returns metadata.
53
     *
54
     * @param collection $collection The initialised collection to add items to.
55
     * @return collection A listing of user data stored through this system.
56
     */
57
    public static function get_metadata(collection $collection): collection {
58
 
59
        $collection->add_database_table('messageinbound_messagelist', [
60
            'messageid' => 'privacy:metadata:messagelist:messageid',
61
            'userid' => 'privacy:metadata:messagelist:userid',
62
            'address' => 'privacy:metadata:messagelist:address',
63
            'timecreated' => 'privacy:metadata:messagelist:timecreated',
64
        ], 'privacy:metadata:messagelist');
65
 
66
        // Arguably the keys are handled by \core\message\inbound\address_manager and thus could/should be handled by core.
67
        $collection->add_subsystem_link('core_userkey', [], 'privacy:metadata:coreuserkey');
68
 
69
        return $collection;
70
    }
71
 
72
    /**
73
     * Get the list of contexts that contain user information for the specified user.
74
     *
75
     * @param int $userid The user to search.
76
     * @return \contextlist $contextlist The contextlist containing the list of contexts used in this plugin.
77
     */
78
    public static function get_contexts_for_userid(int $userid): \core_privacy\local\request\contextlist {
79
        $contextlist = new \core_privacy\local\request\contextlist();
80
 
81
        // Always add the user context so we're sure we're not dodging user keys, besides it's not costly to do so.
82
        $contextlist->add_user_context($userid);
83
 
84
        return $contextlist;
85
    }
86
 
87
    /**
88
     * Get the list of users who have data within a context.
89
     *
90
     * @param   userlist    $userlist   The userlist containing the list of users who have data in this context/plugin combination.
91
     */
92
    public static function get_users_in_context(userlist $userlist) {
93
        global $DB;
94
 
95
        $context = $userlist->get_context();
96
 
97
        if (!is_a($context, \context_user::class)) {
98
            return;
99
        }
100
 
101
        // Add user if any messagelist data exists.
102
        if ($DB->record_exists('messageinbound_messagelist', ['userid' => $context->instanceid])) {
103
            // Only using user context, so instance ID will be the only user ID.
104
            $userlist->add_user($context->instanceid);
105
        }
106
 
107
        // Add users based on userkey (since we also delete those).
108
        \core_userkey\privacy\provider::get_user_contexts_with_script($userlist, $context, 'messageinbound_handler');
109
    }
110
 
111
    /**
112
     * Export all user data for the specified user, in the specified contexts.
113
     *
114
     * @param approved_contextlist $contextlist The approved contexts to export information for.
115
     */
116
    public static function export_user_data(approved_contextlist $contextlist) {
117
        global $DB;
118
        if (!static::approved_contextlist_contains_my_context($contextlist)) {
119
            // We only care about the user's user context.
120
            return;
121
        }
122
 
123
        $userid = $contextlist->get_user()->id;
124
        $context = context_user::instance($userid);
125
        $path = [get_string('messageinbound', 'tool_messageinbound')];
126
 
127
        // Export user keys.
128
        \core_userkey\privacy\provider::export_userkeys($context, $path, 'messageinbound_handler');
129
 
130
        // Export the message list.
131
        $data = [];
132
        $recordset = $DB->get_recordset('messageinbound_messagelist', ['userid' => $userid], 'timecreated, id');
133
        foreach ($recordset as $record) {
134
            $data[] = [
135
                'received_at' => $record->address,
136
                'timecreated' => transform::datetime($record->timecreated),
137
            ];
138
        }
139
        $recordset->close();
140
        writer::with_context($context)->export_data($path, (object) ['messages_pending_validation' => $data]);
141
    }
142
 
143
    /**
144
     * Delete all data for all users in the specified context.
145
     *
146
     * @param context $context The specific context to delete data for.
147
     */
148
    public static function delete_data_for_all_users_in_context(context $context) {
149
        global $DB;
150
        if ($context->contextlevel != CONTEXT_USER) {
151
            return;
152
        }
153
 
154
        static::delete_user_data($context->instanceid);
155
    }
156
 
157
    /**
158
     * Delete all user data for the specified user, in the specified contexts.
159
     *
160
     * @param approved_contextlist $contextlist The approved contexts and user information to delete information for.
161
     */
162
    public static function delete_data_for_user(approved_contextlist $contextlist) {
163
        global $DB;
164
        if (!static::approved_contextlist_contains_my_context($contextlist)) {
165
            // We only care about the user's user context.
166
            return;
167
        }
168
 
169
        static::delete_user_data($contextlist->get_user()->id);
170
    }
171
 
172
    /**
173
     * Delete multiple users within a single context.
174
     *
175
     * @param   approved_userlist       $userlist The approved context and user information to delete information for.
176
     */
177
    public static function delete_data_for_users(approved_userlist $userlist) {
178
        $context = $userlist->get_context();
179
        $userids = $userlist->get_userids();
180
 
181
        // Since this falls within a user context, only that user should be valid.
182
        if ($context->contextlevel != CONTEXT_USER || count($userids) != 1 || $context->instanceid != $userids[0]) {
183
            return;
184
        }
185
 
186
        static::delete_user_data($userids[0]);
187
    }
188
 
189
    /**
190
     * Delete a user's data.
191
     *
192
     * @param int $userid The user ID.
193
     * @return void
194
     */
195
    protected static function delete_user_data($userid) {
196
        global $DB;
197
        $DB->delete_records_select('messageinbound_messagelist', 'userid = :userid', ['userid' => $userid]);
198
        \core_userkey\privacy\provider::delete_userkeys('messageinbound_handler', $userid);
199
    }
200
 
201
    /**
202
     * Return whether the contextlist contains our own context.
203
     *
204
     * @param approved_contextlist $contextlist The contextlist
205
     * @return bool
206
     */
207
    protected static function approved_contextlist_contains_my_context(approved_contextlist $contextlist) {
208
        $userid = $contextlist->get_user()->id;
209
        foreach ($contextlist->get_contexts() as $context) {
210
            if ($context->contextlevel == CONTEXT_USER && $context->instanceid == $userid) {
211
                return true;
212
            }
213
        }
214
        return false;
215
    }
216
 
217
}