]> git.mxchange.org Git - friendica.git/blob - mod/regmod.php
Merge branch 'pull'
[friendica.git] / mod / regmod.php
1 <?php
2
3 function user_allow($hash) {
4         $register = q("SELECT * FROM `register` WHERE `hash` = '%s' LIMIT 1",
5                 dbesc($hash)
6         );
7
8
9         if(! count($register))
10                 return false;
11
12         $user = q("SELECT * FROM `user` WHERE `uid` = %d LIMIT 1",
13                 intval($register[0]['uid'])
14         );
15         
16         if(! count($user))
17                 killme();
18
19         $r = q("DELETE FROM `register` WHERE `hash` = '%s' LIMIT 1",
20                 dbesc($register[0]['hash'])
21         );
22
23
24         $r = q("UPDATE `user` SET `blocked` = 0, `verified` = 1 WHERE `uid` = %d LIMIT 1",
25                 intval($register[0]['uid'])
26         );
27         
28         $r = q("SELECT * FROM `profile` WHERE `uid` = %d AND `is-default` = 1",
29                 intval($user[0]['uid'])
30         );
31         if(count($r) && $r[0]['net-publish']) {
32                 $url = $a->get_baseurl() . '/profile/' . $user[0]['nickname'];
33                 if($url && strlen(get_config('system','directory_submit_url')))
34                         proc_run('php',"include/directory.php","$url");
35         }
36
37         push_lang($register[0]['language']);
38
39         $email_tpl = get_intltext_template("register_open_eml.tpl");
40         $email_tpl = replace_macros($email_tpl, array(
41                         '$sitename' => $a->config['sitename'],
42                         '$siteurl' =>  $a->get_baseurl(),
43                         '$username' => $user[0]['username'],
44                         '$email' => $user[0]['email'],
45                         '$password' => $register[0]['password'],
46                         '$uid' => $user[0]['uid']
47         ));
48
49         $res = mail($user[0]['email'], sprintf(t('Registration details for %s'), $a->config['sitename']),
50                 $email_tpl,
51                         'From: ' . t('Administrator') . '@' . $_SERVER['SERVER_NAME'] . "\n"
52                         . 'Content-type: text/plain; charset=UTF-8' . "\n"
53                         . 'Content-transfer-encoding: 8bit' );
54
55         pop_lang();
56
57         if($res) {
58                 info( t('Account approved.') . EOL );
59                 return true;
60         }       
61
62 }
63
64 function user_deny($hash) {
65
66         $register = q("SELECT * FROM `register` WHERE `hash` = '%s' LIMIT 1",
67                 dbesc($hash)
68         );
69
70         if(! count($register))
71                 return false;
72
73         $user = q("SELECT * FROM `user` WHERE `uid` = %d LIMIT 1",
74                 intval($register[0]['uid'])
75         );
76         
77         $r = q("DELETE FROM `user` WHERE `uid` = %d LIMIT 1",
78                 intval($register[0]['uid'])
79         );
80         $r = q("DELETE FROM `contact` WHERE `uid` = %d LIMIT 1",
81                 intval($register[0]['uid'])
82         ); 
83         $r = q("DELETE FROM `profile` WHERE `uid` = %d LIMIT 1",
84                 intval($register[0]['uid'])
85         ); 
86
87         $r = q("DELETE FROM `register` WHERE `hash` = '%s' LIMIT 1",
88                 dbesc($register[0]['hash'])
89         );
90         notice( sprintf(t('Registration revoked for %s'), $user[0]['username']) . EOL);
91         return true;
92         
93 }
94
95 function regmod_content(&$a) {
96
97         global $lang;
98
99         $_SESSION['return_url'] = $a->cmd;
100
101         if(! local_user()) {
102                 info( t('Please login.') . EOL);
103                 $o .= '<br /><br />' . login(($a->config['register_policy'] == REGISTER_CLOSED) ? 0 : 1);
104                 return $o;
105         }
106
107         if(!is_site_admin()) {
108                 notice( t('Permission denied.') . EOL);
109                 return '';
110         }
111
112         if($a->argc != 3)
113                 killme();
114
115         $cmd  = $a->argv[1];
116         $hash = $a->argv[2];
117
118
119
120         if($cmd === 'deny') {
121                 if (!user_deny($hash)) killme();
122         }
123
124         if($cmd === 'allow') {
125                 if (!user_allow($hash)) killme();
126         }
127 }