123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406 |
- /* Copyright (c) 2001 Matej Pfajfar.
- * Copyright (c) 2001-2004, Roger Dingledine.
- * Copyright (c) 2004-2006, Roger Dingledine, Nick Mathewson.
- * Copyright (c) 2007-2013, The Tor Project, Inc. */
- /* See LICENSE for licensing information */
- /**
- * \file networkstatus.c
- * \brief Functions and structures for handling network status documents as a
- * client or cache.
- */
- #include "or.h"
- #include "channel.h"
- #include "circuitmux.h"
- #include "circuitmux_ewma.h"
- #include "circuitstats.h"
- #include "config.h"
- #include "connection.h"
- #include "connection_or.h"
- #include "control.h"
- #include "directory.h"
- #include "dirserv.h"
- #include "dirvote.h"
- #include "entrynodes.h"
- #include "main.h"
- #include "microdesc.h"
- #include "networkstatus.h"
- #include "nodelist.h"
- #include "relay.h"
- #include "router.h"
- #include "routerlist.h"
- #include "routerparse.h"
- /* For tracking v2 networkstatus documents. Only caches do this now. */
- /** Map from descriptor digest of routers listed in the v2 networkstatus
- * documents to download_status_t* */
- static digestmap_t *v2_download_status_map = NULL;
- /** Global list of all of the current v2 network_status documents that we know
- * about. This list is kept sorted by published_on. */
- static smartlist_t *networkstatus_v2_list = NULL;
- /** True iff any member of networkstatus_v2_list has changed since the last
- * time we called download_status_map_update_from_v2_networkstatus() */
- static int networkstatus_v2_list_has_changed = 0;
- /** Map from lowercase nickname to identity digest of named server, if any. */
- static strmap_t *named_server_map = NULL;
- /** Map from lowercase nickname to (void*)1 for all names that are listed
- * as unnamed for some server in the consensus. */
- static strmap_t *unnamed_server_map = NULL;
- /** Most recently received and validated v3 consensus network status,
- * of whichever type we are using for our own circuits. This will be the same
- * as one of current_ns_consensus or current_md_consensus.
- */
- #define current_consensus \
- (we_use_microdescriptors_for_circuits(get_options()) ? \
- current_md_consensus : current_ns_consensus)
- /** Most recently received and validated v3 "ns"-flavored consensus network
- * status. */
- static networkstatus_t *current_ns_consensus = NULL;
- /** Most recently received and validated v3 "microdec"-flavored consensus
- * network status. */
- static networkstatus_t *current_md_consensus = NULL;
- /** A v3 consensus networkstatus that we've received, but which we don't
- * have enough certificates to be happy about. */
- typedef struct consensus_waiting_for_certs_t {
- /** The consensus itself. */
- networkstatus_t *consensus;
- /** The encoded version of the consensus, nul-terminated. */
- char *body;
- /** When did we set the current value of consensus_waiting_for_certs? If
- * this is too recent, we shouldn't try to fetch a new consensus for a
- * little while, to give ourselves time to get certificates for this one. */
- time_t set_at;
- /** Set to 1 if we've been holding on to it for so long we should maybe
- * treat it as being bad. */
- int dl_failed;
- } consensus_waiting_for_certs_t;
- /** An array, for each flavor of consensus we might want, of consensuses that
- * we have downloaded, but which we cannot verify due to having insufficient
- * authority certificates. */
- static consensus_waiting_for_certs_t
- consensus_waiting_for_certs[N_CONSENSUS_FLAVORS];
- /** The last time we tried to download a networkstatus, or 0 for "never". We
- * use this to rate-limit download attempts for directory caches (including
- * mirrors). Clients don't use this now. */
- static time_t last_networkstatus_download_attempted = 0;
- /** A time before which we shouldn't try to replace the current consensus:
- * this will be at some point after the next consensus becomes valid, but
- * before the current consensus becomes invalid. */
- static time_t time_to_download_next_consensus[N_CONSENSUS_FLAVORS];
- /** Download status for the current consensus networkstatus. */
- static download_status_t consensus_dl_status[N_CONSENSUS_FLAVORS];
- /** True iff we have logged a warning about this OR's version being older than
- * listed by the authorities. */
- static int have_warned_about_old_version = 0;
- /** True iff we have logged a warning about this OR's version being newer than
- * listed by the authorities. */
- static int have_warned_about_new_version = 0;
- static void download_status_map_update_from_v2_networkstatus(void);
- static void routerstatus_list_update_named_server_map(void);
- /** Forget that we've warned about anything networkstatus-related, so we will
- * give fresh warnings if the same behavior happens again. */
- void
- networkstatus_reset_warnings(void)
- {
- if (current_consensus) {
- SMARTLIST_FOREACH(nodelist_get_list(), node_t *, node,
- node->name_lookup_warned = 0);
- }
- have_warned_about_old_version = 0;
- have_warned_about_new_version = 0;
- }
- /** Reset the descriptor download failure count on all networkstatus docs, so
- * that we can retry any long-failed documents immediately.
- */
- void
- networkstatus_reset_download_failures(void)
- {
- int i;
- const smartlist_t *networkstatus_v2_list = networkstatus_get_v2_list();
- SMARTLIST_FOREACH_BEGIN(networkstatus_v2_list, networkstatus_v2_t *, ns) {
- SMARTLIST_FOREACH_BEGIN(ns->entries, routerstatus_t *, rs) {
- if (!router_get_by_descriptor_digest(rs->descriptor_digest))
- rs->need_to_mirror = 1;
- } SMARTLIST_FOREACH_END(rs);
- } SMARTLIST_FOREACH_END(ns);
- for (i=0; i < N_CONSENSUS_FLAVORS; ++i)
- download_status_reset(&consensus_dl_status[i]);
- if (v2_download_status_map) {
- digestmap_iter_t *iter;
- digestmap_t *map = v2_download_status_map;
- const char *key;
- void *val;
- download_status_t *dls;
- for (iter = digestmap_iter_init(map); !digestmap_iter_done(iter);
- iter = digestmap_iter_next(map, iter) ) {
- digestmap_iter_get(iter, &key, &val);
- dls = val;
- download_status_reset(dls);
- }
- }
- }
- /** Repopulate our list of network_status_t objects from the list cached on
- * disk. Return 0 on success, -1 on failure. */
- int
- router_reload_v2_networkstatus(void)
- {
- smartlist_t *entries;
- struct stat st;
- char *s;
- char *filename = get_datadir_fname("cached-status");
- int maybe_delete = !directory_caches_v2_dir_info(get_options());
- time_t now = time(NULL);
- if (!networkstatus_v2_list)
- networkstatus_v2_list = smartlist_new();
- entries = tor_listdir(filename);
- if (!entries) { /* dir doesn't exist */
- tor_free(filename);
- return 0;
- } else if (!smartlist_len(entries) && maybe_delete) {
- rmdir(filename);
- tor_free(filename);
- smartlist_free(entries);
- return 0;
- }
- tor_free(filename);
- SMARTLIST_FOREACH_BEGIN(entries, const char *, fn) {
- char buf[DIGEST_LEN];
- if (maybe_delete) {
- filename = get_datadir_fname2("cached-status", fn);
- remove_file_if_very_old(filename, now);
- tor_free(filename);
- continue;
- }
- if (strlen(fn) != HEX_DIGEST_LEN ||
- base16_decode(buf, sizeof(buf), fn, strlen(fn))) {
- log_info(LD_DIR,
- "Skipping cached-status file with unexpected name \"%s\"",fn);
- continue;
- }
- filename = get_datadir_fname2("cached-status", fn);
- s = read_file_to_str(filename, 0, &st);
- if (s) {
- if (router_set_networkstatus_v2(s, st.st_mtime, NS_FROM_CACHE,
- NULL)<0) {
- log_warn(LD_FS, "Couldn't load networkstatus from \"%s\"",filename);
- }
- tor_free(s);
- }
- tor_free(filename);
- } SMARTLIST_FOREACH_END(fn);
- SMARTLIST_FOREACH(entries, char *, fn, tor_free(fn));
- smartlist_free(entries);
- networkstatus_v2_list_clean(time(NULL));
- routers_update_all_from_networkstatus(time(NULL), 2);
- return 0;
- }
- /** Read every cached v3 consensus networkstatus from the disk. */
- int
- router_reload_consensus_networkstatus(void)
- {
- char *filename;
- char *s;
- const unsigned int flags = NSSET_FROM_CACHE | NSSET_DONT_DOWNLOAD_CERTS;
- int flav;
- /* FFFF Suppress warnings if cached consensus is bad? */
- for (flav = 0; flav < N_CONSENSUS_FLAVORS; ++flav) {
- char buf[128];
- const char *flavor = networkstatus_get_flavor_name(flav);
- if (flav == FLAV_NS) {
- filename = get_datadir_fname("cached-consensus");
- } else {
- tor_snprintf(buf, sizeof(buf), "cached-%s-consensus", flavor);
- filename = get_datadir_fname(buf);
- }
- s = read_file_to_str(filename, RFTS_IGNORE_MISSING, NULL);
- if (s) {
- if (networkstatus_set_current_consensus(s, flavor, flags) < -1) {
- log_warn(LD_FS, "Couldn't load consensus %s networkstatus from \"%s\"",
- flavor, filename);
- }
- tor_free(s);
- }
- tor_free(filename);
- if (flav == FLAV_NS) {
- filename = get_datadir_fname("unverified-consensus");
- } else {
- tor_snprintf(buf, sizeof(buf), "unverified-%s-consensus", flavor);
- filename = get_datadir_fname(buf);
- }
- s = read_file_to_str(filename, RFTS_IGNORE_MISSING, NULL);
- if (s) {
- if (networkstatus_set_current_consensus(s, flavor,
- flags|NSSET_WAS_WAITING_FOR_CERTS)) {
- log_info(LD_FS, "Couldn't load consensus %s networkstatus from \"%s\"",
- flavor, filename);
- }
- tor_free(s);
- }
- tor_free(filename);
- }
- if (!current_consensus) {
- if (!named_server_map)
- named_server_map = strmap_new();
- if (!unnamed_server_map)
- unnamed_server_map = strmap_new();
- }
- update_certificate_downloads(time(NULL));
- routers_update_all_from_networkstatus(time(NULL), 3);
- update_microdescs_from_networkstatus(time(NULL));
- return 0;
- }
- /** Free all storage held by the vote_routerstatus object <b>rs</b>. */
- static void
- vote_routerstatus_free(vote_routerstatus_t *rs)
- {
- vote_microdesc_hash_t *h, *next;
- if (!rs)
- return;
- tor_free(rs->version);
- tor_free(rs->status.exitsummary);
- for (h = rs->microdesc; h; h = next) {
- tor_free(h->microdesc_hash_line);
- next = h->next;
- tor_free(h);
- }
- tor_free(rs);
- }
- /** Free all storage held by the routerstatus object <b>rs</b>. */
- void
- routerstatus_free(routerstatus_t *rs)
- {
- if (!rs)
- return;
- tor_free(rs->exitsummary);
- tor_free(rs);
- }
- /** Free all storage held by the networkstatus object <b>ns</b>. */
- void
- networkstatus_v2_free(networkstatus_v2_t *ns)
- {
- if (!ns)
- return;
- tor_free(ns->source_address);
- tor_free(ns->contact);
- if (ns->signing_key)
- crypto_pk_free(ns->signing_key);
- tor_free(ns->client_versions);
- tor_free(ns->server_versions);
- if (ns->entries) {
- SMARTLIST_FOREACH(ns->entries, routerstatus_t *, rs,
- routerstatus_free(rs));
- smartlist_free(ns->entries);
- }
- tor_free(ns);
- }
- /** Free all storage held in <b>sig</b> */
- void
- document_signature_free(document_signature_t *sig)
- {
- tor_free(sig->signature);
- tor_free(sig);
- }
- /** Return a newly allocated copy of <b>sig</b> */
- document_signature_t *
- document_signature_dup(const document_signature_t *sig)
- {
- document_signature_t *r = tor_memdup(sig, sizeof(document_signature_t));
- if (r->signature)
- r->signature = tor_memdup(sig->signature, sig->signature_len);
- return r;
- }
- /** Free all storage held in <b>ns</b>. */
- void
- networkstatus_vote_free(networkstatus_t *ns)
- {
- if (!ns)
- return;
- tor_free(ns->client_versions);
- tor_free(ns->server_versions);
- if (ns->known_flags) {
- SMARTLIST_FOREACH(ns->known_flags, char *, c, tor_free(c));
- smartlist_free(ns->known_flags);
- }
- if (ns->weight_params) {
- SMARTLIST_FOREACH(ns->weight_params, char *, c, tor_free(c));
- smartlist_free(ns->weight_params);
- }
- if (ns->net_params) {
- SMARTLIST_FOREACH(ns->net_params, char *, c, tor_free(c));
- smartlist_free(ns->net_params);
- }
- if (ns->supported_methods) {
- SMARTLIST_FOREACH(ns->supported_methods, char *, c, tor_free(c));
- smartlist_free(ns->supported_methods);
- }
- if (ns->voters) {
- SMARTLIST_FOREACH_BEGIN(ns->voters, networkstatus_voter_info_t *, voter) {
- tor_free(voter->nickname);
- tor_free(voter->address);
- tor_free(voter->contact);
- if (voter->sigs) {
- SMARTLIST_FOREACH(voter->sigs, document_signature_t *, sig,
- document_signature_free(sig));
- smartlist_free(voter->sigs);
- }
- tor_free(voter);
- } SMARTLIST_FOREACH_END(voter);
- smartlist_free(ns->voters);
- }
- authority_cert_free(ns->cert);
- if (ns->routerstatus_list) {
- if (ns->type == NS_TYPE_VOTE || ns->type == NS_TYPE_OPINION) {
- SMARTLIST_FOREACH(ns->routerstatus_list, vote_routerstatus_t *, rs,
- vote_routerstatus_free(rs));
- } else {
- SMARTLIST_FOREACH(ns->routerstatus_list, routerstatus_t *, rs,
- routerstatus_free(rs));
- }
- smartlist_free(ns->routerstatus_list);
- }
- digestmap_free(ns->desc_digest_map, NULL);
- memwipe(ns, 11, sizeof(*ns));
- tor_free(ns);
- }
- /** Return the voter info from <b>vote</b> for the voter whose identity digest
- * is <b>identity</b>, or NULL if no such voter is associated with
- * <b>vote</b>. */
- networkstatus_voter_info_t *
- networkstatus_get_voter_by_id(networkstatus_t *vote,
- const char *identity)
- {
- if (!vote || !vote->voters)
- return NULL;
- SMARTLIST_FOREACH(vote->voters, networkstatus_voter_info_t *, voter,
- if (fast_memeq(voter->identity_digest, identity, DIGEST_LEN))
- return voter);
- return NULL;
- }
- /** Check whether the signature <b>sig</b> is correctly signed with the
- * signing key in <b>cert</b>. Return -1 if <b>cert</b> doesn't match the
- * signing key; otherwise set the good_signature or bad_signature flag on
- * <b>voter</b>, and return 0. */
- int
- networkstatus_check_document_signature(const networkstatus_t *consensus,
- document_signature_t *sig,
- const authority_cert_t *cert)
- {
- char key_digest[DIGEST_LEN];
- const int dlen = sig->alg == DIGEST_SHA1 ? DIGEST_LEN : DIGEST256_LEN;
- char *signed_digest;
- size_t signed_digest_len;
- if (crypto_pk_get_digest(cert->signing_key, key_digest)<0)
- return -1;
- if (tor_memneq(sig->signing_key_digest, key_digest, DIGEST_LEN) ||
- tor_memneq(sig->identity_digest, cert->cache_info.identity_digest,
- DIGEST_LEN))
- return -1;
- signed_digest_len = crypto_pk_keysize(cert->signing_key);
- signed_digest = tor_malloc(signed_digest_len);
- if (crypto_pk_public_checksig(cert->signing_key,
- signed_digest,
- signed_digest_len,
- sig->signature,
- sig->signature_len) < dlen ||
- tor_memneq(signed_digest, consensus->digests.d[sig->alg], dlen)) {
- log_warn(LD_DIR, "Got a bad signature on a networkstatus vote");
- sig->bad_signature = 1;
- } else {
- sig->good_signature = 1;
- }
- tor_free(signed_digest);
- return 0;
- }
- /** Given a v3 networkstatus consensus in <b>consensus</b>, check every
- * as-yet-unchecked signature on <b>consensus</b>. Return 1 if there is a
- * signature from every recognized authority on it, 0 if there are
- * enough good signatures from recognized authorities on it, -1 if we might
- * get enough good signatures by fetching missing certificates, and -2
- * otherwise. Log messages at INFO or WARN: if <b>warn</b> is over 1, warn
- * about every problem; if warn is at least 1, warn only if we can't get
- * enough signatures; if warn is negative, log nothing at all. */
- int
- networkstatus_check_consensus_signature(networkstatus_t *consensus,
- int warn)
- {
- int n_good = 0;
- int n_missing_key = 0, n_dl_failed_key = 0;
- int n_bad = 0;
- int n_unknown = 0;
- int n_no_signature = 0;
- int n_v3_authorities = get_n_authorities(V3_DIRINFO);
- int n_required = n_v3_authorities/2 + 1;
- smartlist_t *list_good = smartlist_new();
- smartlist_t *list_no_signature = smartlist_new();
- smartlist_t *need_certs_from = smartlist_new();
- smartlist_t *unrecognized = smartlist_new();
- smartlist_t *missing_authorities = smartlist_new();
- int severity;
- time_t now = time(NULL);
- tor_assert(consensus->type == NS_TYPE_CONSENSUS);
- SMARTLIST_FOREACH_BEGIN(consensus->voters, networkstatus_voter_info_t *,
- voter) {
- int good_here = 0;
- int bad_here = 0;
- int unknown_here = 0;
- int missing_key_here = 0, dl_failed_key_here = 0;
- SMARTLIST_FOREACH_BEGIN(voter->sigs, document_signature_t *, sig) {
- if (!sig->good_signature && !sig->bad_signature &&
- sig->signature) {
- /* we can try to check the signature. */
- int is_v3_auth = trusteddirserver_get_by_v3_auth_digest(
- sig->identity_digest) != NULL;
- authority_cert_t *cert =
- authority_cert_get_by_digests(sig->identity_digest,
- sig->signing_key_digest);
- tor_assert(tor_memeq(sig->identity_digest, voter->identity_digest,
- DIGEST_LEN));
- if (!is_v3_auth) {
- smartlist_add(unrecognized, voter);
- ++unknown_here;
- continue;
- } else if (!cert || cert->expires < now) {
- smartlist_add(need_certs_from, voter);
- ++missing_key_here;
- if (authority_cert_dl_looks_uncertain(sig->identity_digest))
- ++dl_failed_key_here;
- continue;
- }
- if (networkstatus_check_document_signature(consensus, sig, cert) < 0) {
- smartlist_add(need_certs_from, voter);
- ++missing_key_here;
- if (authority_cert_dl_looks_uncertain(sig->identity_digest))
- ++dl_failed_key_here;
- continue;
- }
- }
- if (sig->good_signature)
- ++good_here;
- else if (sig->bad_signature)
- ++bad_here;
- } SMARTLIST_FOREACH_END(sig);
- if (good_here) {
- ++n_good;
- smartlist_add(list_good, voter->nickname);
- } else if (bad_here) {
- ++n_bad;
- } else if (missing_key_here) {
- ++n_missing_key;
- if (dl_failed_key_here)
- ++n_dl_failed_key;
- } else if (unknown_here) {
- ++n_unknown;
- } else {
- ++n_no_signature;
- smartlist_add(list_no_signature, voter->nickname);
- }
- } SMARTLIST_FOREACH_END(voter);
- /* Now see whether we're missing any voters entirely. */
- SMARTLIST_FOREACH(router_get_trusted_dir_servers(),
- dir_server_t *, ds,
- {
- if ((ds->type & V3_DIRINFO) &&
- !networkstatus_get_voter_by_id(consensus, ds->v3_identity_digest))
- smartlist_add(missing_authorities, ds);
- });
- if (warn > 1 || (warn >= 0 &&
- (n_good + n_missing_key - n_dl_failed_key < n_required))) {
- severity = LOG_WARN;
- } else {
- severity = LOG_INFO;
- }
- if (warn >= 0) {
- SMARTLIST_FOREACH(unrecognized, networkstatus_voter_info_t *, voter,
- {
- log(severity, LD_DIR, "Consensus includes unrecognized authority "
- "'%s' at %s:%d (contact %s; identity %s)",
- voter->nickname, voter->address, (int)voter->dir_port,
- voter->contact?voter->contact:"n/a",
- hex_str(voter->identity_digest, DIGEST_LEN));
- });
- SMARTLIST_FOREACH(need_certs_from, networkstatus_voter_info_t *, voter,
- {
- log(severity, LD_DIR, "Looks like we need to download a new "
- "certificate from authority '%s' at %s:%d (contact %s; "
- "identity %s)",
- voter->nickname, voter->address, (int)voter->dir_port,
- voter->contact?voter->contact:"n/a",
- hex_str(voter->identity_digest, DIGEST_LEN));
- });
- SMARTLIST_FOREACH(missing_authorities, dir_server_t *, ds,
- {
- log(severity, LD_DIR, "Consensus does not include configured "
- "authority '%s' at %s:%d (identity %s)",
- ds->nickname, ds->address, (int)ds->dir_port,
- hex_str(ds->v3_identity_digest, DIGEST_LEN));
- });
- {
- char *joined;
- smartlist_t *sl = smartlist_new();
- char *tmp = smartlist_join_strings(list_good, " ", 0, NULL);
- smartlist_add_asprintf(sl,
- "A consensus needs %d good signatures from recognized "
- "authorities for us to accept it. This one has %d (%s).",
- n_required, n_good, tmp);
- tor_free(tmp);
- if (n_no_signature) {
- tmp = smartlist_join_strings(list_no_signature, " ", 0, NULL);
- smartlist_add_asprintf(sl,
- "%d (%s) of the authorities we know didn't sign it.",
- n_no_signature, tmp);
- tor_free(tmp);
- }
- if (n_unknown) {
- smartlist_add_asprintf(sl,
- "It has %d signatures from authorities we don't "
- "recognize.", n_unknown);
- }
- if (n_bad) {
- smartlist_add_asprintf(sl, "%d of the signatures on it didn't verify "
- "correctly.", n_bad);
- }
- if (n_missing_key) {
- smartlist_add_asprintf(sl,
- "We were unable to check %d of the signatures, "
- "because we were missing the keys.", n_missing_key);
- }
- joined = smartlist_join_strings(sl, " ", 0, NULL);
- log(severity, LD_DIR, "%s", joined);
- tor_free(joined);
- SMARTLIST_FOREACH(sl, char *, c, tor_free(c));
- smartlist_free(sl);
- }
- }
- smartlist_free(list_good);
- smartlist_free(list_no_signature);
- smartlist_free(unrecognized);
- smartlist_free(need_certs_from);
- smartlist_free(missing_authorities);
- if (n_good == n_v3_authorities)
- return 1;
- else if (n_good >= n_required)
- return 0;
- else if (n_good + n_missing_key >= n_required)
- return -1;
- else
- return -2;
- }
- /** Helper: return a newly allocated string containing the name of the filename
- * where we plan to cache the network status with the given identity digest. */
- char *
- networkstatus_get_cache_filename(const char *identity_digest)
- {
- char fp[HEX_DIGEST_LEN+1];
- base16_encode(fp, HEX_DIGEST_LEN+1, identity_digest, DIGEST_LEN);
- return get_datadir_fname2("cached-status", fp);
- }
- /** Helper for smartlist_sort: Compare two networkstatus objects by
- * publication date. */
- static int
- compare_networkstatus_v2_published_on_(const void **_a, const void **_b)
- {
- const networkstatus_v2_t *a = *_a, *b = *_b;
- if (a->published_on < b->published_on)
- return -1;
- else if (a->published_on > b->published_on)
- return 1;
- else
- return 0;
- }
- /** Add the parsed v2 networkstatus in <b>ns</b> (with original document in
- * <b>s</b>) to the disk cache (and the in-memory directory server cache) as
- * appropriate. */
- static int
- add_networkstatus_to_cache(const char *s,
- v2_networkstatus_source_t source,
- networkstatus_v2_t *ns)
- {
- if (source != NS_FROM_CACHE) {
- char *fn = networkstatus_get_cache_filename(ns->identity_digest);
- if (write_str_to_file(fn, s, 0)<0) {
- log_notice(LD_FS, "Couldn't write cached network status to \"%s\"", fn);
- }
- tor_free(fn);
- }
- if (directory_caches_v2_dir_info(get_options()))
- dirserv_set_cached_networkstatus_v2(s,
- ns->identity_digest,
- ns->published_on);
- return 0;
- }
- /** How far in the future do we allow a network-status to get before removing
- * it? (seconds) */
- #define NETWORKSTATUS_ALLOW_SKEW (24*60*60)
- /** Given a string <b>s</b> containing a network status that we received at
- * <b>arrived_at</b> from <b>source</b>, try to parse it, see if we want to
- * store it, and put it into our cache as necessary.
- *
- * If <b>source</b> is NS_FROM_DIR or NS_FROM_CACHE, do not replace our
- * own networkstatus_t (if we're an authoritative directory server).
- *
- * If <b>source</b> is NS_FROM_CACHE, do not write our networkstatus_t to the
- * cache.
- *
- * If <b>requested_fingerprints</b> is provided, it must contain a list of
- * uppercased identity fingerprints. Do not update any networkstatus whose
- * fingerprint is not on the list; after updating a networkstatus, remove its
- * fingerprint from the list.
- *
- * Return 0 on success, -1 on failure.
- *
- * Callers should make sure that routers_update_all_from_networkstatus() is
- * invoked after this function succeeds.
- */
- int
- router_set_networkstatus_v2(const char *s, time_t arrived_at,
- v2_networkstatus_source_t source,
- smartlist_t *requested_fingerprints)
- {
- networkstatus_v2_t *ns;
- int i, found;
- time_t now;
- int skewed = 0;
- dir_server_t *trusted_dir = NULL;
- const char *source_desc = NULL;
- char fp[HEX_DIGEST_LEN+1];
- char published[ISO_TIME_LEN+1];
- if (!directory_caches_v2_dir_info(get_options()))
- return 0; /* Don't bother storing it. */
- ns = networkstatus_v2_parse_from_string(s);
- if (!ns) {
- log_warn(LD_DIR, "Couldn't parse network status.");
- return -1;
- }
- base16_encode(fp, HEX_DIGEST_LEN+1, ns->identity_digest, DIGEST_LEN);
- if (!(trusted_dir =
- router_get_trusteddirserver_by_digest(ns->identity_digest)) ||
- !(trusted_dir->type & V2_DIRINFO)) {
- log_info(LD_DIR, "Network status was signed, but not by an authoritative "
- "directory we recognize.");
- source_desc = fp;
- } else {
- source_desc = trusted_dir->description;
- }
- now = time(NULL);
- if (arrived_at > now)
- arrived_at = now;
- ns->received_on = arrived_at;
- format_iso_time(published, ns->published_on);
- if (ns->published_on > now + NETWORKSTATUS_ALLOW_SKEW) {
- char dbuf[64];
- long delta = now - ns->published_on;
- format_time_interval(dbuf, sizeof(dbuf), delta);
- log_warn(LD_GENERAL, "Network status from %s was published %s in the "
- "future (%s UTC). Check your time and date settings! "
- "Not caching.",
- source_desc, dbuf, published);
- control_event_general_status(LOG_WARN,
- "CLOCK_SKEW MIN_SKEW=%ld SOURCE=NETWORKSTATUS:%s:%d",
- delta, ns->source_address, ns->source_dirport);
- skewed = 1;
- }
- if (!networkstatus_v2_list)
- networkstatus_v2_list = smartlist_new();
- if ( (source == NS_FROM_DIR_BY_FP || source == NS_FROM_DIR_ALL) &&
- router_digest_is_me(ns->identity_digest)) {
- /* Don't replace our own networkstatus when we get it from somebody else.*/
- networkstatus_v2_free(ns);
- return 0;
- }
- if (requested_fingerprints) {
- if (smartlist_string_isin(requested_fingerprints, fp)) {
- smartlist_string_remove(requested_fingerprints, fp);
- } else {
- if (source != NS_FROM_DIR_ALL) {
- char *requested =
- smartlist_join_strings(requested_fingerprints," ",0,NULL);
- log_warn(LD_DIR,
- "We received a network status with a fingerprint (%s) that we "
- "never requested. (We asked for: %s.) Dropping.",
- fp, requested);
- tor_free(requested);
- return 0;
- }
- }
- }
- if (!trusted_dir) {
- if (!skewed) {
- /* We got a non-trusted networkstatus, and we're a directory cache.
- * This means that we asked an authority, and it told us about another
- * authority we didn't recognize. */
- log_info(LD_DIR,
- "We do not recognize authority (%s) but we are willing "
- "to cache it.", fp);
- add_networkstatus_to_cache(s, source, ns);
- networkstatus_v2_free(ns);
- }
- return 0;
- }
- found = 0;
- for (i=0; i < smartlist_len(networkstatus_v2_list); ++i) {
- networkstatus_v2_t *old_ns = smartlist_get(networkstatus_v2_list, i);
- if (tor_memeq(old_ns->identity_digest, ns->identity_digest, DIGEST_LEN)) {
- if (tor_memeq(old_ns->networkstatus_digest,
- ns->networkstatus_digest, DIGEST_LEN)) {
- /* Same one we had before. */
- networkstatus_v2_free(ns);
- tor_assert(trusted_dir);
- log_info(LD_DIR,
- "Not replacing network-status from %s (published %s); "
- "we already have it.",
- trusted_dir->description, published);
- if (old_ns->received_on < arrived_at) {
- if (source != NS_FROM_CACHE) {
- char *fn;
- fn = networkstatus_get_cache_filename(old_ns->identity_digest);
- /* We use mtime to tell when it arrived, so update that. */
- touch_file(fn);
- tor_free(fn);
- }
- old_ns->received_on = arrived_at;
- }
- download_status_failed(&trusted_dir->v2_ns_dl_status, 0);
- return 0;
- } else if (old_ns->published_on >= ns->published_on) {
- char old_published[ISO_TIME_LEN+1];
- format_iso_time(old_published, old_ns->published_on);
- tor_assert(trusted_dir);
- log_info(LD_DIR,
- "Not replacing network-status from %s (published %s);"
- " we have a newer one (published %s) for this authority.",
- trusted_dir->description, published,
- old_published);
- networkstatus_v2_free(ns);
- download_status_failed(&trusted_dir->v2_ns_dl_status, 0);
- return 0;
- } else {
- networkstatus_v2_free(old_ns);
- smartlist_set(networkstatus_v2_list, i, ns);
- found = 1;
- break;
- }
- }
- }
- if (source != NS_FROM_CACHE && trusted_dir) {
- download_status_reset(&trusted_dir->v2_ns_dl_status);
- }
- if (!found)
- smartlist_add(networkstatus_v2_list, ns);
- /** Retain any routerinfo mentioned in a V2 networkstatus for at least this
- * long. */
- #define V2_NETWORKSTATUS_ROUTER_LIFETIME (3*60*60)
- {
- time_t live_until = ns->published_on + V2_NETWORKSTATUS_ROUTER_LIFETIME;
- SMARTLIST_FOREACH_BEGIN(ns->entries, routerstatus_t *, rs) {
- signed_descriptor_t *sd =
- router_get_by_descriptor_digest(rs->descriptor_digest);
- if (sd) {
- if (sd->last_listed_as_valid_until < live_until)
- sd->last_listed_as_valid_until = live_until;
- } else {
- rs->need_to_mirror = 1;
- }
- } SMARTLIST_FOREACH_END(rs);
- }
- log_info(LD_DIR, "Setting networkstatus %s %s (published %s)",
- source == NS_FROM_CACHE?"cached from":
- ((source == NS_FROM_DIR_BY_FP || source == NS_FROM_DIR_ALL) ?
- "downloaded from":"generated for"),
- trusted_dir->description, published);
- networkstatus_v2_list_has_changed = 1;
- smartlist_sort(networkstatus_v2_list,
- compare_networkstatus_v2_published_on_);
- if (!skewed)
- add_networkstatus_to_cache(s, source, ns);
- return 0;
- }
- /** Remove all very-old network_status_t objects from memory and from the
- * disk cache. */
- void
- networkstatus_v2_list_clean(time_t now)
- {
- int i;
- if (!networkstatus_v2_list)
- return;
- for (i = 0; i < smartlist_len(networkstatus_v2_list); ++i) {
- networkstatus_v2_t *ns = smartlist_get(networkstatus_v2_list, i);
- char *fname = NULL;
- if (ns->published_on + MAX_NETWORKSTATUS_AGE > now)
- continue;
- /* Okay, this one is too old. Remove it from the list, and delete it
- * from the cache. */
- smartlist_del(networkstatus_v2_list, i--);
- fname = networkstatus_get_cache_filename(ns->identity_digest);
- if (file_status(fname) == FN_FILE) {
- log_info(LD_DIR, "Removing too-old networkstatus in %s", fname);
- unlink(fname);
- }
- tor_free(fname);
- if (directory_caches_v2_dir_info(get_options())) {
- dirserv_set_cached_networkstatus_v2(NULL, ns->identity_digest, 0);
- }
- networkstatus_v2_free(ns);
- }
- /* And now go through the directory cache for any cached untrusted
- * networkstatuses and other network info. */
- dirserv_clear_old_networkstatuses(now - MAX_NETWORKSTATUS_AGE);
- dirserv_clear_old_v1_info(now);
- }
- /** Helper for bsearching a list of routerstatus_t pointers: compare a
- * digest in the key to the identity digest of a routerstatus_t. */
- int
- compare_digest_to_routerstatus_entry(const void *_key, const void **_member)
- {
- const char *key = _key;
- const routerstatus_t *rs = *_member;
- return tor_memcmp(key, rs->identity_digest, DIGEST_LEN);
- }
- /** As networkstatus_v2_find_entry, but do not return a const pointer */
- routerstatus_t *
- networkstatus_v2_find_mutable_entry(networkstatus_v2_t *ns, const char *digest)
- {
- return smartlist_bsearch(ns->entries, digest,
- compare_digest_to_routerstatus_entry);
- }
- /** Return the entry in <b>ns</b> for the identity digest <b>digest</b>, or
- * NULL if none was found. */
- const routerstatus_t *
- networkstatus_v2_find_entry(networkstatus_v2_t *ns, const char *digest)
- {
- return networkstatus_v2_find_mutable_entry(ns, digest);
- }
- /** As networkstatus_find_entry, but do not return a const pointer */
- routerstatus_t *
- networkstatus_vote_find_mutable_entry(networkstatus_t *ns, const char *digest)
- {
- return smartlist_bsearch(ns->routerstatus_list, digest,
- compare_digest_to_routerstatus_entry);
- }
- /** Return the entry in <b>ns</b> for the identity digest <b>digest</b>, or
- * NULL if none was found. */
- const routerstatus_t *
- networkstatus_vote_find_entry(networkstatus_t *ns, const char *digest)
- {
- return networkstatus_vote_find_mutable_entry(ns, digest);
- }
- /*XXXX MOVE make this static once functions are moved into this file. */
- /** Search the routerstatuses in <b>ns</b> for one whose identity digest is
- * <b>digest</b>. Return value and set *<b>found_out</b> as for
- * smartlist_bsearch_idx(). */
- int
- networkstatus_vote_find_entry_idx(networkstatus_t *ns,
- const char *digest, int *found_out)
- {
- return smartlist_bsearch_idx(ns->routerstatus_list, digest,
- compare_digest_to_routerstatus_entry,
- found_out);
- }
- /** Return a list of the v2 networkstatus documents. */
- const smartlist_t *
- networkstatus_get_v2_list(void)
- {
- if (!networkstatus_v2_list)
- networkstatus_v2_list = smartlist_new();
- return networkstatus_v2_list;
- }
- /** As router_get_consensus_status_by_descriptor_digest, but does not return
- * a const pointer. */
- routerstatus_t *
- router_get_mutable_consensus_status_by_descriptor_digest(
- networkstatus_t *consensus,
- const char *digest)
- {
- if (!consensus)
- consensus = current_consensus;
- if (!consensus)
- return NULL;
- if (!consensus->desc_digest_map) {
- digestmap_t *m = consensus->desc_digest_map = digestmap_new();
- SMARTLIST_FOREACH(consensus->routerstatus_list,
- routerstatus_t *, rs,
- {
- digestmap_set(m, rs->descriptor_digest, rs);
- });
- }
- return digestmap_get(consensus->desc_digest_map, digest);
- }
- /** Return the consensus view of the status of the router whose current
- * <i>descriptor</i> digest in <b>consensus</b> is <b>digest</b>, or NULL if
- * no such router is known. */
- const routerstatus_t *
- router_get_consensus_status_by_descriptor_digest(networkstatus_t *consensus,
- const char *digest)
- {
- return router_get_mutable_consensus_status_by_descriptor_digest(
- consensus, digest);
- }
- /** Given the digest of a router descriptor, return its current download
- * status, or NULL if the digest is unrecognized. */
- download_status_t *
- router_get_dl_status_by_descriptor_digest(const char *d)
- {
- routerstatus_t *rs;
- if (!current_ns_consensus)
- return NULL;
- if ((rs = router_get_mutable_consensus_status_by_descriptor_digest(
- current_ns_consensus, d)))
- return &rs->dl_status;
- if (v2_download_status_map)
- return digestmap_get(v2_download_status_map, d);
- return NULL;
- }
- /** As router_get_consensus_status_by_id, but do not return a const pointer */
- routerstatus_t *
- router_get_mutable_consensus_status_by_id(const char *digest)
- {
- if (!current_consensus)
- return NULL;
- return smartlist_bsearch(current_consensus->routerstatus_list, digest,
- compare_digest_to_routerstatus_entry);
- }
- /** Return the consensus view of the status of the router whose identity
- * digest is <b>digest</b>, or NULL if we don't know about any such router. */
- const routerstatus_t *
- router_get_consensus_status_by_id(const char *digest)
- {
- return router_get_mutable_consensus_status_by_id(digest);
- }
- /** Given a nickname (possibly verbose, possibly a hexadecimal digest), return
- * the corresponding routerstatus_t, or NULL if none exists. Warn the
- * user if <b>warn_if_unnamed</b> is set, and they have specified a router by
- * nickname, but the Named flag isn't set for that router. */
- const routerstatus_t *
- router_get_consensus_status_by_nickname(const char *nickname,
- int warn_if_unnamed)
- {
- const node_t *node = node_get_by_nickname(nickname, warn_if_unnamed);
- if (node)
- return node->rs;
- else
- return NULL;
- }
- /** Return the identity digest that's mapped to officially by
- * <b>nickname</b>. */
- const char *
- networkstatus_get_router_digest_by_nickname(const char *nickname)
- {
- if (!named_server_map)
- return NULL;
- return strmap_get_lc(named_server_map, nickname);
- }
- /** Return true iff <b>nickname</b> is disallowed from being the nickname
- * of any server. */
- int
- networkstatus_nickname_is_unnamed(const char *nickname)
- {
- if (!unnamed_server_map)
- return 0;
- return strmap_get_lc(unnamed_server_map, nickname) != NULL;
- }
- /** How frequently do directory authorities re-download fresh networkstatus
- * documents? */
- #define AUTHORITY_NS_CACHE_INTERVAL (10*60)
- /** How frequently do non-authority directory caches re-download fresh
- * networkstatus documents? */
- #define NONAUTHORITY_NS_CACHE_INTERVAL (60*60)
- /** We are a directory server, and so cache network_status documents.
- * Initiate downloads as needed to update them. For v2 authorities,
- * this means asking each trusted directory for its network-status.
- * For caches, this means asking a random v2 authority for all
- * network-statuses.
- */
- static void
- update_v2_networkstatus_cache_downloads(time_t now)
- {
- int authority = authdir_mode_v2(get_options());
- int interval =
- authority ? AUTHORITY_NS_CACHE_INTERVAL : NONAUTHORITY_NS_CACHE_INTERVAL;
- const smartlist_t *trusted_dir_servers = router_get_trusted_dir_servers();
- if (last_networkstatus_download_attempted + interval >= now)
- return;
- last_networkstatus_download_attempted = now;
- if (authority) {
- /* An authority launches a separate connection for everybody. */
- SMARTLIST_FOREACH_BEGIN(trusted_dir_servers, dir_server_t *, ds)
- {
- char resource[HEX_DIGEST_LEN+6]; /* fp/hexdigit.z\0 */
- tor_addr_t addr;
- if (!(ds->type & V2_DIRINFO))
- continue;
- if (router_digest_is_me(ds->digest))
- continue;
- tor_addr_from_ipv4h(&addr, ds->addr);
- /* Is this quite sensible with IPv6 or multiple addresses? */
- if (connection_get_by_type_addr_port_purpose(
- CONN_TYPE_DIR, &addr, ds->dir_port,
- DIR_PURPOSE_FETCH_V2_NETWORKSTATUS)) {
- /* XXX the above dir_port won't be accurate if we're
- * doing a tunneled conn. In that case it should be or_port.
- * How to guess from here? Maybe make the function less general
- * and have it know that it's looking for dir conns. -RD */
- /* Only directory caches download v2 networkstatuses, and they
- * don't use tunneled connections. I think it's okay to ignore
- * this. */
- continue;
- }
- strlcpy(resource, "fp/", sizeof(resource));
- base16_encode(resource+3, sizeof(resource)-3, ds->digest, DIGEST_LEN);
- strlcat(resource, ".z", sizeof(resource));
- directory_initiate_command_routerstatus(
- &ds->fake_status, DIR_PURPOSE_FETCH_V2_NETWORKSTATUS,
- ROUTER_PURPOSE_GENERAL,
- DIRIND_ONEHOP,
- resource,
- NULL, 0 /* No payload. */,
- 0 /* No I-M-S. */);
- }
- SMARTLIST_FOREACH_END(ds);
- } else {
- /* A non-authority cache launches one connection to a random authority. */
- /* (Check whether we're currently fetching network-status objects.) */
- if (!connection_get_by_type_purpose(CONN_TYPE_DIR,
- DIR_PURPOSE_FETCH_V2_NETWORKSTATUS))
- directory_get_from_dirserver(DIR_PURPOSE_FETCH_V2_NETWORKSTATUS,
- ROUTER_PURPOSE_GENERAL, "all.z",
- PDS_RETRY_IF_NO_SERVERS);
- }
- }
- /** Return true iff, given the options listed in <b>options</b>, <b>flavor</b>
- * is the flavor of a consensus networkstatus that we would like to fetch. */
- static int
- we_want_to_fetch_flavor(const or_options_t *options, int flavor)
- {
- if (flavor < 0 || flavor > N_CONSENSUS_FLAVORS) {
- /* This flavor is crazy; we don't want it */
- /*XXXX handle unrecognized flavors later */
- return 0;
- }
- if (authdir_mode_v3(options) || directory_caches_dir_info(options)) {
- /* We want to serve all flavors to others, regardless if we would use
- * it ourselves. */
- return 1;
- }
- if (options->FetchUselessDescriptors) {
- /* In order to get all descriptors, we need to fetch all consensuses. */
- return 1;
- }
- /* Otherwise, we want the flavor only if we want to use it to build
- * circuits. */
- return flavor == usable_consensus_flavor();
- }
- /** How many times will we try to fetch a consensus before we give up? */
- #define CONSENSUS_NETWORKSTATUS_MAX_DL_TRIES 8
- /** How long will we hang onto a possibly live consensus for which we're
- * fetching certs before we check whether there is a better one? */
- #define DELAY_WHILE_FETCHING_CERTS (20*60)
- /** If we want to download a fresh consensus, launch a new download as
- * appropriate. */
- static void
- update_consensus_networkstatus_downloads(time_t now)
- {
- int i;
- const or_options_t *options = get_options();
- for (i=0; i < N_CONSENSUS_FLAVORS; ++i) {
- /* XXXX need some way to download unknown flavors if we are caching. */
- const char *resource;
- consensus_waiting_for_certs_t *waiting;
- networkstatus_t *c;
- if (! we_want_to_fetch_flavor(options, i))
- continue;
- c = networkstatus_get_latest_consensus_by_flavor(i);
- if (! (c && c->valid_after <= now && now <= c->valid_until)) {
- /* No live consensus? Get one now!*/
- time_to_download_next_consensus[i] = now;
- }
- if (time_to_download_next_consensus[i] > now)
- return; /* Wait until the current consensus is older. */
- resource = networkstatus_get_flavor_name(i);
- if (!download_status_is_ready(&consensus_dl_status[i], now,
- CONSENSUS_NETWORKSTATUS_MAX_DL_TRIES))
- continue; /* We failed downloading a consensus too recently. */
- if (connection_dir_get_by_purpose_and_resource(
- DIR_PURPOSE_FETCH_CONSENSUS, resource))
- continue; /* There's an in-progress download.*/
- waiting = &consensus_waiting_for_certs[i];
- if (waiting->consensus) {
- /* XXXX make sure this doesn't delay sane downloads. */
- if (waiting->set_at + DELAY_WHILE_FETCHING_CERTS > now) {
- continue; /* We're still getting certs for this one. */
- } else {
- if (!waiting->dl_failed) {
- download_status_failed(&consensus_dl_status[i], 0);
- waiting->dl_failed=1;
- }
- }
- }
- log_info(LD_DIR, "Launching %s networkstatus consensus download.",
- networkstatus_get_flavor_name(i));
- directory_get_from_dirserver(DIR_PURPOSE_FETCH_CONSENSUS,
- ROUTER_PURPOSE_GENERAL, resource,
- PDS_RETRY_IF_NO_SERVERS);
- }
- }
- /** Called when an attempt to download a consensus fails: note that the
- * failure occurred, and possibly retry. */
- void
- networkstatus_consensus_download_failed(int status_code, const char *flavname)
- {
- int flav = networkstatus_parse_flavor_name(flavname);
- if (flav >= 0) {
- tor_assert(flav < N_CONSENSUS_FLAVORS);
- /* XXXX handle unrecognized flavors */
- download_status_failed(&consensus_dl_status[flav], status_code);
- /* Retry immediately, if appropriate. */
- update_consensus_networkstatus_downloads(time(NULL));
- }
- }
- /** How long do we (as a cache) wait after a consensus becomes non-fresh
- * before trying to fetch another? */
- #define CONSENSUS_MIN_SECONDS_BEFORE_CACHING 120
- /** Update the time at which we'll consider replacing the current
- * consensus of flavor <b>flav</b> */
- static void
- update_consensus_networkstatus_fetch_time_impl(time_t now, int flav)
- {
- const or_options_t *options = get_options();
- networkstatus_t *c = networkstatus_get_latest_consensus_by_flavor(flav);
- const char *flavor = networkstatus_get_flavor_name(flav);
- if (! we_want_to_fetch_flavor(get_options(), flav))
- return;
- if (c && c->valid_after <= now && now <= c->valid_until) {
- long dl_interval;
- long interval = c->fresh_until - c->valid_after;
- long min_sec_before_caching = CONSENSUS_MIN_SECONDS_BEFORE_CACHING;
- time_t start;
- if (min_sec_before_caching > interval/16) {
- /* Usually we allow 2-minutes slop factor in case clocks get
- desynchronized a little. If we're on a private network with
- a crazy-fast voting interval, though, 2 minutes may be too
- much. */
- min_sec_before_caching = interval/16;
- }
- if (directory_fetches_dir_info_early(options)) {
- /* We want to cache the next one at some point after this one
- * is no longer fresh... */
- start = c->fresh_until + min_sec_before_caching;
- /* Some clients may need the consensus sooner than others. */
- if (options->FetchDirInfoExtraEarly || authdir_mode_v3(options)) {
- dl_interval = 60;
- if (min_sec_before_caching + dl_interval > interval)
- dl_interval = interval/2;
- } else {
- /* But only in the first half-interval after that. */
- dl_interval = interval/2;
- }
- } else {
- /* We're an ordinary client or a bridge. Give all the caches enough
- * time to download the consensus. */
- start = c->fresh_until + (interval*3)/4;
- /* But download the next one well before this one is expired. */
- dl_interval = ((c->valid_until - start) * 7 )/ 8;
- /* If we're a bridge user, make use of the numbers we just computed
- * to choose the rest of the interval *after* them. */
- if (directory_fetches_dir_info_later(options)) {
- /* Give all the *clients* enough time to download the consensus. */
- start = start + dl_interval + min_sec_before_caching;
- /* But try to get it before ours actually expires. */
- dl_interval = (c->valid_until - start) - min_sec_before_caching;
- }
- }
- if (dl_interval < 1)
- dl_interval = 1;
- /* We must not try to replace c while it's still fresh: */
- tor_assert(c->fresh_until < start);
- /* We must download the next one before c is invalid: */
- tor_assert(start+dl_interval < c->valid_until);
- time_to_download_next_consensus[flav] =
- start + crypto_rand_int((int)dl_interval);
- {
- char tbuf1[ISO_TIME_LEN+1];
- char tbuf2[ISO_TIME_LEN+1];
- char tbuf3[ISO_TIME_LEN+1];
- format_local_iso_time(tbuf1, c->fresh_until);
- format_local_iso_time(tbuf2, c->valid_until);
- format_local_iso_time(tbuf3, time_to_download_next_consensus[flav]);
- log_info(LD_DIR, "Live %s consensus %s the most recent until %s and "
- "will expire at %s; fetching the next one at %s.",
- flavor, (c->fresh_until > now) ? "will be" : "was",
- tbuf1, tbuf2, tbuf3);
- }
- } else {
- time_to_download_next_consensus[flav] = now;
- log_info(LD_DIR, "No live %s consensus; we should fetch one immediately.",
- flavor);
- }
- }
- /** Update the time at which we'll consider replacing the current
- * consensus of flavor 'flavor' */
- void
- update_consensus_networkstatus_fetch_time(time_t now)
- {
- int i;
- for (i = 0; i < N_CONSENSUS_FLAVORS; ++i) {
- if (we_want_to_fetch_flavor(get_options(), i))
- update_consensus_networkstatus_fetch_time_impl(now, i);
- }
- }
- /** Return 1 if there's a reason we shouldn't try any directory
- * fetches yet (e.g. we demand bridges and none are yet known).
- * Else return 0. */
- int
- should_delay_dir_fetches(const or_options_t *options)
- {
- if (options->UseBridges && !any_bridge_descriptors_known()) {
- log_info(LD_DIR, "delaying dir fetches (no running bridges known)");
- return 1;
- }
- return 0;
- }
- /** Launch requests for networkstatus documents and authority certificates as
- * appropriate. */
- void
- update_networkstatus_downloads(time_t now)
- {
- const or_options_t *options = get_options();
- if (should_delay_dir_fetches(options))
- return;
- if (authdir_mode_any_main(options) || options->FetchV2Networkstatus)
- update_v2_networkstatus_cache_downloads(now);
- update_consensus_networkstatus_downloads(now);
- update_certificate_downloads(now);
- }
- /** Launch requests as appropriate for missing directory authority
- * certificates. */
- void
- update_certificate_downloads(time_t now)
- {
- int i;
- for (i = 0; i < N_CONSENSUS_FLAVORS; ++i) {
- if (consensus_waiting_for_certs[i].consensus)
- authority_certs_fetch_missing(consensus_waiting_for_certs[i].consensus,
- now);
- }
- if (current_ns_consensus)
- authority_certs_fetch_missing(current_ns_consensus, now);
- if (current_md_consensus)
- authority_certs_fetch_missing(current_md_consensus, now);
- }
- /** Return 1 if we have a consensus but we don't have enough certificates
- * to start using it yet. */
- int
- consensus_is_waiting_for_certs(void)
- {
- return consensus_waiting_for_certs[usable_consensus_flavor()].consensus
- ? 1 : 0;
- }
- /** Return the network status with a given identity digest. */
- networkstatus_v2_t *
- networkstatus_v2_get_by_digest(const char *digest)
- {
- SMARTLIST_FOREACH(networkstatus_v2_list, networkstatus_v2_t *, ns,
- {
- if (tor_memeq(ns->identity_digest, digest, DIGEST_LEN))
- return ns;
- });
- return NULL;
- }
- /** Return the most recent consensus that we have downloaded, or NULL if we
- * don't have one. */
- networkstatus_t *
- networkstatus_get_latest_consensus(void)
- {
- return current_consensus;
- }
- /** Return the latest consensus we have whose flavor matches <b>f</b>, or NULL
- * if we don't have one. */
- networkstatus_t *
- networkstatus_get_latest_consensus_by_flavor(consensus_flavor_t f)
- {
- if (f == FLAV_NS)
- return current_ns_consensus;
- else if (f == FLAV_MICRODESC)
- return current_md_consensus;
- else {
- tor_assert(0);
- return NULL;
- }
- }
- /** Return the most recent consensus that we have downloaded, or NULL if it is
- * no longer live. */
- networkstatus_t *
- networkstatus_get_live_consensus(time_t now)
- {
- if (current_consensus &&
- current_consensus->valid_after <= now &&
- now <= current_consensus->valid_until)
- return current_consensus;
- else
- return NULL;
- }
- /* XXXX remove this in favor of get_live_consensus. But actually,
- * leave something like it for bridge users, who need to not totally
- * lose if they spend a while fetching a new consensus. */
- /** As networkstatus_get_live_consensus(), but is way more tolerant of expired
- * consensuses. */
- networkstatus_t *
- networkstatus_get_reasonably_live_consensus(time_t now, int flavor)
- {
- #define REASONABLY_LIVE_TIME (24*60*60)
- networkstatus_t *consensus =
- networkstatus_get_latest_consensus_by_flavor(flavor);
- if (consensus &&
- consensus->valid_after <= now &&
- now <= consensus->valid_until+REASONABLY_LIVE_TIME)
- return consensus;
- else
- return NULL;
- }
- /** Given two router status entries for the same router identity, return 1 if
- * if the contents have changed between them. Otherwise, return 0. */
- static int
- routerstatus_has_changed(const routerstatus_t *a, const routerstatus_t *b)
- {
- tor_assert(tor_memeq(a->identity_digest, b->identity_digest, DIGEST_LEN));
- return strcmp(a->nickname, b->nickname) ||
- fast_memneq(a->descriptor_digest, b->descriptor_digest, DIGEST_LEN) ||
- a->addr != b->addr ||
- a->or_port != b->or_port ||
- a->dir_port != b->dir_port ||
- a->is_authority != b->is_authority ||
- a->is_exit != b->is_exit ||
- a->is_stable != b->is_stable ||
- a->is_fast != b->is_fast ||
- a->is_flagged_running != b->is_flagged_running ||
- a->is_named != b->is_named ||
- a->is_unnamed != b->is_unnamed ||
- a->is_valid != b->is_valid ||
- a->is_v2_dir != b->is_v2_dir ||
- a->is_possible_guard != b->is_possible_guard ||
- a->is_bad_exit != b->is_bad_exit ||
- a->is_bad_directory != b->is_bad_directory ||
- a->is_hs_dir != b->is_hs_dir ||
- a->version_known != b->version_known;
- }
- /** Notify controllers of any router status entries that changed between
- * <b>old_c</b> and <b>new_c</b>. */
- static void
- notify_control_networkstatus_changed(const networkstatus_t *old_c,
- const networkstatus_t *new_c)
- {
- smartlist_t *changed;
- if (old_c == new_c)
- return;
- /* tell the controller exactly which relays are still listed, as well
- * as what they're listed as */
- control_event_newconsensus(new_c);
- if (!control_event_is_interesting(EVENT_NS))
- return;
- if (!old_c) {
- control_event_networkstatus_changed(new_c->routerstatus_list);
- return;
- }
- changed = smartlist_new();
- SMARTLIST_FOREACH_JOIN(
- old_c->routerstatus_list, const routerstatus_t *, rs_old,
- new_c->routerstatus_list, const routerstatus_t *, rs_new,
- tor_memcmp(rs_old->identity_digest,
- rs_new->identity_digest, DIGEST_LEN),
- smartlist_add(changed, (void*) rs_new)) {
- if (routerstatus_has_changed(rs_old, rs_new))
- smartlist_add(changed, (void*)rs_new);
- } SMARTLIST_FOREACH_JOIN_END(rs_old, rs_new);
- control_event_networkstatus_changed(changed);
- smartlist_free(changed);
- }
- /** Copy all the ancillary information (like router download status and so on)
- * from <b>old_c</b> to <b>new_c</b>. */
- static void
- networkstatus_copy_old_consensus_info(networkstatus_t *new_c,
- const networkstatus_t *old_c)
- {
- if (old_c == new_c)
- return;
- if (!old_c || !smartlist_len(old_c->routerstatus_list))
- return;
- SMARTLIST_FOREACH_JOIN(old_c->routerstatus_list, routerstatus_t *, rs_old,
- new_c->routerstatus_list, routerstatus_t *, rs_new,
- tor_memcmp(rs_old->identity_digest,
- rs_new->identity_digest, DIGEST_LEN),
- STMT_NIL) {
- /* Okay, so we're looking at the same identity. */
- rs_new->last_dir_503_at = rs_old->last_dir_503_at;
- if (tor_memeq(rs_old->descriptor_digest, rs_new->descriptor_digest,
- DIGEST_LEN)) {
- /* And the same descriptor too! */
- memcpy(&rs_new->dl_status, &rs_old->dl_status,sizeof(download_status_t));
- }
- } SMARTLIST_FOREACH_JOIN_END(rs_old, rs_new);
- }
- /** Try to replace the current cached v3 networkstatus with the one in
- * <b>consensus</b>. If we don't have enough certificates to validate it,
- * store it in consensus_waiting_for_certs and launch a certificate fetch.
- *
- * If flags & NSSET_FROM_CACHE, this networkstatus has come from the disk
- * cache. If flags & NSSET_WAS_WAITING_FOR_CERTS, this networkstatus was
- * already received, but we were waiting for certificates on it. If flags &
- * NSSET_DONT_DOWNLOAD_CERTS, do not launch certificate downloads as needed.
- * If flags & NSSET_ACCEPT_OBSOLETE, then we should be willing to take this
- * consensus, even if it comes from many days in the past.
- *
- * Return 0 on success, <0 on failure. On failure, caller should increment
- * the failure count as appropriate.
- *
- * We return -1 for mild failures that don't need to be reported to the
- * user, and -2 for more serious problems.
- */
- int
- networkstatus_set_current_consensus(const char *consensus,
- const char *flavor,
- unsigned flags)
- {
- networkstatus_t *c=NULL;
- int r, result = -1;
- time_t now = time(NULL);
- const or_options_t *options = get_options();
- char *unverified_fname = NULL, *consensus_fname = NULL;
- int flav = networkstatus_parse_flavor_name(flavor);
- const unsigned from_cache = flags & NSSET_FROM_CACHE;
- const unsigned was_waiting_for_certs = flags & NSSET_WAS_WAITING_FOR_CERTS;
- const unsigned dl_certs = !(flags & NSSET_DONT_DOWNLOAD_CERTS);
- const unsigned accept_obsolete = flags & NSSET_ACCEPT_OBSOLETE;
- const unsigned require_flavor = flags & NSSET_REQUIRE_FLAVOR;
- const digests_t *current_digests = NULL;
- consensus_waiting_for_certs_t *waiting = NULL;
- time_t current_valid_after = 0;
- int free_consensus = 1; /* Free 'c' at the end of the function */
- int old_ewma_enabled;
- if (flav < 0) {
- /* XXXX we don't handle unrecognized flavors yet. */
- log_warn(LD_BUG, "Unrecognized consensus flavor %s", flavor);
- return -2;
- }
- /* Make sure it's parseable. */
- c = networkstatus_parse_vote_from_string(consensus, NULL, NS_TYPE_CONSENSUS);
- if (!c) {
- log_warn(LD_DIR, "Unable to parse networkstatus consensus");
- result = -2;
- goto done;
- }
- if ((int)c->flavor != flav) {
- /* This wasn't the flavor we thought we were getting. */
- if (require_flavor) {
- log_warn(LD_DIR, "Got consensus with unexpected flavor %s (wanted %s)",
- networkstatus_get_flavor_name(c->flavor), flavor);
- goto done;
- }
- flav = c->flavor;
- flavor = networkstatus_get_flavor_name(flav);
- }
- if (flav != usable_consensus_flavor() &&
- !directory_caches_dir_info(options)) {
- /* This consensus is totally boring to us: we won't use it, and we won't
- * serve it. Drop it. */
- goto done;
- }
- if (from_cache && !accept_obsolete &&
- c->valid_until < now-OLD_ROUTER_DESC_MAX_AGE) {
- log_info(LD_DIR, "Loaded an expired consensus. Discarding.");
- goto done;
- }
- if (!strcmp(flavor, "ns")) {
- consensus_fname = get_datadir_fname("cached-consensus");
- unverified_fname = get_datadir_fname("unverified-consensus");
- if (current_ns_consensus) {
- current_digests = ¤t_ns_consensus->digests;
- current_valid_after = current_ns_consensus->valid_after;
- }
- } else if (!strcmp(flavor, "microdesc")) {
- consensus_fname = get_datadir_fname("cached-microdesc-consensus");
- unverified_fname = get_datadir_fname("unverified-microdesc-consensus");
- if (current_md_consensus) {
- current_digests = ¤t_md_consensus->digests;
- current_valid_after = current_md_consensus->valid_after;
- }
- } else {
- cached_dir_t *cur;
- char buf[128];
- tor_snprintf(buf, sizeof(buf), "cached-%s-consensus", flavor);
- consensus_fname = get_datadir_fname(buf);
- tor_snprintf(buf, sizeof(buf), "unverified-%s-consensus", flavor);
- unverified_fname = get_datadir_fname(buf);
- cur = dirserv_get_consensus(flavor);
- if (cur) {
- current_digests = &cur->digests;
- current_valid_after = cur->published;
- }
- }
- if (current_digests &&
- tor_memeq(&c->digests, current_digests, sizeof(c->digests))) {
- /* We already have this one. That's a failure. */
- log_info(LD_DIR, "Got a %s consensus we already have", flavor);
- goto done;
- }
- if (current_valid_after && c->valid_after <= current_valid_after) {
- /* We have a newer one. There's no point in accepting this one,
- * even if it's great. */
- log_info(LD_DIR, "Got a %s consensus at least as old as the one we have",
- flavor);
- goto done;
- }
- /* Make sure it's signed enough. */
- if ((r=networkstatus_check_consensus_signature(c, 1))<0) {
- if (r == -1) {
- /* Okay, so it _might_ be signed enough if we get more certificates. */
- if (!was_waiting_for_certs) {
- log_info(LD_DIR,
- "Not enough certificates to check networkstatus consensus");
- }
- if (!current_valid_after ||
- c->valid_after > current_valid_after) {
- waiting = &consensus_waiting_for_certs[flav];
- networkstatus_vote_free(waiting->consensus);
- tor_free(waiting->body);
- waiting->consensus = c;
- free_consensus = 0;
- waiting->body = tor_strdup(consensus);
- waiting->set_at = now;
- waiting->dl_failed = 0;
- if (!from_cache) {
- write_str_to_file(unverified_fname, consensus, 0);
- }
- if (dl_certs)
- authority_certs_fetch_missing(c, now);
- /* This case is not a success or a failure until we get the certs
- * or fail to get the certs. */
- result = 0;
- } else {
- /* Even if we had enough signatures, we'd never use this as the
- * latest consensus. */
- if (was_waiting_for_certs && from_cache)
- unlink(unverified_fname);
- }
- goto done;
- } else {
- /* This can never be signed enough: Kill it. */
- if (!was_waiting_for_certs) {
- log_warn(LD_DIR, "Not enough good signatures on networkstatus "
- "consensus");
- result = -2;
- }
- if (was_waiting_for_certs && (r < -1) && from_cache)
- unlink(unverified_fname);
- goto done;
- }
- }
- if (!from_cache && flav == usable_consensus_flavor())
- control_event_client_status(LOG_NOTICE, "CONSENSUS_ARRIVED");
- /* Are we missing any certificates at all? */
- if (r != 1 && dl_certs)
- authority_certs_fetch_missing(c, now);
- if (flav == usable_consensus_flavor()) {
- notify_control_networkstatus_changed(current_consensus, c);
- }
- if (flav == FLAV_NS) {
- if (current_ns_consensus) {
- networkstatus_copy_old_consensus_info(c, current_ns_consensus);
- networkstatus_vote_free(current_ns_consensus);
- /* Defensive programming : we should set current_consensus very soon,
- * but we're about to call some stuff in the meantime, and leaving this
- * dangling pointer around has proven to be trouble. */
- current_ns_consensus = NULL;
- }
- current_ns_consensus = c;
- free_consensus = 0; /* avoid free */
- } else if (flav == FLAV_MICRODESC) {
- if (current_md_consensus) {
- networkstatus_copy_old_consensus_info(c, current_md_consensus);
- networkstatus_vote_free(current_md_consensus);
- /* more defensive programming */
- current_md_consensus = NULL;
- }
- current_md_consensus = c;
- free_consensus = 0; /* avoid free */
- }
- waiting = &consensus_waiting_for_certs[flav];
- if (waiting->consensus &&
- waiting->consensus->valid_after <= c->valid_after) {
- networkstatus_vote_free(waiting->consensus);
- waiting->consensus = NULL;
- if (consensus != waiting->body)
- tor_free(waiting->body);
- else
- waiting->body = NULL;
- waiting->set_at = 0;
- waiting->dl_failed = 0;
- unlink(unverified_fname);
- }
- /* Reset the failure count only if this consensus is actually valid. */
- if (c->valid_after <= now && now <= c->valid_until) {
- download_status_reset(&consensus_dl_status[flav]);
- } else {
- if (!from_cache)
- download_status_failed(&consensus_dl_status[flav], 0);
- }
- if (flav == usable_consensus_flavor()) {
- /* XXXXNM Microdescs: needs a non-ns variant. ???? NM*/
- update_consensus_networkstatus_fetch_time(now);
- nodelist_set_consensus(current_consensus);
- dirvote_recalculate_timing(options, now);
- routerstatus_list_update_named_server_map();
- /* Update ewma and adjust policy if needed; first cache the old value */
- old_ewma_enabled = cell_ewma_enabled();
- /* Change the cell EWMA settings */
- cell_ewma_set_scale_factor(options, networkstatus_get_latest_consensus());
- /* If we just enabled ewma, set the cmux policy on all active channels */
- if (cell_ewma_enabled() && !old_ewma_enabled) {
- channel_set_cmux_policy_everywhere(&ewma_policy);
- } else if (!cell_ewma_enabled() && old_ewma_enabled) {
- /* Turn it off everywhere */
- channel_set_cmux_policy_everywhere(NULL);
- }
- /* XXXX024 this call might be unnecessary here: can changing the
- * current consensus really alter our view of any OR's rate limits? */
- connection_or_update_token_buckets(get_connection_array(), options);
- circuit_build_times_new_consensus_params(&circ_times, current_consensus);
- }
- if (directory_caches_dir_info(options)) {
- dirserv_set_cached_consensus_networkstatus(consensus,
- flavor,
- &c->digests,
- c->valid_after);
- }
- if (!from_cache) {
- write_str_to_file(consensus_fname, consensus, 0);
- }
- /** If a consensus appears more than this many seconds before its declared
- * valid-after time, declare that our clock is skewed. */
- #define EARLY_CONSENSUS_NOTICE_SKEW 60
- if (now < c->valid_after - EARLY_CONSENSUS_NOTICE_SKEW) {
- char tbuf[ISO_TIME_LEN+1];
- char dbuf[64];
- long delta = now - c->valid_after;
- format_iso_time(tbuf, c->valid_after);
- format_time_interval(dbuf, sizeof(dbuf), delta);
- log_warn(LD_GENERAL, "Our clock is %s behind the time published in the "
- "consensus network status document (%s UTC). Tor needs an "
- "accurate clock to work correctly. Please check your time and "
- "date settings!", dbuf, tbuf);
- control_event_general_status(LOG_WARN,
- "CLOCK_SKEW MIN_SKEW=%ld SOURCE=CONSENSUS", delta);
- }
- router_dir_info_changed();
- result = 0;
- done:
- if (free_consensus)
- networkstatus_vote_free(c);
- tor_free(consensus_fname);
- tor_free(unverified_fname);
- return result;
- }
- /** Called when we have gotten more certificates: see whether we can
- * now verify a pending consensus. */
- void
- networkstatus_note_certs_arrived(void)
- {
- int i;
- for (i=0; i<N_CONSENSUS_FLAVORS; ++i) {
- consensus_waiting_for_certs_t *waiting = &consensus_waiting_for_certs[i];
- if (!waiting->consensus)
- continue;
- if (networkstatus_check_consensus_signature(waiting->consensus, 0)>=0) {
- if (!networkstatus_set_current_consensus(
- waiting->body,
- networkstatus_get_flavor_name(i),
- NSSET_WAS_WAITING_FOR_CERTS)) {
- tor_free(waiting->body);
- }
- }
- }
- }
- /** If the network-status list has changed since the last time we called this
- * function, update the status of every routerinfo from the network-status
- * list. If <b>dir_version</b> is 2, it's a v2 networkstatus that changed.
- * If <b>dir_version</b> is 3, it's a v3 consensus that changed.
- */
- void
- routers_update_all_from_networkstatus(time_t now, int dir_version)
- {
- routerlist_t *rl = router_get_routerlist();
- networkstatus_t *consensus = networkstatus_get_reasonably_live_consensus(now,
- FLAV_NS);
- if (networkstatus_v2_list_has_changed)
- download_status_map_update_from_v2_networkstatus();
- if (!consensus || dir_version < 3) /* nothing more we should do */
- return;
- /* calls router_dir_info_changed() when it's done -- more routers
- * might be up or down now, which might affect whether there's enough
- * directory info. */
- routers_update_status_from_consensus_networkstatus(rl->routers, 0);
- SMARTLIST_FOREACH(rl->routers, routerinfo_t *, ri,
- ri->cache_info.routerlist_index = ri_sl_idx);
- if (rl->old_routers)
- signed_descs_update_status_from_consensus_networkstatus(rl->old_routers);
- if (!have_warned_about_old_version) {
- int is_server = server_mode(get_options());
- version_status_t status;
- const char *recommended = is_server ?
- consensus->server_versions : consensus->client_versions;
- status = tor_version_is_obsolete(VERSION, recommended);
- if (status == VS_RECOMMENDED) {
- log_info(LD_GENERAL, "The directory authorities say my version is ok.");
- } else if (status == VS_EMPTY) {
- log_info(LD_GENERAL,
- "The directory authorities don't recommend any versions.");
- } else if (status == VS_NEW || status == VS_NEW_IN_SERIES) {
- if (!have_warned_about_new_version) {
- log_notice(LD_GENERAL, "This version of Tor (%s) is newer than any "
- "recommended version%s, according to the directory "
- "authorities. Recommended versions are: %s",
- VERSION,
- status == VS_NEW_IN_SERIES ? " in its series" : "",
- recommended);
- have_warned_about_new_version = 1;
- control_event_general_status(LOG_WARN, "DANGEROUS_VERSION "
- "CURRENT=%s REASON=%s RECOMMENDED=\"%s\"",
- VERSION, "NEW", recommended);
- }
- } else {
- log_warn(LD_GENERAL, "Please upgrade! "
- "This version of Tor (%s) is %s, according to the directory "
- "authorities. Recommended versions are: %s",
- VERSION,
- status == VS_OLD ? "obsolete" : "not recommended",
- recommended);
- have_warned_about_old_version = 1;
- control_event_general_status(LOG_WARN, "DANGEROUS_VERSION "
- "CURRENT=%s REASON=%s RECOMMENDED=\"%s\"",
- VERSION, status == VS_OLD ? "OBSOLETE" : "UNRECOMMENDED",
- recommended);
- }
- }
- }
- /** Update v2_download_status_map to contain an entry for every router
- * descriptor listed in the v2 networkstatuses. */
- static void
- download_status_map_update_from_v2_networkstatus(void)
- {
- digestmap_t *dl_status;
- if (!networkstatus_v2_list)
- return;
- if (!v2_download_status_map)
- v2_download_status_map = digestmap_new();
- dl_status = digestmap_new();
- SMARTLIST_FOREACH_BEGIN(networkstatus_v2_list, networkstatus_v2_t *, ns) {
- SMARTLIST_FOREACH_BEGIN(ns->entries, const routerstatus_t *, rs) {
- const char *d = rs->descriptor_digest;
- download_status_t *s;
- if (digestmap_get(dl_status, d))
- continue;
- if (!(s = digestmap_remove(v2_download_status_map, d))) {
- s = tor_malloc_zero(sizeof(download_status_t));
- }
- digestmap_set(dl_status, d, s);
- } SMARTLIST_FOREACH_END(rs);
- } SMARTLIST_FOREACH_END(ns);
- digestmap_free(v2_download_status_map, tor_free_);
- v2_download_status_map = dl_status;
- networkstatus_v2_list_has_changed = 0;
- }
- /** Update our view of the list of named servers from the most recently
- * retrieved networkstatus consensus. */
- static void
- routerstatus_list_update_named_server_map(void)
- {
- if (!current_consensus)
- return;
- strmap_free(named_server_map, tor_free_);
- named_server_map = strmap_new();
- strmap_free(unnamed_server_map, NULL);
- unnamed_server_map = strmap_new();
- SMARTLIST_FOREACH_BEGIN(current_consensus->routerstatus_list,
- const routerstatus_t *, rs) {
- if (rs->is_named) {
- strmap_set_lc(named_server_map, rs->nickname,
- tor_memdup(rs->identity_digest, DIGEST_LEN));
- }
- if (rs->is_unnamed) {
- strmap_set_lc(unnamed_server_map, rs->nickname, (void*)1);
- }
- } SMARTLIST_FOREACH_END(rs);
- }
- /** Given a list <b>routers</b> of routerinfo_t *, update each status field
- * according to our current consensus networkstatus. May re-order
- * <b>routers</b>. */
- void
- routers_update_status_from_consensus_networkstatus(smartlist_t *routers,
- int reset_failures)
- {
- dir_server_t *ds;
- const or_options_t *options = get_options();
- int authdir = authdir_mode_v2(options) || authdir_mode_v3(options);
- networkstatus_t *ns = current_consensus;
- if (!ns || !smartlist_len(ns->routerstatus_list))
- return;
- if (!networkstatus_v2_list)
- networkstatus_v2_list = smartlist_new();
- routers_sort_by_identity(routers);
- SMARTLIST_FOREACH_JOIN(ns->routerstatus_list, routerstatus_t *, rs,
- routers, routerinfo_t *, router,
- tor_memcmp(rs->identity_digest,
- router->cache_info.identity_digest, DIGEST_LEN),
- {
- }) {
- /* We have a routerstatus for this router. */
- const char *digest = router->cache_info.identity_digest;
- ds = router_get_fallback_dirserver_by_digest(digest);
- /* Is it the same descriptor, or only the same identity? */
- if (tor_memeq(router->cache_info.signed_descriptor_digest,
- rs->descriptor_digest, DIGEST_LEN)) {
- if (ns->valid_until > router->cache_info.last_listed_as_valid_until)
- router->cache_info.last_listed_as_valid_until = ns->valid_until;
- }
- if (authdir) {
- /* If we _are_ an authority, we should check whether this router
- * is one that will cause us to need a reachability test. */
- routerinfo_t *old_router =
- router_get_mutable_by_digest(router->cache_info.identity_digest);
- if (old_router != router) {
- router->needs_retest_if_added =
- dirserv_should_launch_reachability_test(router, old_router);
- }
- }
- if (rs->is_flagged_running && ds) {
- download_status_reset(&ds->v2_ns_dl_status);
- }
- if (reset_failures) {
- download_status_reset(&rs->dl_status);
- }
- } SMARTLIST_FOREACH_JOIN_END(rs, router);
- /* Now update last_listed_as_valid_until from v2 networkstatuses. */
- SMARTLIST_FOREACH_BEGIN(networkstatus_v2_list, networkstatus_v2_t *, ns) {
- time_t live_until = ns->published_on + V2_NETWORKSTATUS_ROUTER_LIFETIME;
- SMARTLIST_FOREACH_JOIN(ns->entries, const routerstatus_t *, rs,
- routers, routerinfo_t *, ri,
- tor_memcmp(rs->identity_digest,
- ri->cache_info.identity_digest, DIGEST_LEN),
- STMT_NIL) {
- if (tor_memeq(ri->cache_info.signed_descriptor_digest,
- rs->descriptor_digest, DIGEST_LEN)) {
- if (live_until > ri->cache_info.last_listed_as_valid_until)
- ri->cache_info.last_listed_as_valid_until = live_until;
- }
- } SMARTLIST_FOREACH_JOIN_END(rs, ri);
- } SMARTLIST_FOREACH_END(ns);
- router_dir_info_changed();
- }
- /** Given a list of signed_descriptor_t, update their fields (mainly, when
- * they were last listed) from the most recent consensus. */
- void
- signed_descs_update_status_from_consensus_networkstatus(smartlist_t *descs)
- {
- networkstatus_t *ns = current_ns_consensus;
- if (!ns)
- return;
- if (!ns->desc_digest_map) {
- char dummy[DIGEST_LEN];
- /* instantiates the digest map. */
- memset(dummy, 0, sizeof(dummy));
- router_get_consensus_status_by_descriptor_digest(ns, dummy);
- }
- SMARTLIST_FOREACH(descs, signed_descriptor_t *, d,
- {
- const routerstatus_t *rs = digestmap_get(ns->desc_digest_map,
- d->signed_descriptor_digest);
- if (rs) {
- if (ns->valid_until > d->last_listed_as_valid_until)
- d->last_listed_as_valid_until = ns->valid_until;
- }
- });
- }
- /** Generate networkstatus lines for a single routerstatus_t object, and
- * return the result in a newly allocated string. Used only by controller
- * interface (for now.) */
- char *
- networkstatus_getinfo_helper_single(const routerstatus_t *rs)
- {
- char buf[RS_ENTRY_LEN+1];
- routerstatus_format_entry(buf, sizeof(buf), rs, NULL, NS_CONTROL_PORT);
- return tor_strdup(buf);
- }
- /** Alloc and return a string describing routerstatuses for the most
- * recent info of each router we know about that is of purpose
- * <b>purpose_string</b>. Return NULL if unrecognized purpose.
- *
- * Right now this function is oriented toward listing bridges (you
- * shouldn't use this for general-purpose routers, since those
- * should be listed from the consensus, not from the routers list). */
- char *
- networkstatus_getinfo_by_purpose(const char *purpose_string, time_t now)
- {
- time_t cutoff = now - ROUTER_MAX_AGE_TO_PUBLISH;
- char *answer;
- routerlist_t *rl = router_get_routerlist();
- smartlist_t *statuses;
- uint8_t purpose = router_purpose_from_string(purpose_string);
- routerstatus_t rs;
- int bridge_auth = authdir_mode_bridge(get_options());
- if (purpose == ROUTER_PURPOSE_UNKNOWN) {
- log_info(LD_DIR, "Unrecognized purpose '%s' when listing router statuses.",
- purpose_string);
- return NULL;
- }
- statuses = smartlist_new();
- SMARTLIST_FOREACH_BEGIN(rl->routers, routerinfo_t *, ri) {
- node_t *node = node_get_mutable_by_id(ri->cache_info.identity_digest);
- if (!node)
- continue;
- if (ri->cache_info.published_on < cutoff)
- continue;
- if (ri->purpose != purpose)
- continue;
- if (bridge_auth && ri->purpose == ROUTER_PURPOSE_BRIDGE)
- dirserv_set_router_is_running(ri, now);
- /* then generate and write out status lines for each of them */
- set_routerstatus_from_routerinfo(&rs, node, ri, now, 0, 0, 0, 0);
- smartlist_add(statuses, networkstatus_getinfo_helper_single(&rs));
- } SMARTLIST_FOREACH_END(ri);
- answer = smartlist_join_strings(statuses, "", 0, NULL);
- SMARTLIST_FOREACH(statuses, char *, cp, tor_free(cp));
- smartlist_free(statuses);
- return answer;
- }
- /** Write out router status entries for all our bridge descriptors. */
- void
- networkstatus_dump_bridge_status_to_file(time_t now)
- {
- char *status = networkstatus_getinfo_by_purpose("bridge", now);
- const or_options_t *options = get_options();
- char *fname = NULL;
- tor_asprintf(&fname, "%s"PATH_SEPARATOR"networkstatus-bridges",
- options->DataDirectory);
- write_str_to_file(fname,status,0);
- tor_free(fname);
- tor_free(status);
- }
- /* DOCDOC get_net_param_from_list */
- static int32_t
- get_net_param_from_list(smartlist_t *net_params, const char *param_name,
- int32_t default_val, int32_t min_val, int32_t max_val)
- {
- int32_t res = default_val;
- size_t name_len = strlen(param_name);
- tor_assert(max_val > min_val);
- tor_assert(min_val <= default_val);
- tor_assert(max_val >= default_val);
- SMARTLIST_FOREACH_BEGIN(net_params, const char *, p) {
- if (!strcmpstart(p, param_name) && p[name_len] == '=') {
- int ok=0;
- long v = tor_parse_long(p+name_len+1, 10, INT32_MIN,
- INT32_MAX, &ok, NULL);
- if (ok) {
- res = (int32_t) v;
- break;
- }
- }
- } SMARTLIST_FOREACH_END(p);
- if (res < min_val) {
- log_warn(LD_DIR, "Consensus parameter %s is too small. Got %d, raising to "
- "%d.", param_name, res, min_val);
- res = min_val;
- } else if (res > max_val) {
- log_warn(LD_DIR, "Consensus parameter %s is too large. Got %d, capping to "
- "%d.", param_name, res, max_val);
- res = max_val;
- }
- return res;
- }
- /** Return the value of a integer parameter from the networkstatus <b>ns</b>
- * whose name is <b>param_name</b>. If <b>ns</b> is NULL, try loading the
- * latest consensus ourselves. Return <b>default_val</b> if no latest
- * consensus, or if it has no parameter called <b>param_name</b>.
- * Make sure the value parsed from the consensus is at least
- * <b>min_val</b> and at most <b>max_val</b> and raise/cap the parsed value
- * if necessary. */
- int32_t
- networkstatus_get_param(const networkstatus_t *ns, const char *param_name,
- int32_t default_val, int32_t min_val, int32_t max_val)
- {
- if (!ns) /* if they pass in null, go find it ourselves */
- ns = networkstatus_get_latest_consensus();
- if (!ns || !ns->net_params)
- return default_val;
- return get_net_param_from_list(ns->net_params, param_name,
- default_val, min_val, max_val);
- }
- /** Return the value of a integer bw weight parameter from the networkstatus
- * <b>ns</b> whose name is <b>weight_name</b>. If <b>ns</b> is NULL, try
- * loading the latest consensus ourselves. Return <b>default_val</b> if no
- * latest consensus, or if it has no parameter called <b>weight_name</b>. */
- int32_t
- networkstatus_get_bw_weight(networkstatus_t *ns, const char *weight_name,
- int32_t default_val)
- {
- int32_t param;
- int max;
- if (!ns) /* if they pass in null, go find it ourselves */
- ns = networkstatus_get_latest_consensus();
- if (!ns || !ns->weight_params)
- return default_val;
- max = circuit_build_times_get_bw_scale(ns);
- param = get_net_param_from_list(ns->weight_params, weight_name,
- default_val, -1,
- BW_MAX_WEIGHT_SCALE);
- if (param > max) {
- log_warn(LD_DIR, "Value of consensus weight %s was too large, capping "
- "to %d", weight_name, max);
- param = max;
- }
- return param;
- }
- /** Return the name of the consensus flavor <b>flav</b> as used to identify
- * the flavor in directory documents. */
- const char *
- networkstatus_get_flavor_name(consensus_flavor_t flav)
- {
- switch (flav) {
- case FLAV_NS:
- return "ns";
- case FLAV_MICRODESC:
- return "microdesc";
- default:
- tor_fragile_assert();
- return "??";
- }
- }
- /** Return the consensus_flavor_t value for the flavor called <b>flavname</b>,
- * or -1 if the flavor is not recognized. */
- int
- networkstatus_parse_flavor_name(const char *flavname)
- {
- if (!strcmp(flavname, "ns"))
- return FLAV_NS;
- else if (!strcmp(flavname, "microdesc"))
- return FLAV_MICRODESC;
- else
- return -1;
- }
- /** Return 0 if this routerstatus is obsolete, too new, isn't
- * running, or otherwise not a descriptor that we would make any
- * use of even if we had it. Else return 1. */
- int
- client_would_use_router(const routerstatus_t *rs, time_t now,
- const or_options_t *options)
- {
- if (!rs->is_flagged_running && !options->FetchUselessDescriptors) {
- /* If we had this router descriptor, we wouldn't even bother using it.
- * But, if we want to have a complete list, fetch it anyway. */
- return 0;
- }
- if (rs->published_on + options->TestingEstimatedDescriptorPropagationTime
- > now) {
- /* Most caches probably don't have this descriptor yet. */
- return 0;
- }
- if (rs->published_on + OLD_ROUTER_DESC_MAX_AGE < now) {
- /* We'd drop it immediately for being too old. */
- return 0;
- }
- return 1;
- }
- /** If <b>question</b> is a string beginning with "ns/" in a format the
- * control interface expects for a GETINFO question, set *<b>answer</b> to a
- * newly-allocated string containing networkstatus lines for the appropriate
- * ORs. Return 0 on success, -1 on unrecognized question format. */
- int
- getinfo_helper_networkstatus(control_connection_t *conn,
- const char *question, char **answer,
- const char **errmsg)
- {
- const routerstatus_t *status;
- (void) conn;
- if (!current_consensus) {
- *answer = tor_strdup("");
- return 0;
- }
- if (!strcmp(question, "ns/all")) {
- smartlist_t *statuses = smartlist_new();
- SMARTLIST_FOREACH(current_consensus->routerstatus_list,
- const routerstatus_t *, rs,
- {
- smartlist_add(statuses, networkstatus_getinfo_helper_single(rs));
- });
- *answer = smartlist_join_strings(statuses, "", 0, NULL);
- SMARTLIST_FOREACH(statuses, char *, cp, tor_free(cp));
- smartlist_free(statuses);
- return 0;
- } else if (!strcmpstart(question, "ns/id/")) {
- char d[DIGEST_LEN];
- const char *q = question + 6;
- if (*q == '$')
- ++q;
- if (base16_decode(d, DIGEST_LEN, q, strlen(q))) {
- *errmsg = "Data not decodeable as hex";
- return -1;
- }
- status = router_get_consensus_status_by_id(d);
- } else if (!strcmpstart(question, "ns/name/")) {
- status = router_get_consensus_status_by_nickname(question+8, 0);
- } else if (!strcmpstart(question, "ns/purpose/")) {
- *answer = networkstatus_getinfo_by_purpose(question+11, time(NULL));
- return *answer ? 0 : -1;
- } else {
- return 0;
- }
- if (status)
- *answer = networkstatus_getinfo_helper_single(status);
- return 0;
- }
- /** Free all storage held locally in this module. */
- void
- networkstatus_free_all(void)
- {
- int i;
- if (networkstatus_v2_list) {
- SMARTLIST_FOREACH(networkstatus_v2_list, networkstatus_v2_t *, ns,
- networkstatus_v2_free(ns));
- smartlist_free(networkstatus_v2_list);
- networkstatus_v2_list = NULL;
- }
- digestmap_free(v2_download_status_map, tor_free_);
- v2_download_status_map = NULL;
- networkstatus_vote_free(current_ns_consensus);
- networkstatus_vote_free(current_md_consensus);
- current_md_consensus = current_ns_consensus = NULL;
- for (i=0; i < N_CONSENSUS_FLAVORS; ++i) {
- consensus_waiting_for_certs_t *waiting = &consensus_waiting_for_certs[i];
- if (waiting->consensus) {
- networkstatus_vote_free(waiting->consensus);
- waiting->consensus = NULL;
- }
- tor_free(waiting->body);
- }
- strmap_free(named_server_map, tor_free_);
- strmap_free(unnamed_server_map, NULL);
- }
|