X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=Scans.pm;h=a22983dd3bfb836f66a635b8dd37be1adaccc1b2;hb=c8e65de85f3c2724a5290e0ee612b83e7f63aea0;hp=15766456351c8f459ba37fb01523106a8937bade;hpb=5362383a5ec27d3bde7b97794450966906c1a42b;p=NDIRC.git diff --git a/Scans.pm b/Scans.pm index 1576645..a22983d 100644 --- a/Scans.pm +++ b/Scans.pm @@ -29,17 +29,16 @@ our @EXPORT = qw/addScan addScanGroup sendScan/; sub addScan { my ($id,$verbose) = @_; - DB(); if (1){ - unless ($ND::DBH->selectrow_array("SELECT scan_id FROM scans WHERE scan_id = ? AND tick >= tick() - 168",undef,$id)){ + unless ($ND::DBH->selectrow_array(q{SELECT scan_id FROM scans WHERE NOT groupscan AND scan_id = LOWER(?) AND tick >= tick() - 168},undef,$id)){ my @user = $ND::DBH->selectrow_array(q{SELECT uid,username, scan_points, tick() FROM users WHERE hostmask ILIKE ? },undef,$ND::address); - if ($ND::DBH->do(q{INSERT INTO scans (scan_id,tick,"type") VALUES (?,tick(),COALESCE(?,'-1'))}, + if ($ND::DBH->do(q{INSERT INTO scans (scan_id,tick,uid) VALUES (LOWER(?),tick(),COALESCE(?,-1))}, undef,$id,$user[0]) == 1){ if (@user){ $ND::DBH->do('UPDATE users SET scan_points = scan_points + 1 WHERE uid = ? ',undef,$user[0]); $user[2] += 1; - $ND::server->command("msg $ND::target Added scan, at tick $user[3]. $user[1] points now $user[2]"); + $ND::server->command("notice $ND::nick Added scan, points now $user[2]"); }elsif ($verbose){ $ND::server->command("msg $ND::target Added scan, but unknown user, no points"); } @@ -51,15 +50,14 @@ sub addScan { } sub addScanGroup { my ($id,$verbose) = @_; - DB(); if (1){ - unless ($ND::DBH->selectrow_array("SELECT scan_id FROM scans WHERE type = 'group' AND scan_id = ? AND tick >= tick() - 168",undef,$id)){ + unless ($ND::DBH->selectrow_array(q{SELECT scan_id FROM scans WHERE groupscan AND scan_id = LOWER(?) AND tick >= tick() - 168},undef,$id)){ my @user = $ND::DBH->selectrow_array(q{SELECT uid,username, scan_points, tick() FROM users WHERE hostmask ILIKE ? },undef,$ND::address); - if ($ND::DBH->do(q{INSERT INTO scans (scan_id,tick,"type",scan) VALUES (?,tick(),'group',COALESCE(?,'-1'))}, + if ($ND::DBH->do(q{INSERT INTO scans (scan_id,tick,groupscan,uid) VALUES (LOWER(?),tick(),true,COALESCE(?,-1))}, undef,$id,$user[0]) == 1){ if (@user){ - $ND::server->command("msg $ND::target Added scan group, at tick $user[3]. Points will be added after parsing"); + $ND::server->command("notice $ND::nick Added scan group. Points will be added after parsing."); }elsif ($verbose){ $ND::server->command("msg $ND::target Added scan, but unknown user, no points"); } @@ -86,4 +84,6 @@ sub sendScan { } } + + 1;