cafe-grader-web

Commit r599:14a14eb28fed public

parent | child
Description:
- fix syntax error
Commit status:
[Not Reviewed]
References:
java
Diff options:
Raw Diff | Patch Diff | Download Diff | Ignore whitespace | Increase context
Comments:
0 Commit comments 0 Inline Comments
Unresolved TODOs:
There are no unresolved TODOs
Side by Side Unified
Expand All Files Collapse All Files Wide Mode Diff
Add another comment
Browse Files

r599:14a14eb28fed - - 1 file changed: 1 inserted, 0 deleted

Show file before | Show file after | Raw diff | Download diff | Ignore whitespace Increase context Show commentsHide comments
@@ -93,392 +93,393
93 93 end
94 94
95 95 end
96 96
97 97 def login_stat
98 98 @logins = Array.new
99 99
100 100 date_and_time = '%Y-%m-%d %H:%M'
101 101 begin
102 102 md = params[:since_datetime].match(/(\d+)-(\d+)-(\d+) (\d+):(\d+)/)
103 103 @since_time = Time.zone.local(md[1].to_i,md[2].to_i,md[3].to_i,md[4].to_i,md[5].to_i)
104 104 rescue
105 105 @since_time = DateTime.new(1000,1,1)
106 106 end
107 107 begin
108 108 md = params[:until_datetime].match(/(\d+)-(\d+)-(\d+) (\d+):(\d+)/)
109 109 @until_time = Time.zone.local(md[1].to_i,md[2].to_i,md[3].to_i,md[4].to_i,md[5].to_i)
110 110 rescue
111 111 @until_time = DateTime.new(3000,1,1)
112 112 end
113 113
114 114 User.all.each do |user|
115 115 @logins << { id: user.id,
116 116 login: user.login,
117 117 full_name: user.full_name,
118 118 count: Login.where("user_id = ? AND created_at >= ? AND created_at <= ?",
119 119 user.id,@since_time,@until_time)
120 120 .count(:id),
121 121 min: Login.where("user_id = ? AND created_at >= ? AND created_at <= ?",
122 122 user.id,@since_time,@until_time)
123 123 .minimum(:created_at),
124 124 max: Login.where("user_id = ? AND created_at >= ? AND created_at <= ?",
125 125 user.id,@since_time,@until_time)
126 126 .maximum(:created_at),
127 127 ip: Login.where("user_id = ? AND created_at >= ? AND created_at <= ?",
128 128 user.id,@since_time,@until_time)
129 129 .select(:ip_address).uniq
130 130
131 131 }
132 132 end
133 133 end
134 134
135 135 def submission_stat
136 136
137 137 date_and_time = '%Y-%m-%d %H:%M'
138 138 begin
139 139 @since_time = DateTime.strptime(params[:since_datetime],date_and_time)
140 140 rescue
141 141 @since_time = DateTime.new(1000,1,1)
142 142 end
143 143 begin
144 144 @until_time = DateTime.strptime(params[:until_datetime],date_and_time)
145 145 rescue
146 146 @until_time = DateTime.new(3000,1,1)
147 147 end
148 148
149 149 @submissions = {}
150 150
151 151 User.find_each do |user|
152 152 @submissions[user.id] = { login: user.login, full_name: user.full_name, count: 0, sub: { } }
153 153 end
154 154
155 155 Submission.where("submitted_at >= ? AND submitted_at <= ?",@since_time,@until_time).find_each do |s|
156 156 if @submissions[s.user_id]
157 157 if not @submissions[s.user_id][:sub].has_key?(s.problem_id)
158 158 a = Problem.find_by_id(s.problem_id)
159 159 @submissions[s.user_id][:sub][s.problem_id] =
160 160 { prob_name: (a ? a.full_name : '(NULL)'),
161 161 sub_ids: [s.id] }
162 162 else
163 163 @submissions[s.user_id][:sub][s.problem_id][:sub_ids] << s.id
164 164 end
165 165 @submissions[s.user_id][:count] += 1
166 166 end
167 167 end
168 168 end
169 169
170 170 def problem_hof
171 171 # gen problem list
172 172 @user = User.find(session[:user_id])
173 173 @problems = @user.available_problems
174 174
175 175 # get selected problems or the default
176 176 if params[:id]
177 177 begin
178 178 @problem = Problem.available.find(params[:id])
179 179 rescue
180 180 redirect_to action: :problem_hof
181 181 flash[:notice] = 'Error: submissions for that problem are not viewable.'
182 182 return
183 183 end
184 184 end
185 185
186 186 return unless @problem
187 187
188 188 @by_lang = {} #aggregrate by language
189 189
190 190 range =65
191 191 @histogram = { data: Array.new(range,0), summary: {} }
192 192 @summary = {count: 0, solve: 0, attempt: 0}
193 193 user = Hash.new(0)
194 194 Submission.where(problem_id: @problem.id).find_each do |sub|
195 195 #histogram
196 196 d = (DateTime.now.in_time_zone - sub.submitted_at) / 24 / 60 / 60
197 197 @histogram[:data][d.to_i] += 1 if d < range
198 198
199 199 next unless sub.points
200 200 @summary[:count] += 1
201 201 user[sub.user_id] = [user[sub.user_id], (sub.points >= @problem.full_score) ? 1 : 0].max
202 202
203 203 lang = Language.find_by_id(sub.language_id)
204 204 next unless lang
205 205 next unless sub.points >= @problem.full_score
206 206
207 207 #initialize
208 208 unless @by_lang.has_key?(lang.pretty_name)
209 209 @by_lang[lang.pretty_name] = {
210 210 runtime: { avail: false, value: 2**30-1 },
211 211 memory: { avail: false, value: 2**30-1 },
212 212 length: { avail: false, value: 2**30-1 },
213 213 first: { avail: false, value: DateTime.new(3000,1,1) }
214 214 }
215 215 end
216 216
217 217 if sub.max_runtime and sub.max_runtime < @by_lang[lang.pretty_name][:runtime][:value]
218 218 @by_lang[lang.pretty_name][:runtime] = { avail: true, user_id: sub.user_id, value: sub.max_runtime, sub_id: sub.id }
219 219 end
220 220
221 221 if sub.peak_memory and sub.peak_memory < @by_lang[lang.pretty_name][:memory][:value]
222 222 @by_lang[lang.pretty_name][:memory] = { avail: true, user_id: sub.user_id, value: sub.peak_memory, sub_id: sub.id }
223 223 end
224 224
225 225 if sub.submitted_at and sub.submitted_at < @by_lang[lang.pretty_name][:first][:value] and
226 226 !sub.user.admin?
227 227 @by_lang[lang.pretty_name][:first] = { avail: true, user_id: sub.user_id, value: sub.submitted_at, sub_id: sub.id }
228 228 end
229 229
230 230 if @by_lang[lang.pretty_name][:length][:value] > sub.effective_code_length
231 231 @by_lang[lang.pretty_name][:length] = { avail: true, user_id: sub.user_id, value: sub.effective_code_length, sub_id: sub.id }
232 232 end
233 233 end
234 234
235 235 #process user_id
236 236 @by_lang.each do |lang,prop|
237 237 prop.each do |k,v|
238 238 v[:user] = User.exists?(v[:user_id]) ? User.find(v[:user_id]).full_name : "(NULL)"
239 239 end
240 240 end
241 241
242 242 #sum into best
243 243 if @by_lang and @by_lang.first
244 244 @best = @by_lang.first[1].clone
245 245 @by_lang.each do |lang,prop|
246 246 if @best[:runtime][:value] >= prop[:runtime][:value]
247 247 @best[:runtime] = prop[:runtime]
248 248 @best[:runtime][:lang] = lang
249 249 end
250 250 if @best[:memory][:value] >= prop[:memory][:value]
251 251 @best[:memory] = prop[:memory]
252 252 @best[:memory][:lang] = lang
253 253 end
254 254 if @best[:length][:value] >= prop[:length][:value]
255 255 @best[:length] = prop[:length]
256 256 @best[:length][:lang] = lang
257 257 end
258 258 if @best[:first][:value] >= prop[:first][:value]
259 259 @best[:first] = prop[:first]
260 260 @best[:first][:lang] = lang
261 261 end
262 262 end
263 263 end
264 264
265 265 @histogram[:summary][:max] = [@histogram[:data].max,1].max
266 266 @summary[:attempt] = user.count
267 267 user.each_value { |v| @summary[:solve] += 1 if v == 1 }
268 268 end
269 269
270 270 def stuck #report struggling user,problem
271 271 # init
272 272 user,problem = nil
273 273 solve = true
274 274 tries = 0
275 275 @struggle = Array.new
276 276 record = {}
277 277 Submission.includes(:problem,:user).order(:problem_id,:user_id).find_each do |sub|
278 278 next unless sub.problem and sub.user
279 279 if user != sub.user_id or problem != sub.problem_id
280 280 @struggle << { user: record[:user], problem: record[:problem], tries: tries } unless solve
281 281 record = {user: sub.user, problem: sub.problem}
282 282 user,problem = sub.user_id, sub.problem_id
283 283 solve = false
284 284 tries = 0
285 285 end
286 286 if sub.points >= sub.problem.full_score
287 287 solve = true
288 288 else
289 289 tries += 1
290 290 end
291 291 end
292 292 @struggle.sort!{|a,b| b[:tries] <=> a[:tries] }
293 293 @struggle = @struggle[0..50]
294 294 end
295 295
296 296
297 297 def multiple_login
298 298 #user with multiple IP
299 299 raw = Submission.joins(:user).joins(:problem).where("problems.available != 0").group("login,ip_address").order(:login)
300 300 last,count = 0,0
301 301 first = 0
302 302 @users = []
303 303 raw.each do |r|
304 304 if last != r.user.login
305 305 count = 1
306 306 last = r.user.login
307 307 first = r
308 308 else
309 309 @users << first if count == 1
310 310 @users << r
311 311 count += 1
312 312 end
313 313 end
314 314
315 315 #IP with multiple user
316 316 raw = Submission.joins(:user).joins(:problem).where("problems.available != 0").group("login,ip_address").order(:ip_address)
317 317 last,count = 0,0
318 318 first = 0
319 319 @ip = []
320 320 raw.each do |r|
321 321 if last != r.ip_address
322 322 count = 1
323 323 last = r.ip_address
324 324 first = r
325 325 else
326 326 @ip << first if count == 1
327 327 @ip << r
328 328 count += 1
329 329 end
330 330 end
331 331 end
332 332
333 333 def cheat_report
334 334 date_and_time = '%Y-%m-%d %H:%M'
335 335 begin
336 336 md = params[:since_datetime].match(/(\d+)-(\d+)-(\d+) (\d+):(\d+)/)
337 337 @since_time = Time.zone.local(md[1].to_i,md[2].to_i,md[3].to_i,md[4].to_i,md[5].to_i)
338 338 rescue
339 339 @since_time = Time.zone.now.ago( 90.minutes)
340 340 end
341 341 begin
342 342 md = params[:until_datetime].match(/(\d+)-(\d+)-(\d+) (\d+):(\d+)/)
343 343 @until_time = Time.zone.local(md[1].to_i,md[2].to_i,md[3].to_i,md[4].to_i,md[5].to_i)
344 344 rescue
345 345 @until_time = Time.zone.now
346 346 end
347 347
348 348 #multi login
349 349 @ml = Login.joins(:user).where("logins.created_at >= ? and logins.created_at <= ?",@since_time,@until_time).select('users.login,count(distinct ip_address) as count,users.full_name').group("users.id").having("count > 1")
350 350
351 351 st = <<-SQL
352 352 SELECT l2.*
353 353 FROM logins l2 INNER JOIN
354 354 (SELECT u.id,COUNT(DISTINCT ip_address) as count,u.login,u.full_name
355 355 FROM logins l
356 356 INNER JOIN users u ON l.user_id = u.id
357 357 WHERE l.created_at >= '#{@since_time.in_time_zone("UTC")}' and l.created_at <= '#{@until_time.in_time_zone("UTC")}'
358 358 GROUP BY u.id
359 359 HAVING count > 1
360 360 ) ml ON l2.user_id = ml.id
361 361 WHERE l2.created_at >= '#{@since_time.in_time_zone("UTC")}' and l2.created_at <= '#{@until_time.in_time_zone("UTC")}'
362 362 UNION
363 363 SELECT l2.*
364 364 FROM logins l2 INNER JOIN
365 365 (SELECT l.ip_address,COUNT(DISTINCT u.id) as count
366 366 FROM logins l
367 367 INNER JOIN users u ON l.user_id = u.id
368 368 WHERE l.created_at >= '#{@since_time.in_time_zone("UTC")}' and l.created_at <= '#{@until_time.in_time_zone("UTC")}'
369 369 GROUP BY l.ip_address
370 370 HAVING count > 1
371 371 ) ml on ml.ip_address = l2.ip_address
372 372 INNER JOIN users u ON l2.user_id = u.id
373 373 WHERE l2.created_at >= '#{@since_time.in_time_zone("UTC")}' and l2.created_at <= '#{@until_time.in_time_zone("UTC")}'
374 374 ORDER BY ip_address,created_at
375 375 SQL
376 376 @mld = Login.find_by_sql(st)
377 377
378 378 st = <<-SQL
379 379 SELECT s.id,s.user_id,s.ip_address,s.submitted_at,s.problem_id
380 380 FROM submissions s INNER JOIN
381 381 (SELECT u.id,COUNT(DISTINCT ip_address) as count,u.login,u.full_name
382 382 FROM logins l
383 383 INNER JOIN users u ON l.user_id = u.id
384 384 WHERE l.created_at >= ? and l.created_at <= ?
385 385 GROUP BY u.id
386 386 HAVING count > 1
387 387 ) ml ON s.user_id = ml.id
388 388 WHERE s.submitted_at >= ? and s.submitted_at <= ?
389 389 UNION
390 390 SELECT s.id,s.user_id,s.ip_address,s.submitted_at,s.problem_id
391 391 FROM submissions s INNER JOIN
392 392 (SELECT l.ip_address,COUNT(DISTINCT u.id) as count
393 393 FROM logins l
394 394 INNER JOIN users u ON l.user_id = u.id
395 395 WHERE l.created_at >= ? and l.created_at <= ?
396 396 GROUP BY l.ip_address
397 397 HAVING count > 1
398 398 ) ml on ml.ip_address = s.ip_address
399 399 WHERE s.submitted_at >= ? and s.submitted_at <= ?
400 400 ORDER BY ip_address,submitted_at
401 401 SQL
402 402 @subs = Submission.joins(:problem).find_by_sql([st,@since_time,@until_time,
403 403 @since_time,@until_time,
404 404 @since_time,@until_time,
405 405 @since_time,@until_time])
406 406
407 407 end
408 408
409 409 def cheat_scruntinize
410 410 #convert date & time
411 411 date_and_time = '%Y-%m-%d %H:%M'
412 412 begin
413 413 md = params[:since_datetime].match(/(\d+)-(\d+)-(\d+) (\d+):(\d+)/)
414 414 @since_time = Time.zone.local(md[1].to_i,md[2].to_i,md[3].to_i,md[4].to_i,md[5].to_i)
415 415 rescue
416 416 @since_time = Time.zone.now.ago( 90.minutes)
417 417 end
418 418 begin
419 419 md = params[:until_datetime].match(/(\d+)-(\d+)-(\d+) (\d+):(\d+)/)
420 420 @until_time = Time.zone.local(md[1].to_i,md[2].to_i,md[3].to_i,md[4].to_i,md[5].to_i)
421 421 rescue
422 422 @until_time = Time.zone.now
423 423 end
424 424
425 425 #convert sid
426 426 @sid = params[:SID].split(/[,\s]/) if params[:SID]
427 427 unless @sid and @sid.size > 0
428 428 return
429 429 redirect_to actoin: :cheat_scruntinize
430 430 flash[:notice] = 'Please enter at least 1 student id'
431 431 end
432 432 mark = Array.new(@sid.size,'?')
433 433 condition = "(u.login = " + mark.join(' OR u.login = ') + ')'
434 434
435 435 @st = <<-SQL
436 436 SELECT l.created_at as submitted_at ,-1 as id,u.login,u.full_name,l.ip_address,"" as problem_id,"" as points,l.user_id
437 437 FROM logins l INNER JOIN users u on l.user_id = u.id
438 438 WHERE l.created_at >= ? AND l.created_at <= ? AND #{condition}
439 439 UNION
440 440 SELECT s.submitted_at,s.id,u.login,u.full_name,s.ip_address,s.problem_id,s.points,s.user_id
441 441 FROM submissions s INNER JOIN users u ON s.user_id = u.id
442 442 WHERE s.submitted_at >= ? AND s.submitted_at <= ? AND #{condition}
443 443 ORDER BY submitted_at
444 444 SQL
445 445
446 446 p = [@st,@since_time,@until_time] + @sid + [@since_time,@until_time] + @sid
447 447 @logs = Submission.joins(:problem).find_by_sql(p)
448 448
449 449
450 450
451 451
452 452
453 453 end
454 454
455 455 protected
456 456
457 457 def calculate_max_score(problems, users,since_id,until_id, get_last_score = false)
458 458 scorearray = Array.new
459 459 users.each do |u|
460 460 ustat = Array.new
461 461 ustat[0] = u
462 462 problems.each do |p|
463 463 unless get_last_score
464 464 #get max score
465 465 max_points = 0
466 466 Submission.find_in_range_by_user_and_problem(u.id,p.id,since_id,until_id).each do |sub|
467 467 max_points = sub.points if sub and sub.points and (sub.points > max_points)
468 468 end
469 469 ustat << [(max_points.to_f*100/p.full_score).round, (max_points>=p.full_score)]
470 470 else
471 471 #get latest score
472 472 sub = Submission.find_last_by_user_and_problem(u.id,p.id)
473 473 if (sub!=nil) and (sub.points!=nil) and p and p.full_score
474 474 ustat << [(sub.points.to_f*100/p.full_score).round, (sub.points>=p.full_score)]
475 475 else
476 476 ustat << [0,false]
477 + end
477 478 end
478 479 end
479 480 scorearray << ustat
480 481 end
481 482 return scorearray
482 483 end
483 484
484 485 end
You need to be logged in to leave comments. Login now