Warden

Provedl jsem rychlou a docasnou opravu 5f61a122 a nyni uz server prijimajicim klientum posila udalosti po davkach, ne jednotlive. Novou verzi kodu jsem otestoval a nasledne nasadil na produkcni Warden server. Nyni uz predelavam neefektivni dva SELECTy na jeden INNER JOIN.

Ještě mě tak napadlo, možná úpravy toho kódu komplikují ty vnořené větve, a budeš muset upravovat dotaz na tuším čtyřech místech - jestli by nebylo jednodušší vygenerovat ten dotaz jednou. Nastřelil jsem z hlavy, ber jen jako návrh. Každopádně nechávám na tobě.

  if(defined %client) {
    my $query = "SELECT e.id, c.hostname, c.service, _atakdál_  FROM events e, clients c WHERE e.type != 'test' AND e.valid = 't' AND e.client_id = c.client_id id > ?";      
    my @params = ($last_id);

    unless ($requested_type eq '_any_') {
      $query .= " AND type = ?";
      push(@params, $requested_type);
    }

    unless ($client{'receive_own'} eq 't') {
      my ($domain) = $cn =~ /([^\.]+\.[^\.]+)$/;
      $query .= " AND c.hostname NOT LIKE ?";
      push(@params, '%' . $domain);
    }

    $query .= " ORDER BY id ASC LIMIT ?;";
    push(@params, $used_limit);

    $sth = $DBH->prepare($query);
    unless (defined $sth) {
      sendMsg("err",
              "Cannot prepare ROE-ANY statement in function '$function_name': $DBH->errstr",
              "Internal 'prepare' server error");
    }

    $rc = $sth->execute(@params);
    unless (defined $rc) {
      sendMsg("err",
              "Cannot execute statement in function '$function_name': $DBH->errstr",
              "Internal 'execute' server error");
    }
  }    

Na podobne reseni jsem ted dosel i ja, kdyz jsem si pod sebe poskladal vsechny ty ctyri dotazy. Postupnym generovanim SELECTu se ta sekce zjednodusi. Jen premyslim nad tim, zda-li pouzit primo INNER JOIN, nebo vyuzit SELECT s aliasy a nechat databazi at si jej sama prevede na INNER JOIN. Predpokladam ale, ze technicky to bude asi jedno.

Pravda... já bych tam dal JOIN, kvůli čitelnosti, ať je na první pohled jasnější, že se tam něco mixuje. A v rámci joinu stejně nejspíš aliasy použiješ (aby ses mohl snadněji odkázat na konkrétní jména sloupců), něco jako SELECT e.id, c.hostname FROM events AS e JOIN clients AS c ON e.client_id = c.client_id WHERE ...

Souhlasim, ja jsem take pro explicitni JOIN. Aliasu se nezbavim, jelikoz sloupce type, client_id a valid jsou v obou tabulkach. Dotaz by pak mel vypadat nasledovne:

SELECT id, hostname, service, detected, events.type, source_type, source, target_proto, target_port, attack_scale, note, priority, timeout
FROM events 
INNER JOIN clients ON events.client_id = clients.client_id 
WHERE events.type != 'test' AND id > ? AND events.valid = 't' ORDER BY id ASC LIMIT ?;

Jen jeste premyslim, zda-li ty prefixy tabulky nedat, opet kvuli citelnosti, vsude.

Za málo. Koukám ale, že jsi ten můj kód použil téměř beze změny, doufám, že jsi to otestoval opravdu dobře, protože jsem ho psal jako nástřel spatra do inputboxu Homeproje.

Pavel Kácha wrote:

Za málo. Koukám ale, že jsi ten můj kód použil téměř beze změny, doufám, že jsi to otestoval opravdu dobře, protože jsem ho psal jako nástřel spatra do inputboxu Homeproje.

Zmeny byly potrebne pouze v pojmenovani jednotlivych sloupcu, nicmene ten kod byl elegantni a funkcni, tak proc jej nepouzit. Pred nasazenim jsem jej ale samozrejme poradne otestoval a vyzkousel vsechny vetve.