@@ -108,6 +108,9 @@ function log_str($str) {
108
108
function log_strv (/*$fmt, @args*/ ) {
109
109
$ args = func_get_args ();
110
110
$ fmt = array_shift ($ args );
111
+ foreach ($ args as &$ v )
112
+ if ($ v === null )
113
+ $ v = "- " ;
111
114
return log_str (vsprintf ($ fmt , $ args ));
112
115
}
113
116
@@ -119,10 +122,11 @@ function user_is_admin($nick) {
119
122
return (bool ) @$ users [$ nick ]['admin ' ];
120
123
}
121
124
122
- function user_make_admin ($ nick ) {
125
+ function user_make_admin ($ caller , $ nick ) {
123
126
global $ users ;
124
127
$ nick = nicktolower ($ nick );
125
128
$ users [$ nick ]['admin ' ] = true ;
129
+ log_strv ("%s grant:admin %s " , $ caller , $ nick );
126
130
save_db ();
127
131
}
128
132
@@ -132,7 +136,7 @@ function user_is_ignored($nick) {
132
136
return (bool ) @$ users [$ nick ]['ignore ' ];
133
137
}
134
138
135
- function user_set_ignored ($ nick , $ ignore ) {
139
+ function user_set_ignored ($ caller , $ nick , $ ignore ) {
136
140
global $ users ;
137
141
$ nick = nicktolower ($ nick );
138
142
@@ -141,11 +145,11 @@ function user_set_ignored($nick, $ignore) {
141
145
if ($ ignore ) {
142
146
$ users [$ nick ]["points " ] = 0 ;
143
147
$ users [$ nick ]["log " ] = array ("Ignored =0 " => 1 );
144
- log_strv ("ignore %s " , $ nick );
148
+ log_strv ("%s ignore %s y " , $ caller , $ nick );
145
149
send ("NOTICE " , $ nick , "You are now ignored by me. " );
146
150
} else {
147
151
unset($ users [$ nick ]["log " ]["Ignored =0 " ]);
148
- log_strv ("unignore %s " , $ nick );
152
+ log_strv ("%s ignore %s n " , $ caller , $ nick );
149
153
send ("NOTICE " , $ nick , "I stopped ignoring you. " );
150
154
}
151
155
@@ -167,6 +171,10 @@ function user_get_points($nick) {
167
171
}
168
172
169
173
function user_adj_points ($ nick , $ delta , $ reason ) {
174
+ return user_adj_points_by (null , $ nick , $ delta , $ reason );
175
+ }
176
+
177
+ function user_adj_points_by ($ caller , $ nick , $ delta , $ reason ) {
170
178
global $ users ;
171
179
$ nick = nicktolower ($ nick );
172
180
if (@$ users [$ nick ]["ignore " ])
@@ -181,11 +189,18 @@ function user_adj_points($nick, $delta, $reason) {
181
189
$ log = @$ users [$ nick ]["verbose " ];
182
190
else
183
191
$ log = @$ users [$ nick ]["vdedo " ];
184
- if ($ log )
185
- send ("NOTICE " , $ nick , "$ reason ( $ delta points) " );
186
192
187
- log_strv ("change %s %s%d \"%s \"" ,
188
- $ nick , ($ delta < 0 ? "" : "+ " ), $ delta , strescape ($ reason ));
193
+ if ($ log ) {
194
+ $ msg = "$ reason ( $ delta points) " ;
195
+ if ($ caller !== null )
196
+ $ msg .= " (by $ caller) " ;
197
+ send ("NOTICE " , $ nick , $ msg );
198
+ }
199
+
200
+ log_strv ("%s change %s %s%d \"%s \"" ,
201
+ $ caller , $ nick ,
202
+ ($ delta < 0 ? "" : "+ " ), $ delta ,
203
+ strescape ($ reason ));
189
204
190
205
return $ delta ;
191
206
}
@@ -196,20 +211,21 @@ function user_reset_points($caller, $nick) {
196
211
197
212
unset($ users [$ nick ]);
198
213
save_db ();
199
- log_strv ("reset %s " , $ nick );
214
+ log_strv ("%s reset %s " , $ caller , $ nick );
200
215
201
216
if (!nickeq ($ nick , $ caller ))
202
217
send ("NOTICE " , $ nick , "Your ClueBot account was reset by $ caller. " );
203
218
}
204
219
205
- function user_merge ($ old_user , $ new_user ) {
220
+ function user_merge ($ caller , $ old_user , $ new_user ) {
206
221
global $ users ;
207
222
$ old_user = nicktolower ($ old_user );
208
223
$ new_user = nicktolower ($ new_user );
209
224
210
225
$ old_points = user_get_points ($ old_user );
211
- user_adj_points ($ new_user , $ old_points , "Merged with $ old_user " );
212
- user_reset_points ($ old_user );
226
+ log_strv ("%s merge %s %s %s " , $ caller , $ old_user , $ new_user , $ old_points );
227
+ user_adj_points_by ($ caller , $ new_user , $ old_points , "Merged with $ old_user " );
228
+ user_reset_points ($ caller , $ old_user );
213
229
save_db ();
214
230
}
215
231
0 commit comments