123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497 |
- /* Copyright (c) 2001 Matej Pfajfar.
- * Copyright (c) 2001-2004, Roger Dingledine.
- * Copyright (c) 2004-2006, Roger Dingledine, Nick Mathewson. */
- /* See LICENSE for licensing information */
- /* $Id$ */
- const char routerlist_c_id[] =
- "$Id$";
- /**
- * \file routerlist.c
- * \brief Code to
- * maintain and access the global list of routerinfos for known
- * servers.
- **/
- #include "or.h"
- /****************************************************************************/
- /* static function prototypes */
- static routerstatus_t *router_pick_directory_server_impl(int requireother,
- int fascistfirewall,
- int prefer_tunnel,
- int for_v2_directory);
- static routerstatus_t *router_pick_trusteddirserver_impl(
- authority_type_t type, int requireother,
- int fascistfirewall, int prefer_tunnel);
- static void mark_all_trusteddirservers_up(void);
- static int router_nickname_matches(routerinfo_t *router, const char *nickname);
- static void routerstatus_list_update_from_networkstatus(time_t now);
- static void local_routerstatus_free(local_routerstatus_t *rs);
- static void trusted_dir_server_free(trusted_dir_server_t *ds);
- static void update_networkstatus_cache_downloads(time_t now);
- static void update_networkstatus_client_downloads(time_t now);
- static int signed_desc_digest_is_recognized(signed_descriptor_t *desc);
- static void routerlist_assert_ok(routerlist_t *rl);
- static int have_tried_downloading_all_statuses(int n_failures);
- static routerstatus_t *networkstatus_find_entry(networkstatus_t *ns,
- const char *digest);
- static local_routerstatus_t *router_get_combined_status_by_nickname(
- const char *nickname,
- int warn_if_unnamed);
- static void update_router_have_minimum_dir_info(void);
- static void router_dir_info_changed(void);
- /****************************************************************************/
- /** Global list of a trusted_dir_server_t object for each trusted directory
- * server. */
- static smartlist_t *trusted_dir_servers = NULL;
- /** Global list of all of the routers that we know about. */
- static routerlist_t *routerlist = NULL;
- /** Global list of all of the current network_status documents that we know
- * about. This list is kept sorted by published_on. */
- static smartlist_t *networkstatus_list = NULL;
- /** Global list of local_routerstatus_t for each router, known or unknown.
- * Kept sorted by digest. */
- static smartlist_t *routerstatus_list = NULL;
- /** Map from lowercase nickname to digest of named server, if any. */
- static strmap_t *named_server_map = NULL;
- /** True iff any member of networkstatus_list has changed since the last time
- * we called routerstatus_list_update_from_networkstatus(). */
- static int networkstatus_list_has_changed = 0;
- /** True iff any element of routerstatus_list has changed since the last
- * time we called routers_update_all_from_networkstatus().*/
- static int routerstatus_list_has_changed = 0;
- /** List of strings for nicknames we've already warned about and that are
- * still unknown / unavailable. */
- static smartlist_t *warned_nicknames = NULL;
- /** List of strings for nicknames or fingerprints we've already warned about
- * and that are still conflicted. */
- static smartlist_t *warned_conflicts = NULL;
- /** The last time we tried to download any routerdesc, or 0 for "never". We
- * use this to rate-limit download attempts when the number of routerdescs to
- * download is low. */
- static time_t last_routerdesc_download_attempted = 0;
- /** 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;
- /** True iff we have logged a warning about this OR not being valid or
- * not being named. */
- static int have_warned_about_invalid_status = 0;
- /** 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;
- /** Return the number of v2 directory authorities */
- static INLINE int
- get_n_v2_authorities(void)
- {
- int n = 0;
- if (!trusted_dir_servers)
- return 0;
- SMARTLIST_FOREACH(trusted_dir_servers, trusted_dir_server_t *, ds,
- if (ds->is_v2_authority)
- ++n);
- return n;
- }
- /** Repopulate our list of network_status_t objects from the list cached on
- * disk. Return 0 on success, -1 on failure. */
- int
- router_reload_networkstatus(void)
- {
- char filename[512];
- smartlist_t *entries;
- struct stat st;
- char *s;
- tor_assert(get_options()->DataDirectory);
- if (!networkstatus_list)
- networkstatus_list = smartlist_create();
- tor_snprintf(filename,sizeof(filename),"%s/cached-status",
- get_options()->DataDirectory);
- entries = tor_listdir(filename);
- SMARTLIST_FOREACH(entries, const char *, fn, {
- char buf[DIGEST_LEN];
- 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;
- }
- tor_snprintf(filename,sizeof(filename),"%s/cached-status/%s",
- get_options()->DataDirectory, fn);
- s = read_file_to_str(filename, 0, &st);
- if (s) {
- if (router_set_networkstatus(s, st.st_mtime, NS_FROM_CACHE, NULL)<0) {
- log_warn(LD_FS, "Couldn't load networkstatus from \"%s\"",filename);
- }
- tor_free(s);
- }
- });
- SMARTLIST_FOREACH(entries, char *, fn, tor_free(fn));
- smartlist_free(entries);
- networkstatus_list_clean(time(NULL));
- routers_update_all_from_networkstatus();
- return 0;
- }
- /* Router descriptor storage.
- *
- * Routerdescs are stored in a big file, named "cached-routers". As new
- * routerdescs arrive, we append them to a journal file named
- * "cached-routers.new".
- *
- * From time to time, we replace "cached-routers" with a new file containing
- * only the live, non-superseded descriptors, and clear cached-routers.new.
- *
- * On startup, we read both files.
- */
- /** The size of the router log, in bytes. */
- static size_t router_journal_len = 0;
- /** The size of the router store, in bytes. */
- static size_t router_store_len = 0;
- /** Total bytes dropped since last rebuild. */
- static size_t router_bytes_dropped = 0;
- /** Helper: return 1 iff the router log is so big we want to rebuild the
- * store. */
- static int
- router_should_rebuild_store(void)
- {
- if (router_store_len > (1<<16))
- return (router_journal_len > router_store_len / 2 ||
- router_bytes_dropped > router_store_len / 2);
- else
- return router_journal_len > (1<<15);
- }
- /** Add the <b>len</b>-type router descriptor in <b>s</b> to the router
- * journal; change its saved_location to SAVED_IN_JOURNAL and set its
- * offset appropriately. */
- static int
- router_append_to_journal(signed_descriptor_t *desc)
- {
- or_options_t *options = get_options();
- size_t fname_len = strlen(options->DataDirectory)+32;
- char *fname = tor_malloc(fname_len);
- const char *body = signed_descriptor_get_body(desc);
- size_t len = desc->signed_descriptor_len;
- tor_snprintf(fname, fname_len, "%s/cached-routers.new",
- options->DataDirectory);
- tor_assert(len == strlen(body));
- if (append_bytes_to_file(fname, body, len, 1)) {
- log_warn(LD_FS, "Unable to store router descriptor");
- tor_free(fname);
- return -1;
- }
- desc->saved_location = SAVED_IN_JOURNAL;
- desc->saved_offset = router_journal_len;
- tor_free(fname);
- router_journal_len += len;
- return 0;
- }
- /** DOCDOC */
- static int
- _compare_old_routers_by_age(const void **_a, const void **_b)
- {
- const signed_descriptor_t *r1 = *_a, *r2 = *_b;
- return r1->published_on - r2->published_on;
- }
- /** DOCDOC */
- static int
- _compare_routers_by_age(const void **_a, const void **_b)
- {
- const routerinfo_t *r1 = *_a, *r2 = *_b;
- return r1->cache_info.published_on - r2->cache_info.published_on;
- }
- /** If the journal is too long, or if <b>force</b> is true, then atomically
- * replace the router store with the routers currently in our routerlist, and
- * clear the journal. Return 0 on success, -1 on failure.
- */
- static int
- router_rebuild_store(int force)
- {
- size_t len = 0;
- or_options_t *options;
- size_t fname_len;
- smartlist_t *chunk_list = NULL;
- char *fname = NULL, *fname_tmp = NULL;
- int r = -1, i;
- off_t offset = 0;
- smartlist_t *old_routers, *routers;
- if (!force && !router_should_rebuild_store())
- return 0;
- if (!routerlist)
- return 0;
- /* Don't save deadweight. */
- routerlist_remove_old_routers();
- log_info(LD_DIR, "Rebuilding router descriptor cache");
- options = get_options();
- fname_len = strlen(options->DataDirectory)+32;
- fname = tor_malloc(fname_len);
- fname_tmp = tor_malloc(fname_len);
- tor_snprintf(fname, fname_len, "%s/cached-routers", options->DataDirectory);
- tor_snprintf(fname_tmp, fname_len, "%s/cached-routers.tmp",
- options->DataDirectory);
- chunk_list = smartlist_create();
- old_routers = smartlist_create();
- smartlist_add_all(old_routers, routerlist->old_routers);
- smartlist_sort(old_routers, _compare_old_routers_by_age);
- routers = smartlist_create();
- smartlist_add_all(routers, routerlist->routers);
- smartlist_sort(routers, _compare_routers_by_age);
- for (i = 0; i < 2; ++i) {
- /* We sort the routers by age to enhance locality on disk. */
- smartlist_t *lst = (i == 0) ? old_routers : routers;
- /* Now, add the appropriate members to chunk_list */
- SMARTLIST_FOREACH(lst, void *, ptr,
- {
- signed_descriptor_t *sd = (i==0) ?
- ((signed_descriptor_t*)ptr): &((routerinfo_t*)ptr)->cache_info;
- sized_chunk_t *c;
- const char *body = signed_descriptor_get_body(sd);
- if (!body) {
- log_warn(LD_BUG, "Bug! No descriptor available for router.");
- goto done;
- }
- c = tor_malloc(sizeof(sized_chunk_t));
- c->bytes = body;
- c->len = sd->signed_descriptor_len;
- smartlist_add(chunk_list, c);
- });
- }
- if (write_chunks_to_file(fname_tmp, chunk_list, 1)<0) {
- log_warn(LD_FS, "Error writing router store to disk.");
- goto done;
- }
- /* Our mmap is now invalid. */
- if (routerlist->mmap_descriptors) {
- tor_munmap_file(routerlist->mmap_descriptors);
- }
- if (replace_file(fname_tmp, fname)<0) {
- log_warn(LD_FS, "Error replacing old router store.");
- goto done;
- }
- routerlist->mmap_descriptors = tor_mmap_file(fname);
- if (! routerlist->mmap_descriptors)
- log_warn(LD_FS, "Unable to mmap new descriptor file at '%s'.",fname);
- offset = 0;
- for (i = 0; i < 2; ++i) {
- smartlist_t *lst = (i == 0) ? old_routers : routers;
- SMARTLIST_FOREACH(lst, void *, ptr,
- {
- signed_descriptor_t *sd = (i==0) ?
- ((signed_descriptor_t*)ptr): &((routerinfo_t*)ptr)->cache_info;
- sd->saved_location = SAVED_IN_CACHE;
- if (routerlist->mmap_descriptors) {
- tor_free(sd->signed_descriptor_body); // sets it to null
- sd->saved_offset = offset;
- }
- offset += sd->signed_descriptor_len;
- signed_descriptor_get_body(sd);
- });
- }
- tor_snprintf(fname, fname_len, "%s/cached-routers.new",
- options->DataDirectory);
- write_str_to_file(fname, "", 1);
- r = 0;
- router_store_len = len;
- router_journal_len = 0;
- router_bytes_dropped = 0;
- done:
- smartlist_free(old_routers);
- smartlist_free(routers);
- tor_free(fname);
- SMARTLIST_FOREACH(chunk_list, sized_chunk_t *, c, tor_free(c));
- smartlist_free(chunk_list);
- return r;
- }
- /** Load all cached router descriptors from the store. Return 0 on success and
- * -1 on failure.
- */
- int
- router_reload_router_list(void)
- {
- or_options_t *options = get_options();
- size_t fname_len = strlen(options->DataDirectory)+32;
- char *fname = tor_malloc(fname_len), *contents = NULL;
- if (!routerlist)
- router_get_routerlist(); /* mallocs and inits it in place */
- router_journal_len = router_store_len = 0;
- tor_snprintf(fname, fname_len, "%s/cached-routers", options->DataDirectory);
- if (routerlist->mmap_descriptors) /* get rid of it first */
- tor_munmap_file(routerlist->mmap_descriptors);
- routerlist->mmap_descriptors = tor_mmap_file(fname);
- if (routerlist->mmap_descriptors) {
- router_store_len = routerlist->mmap_descriptors->size;
- router_load_routers_from_string(routerlist->mmap_descriptors->data,
- SAVED_IN_CACHE, NULL);
- }
- tor_snprintf(fname, fname_len, "%s/cached-routers.new",
- options->DataDirectory);
- if (file_status(fname) == FN_FILE)
- contents = read_file_to_str(fname, RFTS_BIN|RFTS_IGNORE_MISSING, NULL);
- if (contents) {
- router_load_routers_from_string(contents,
- SAVED_IN_JOURNAL, NULL);
- tor_free(contents);
- }
- tor_free(fname);
- if (router_journal_len) {
- /* Always clear the journal on startup.*/
- router_rebuild_store(1);
- } else {
- /* Don't cache expired routers. (This is in an else because
- * router_rebuild_store() also calls remove_old_routers().) */
- routerlist_remove_old_routers();
- }
- return 0;
- }
- /** Return a smartlist containing a list of trusted_dir_server_t * for all
- * known trusted dirservers. Callers must not modify the list or its
- * contents.
- */
- smartlist_t *
- router_get_trusted_dir_servers(void)
- {
- if (!trusted_dir_servers)
- trusted_dir_servers = smartlist_create();
- return trusted_dir_servers;
- }
- /** Try to find a running dirserver. If there are no running dirservers
- * in our routerlist and <b>retry_if_no_servers</b> is non-zero,
- * set all the authoritative ones as running again, and pick one;
- * if there are then no dirservers at all in our routerlist,
- * reload the routerlist and try one last time. If for_runningrouters is
- * true, then only pick a dirserver that can answer runningrouters queries
- * (that is, a trusted dirserver, or one running 0.0.9rc5-cvs or later).
- * Don't pick an authority if any non-authority is viable.
- * Other args are as in router_pick_directory_server_impl().
- */
- routerstatus_t *
- router_pick_directory_server(int requireother,
- int fascistfirewall,
- int for_v2_directory,
- int retry_if_no_servers)
- {
- routerstatus_t *choice;
- int prefer_tunnel = get_options()->PreferTunneledDirConns;
- if (!routerlist)
- return NULL;
- choice = router_pick_directory_server_impl(requireother, fascistfirewall,
- prefer_tunnel, for_v2_directory);
- if (choice || !retry_if_no_servers)
- return choice;
- log_info(LD_DIR,
- "No reachable router entries for dirservers. "
- "Trying them all again.");
- /* mark all authdirservers as up again */
- mark_all_trusteddirservers_up();
- /* try again */
- choice = router_pick_directory_server_impl(requireother, fascistfirewall,
- prefer_tunnel, for_v2_directory);
- if (choice)
- return choice;
- log_info(LD_DIR,"Still no %s router entries. Reloading and trying again.",
- fascistfirewall ? "reachable" : "known");
- if (router_reload_router_list()) {
- return NULL;
- }
- /* give it one last try */
- choice = router_pick_directory_server_impl(requireother, fascistfirewall,
- prefer_tunnel, for_v2_directory);
- return choice;
- }
- /** Return the trusted_dir_server_t for the directory authority whose identity
- * key hashes to <b>digest</b>, or NULL if no such authority is known.
- */
- trusted_dir_server_t *
- router_get_trusteddirserver_by_digest(const char *digest)
- {
- if (!trusted_dir_servers)
- return NULL;
- SMARTLIST_FOREACH(trusted_dir_servers, trusted_dir_server_t *, ds,
- {
- if (!memcmp(ds->digest, digest, DIGEST_LEN))
- return ds;
- });
- return NULL;
- }
- /** Try to find a running trusted dirserver. If there are no running
- * trusted dirservers and <b>retry_if_no_servers</b> is non-zero,
- * set them all as running again, and try again.
- * If <b>need_v1_authority</b> is set, return only trusted servers
- * that are authorities for the V1 directory protocol.
- * Other args are as in router_pick_trusteddirserver_impl().
- */
- routerstatus_t *
- router_pick_trusteddirserver(authority_type_t type,
- int requireother,
- int fascistfirewall,
- int retry_if_no_servers)
- {
- routerstatus_t *choice;
- int prefer_tunnel = get_options()->PreferTunneledDirConns;
- choice = router_pick_trusteddirserver_impl(type, requireother,
- fascistfirewall, prefer_tunnel);
- if (choice || !retry_if_no_servers)
- return choice;
- log_info(LD_DIR,
- "No trusted dirservers are reachable. Trying them all again.");
- mark_all_trusteddirservers_up();
- return router_pick_trusteddirserver_impl(type, requireother,
- fascistfirewall, prefer_tunnel);
- }
- /** How long do we avoid using a directory server after it's given us a 503? */
- #define DIR_503_TIMEOUT (60*60)
- /** Pick a random running valid directory server/mirror from our
- * routerlist. Don't pick an authority if any non-authorities are viable.
- * If <b>fascistfirewall</b>, make sure the router we pick is allowed
- * by our firewall options.
- * If <b>requireother</b>, it cannot be us. If <b>for_v2_directory</b>,
- * choose a directory server new enough to support the v2 directory
- * functionality.
- * If <b>prefer_tunnel</b>, choose a directory server that is reachable
- * and supports BEGIN_DIR cells, if possible.
- * Try to avoid using servers that are overloaded (have returned 503
- * recently).
- */
- static routerstatus_t *
- router_pick_directory_server_impl(int requireother, int fascistfirewall,
- int prefer_tunnel, int for_v2_directory)
- {
- routerstatus_t *result;
- smartlist_t *direct, *tunnel;
- smartlist_t *trusted_direct, *trusted_tunnel;
- smartlist_t *overloaded_direct, *overloaded_tunnel;
- time_t now = time(NULL);
- if (!routerstatus_list)
- return NULL;
- direct = smartlist_create();
- tunnel = smartlist_create();
- trusted_direct = smartlist_create();
- trusted_tunnel = smartlist_create();
- overloaded_direct = smartlist_create();
- overloaded_tunnel = smartlist_create();
- /* Find all the running dirservers we know about. */
- SMARTLIST_FOREACH(routerstatus_list, local_routerstatus_t *, _local_status,
- {
- routerstatus_t *status = &(_local_status->status);
- int is_trusted;
- int is_overloaded = _local_status->last_dir_503_at + DIR_503_TIMEOUT > now;
- if (!status->is_running || !status->dir_port || !status->is_valid)
- continue;
- if (status->is_bad_directory)
- continue;
- if (requireother && router_digest_is_me(status->identity_digest))
- continue;
- is_trusted = router_digest_is_trusted_dir(status->identity_digest);
- if (for_v2_directory && !(status->is_v2_dir || is_trusted))
- continue;
- if (fascistfirewall &&
- prefer_tunnel &&
- status->version_supports_begindir &&
- fascist_firewall_allows_address_or(status->addr, status->or_port))
- smartlist_add(is_trusted ? trusted_tunnel :
- is_overloaded ? overloaded_tunnel : tunnel, status);
- else if (!fascistfirewall || (fascistfirewall &&
- fascist_firewall_allows_address_dir(status->addr,
- status->dir_port)))
- smartlist_add(is_trusted ? trusted_direct :
- is_overloaded ? overloaded_direct : direct, status);
- });
- if (smartlist_len(tunnel)) {
- result = routerstatus_sl_choose_by_bandwidth(tunnel);
- } else if (smartlist_len(overloaded_tunnel)) {
- result = routerstatus_sl_choose_by_bandwidth(overloaded_tunnel);
- } else if (smartlist_len(trusted_tunnel)) {
- /* FFFF We don't distinguish between trusteds and overloaded trusteds
- * yet. Maybe one day we should. */
- /* FFFF We also don't load balance over authorities yet. I think this
- * is a feature, but it could easily be a bug. -RD */
- result = smartlist_choose(trusted_tunnel);
- } else if (smartlist_len(direct)) {
- result = routerstatus_sl_choose_by_bandwidth(direct);
- } else if (smartlist_len(overloaded_direct)) {
- result = routerstatus_sl_choose_by_bandwidth(overloaded_direct);
- } else {
- result = smartlist_choose(trusted_direct);
- }
- smartlist_free(direct);
- smartlist_free(tunnel);
- smartlist_free(trusted_direct);
- smartlist_free(trusted_tunnel);
- smartlist_free(overloaded_direct);
- smartlist_free(overloaded_tunnel);
- return result;
- }
- /** Choose randomly from among the trusted dirservers that are up. If
- * <b>fascistfirewall</b>, make sure the port we pick is allowed by our
- * firewall options. If <b>requireother</b>, it cannot be us. If
- * <b>need_v1_authority</b>, choose a trusted authority for the v1 directory
- * system.
- */
- static routerstatus_t *
- router_pick_trusteddirserver_impl(authority_type_t type,
- int requireother, int fascistfirewall,
- int prefer_tunnel)
- {
- smartlist_t *direct, *tunnel;
- smartlist_t *overloaded_direct, *overloaded_tunnel;
- routerinfo_t *me = router_get_my_routerinfo();
- routerstatus_t *result;
- time_t now = time(NULL);
- direct = smartlist_create();
- tunnel = smartlist_create();
- overloaded_direct = smartlist_create();
- overloaded_tunnel = smartlist_create();
- if (!trusted_dir_servers)
- return NULL;
- SMARTLIST_FOREACH(trusted_dir_servers, trusted_dir_server_t *, d,
- {
- int is_overloaded =
- d->fake_status.last_dir_503_at + DIR_503_TIMEOUT > now;
- if (!d->is_running) continue;
- if (type == V1_AUTHORITY && !d->is_v1_authority)
- continue;
- if (type == V2_AUTHORITY && !d->is_v2_authority)
- continue;
- if (type == HIDSERV_AUTHORITY && !d->is_hidserv_authority)
- continue;
- if (requireother && me && router_digest_is_me(d->digest))
- continue;
- if (fascistfirewall &&
- prefer_tunnel &&
- d->or_port &&
- fascist_firewall_allows_address_or(d->addr, d->or_port))
- smartlist_add(is_overloaded ? overloaded_tunnel : tunnel,
- &d->fake_status.status);
- else if (!fascistfirewall || (fascistfirewall &&
- fascist_firewall_allows_address_dir(d->addr,
- d->dir_port)))
- smartlist_add(is_overloaded ? overloaded_direct : direct,
- &d->fake_status.status);
- });
- if (smartlist_len(tunnel)) {
- result = smartlist_choose(tunnel);
- } else if (smartlist_len(overloaded_tunnel)) {
- result = smartlist_choose(overloaded_tunnel);
- } else if (smartlist_len(direct)) {
- result = smartlist_choose(direct);
- } else {
- result = smartlist_choose(overloaded_direct);
- }
- smartlist_free(direct);
- smartlist_free(tunnel);
- smartlist_free(overloaded_direct);
- smartlist_free(overloaded_tunnel);
- return result;
- }
- /** Go through and mark the authoritative dirservers as up. */
- static void
- mark_all_trusteddirservers_up(void)
- {
- if (routerlist) {
- SMARTLIST_FOREACH(routerlist->routers, routerinfo_t *, router,
- if (router_digest_is_trusted_dir(router->cache_info.identity_digest) &&
- router->dir_port > 0) {
- router->is_running = 1;
- });
- }
- if (trusted_dir_servers) {
- SMARTLIST_FOREACH(trusted_dir_servers, trusted_dir_server_t *, dir,
- {
- local_routerstatus_t *rs;
- dir->is_running = 1;
- dir->n_networkstatus_failures = 0;
- dir->fake_status.last_dir_503_at = 0;
- rs = router_get_combined_status_by_digest(dir->digest);
- if (rs && !rs->status.is_running) {
- rs->status.is_running = 1;
- rs->last_dir_503_at = 0;
- control_event_networkstatus_changed_single(rs);
- }
- });
- }
- last_networkstatus_download_attempted = 0;
- router_dir_info_changed();
- }
- /** Reset all internal variables used to count failed downloads of network
- * status objects. */
- void
- router_reset_status_download_failures(void)
- {
- mark_all_trusteddirservers_up();
- }
- /** Look through the routerlist and identify routers that
- * advertise the same /16 network address as <b>router</b>.
- * Add each of them to <b>sl</b>.
- */
- static void
- routerlist_add_network_family(smartlist_t *sl, routerinfo_t *router)
- {
- SMARTLIST_FOREACH(routerlist->routers, routerinfo_t *, r,
- {
- if (router != r &&
- (router->addr & 0xffff0000) == (r->addr & 0xffff0000))
- smartlist_add(sl, r);
- });
- }
- /** Add all the family of <b>router</b> to the smartlist <b>sl</b>.
- * This is used to make sure we don't pick siblings in a single path.
- */
- void
- routerlist_add_family(smartlist_t *sl, routerinfo_t *router)
- {
- routerinfo_t *r;
- config_line_t *cl;
- or_options_t *options = get_options();
- /* First, add any routers with similar network addresses.
- * XXXX012 It's possible this will be really expensive; we'll see. */
- if (options->EnforceDistinctSubnets)
- routerlist_add_network_family(sl, router);
- if (!router->declared_family)
- return;
- /* Add every r such that router declares familyness with r, and r
- * declares familyhood with router. */
- SMARTLIST_FOREACH(router->declared_family, const char *, n,
- {
- if (!(r = router_get_by_nickname(n, 0)))
- continue;
- if (!r->declared_family)
- continue;
- SMARTLIST_FOREACH(r->declared_family, const char *, n2,
- {
- if (router_nickname_matches(router, n2))
- smartlist_add(sl, r);
- });
- });
- /* If the user declared any families locally, honor those too. */
- for (cl = get_options()->NodeFamilies; cl; cl = cl->next) {
- if (router_nickname_is_in_list(router, cl->value)) {
- add_nickname_list_to_smartlist(sl, cl->value, 0, 1, 1);
- }
- }
- }
- /** Given a (possibly NULL) comma-and-whitespace separated list of nicknames,
- * see which nicknames in <b>list</b> name routers in our routerlist, and add
- * the routerinfos for those routers to <b>sl</b>. If <b>must_be_running</b>,
- * only include routers that we think are running. If <b>warn_if_down</b>,
- * warn if some included routers aren't running. If <b>warn_if_unnamed</b>,
- * warn if any non-Named routers are specified by nickname.
- */
- void
- add_nickname_list_to_smartlist(smartlist_t *sl, const char *list,
- int must_be_running,
- int warn_if_down, int warn_if_unnamed)
- {
- routerinfo_t *router;
- smartlist_t *nickname_list;
- int have_dir_info = router_have_minimum_dir_info();
- if (!list)
- return; /* nothing to do */
- tor_assert(sl);
- nickname_list = smartlist_create();
- if (!warned_nicknames)
- warned_nicknames = smartlist_create();
- smartlist_split_string(nickname_list, list, ",",
- SPLIT_SKIP_SPACE|SPLIT_IGNORE_BLANK, 0);
- SMARTLIST_FOREACH(nickname_list, const char *, nick, {
- int warned;
- if (!is_legal_nickname_or_hexdigest(nick)) {
- log_warn(LD_CONFIG, "Nickname '%s' is misformed; skipping", nick);
- continue;
- }
- router = router_get_by_nickname(nick, warn_if_unnamed);
- warned = smartlist_string_isin(warned_nicknames, nick);
- if (router) {
- if (!must_be_running || router->is_running) {
- smartlist_add(sl,router);
- if (warned)
- smartlist_string_remove(warned_nicknames, nick);
- } else {
- if (!warned) {
- log_fn(warn_if_down ? LOG_WARN : LOG_DEBUG, LD_CONFIG,
- "Nickname list includes '%s' which is known but down.",nick);
- smartlist_add(warned_nicknames, tor_strdup(nick));
- }
- }
- } else if (!router_get_combined_status_by_nickname(nick,warn_if_unnamed)) {
- if (!warned) {
- log_fn(have_dir_info ? LOG_WARN : LOG_INFO, LD_CONFIG,
- "Nickname list includes '%s' which isn't a known router.",nick);
- smartlist_add(warned_nicknames, tor_strdup(nick));
- }
- }
- });
- SMARTLIST_FOREACH(nickname_list, char *, nick, tor_free(nick));
- smartlist_free(nickname_list);
- }
- /** Return 1 iff any member of the (possibly NULL) comma-separated list
- * <b>list</b> is an acceptable nickname or hexdigest for <b>router</b>. Else
- * return 0.
- */
- int
- router_nickname_is_in_list(routerinfo_t *router, const char *list)
- {
- smartlist_t *nickname_list;
- int v = 0;
- if (!list)
- return 0; /* definitely not */
- tor_assert(router);
- nickname_list = smartlist_create();
- smartlist_split_string(nickname_list, list, ",",
- SPLIT_SKIP_SPACE|SPLIT_IGNORE_BLANK, 0);
- SMARTLIST_FOREACH(nickname_list, const char *, cp,
- if (router_nickname_matches(router, cp)) {v=1;break;});
- SMARTLIST_FOREACH(nickname_list, char *, cp, tor_free(cp));
- smartlist_free(nickname_list);
- return v;
- }
- /** Add every suitable router from our routerlist to <b>sl</b>, so that
- * we can pick a node for a circuit.
- */
- static void
- router_add_running_routers_to_smartlist(smartlist_t *sl, int allow_invalid,
- int need_uptime, int need_capacity,
- int need_guard)
- {
- if (!routerlist)
- return;
- SMARTLIST_FOREACH(routerlist->routers, routerinfo_t *, router,
- {
- if (router->is_running &&
- router->purpose == ROUTER_PURPOSE_GENERAL &&
- (router->is_valid || allow_invalid) &&
- !router_is_unreliable(router, need_uptime,
- need_capacity, need_guard)) {
- /* If it's running, and it's suitable according to the
- * other flags we had in mind */
- smartlist_add(sl, router);
- }
- });
- }
- /** Look through the routerlist until we find a router that has my key.
- Return it. */
- routerinfo_t *
- routerlist_find_my_routerinfo(void)
- {
- if (!routerlist)
- return NULL;
- SMARTLIST_FOREACH(routerlist->routers, routerinfo_t *, router,
- {
- if (router_is_me(router))
- return router;
- });
- return NULL;
- }
- /** Find a router that's up, that has this IP address, and
- * that allows exit to this address:port, or return NULL if there
- * isn't a good one.
- */
- routerinfo_t *
- router_find_exact_exit_enclave(const char *address, uint16_t port)
- {
- uint32_t addr;
- struct in_addr in;
- if (!tor_inet_aton(address, &in))
- return NULL; /* it's not an IP already */
- addr = ntohl(in.s_addr);
- SMARTLIST_FOREACH(routerlist->routers, routerinfo_t *, router,
- {
- if (router->is_running &&
- router->addr == addr &&
- compare_addr_to_addr_policy(addr, port, router->exit_policy) ==
- ADDR_POLICY_ACCEPTED)
- return router;
- });
- return NULL;
- }
- /** Return 1 if <b>router</b> is not suitable for these parameters, else 0.
- * If <b>need_uptime</b> is non-zero, we require a minimum uptime.
- * If <b>need_capacity</b> is non-zero, we require a minimum advertised
- * bandwidth.
- * If <b>need_guard</b>, we require that the router is a possible entry guard.
- */
- int
- router_is_unreliable(routerinfo_t *router, int need_uptime,
- int need_capacity, int need_guard)
- {
- if (need_uptime && !router->is_stable)
- return 1;
- if (need_capacity && !router->is_fast)
- return 1;
- if (need_guard && !router->is_possible_guard)
- return 1;
- return 0;
- }
- /** Return the smaller of the router's configured BandwidthRate
- * and its advertised capacity. */
- uint32_t
- router_get_advertised_bandwidth(routerinfo_t *router)
- {
- if (router->bandwidthcapacity < router->bandwidthrate)
- return router->bandwidthcapacity;
- return router->bandwidthrate;
- }
- /** DOCDOC */
- #define MAX_BELIEVABLE_BANDWIDTH 1500000 /* 1.5 MB/sec */
- /** Helper function:
- * choose a random element of smartlist <b>sl</b>, weighted by
- * the advertised bandwidth of each element.
- *
- * If <b>statuses</b> is zero, then <b>sl</b> is a list of
- * routerinfo_t's. Otherwise it's a list of routerstatus_t's.
- *
- * If <b>for_exit</b>, we're picking an exit node: consider all nodes'
- * bandwidth equally regardless of their Exit status. If not <b>for_exit</b>,
- * we're picking a non-exit node: weight exit-node's bandwidth downwards
- * depending on the smallness of the fraction of Exit-to-total bandwidth.
- */
- static void *
- smartlist_choose_by_bandwidth(smartlist_t *sl, int for_exit, int statuses)
- {
- int i;
- routerinfo_t *router;
- routerstatus_t *status;
- int32_t *bandwidths;
- int is_exit;
- uint64_t total_nonexit_bw = 0, total_exit_bw = 0, total_bw = 0;
- uint64_t rand_bw, tmp;
- double exit_weight;
- int n_unknown = 0;
- /* First count the total bandwidth weight, and make a list
- * of each value. <0 means "unknown; no routerinfo." We use the
- * bits of negative values to remember whether the router was fast (-x)&1
- * and whether it was an exit (-x)&2. Yes, it's a hack. */
- bandwidths = tor_malloc(sizeof(int32_t)*smartlist_len(sl));
- /* Iterate over all the routerinfo_t or routerstatus_t, and */
- for (i = 0; i < smartlist_len(sl); ++i) {
- /* first, learn what bandwidth we think i has */
- int is_known = 1;
- int32_t flags = 0;
- uint32_t this_bw = 0;
- if (statuses) {
- /* need to extract router info */
- status = smartlist_get(sl, i);
- router = router_get_by_digest(status->identity_digest);
- is_exit = status->is_exit;
- if (router) {
- this_bw = router_get_advertised_bandwidth(router);
- } else { /* guess */
- is_known = 0;
- flags = status->is_fast ? 1 : 0;
- flags |= is_exit ? 2 : 0;
- }
- } else {
- router = smartlist_get(sl, i);
- is_exit = router->is_exit;
- this_bw = router_get_advertised_bandwidth(router);
- }
- /* if they claim something huge, don't believe it */
- if (this_bw > MAX_BELIEVABLE_BANDWIDTH)
- this_bw = MAX_BELIEVABLE_BANDWIDTH;
- if (is_known) {
- bandwidths[i] = (int32_t) this_bw; // safe since MAX_BELIEVABLE<INT32_MAX
- if (is_exit)
- total_exit_bw += this_bw;
- else
- total_nonexit_bw += this_bw;
- } else {
- ++n_unknown;
- bandwidths[i] = -flags;
- }
- }
- /* Now, fill in the unknown values. */
- if (n_unknown) {
- int32_t avg_fast, avg_slow;
- if (total_exit_bw+total_nonexit_bw) {
- /* if there's some bandwidth, there's at least one known router,
- * so no worries about div by 0 here */
- avg_fast = avg_slow =
- (total_exit_bw+total_nonexit_bw)/(smartlist_len(sl)-n_unknown);
- } else {
- avg_fast = 40000;
- avg_slow = 20000;
- }
- for (i=0; i<smartlist_len(sl); ++i) {
- int32_t bw = bandwidths[i];
- if (bw>=0)
- continue;
- is_exit = ((-bw)&2);
- bandwidths[i] = ((-bw)&1) ? avg_fast : avg_slow;
- if (is_exit)
- total_exit_bw += bandwidths[i];
- else
- total_nonexit_bw += bandwidths[i];
- }
- }
- /* If there's no bandwidth at all, pick at random. */
- if (!(total_exit_bw+total_nonexit_bw)) {
- tor_free(bandwidths);
- return smartlist_choose(sl);
- }
- /* Figure out how to weight exits. */
- if (for_exit) {
- /* If we're choosing an exit node, exit bandwidth counts fully. */
- exit_weight = 1.0;
- total_bw = total_exit_bw + total_nonexit_bw;
- } else if (total_exit_bw < total_nonexit_bw / 2) {
- /* If we're choosing a relay and exits are greatly outnumbered, ignore
- * them. */
- exit_weight = 0.0;
- total_bw = total_nonexit_bw;
- } else {
- /* If we're choosing a relay and exits aren't outnumbered use the formula
- * from path-spec. */
- uint64_t leftover = (total_exit_bw - total_nonexit_bw / 2);
- exit_weight = U64_TO_DBL(leftover) /
- U64_TO_DBL(leftover + total_nonexit_bw);
- total_bw = total_nonexit_bw +
- DBL_TO_U64(exit_weight * U64_TO_DBL(total_exit_bw));
- }
- /*
- log_debug(LD_CIRC, "Total bw = "U64_FORMAT", total exit bw = "U64_FORMAT
- ", total nonexit bw = "U64_FORMAT", exit weight = %lf "
- "(for exit == %d)",
- U64_PRINTF_ARG(total_bw), U64_PRINTF_ARG(total_exit_bw),
- U64_PRINTF_ARG(total_nonexit_bw), exit_weight, for_exit);
- */
- /* Almost done: choose a random value from the bandwidth weights. */
- rand_bw = crypto_rand_uint64(total_bw);
- /* Last, count through sl until we get to the element we picked */
- tmp = 0;
- for (i=0; i < smartlist_len(sl); i++) {
- if (statuses) {
- status = smartlist_get(sl, i);
- is_exit = status->is_exit;
- } else {
- router = smartlist_get(sl, i);
- is_exit = router->is_exit;
- }
- if (is_exit)
- tmp += ((uint64_t)(bandwidths[i] * exit_weight));
- else
- tmp += bandwidths[i];
- if (tmp >= rand_bw)
- break;
- }
- tor_free(bandwidths);
- return smartlist_get(sl, i);
- }
- /** Choose a random element of router list <b>sl</b>, weighted by
- * the advertised bandwidth of each router.
- */
- routerinfo_t *
- routerlist_sl_choose_by_bandwidth(smartlist_t *sl, int for_exit)
- {
- return smartlist_choose_by_bandwidth(sl, for_exit, 0);
- }
- /** Choose a random element of status list <b>sl</b>, weighted by
- * the advertised bandwidth of each status.
- */
- routerstatus_t *
- routerstatus_sl_choose_by_bandwidth(smartlist_t *sl)
- {
- return smartlist_choose_by_bandwidth(sl, 1, 1);
- }
- /** Return a random running router from the routerlist. If any node
- * named in <b>preferred</b> is available, pick one of those. Never
- * pick a node named in <b>excluded</b>, or whose routerinfo is in
- * <b>excludedsmartlist</b>, even if they are the only nodes
- * available. If <b>strict</b> is true, never pick any node besides
- * those in <b>preferred</b>.
- * If <b>need_uptime</b> is non-zero and any router has more than
- * a minimum uptime, return one of those.
- * If <b>need_capacity</b> is non-zero, weight your choice by the
- * advertised capacity of each router.
- * If ! <b>allow_invalid</b>, consider only Valid routers.
- * If <b>need_guard</b>, consider only Guard routers.
- * If <b>weight_for_exit</b>, we weight bandwidths as if picking an exit node,
- * otherwise we weight bandwidths for picking a relay node (that is, possibly
- * discounting exit nodes).
- */
- routerinfo_t *
- router_choose_random_node(const char *preferred,
- const char *excluded,
- smartlist_t *excludedsmartlist,
- int need_uptime, int need_capacity,
- int need_guard,
- int allow_invalid, int strict,
- int weight_for_exit)
- {
- smartlist_t *sl, *excludednodes;
- routerinfo_t *choice = NULL;
- excludednodes = smartlist_create();
- add_nickname_list_to_smartlist(excludednodes,excluded,0,0,1);
- /* Try the preferred nodes first. Ignore need_uptime and need_capacity
- * and need_guard, since the user explicitly asked for these nodes. */
- if (preferred) {
- sl = smartlist_create();
- add_nickname_list_to_smartlist(sl,preferred,1,1,1);
- smartlist_subtract(sl,excludednodes);
- if (excludedsmartlist)
- smartlist_subtract(sl,excludedsmartlist);
- choice = smartlist_choose(sl);
- smartlist_free(sl);
- }
- if (!choice && !strict) {
- /* Then give up on our preferred choices: any node
- * will do that has the required attributes. */
- sl = smartlist_create();
- router_add_running_routers_to_smartlist(sl, allow_invalid,
- need_uptime, need_capacity,
- need_guard);
- smartlist_subtract(sl,excludednodes);
- if (excludedsmartlist)
- smartlist_subtract(sl,excludedsmartlist);
- if (need_capacity)
- choice = routerlist_sl_choose_by_bandwidth(sl, weight_for_exit);
- else
- choice = smartlist_choose(sl);
- smartlist_free(sl);
- if (!choice && (need_uptime || need_capacity || need_guard)) {
- /* try once more -- recurse but with fewer restrictions. */
- log_info(LD_CIRC,
- "We couldn't find any live%s%s%s routers; falling back "
- "to list of all routers.",
- need_capacity?", fast":"",
- need_uptime?", stable":"",
- need_guard?", guard":"");
- choice = router_choose_random_node(
- NULL, excluded, excludedsmartlist,
- 0, 0, 0, allow_invalid, 0, weight_for_exit);
- }
- }
- smartlist_free(excludednodes);
- if (!choice)
- log_warn(LD_CIRC,
- "No available nodes when trying to choose node. Failing.");
- return choice;
- }
- /** Return true iff the digest of <b>router</b>'s identity key,
- * encoded in hexadecimal, matches <b>hexdigest</b> (which is
- * optionally prefixed with a single dollar sign). Return false if
- * <b>hexdigest</b> is malformed, or it doesn't match. */
- static INLINE int
- router_hex_digest_matches(routerinfo_t *router, const char *hexdigest)
- {
- char digest[DIGEST_LEN];
- size_t len;
- tor_assert(hexdigest);
- if (hexdigest[0] == '$')
- ++hexdigest;
- len = strlen(hexdigest);
- if (len < HEX_DIGEST_LEN)
- return 0;
- else if (len > HEX_DIGEST_LEN &&
- (hexdigest[HEX_DIGEST_LEN] == '=' ||
- hexdigest[HEX_DIGEST_LEN] == '~')) {
- if (strcasecmp(hexdigest+HEX_DIGEST_LEN+1, router->nickname))
- return 0;
- if (hexdigest[HEX_DIGEST_LEN] == '=' && !router->is_named)
- return 0;
- }
- if (base16_decode(digest, DIGEST_LEN, hexdigest, HEX_DIGEST_LEN)<0)
- return 0;
- return (!memcmp(digest, router->cache_info.identity_digest, DIGEST_LEN));
- }
- /** Return true if <b>router</b>'s nickname matches <b>nickname</b>
- * (case-insensitive), or if <b>router's</b> identity key digest
- * matches a hexadecimal value stored in <b>nickname</b>. Return
- * false otherwise. */
- static int
- router_nickname_matches(routerinfo_t *router, const char *nickname)
- {
- if (nickname[0]!='$' && !strcasecmp(router->nickname, nickname))
- return 1;
- return router_hex_digest_matches(router, nickname);
- }
- /** Return the router in our routerlist whose (case-insensitive)
- * nickname or (case-sensitive) hexadecimal key digest is
- * <b>nickname</b>. Return NULL if no such router is known.
- */
- routerinfo_t *
- router_get_by_nickname(const char *nickname, int warn_if_unnamed)
- {
- int maybedigest;
- char digest[DIGEST_LEN];
- routerinfo_t *best_match=NULL;
- int n_matches = 0;
- char *named_digest = NULL;
- tor_assert(nickname);
- if (!routerlist)
- return NULL;
- if (nickname[0] == '$')
- return router_get_by_hexdigest(nickname);
- if (!strcasecmp(nickname, UNNAMED_ROUTER_NICKNAME))
- return NULL;
- if (server_mode(get_options()) &&
- !strcasecmp(nickname, get_options()->Nickname))
- return router_get_my_routerinfo();
- maybedigest = (strlen(nickname) >= HEX_DIGEST_LEN) &&
- (base16_decode(digest,DIGEST_LEN,nickname,HEX_DIGEST_LEN) == 0);
- if (named_server_map &&
- (named_digest = strmap_get_lc(named_server_map, nickname))) {
- return digestmap_get(routerlist->identity_map, named_digest);
- }
- SMARTLIST_FOREACH(routerlist->routers, routerinfo_t *, router,
- {
- if (!strcasecmp(router->nickname, nickname)) {
- ++n_matches;
- if (n_matches <= 1 || router->is_running)
- best_match = router;
- } else if (maybedigest &&
- !memcmp(digest, router->cache_info.identity_digest, DIGEST_LEN)
- ) {
- if (router_hex_digest_matches(router, nickname))
- return router;
- else
- best_match = router; // XXXX NM not exactly right.
- }
- });
- if (best_match) {
- if (warn_if_unnamed && n_matches > 1) {
- smartlist_t *fps = smartlist_create();
- int any_unwarned = 0;
- SMARTLIST_FOREACH(routerlist->routers, routerinfo_t *, router,
- {
- local_routerstatus_t *rs;
- char *desc;
- size_t dlen;
- char fp[HEX_DIGEST_LEN+1];
- if (strcasecmp(router->nickname, nickname))
- continue;
- rs = router_get_combined_status_by_digest(
- router->cache_info.identity_digest);
- if (rs && !rs->name_lookup_warned) {
- rs->name_lookup_warned = 1;
- any_unwarned = 1;
- }
- base16_encode(fp, sizeof(fp),
- router->cache_info.identity_digest, DIGEST_LEN);
- dlen = 32 + HEX_DIGEST_LEN + strlen(router->address);
- desc = tor_malloc(dlen);
- tor_snprintf(desc, dlen, "\"$%s\" for the one at %s:%d",
- fp, router->address, router->or_port);
- smartlist_add(fps, desc);
- });
- if (any_unwarned) {
- char *alternatives = smartlist_join_strings(fps, "; ",0,NULL);
- log_warn(LD_CONFIG,
- "There are multiple matches for the nickname \"%s\","
- " but none is listed as named by the directory authorities. "
- "Choosing one arbitrarily. If you meant one in particular, "
- "you should say %s.", nickname, alternatives);
- tor_free(alternatives);
- }
- SMARTLIST_FOREACH(fps, char *, cp, tor_free(cp));
- smartlist_free(fps);
- } else if (warn_if_unnamed) {
- local_routerstatus_t *rs = router_get_combined_status_by_digest(
- best_match->cache_info.identity_digest);
- if (rs && !rs->name_lookup_warned) {
- char fp[HEX_DIGEST_LEN+1];
- base16_encode(fp, sizeof(fp),
- best_match->cache_info.identity_digest, DIGEST_LEN);
- log_warn(LD_CONFIG, "You specified a server \"%s\" by name, but the "
- "directory authorities do not have a binding for this nickname. "
- "To make sure you get the same server in the future, refer to "
- "it by key, as \"$%s\".", nickname, fp);
- rs->name_lookup_warned = 1;
- }
- }
- return best_match;
- }
- return NULL;
- }
- /** Try to find a routerinfo for <b>digest</b>. If we don't have one,
- * return 1. If we do, ask tor_version_as_new_as() for the answer.
- */
- int
- router_digest_version_as_new_as(const char *digest, const char *cutoff)
- {
- routerinfo_t *router = router_get_by_digest(digest);
- if (!router)
- return 1;
- return tor_version_as_new_as(router->platform, cutoff);
- }
- /** Return true iff <b>digest</b> is the digest of the identity key of
- * a trusted directory. */
- int
- router_digest_is_trusted_dir(const char *digest)
- {
- if (!trusted_dir_servers)
- return 0;
- if (get_options()->AuthoritativeDir &&
- router_digest_is_me(digest))
- return 1;
- SMARTLIST_FOREACH(trusted_dir_servers, trusted_dir_server_t *, ent,
- if (!memcmp(digest, ent->digest, DIGEST_LEN)) return 1);
- return 0;
- }
- /** Return the router in our routerlist whose hexadecimal key digest
- * is <b>hexdigest</b>. Return NULL if no such router is known. */
- routerinfo_t *
- router_get_by_hexdigest(const char *hexdigest)
- {
- char digest[DIGEST_LEN];
- size_t len;
- routerinfo_t *ri;
- tor_assert(hexdigest);
- if (!routerlist)
- return NULL;
- if (hexdigest[0]=='$')
- ++hexdigest;
- len = strlen(hexdigest);
- if (len < HEX_DIGEST_LEN ||
- base16_decode(digest,DIGEST_LEN,hexdigest,HEX_DIGEST_LEN) < 0)
- return NULL;
- ri = router_get_by_digest(digest);
- if (len > HEX_DIGEST_LEN) {
- if (hexdigest[HEX_DIGEST_LEN] == '=') {
- if (strcasecmp(ri->nickname, hexdigest+HEX_DIGEST_LEN+1) ||
- !ri->is_named)
- return NULL;
- } else if (hexdigest[HEX_DIGEST_LEN] == '~') {
- if (strcasecmp(ri->nickname, hexdigest+HEX_DIGEST_LEN+1))
- return NULL;
- } else {
- return NULL;
- }
- }
- return ri;
- }
- /** Return the router in our routerlist whose 20-byte key digest
- * is <b>digest</b>. Return NULL if no such router is known. */
- routerinfo_t *
- router_get_by_digest(const char *digest)
- {
- tor_assert(digest);
- if (!routerlist) return NULL;
- // routerlist_assert_ok(routerlist);
- return digestmap_get(routerlist->identity_map, digest);
- }
- /** Return the router in our routerlist whose 20-byte descriptor
- * is <b>digest</b>. Return NULL if no such router is known. */
- signed_descriptor_t *
- router_get_by_descriptor_digest(const char *digest)
- {
- tor_assert(digest);
- if (!routerlist) return NULL;
- return digestmap_get(routerlist->desc_digest_map, digest);
- }
- /** Return a pointer to the signed textual representation of a descriptor.
- * The returned string is not guaranteed to be NUL-terminated: the string's
- * length will be in desc-\>signed_descriptor_len. */
- const char *
- signed_descriptor_get_body(signed_descriptor_t *desc)
- {
- const char *r;
- size_t len = desc->signed_descriptor_len;
- tor_assert(len > 32);
- if (desc->saved_location == SAVED_IN_CACHE && routerlist &&
- routerlist->mmap_descriptors) {
- tor_assert(desc->saved_offset + len <= routerlist->mmap_descriptors->size);
- r = routerlist->mmap_descriptors->data + desc->saved_offset;
- } else {
- r = desc->signed_descriptor_body;
- }
- tor_assert(r);
- tor_assert(!memcmp("router ", r, 7));
- #if 0
- tor_assert(!memcmp("\n-----END SIGNATURE-----\n",
- r + len - 25, 25));
- #endif
- return r;
- }
- /** Return the current list of all known routers. */
- routerlist_t *
- router_get_routerlist(void)
- {
- if (!routerlist) {
- routerlist = tor_malloc_zero(sizeof(routerlist_t));
- routerlist->routers = smartlist_create();
- routerlist->old_routers = smartlist_create();
- routerlist->identity_map = digestmap_new();
- routerlist->desc_digest_map = digestmap_new();
- }
- return routerlist;
- }
- /** Free all storage held by <b>router</b>. */
- void
- routerinfo_free(routerinfo_t *router)
- {
- if (!router)
- return;
- tor_free(router->cache_info.signed_descriptor_body);
- tor_free(router->address);
- tor_free(router->nickname);
- tor_free(router->platform);
- tor_free(router->contact_info);
- if (router->onion_pkey)
- crypto_free_pk_env(router->onion_pkey);
- if (router->identity_pkey)
- crypto_free_pk_env(router->identity_pkey);
- if (router->declared_family) {
- SMARTLIST_FOREACH(router->declared_family, char *, s, tor_free(s));
- smartlist_free(router->declared_family);
- }
- addr_policy_free(router->exit_policy);
- tor_free(router);
- }
- /** Release storage held by <b>sd</b>. */
- static void
- signed_descriptor_free(signed_descriptor_t *sd)
- {
- tor_free(sd->signed_descriptor_body);
- tor_free(sd);
- }
- /** Extract a signed_descriptor_t from a routerinfo, and free the routerinfo.
- */
- static signed_descriptor_t *
- signed_descriptor_from_routerinfo(routerinfo_t *ri)
- {
- signed_descriptor_t *sd = tor_malloc_zero(sizeof(signed_descriptor_t));
- memcpy(sd, &(ri->cache_info), sizeof(signed_descriptor_t));
- ri->cache_info.signed_descriptor_body = NULL;
- routerinfo_free(ri);
- return sd;
- }
- /** Free all storage held by a routerlist <b>rl</b> */
- void
- routerlist_free(routerlist_t *rl)
- {
- tor_assert(rl);
- digestmap_free(rl->identity_map, NULL);
- digestmap_free(rl->desc_digest_map, NULL);
- SMARTLIST_FOREACH(rl->routers, routerinfo_t *, r,
- routerinfo_free(r));
- SMARTLIST_FOREACH(rl->old_routers, signed_descriptor_t *, sd,
- signed_descriptor_free(sd));
- smartlist_free(rl->routers);
- smartlist_free(rl->old_routers);
- if (routerlist->mmap_descriptors)
- tor_munmap_file(routerlist->mmap_descriptors);
- tor_free(rl);
- router_dir_info_changed();
- }
- void
- dump_routerlist_mem_usage(int severity)
- {
- uint64_t livedescs = 0;
- uint64_t olddescs = 0;
- if (!routerlist)
- return;
- SMARTLIST_FOREACH(routerlist->routers, routerinfo_t *, r,
- livedescs += r->cache_info.signed_descriptor_len);
- SMARTLIST_FOREACH(routerlist->old_routers, signed_descriptor_t *, sd,
- olddescs += sd->signed_descriptor_len);
- log(severity, LD_GENERAL,
- "In %d live descriptors: "U64_FORMAT" bytes. "
- "In %d old descriptors: "U64_FORMAT" bytes.",
- smartlist_len(routerlist->routers), U64_PRINTF_ARG(livedescs),
- smartlist_len(routerlist->old_routers), U64_PRINTF_ARG(olddescs));
- }
- /** Return the greatest number of routerdescs we'll hold for any given router.
- */
- static int
- max_descriptors_per_router(void)
- {
- int n_authorities = get_n_v2_authorities();
- return (n_authorities < 5) ? 5 : n_authorities;
- }
- /** Return non-zero if we have a lot of extra descriptors in our
- * routerlist, and should get rid of some of them. Else return 0.
- *
- * We should be careful to not return true too eagerly, since we
- * could churn. By using "+1" below, we make sure this function
- * only returns true at most every smartlist_len(rl-\>routers)
- * new descriptors.
- */
- static INLINE int
- routerlist_is_overfull(routerlist_t *rl)
- {
- return smartlist_len(rl->old_routers) >
- smartlist_len(rl->routers)*(max_descriptors_per_router()+1);
- }
- static INLINE int
- _routerlist_find_elt(smartlist_t *sl, void *ri, int idx)
- {
- if (idx < 0 || smartlist_get(sl, idx) != ri) {
- idx = -1;
- SMARTLIST_FOREACH(sl, routerinfo_t *, r,
- if (r == ri) {
- idx = r_sl_idx;
- break;
- });
- }
- return idx;
- }
- /** Insert an item <b>ri</b> into the routerlist <b>rl</b>, updating indices
- * as needed. */
- static void
- routerlist_insert(routerlist_t *rl, routerinfo_t *ri)
- {
- digestmap_set(rl->identity_map, ri->cache_info.identity_digest, ri);
- digestmap_set(rl->desc_digest_map, ri->cache_info.signed_descriptor_digest,
- &(ri->cache_info));
- smartlist_add(rl->routers, ri);
- ri->routerlist_index = smartlist_len(rl->routers) - 1;
- router_dir_info_changed();
- // routerlist_assert_ok(rl);
- }
- static void
- routerlist_insert_old(routerlist_t *rl, routerinfo_t *ri)
- {
- if (get_options()->DirPort &&
- !digestmap_get(rl->desc_digest_map,
- ri->cache_info.signed_descriptor_digest)) {
- signed_descriptor_t *sd = signed_descriptor_from_routerinfo(ri);
- digestmap_set(rl->desc_digest_map, sd->signed_descriptor_digest, sd);
- smartlist_add(rl->old_routers, sd);
- } else {
- routerinfo_free(ri);
- }
- // routerlist_assert_ok(rl);
- }
- /** Remove an item <b>ri</b> from the routerlist <b>rl</b>, updating indices
- * as needed. If <b>idx</b> is nonnegative and smartlist_get(rl->routers,
- * idx) == ri, we don't need to do a linear search over the list to decide
- * which to remove. We fill the gap in rl->routers with a later element in
- * the list, if any exists. <b>ri</b> is freed. */
- void
- routerlist_remove(routerlist_t *rl, routerinfo_t *ri, int idx, int make_old)
- {
- routerinfo_t *ri_tmp;
- idx = _routerlist_find_elt(rl->routers, ri, idx);
- if (idx < 0)
- return;
- ri->routerlist_index = -1;
- smartlist_del(rl->routers, idx);
- if (idx < smartlist_len(rl->routers)) {
- routerinfo_t *r = smartlist_get(rl->routers, idx);
- r->routerlist_index = idx;
- }
- ri_tmp = digestmap_remove(rl->identity_map, ri->cache_info.identity_digest);
- router_dir_info_changed();
- tor_assert(ri_tmp == ri);
- if (make_old && get_options()->DirPort) {
- signed_descriptor_t *sd;
- sd = signed_descriptor_from_routerinfo(ri);
- smartlist_add(rl->old_routers, sd);
- digestmap_set(rl->desc_digest_map, sd->signed_descriptor_digest, sd);
- } else {
- ri_tmp = digestmap_remove(rl->desc_digest_map,
- ri->cache_info.signed_descriptor_digest);
- tor_assert(ri_tmp == ri);
- router_bytes_dropped += ri->cache_info.signed_descriptor_len;
- routerinfo_free(ri);
- }
- // routerlist_assert_ok(rl);
- }
- static void
- routerlist_remove_old(routerlist_t *rl, signed_descriptor_t *sd, int idx)
- {
- signed_descriptor_t *sd_tmp;
- idx = _routerlist_find_elt(rl->old_routers, sd, idx);
- if (idx < 0)
- return;
- smartlist_del(rl->old_routers, idx);
- sd_tmp = digestmap_remove(rl->desc_digest_map,
- sd->signed_descriptor_digest);
- tor_assert(sd_tmp == sd);
- router_bytes_dropped += sd->signed_descriptor_len;
- signed_descriptor_free(sd);
- // routerlist_assert_ok(rl);
- }
- /** Remove <b>ri_old</b> from the routerlist <b>rl</b>, and replace it with
- * <b>ri_new</b>, updating all index info. If <b>idx</b> is nonnegative and
- * smartlist_get(rl->routers, idx) == ri, we don't need to do a linear
- * search over the list to decide which to remove. We put ri_new in the same
- * index as ri_old, if possible. ri is freed as appropriate. */
- static void
- routerlist_replace(routerlist_t *rl, routerinfo_t *ri_old,
- routerinfo_t *ri_new, int idx, int make_old)
- {
- tor_assert(ri_old != ri_new);
- idx = _routerlist_find_elt(rl->routers, ri_old, idx);
- router_dir_info_changed();
- if (idx >= 0) {
- smartlist_set(rl->routers, idx, ri_new);
- ri_old->routerlist_index = -1;
- ri_new->routerlist_index = idx;
- } else {
- log_warn(LD_BUG, "Appending entry from routerlist_replace.");
- routerlist_insert(rl, ri_new);
- return;
- }
- if (memcmp(ri_old->cache_info.identity_digest,
- ri_new->cache_info.identity_digest, DIGEST_LEN)) {
- /* digests don't match; digestmap_set won't replace */
- digestmap_remove(rl->identity_map, ri_old->cache_info.identity_digest);
- }
- digestmap_set(rl->identity_map, ri_new->cache_info.identity_digest, ri_new);
- digestmap_set(rl->desc_digest_map,
- ri_new->cache_info.signed_descriptor_digest, &(ri_new->cache_info));
- if (make_old && get_options()->DirPort) {
- signed_descriptor_t *sd = signed_descriptor_from_routerinfo(ri_old);
- smartlist_add(rl->old_routers, sd);
- digestmap_set(rl->desc_digest_map, sd->signed_descriptor_digest, sd);
- } else {
- if (memcmp(ri_old->cache_info.signed_descriptor_digest,
- ri_new->cache_info.signed_descriptor_digest,
- DIGEST_LEN)) {
- /* digests don't match; digestmap_set didn't replace */
- digestmap_remove(rl->desc_digest_map,
- ri_old->cache_info.signed_descriptor_digest);
- }
- routerinfo_free(ri_old);
- }
- // routerlist_assert_ok(rl);
- }
- /** Free all memory held by the routerlist module. */
- void
- routerlist_free_all(void)
- {
- if (routerlist)
- routerlist_free(routerlist);
- routerlist = NULL;
- if (warned_nicknames) {
- SMARTLIST_FOREACH(warned_nicknames, char *, cp, tor_free(cp));
- smartlist_free(warned_nicknames);
- warned_nicknames = NULL;
- }
- if (warned_conflicts) {
- SMARTLIST_FOREACH(warned_conflicts, char *, cp, tor_free(cp));
- smartlist_free(warned_conflicts);
- warned_conflicts = NULL;
- }
- if (trusted_dir_servers) {
- SMARTLIST_FOREACH(trusted_dir_servers, trusted_dir_server_t *, ds,
- trusted_dir_server_free(ds));
- smartlist_free(trusted_dir_servers);
- trusted_dir_servers = NULL;
- }
- if (networkstatus_list) {
- SMARTLIST_FOREACH(networkstatus_list, networkstatus_t *, ns,
- networkstatus_free(ns));
- smartlist_free(networkstatus_list);
- networkstatus_list = NULL;
- }
- if (routerstatus_list) {
- SMARTLIST_FOREACH(routerstatus_list, local_routerstatus_t *, rs,
- local_routerstatus_free(rs));
- smartlist_free(routerstatus_list);
- routerstatus_list = NULL;
- }
- if (named_server_map) {
- strmap_free(named_server_map, _tor_free);
- }
- }
- /** Free all storage held by the routerstatus object <b>rs</b>. */
- void
- routerstatus_free(routerstatus_t *rs)
- {
- tor_free(rs);
- }
- /** Free all storage held by the local_routerstatus object <b>rs</b>. */
- static void
- local_routerstatus_free(local_routerstatus_t *rs)
- {
- tor_free(rs);
- }
- /** Free all storage held by the networkstatus object <b>ns</b>. */
- void
- networkstatus_free(networkstatus_t *ns)
- {
- tor_free(ns->source_address);
- tor_free(ns->contact);
- if (ns->signing_key)
- crypto_free_pk_env(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);
- }
- /** Forget that we have issued any router-related warnings, so that we'll
- * warn again if we see the same errors. */
- void
- routerlist_reset_warnings(void)
- {
- if (!warned_nicknames)
- warned_nicknames = smartlist_create();
- SMARTLIST_FOREACH(warned_nicknames, char *, cp, tor_free(cp));
- smartlist_clear(warned_nicknames); /* now the list is empty. */
- if (!warned_conflicts)
- warned_conflicts = smartlist_create();
- SMARTLIST_FOREACH(warned_conflicts, char *, cp, tor_free(cp));
- smartlist_clear(warned_conflicts); /* now the list is empty. */
- if (!routerstatus_list)
- routerstatus_list = smartlist_create();
- SMARTLIST_FOREACH(routerstatus_list, local_routerstatus_t *, rs,
- rs->name_lookup_warned = 0);
- have_warned_about_invalid_status = 0;
- have_warned_about_old_version = 0;
- have_warned_about_new_version = 0;
- }
- /** Mark the router with ID <b>digest</b> as running or non-running
- * in our routerlist. */
- void
- router_set_status(const char *digest, int up)
- {
- routerinfo_t *router;
- local_routerstatus_t *status;
- tor_assert(digest);
- SMARTLIST_FOREACH(trusted_dir_servers, trusted_dir_server_t *, d,
- if (!memcmp(d->digest, digest, DIGEST_LEN))
- d->is_running = up);
- router = router_get_by_digest(digest);
- if (router) {
- log_debug(LD_DIR,"Marking router '%s' as %s.",
- router->nickname, up ? "up" : "down");
- if (!up && router_is_me(router) && !we_are_hibernating())
- log_warn(LD_NET, "We just marked ourself as down. Are your external "
- "addresses reachable?");
- router->is_running = up;
- }
- status = router_get_combined_status_by_digest(digest);
- if (status && status->status.is_running != up) {
- status->status.is_running = up;
- control_event_networkstatus_changed_single(status);
- }
- router_dir_info_changed();
- }
- /** Add <b>router</b> to the routerlist, if we don't already have it. Replace
- * older entries (if any) with the same key. Note: Callers should not hold
- * their pointers to <b>router</b> if this function fails; <b>router</b>
- * will either be inserted into the routerlist or freed.
- *
- * Returns >= 0 if the router was added; less than 0 if it was not.
- *
- * If we're returning non-zero, then assign to *<b>msg</b> a static string
- * describing the reason for not liking the routerinfo.
- *
- * If the return value is less than -1, there was a problem with the
- * routerinfo. If the return value is equal to -1, then the routerinfo was
- * fine, but out-of-date. If the return value is equal to 1, the
- * routerinfo was accepted, but we should notify the generator of the
- * descriptor using the message *<b>msg</b>.
- *
- * If <b>from_cache</b>, this descriptor came from our disk cache. If
- * <b>from_fetch</b>, we received it in response to a request we made.
- * (If both are false, that means it was uploaded to us as an auth dir
- * server or via the controller.)
- *
- * This function should be called *after*
- * routers_update_status_from_networkstatus; subsequently, you should call
- * router_rebuild_store and control_event_descriptors_changed.
- */
- int
- router_add_to_routerlist(routerinfo_t *router, const char **msg,
- int from_cache, int from_fetch)
- {
- const char *id_digest;
- int authdir = get_options()->AuthoritativeDir;
- int authdir_believes_valid = 0;
- routerinfo_t *old_router;
- tor_assert(msg);
- if (!routerlist)
- router_get_routerlist();
- if (!networkstatus_list)
- networkstatus_list = smartlist_create();
- id_digest = router->cache_info.identity_digest;
- /* Make sure that we haven't already got this exact descriptor. */
- if (digestmap_get(routerlist->desc_digest_map,
- router->cache_info.signed_descriptor_digest)) {
- log_info(LD_DIR,
- "Dropping descriptor that we already have for router '%s'",
- router->nickname);
- *msg = "Router descriptor was not new.";
- routerinfo_free(router);
- return -1;
- }
- if (routerlist_is_overfull(routerlist))
- routerlist_remove_old_routers();
- if (authdir) {
- if (authdir_wants_to_reject_router(router, msg,
- !from_cache && !from_fetch)) {
- tor_assert(*msg);
- routerinfo_free(router);
- return -2;
- }
- authdir_believes_valid = router->is_valid;
- } else if (from_fetch) {
- /* Only check the descriptor digest against the network statuses when
- * we are receiving in response to a fetch. */
- if (!signed_desc_digest_is_recognized(&router->cache_info)) {
- log_warn(LD_DIR, "Dropping unrecognized descriptor for router '%s'",
- router->nickname);
- *msg = "Router descriptor is not referenced by any network-status.";
- routerinfo_free(router);
- return -1;
- }
- }
- /* We no longer need a router with this descriptor digest. */
- SMARTLIST_FOREACH(networkstatus_list, networkstatus_t *, ns,
- {
- routerstatus_t *rs =
- networkstatus_find_entry(ns, router->cache_info.identity_digest);
- if (rs && !memcmp(rs->descriptor_digest,
- router->cache_info.signed_descriptor_digest,
- DIGEST_LEN))
- rs->need_to_mirror = 0;
- });
- /* If we have a router with the same identity key, choose the newer one. */
- old_router = digestmap_get(routerlist->identity_map,
- router->cache_info.identity_digest);
- if (old_router) {
- int pos = old_router->routerlist_index;
- tor_assert(smartlist_get(routerlist->routers, pos) == old_router);
- if (router->cache_info.published_on <=
- old_router->cache_info.published_on) {
- /* Same key, but old */
- log_debug(LD_DIR, "Skipping not-new descriptor for router '%s'",
- router->nickname);
- /* Only journal this desc if we'll be serving it. */
- if (!from_cache && get_options()->DirPort)
- router_append_to_journal(&router->cache_info);
- routerlist_insert_old(routerlist, router);
- *msg = "Router descriptor was not new.";
- return -1;
- } else {
- /* Same key, new. */
- int unreachable = 0;
- log_debug(LD_DIR, "Replacing entry for router '%s/%s' [%s]",
- router->nickname, old_router->nickname,
- hex_str(id_digest,DIGEST_LEN));
- if (router->addr == old_router->addr &&
- router->or_port == old_router->or_port) {
- /* these carry over when the address and orport are unchanged.*/
- router->last_reachable = old_router->last_reachable;
- router->testing_since = old_router->testing_since;
- router->num_unreachable_notifications =
- old_router->num_unreachable_notifications;
- }
- if (authdir && !from_cache && !from_fetch &&
- router_have_minimum_dir_info() &&
- dirserv_thinks_router_is_blatantly_unreachable(router,
- time(NULL))) {
- if (router->num_unreachable_notifications >= 3) {
- unreachable = 1;
- log_notice(LD_DIR, "Notifying server '%s' that it's unreachable. "
- "(ContactInfo '%s', platform '%s').",
- router->nickname,
- router->contact_info ? router->contact_info : "",
- router->platform ? router->platform : "");
- } else {
- log_info(LD_DIR,"'%s' may be unreachable -- the %d previous "
- "descriptors were thought to be unreachable.",
- router->nickname, router->num_unreachable_notifications);
- router->num_unreachable_notifications++;
- }
- }
- routerlist_replace(routerlist, old_router, router, pos, 1);
- if (!from_cache) {
- router_append_to_journal(&router->cache_info);
- }
- directory_set_dirty();
- *msg = unreachable ? "Dirserver believes your ORPort is unreachable" :
- authdir_believes_valid ? "Valid server updated" :
- ("Invalid server updated. (This dirserver is marking your "
- "server as unapproved.)");
- return unreachable ? 1 : 0;
- }
- }
- /* We haven't seen a router with this name before. Add it to the end of
- * the list. */
- routerlist_insert(routerlist, router);
- if (!from_cache)
- router_append_to_journal(&router->cache_info);
- directory_set_dirty();
- return 0;
- }
- /** DOCDOC */
- static int
- _compare_old_routers_by_identity(const void **_a, const void **_b)
- {
- int i;
- const signed_descriptor_t *r1 = *_a, *r2 = *_b;
- if ((i = memcmp(r1->identity_digest, r2->identity_digest, DIGEST_LEN)))
- return i;
- return r1->published_on - r2->published_on;
- }
- /** DOCDOC */
- struct duration_idx_t {
- int duration;
- int idx;
- int old;
- };
- /** DOCDOC */
- static int
- _compare_duration_idx(const void *_d1, const void *_d2)
- {
- const struct duration_idx_t *d1 = _d1;
- const struct duration_idx_t *d2 = _d2;
- return d1->duration - d2->duration;
- }
- /** The range <b>lo</b> through <b>hi</b> inclusive of routerlist->old_routers
- * must contain routerinfo_t with the same identity and with publication time
- * in ascending order. Remove members from this range until there are no more
- * than max_descriptors_per_router() remaining. Start by removing the oldest
- * members from before <b>cutoff</b>, then remove members which were current
- * for the lowest amount of time. The order of members of old_routers at
- * indices <b>lo</b> or higher may be changed.
- */
- static void
- routerlist_remove_old_cached_routers_with_id(time_t cutoff, int lo, int hi,
- digestmap_t *retain)
- {
- int i, n = hi-lo+1, n_extra;
- int n_rmv = 0;
- struct duration_idx_t *lifespans;
- uint8_t *rmv, *must_keep;
- smartlist_t *lst = routerlist->old_routers;
- #if 1
- const char *ident;
- tor_assert(hi < smartlist_len(lst));
- tor_assert(lo <= hi);
- ident = ((signed_descriptor_t*)smartlist_get(lst, lo))->identity_digest;
- for (i = lo+1; i <= hi; ++i) {
- signed_descriptor_t *r = smartlist_get(lst, i);
- tor_assert(!memcmp(ident, r->identity_digest, DIGEST_LEN));
- }
- #endif
- /* Check whether we need to do anything at all. */
- n_extra = n - max_descriptors_per_router();
- if (n_extra <= 0)
- return;
- lifespans = tor_malloc_zero(sizeof(struct duration_idx_t)*n);
- rmv = tor_malloc_zero(sizeof(uint8_t)*n);
- must_keep = tor_malloc_zero(sizeof(uint8_t)*n);
- /* Set lifespans to contain the lifespan and index of each server. */
- /* Set rmv[i-lo]=1 if we're going to remove a server for being too old. */
- for (i = lo; i <= hi; ++i) {
- signed_descriptor_t *r = smartlist_get(lst, i);
- signed_descriptor_t *r_next;
- lifespans[i-lo].idx = i;
- if (retain && digestmap_get(retain, r->signed_descriptor_digest)) {
- must_keep[i-lo] = 1;
- }
- if (i < hi) {
- r_next = smartlist_get(lst, i+1);
- tor_assert(r->published_on <= r_next->published_on);
- lifespans[i-lo].duration = (r_next->published_on - r->published_on);
- } else {
- r_next = NULL;
- lifespans[i-lo].duration = INT_MAX;
- }
- if (!must_keep[i-lo] && r->published_on < cutoff && n_rmv < n_extra) {
- ++n_rmv;
- lifespans[i-lo].old = 1;
- rmv[i-lo] = 1;
- }
- }
- if (n_rmv < n_extra) {
- /**
- * We aren't removing enough servers for being old. Sort lifespans by
- * the duration of liveness, and remove the ones we're not already going to
- * remove based on how long they were alive.
- **/
- qsort(lifespans, n, sizeof(struct duration_idx_t), _compare_duration_idx);
- for (i = 0; i < n && n_rmv < n_extra; ++i) {
- if (!must_keep[lifespans[i].idx-lo] && !lifespans[i].old) {
- rmv[lifespans[i].idx-lo] = 1;
- ++n_rmv;
- }
- }
- }
- for (i = hi; i >= lo; --i) {
- if (rmv[i-lo])
- routerlist_remove_old(routerlist, smartlist_get(lst, i), i);
- }
- tor_free(must_keep);
- tor_free(rmv);
- tor_free(lifespans);
- }
- /** Deactivate any routers from the routerlist that are more than
- * ROUTER_MAX_AGE seconds old and not recommended by any networkstatuses;
- * remove old routers from the list of cached routers if we have too many.
- */
- void
- routerlist_remove_old_routers(void)
- {
- int i, hi=-1;
- const char *cur_id = NULL;
- time_t now = time(NULL);
- time_t cutoff;
- routerinfo_t *router;
- signed_descriptor_t *sd;
- digestmap_t *retain;
- if (!routerlist || !networkstatus_list)
- return;
- retain = digestmap_new();
- cutoff = now - OLD_ROUTER_DESC_MAX_AGE;
- /* Build a list of all the descriptors that _anybody_ recommends. */
- SMARTLIST_FOREACH(networkstatus_list, networkstatus_t *, ns,
- {
- SMARTLIST_FOREACH(ns->entries, routerstatus_t *, rs,
- if (rs->published_on >= cutoff)
- digestmap_set(retain, rs->descriptor_digest, (void*)1));
- });
- /* If we have a bunch of networkstatuses, we should consider pruning current
- * routers that are too old and that nobody recommends. (If we don't have
- * enough networkstatuses, then we should get more before we decide to kill
- * routers.) */
- if (smartlist_len(networkstatus_list) > get_n_v2_authorities() / 2) {
- cutoff = now - ROUTER_MAX_AGE;
- /* Remove too-old unrecommended members of routerlist->routers. */
- for (i = 0; i < smartlist_len(routerlist->routers); ++i) {
- router = smartlist_get(routerlist->routers, i);
- if (router->cache_info.published_on <= cutoff &&
- !digestmap_get(retain,router->cache_info.signed_descriptor_digest)) {
- /* Too old: remove it. (If we're a cache, just move it into
- * old_routers.) */
- log_info(LD_DIR,
- "Forgetting obsolete (too old) routerinfo for router '%s'",
- router->nickname);
- routerlist_remove(routerlist, router, i--, 1);
- }
- }
- }
- /* Remove far-too-old members of routerlist->old_routers. */
- cutoff = now - OLD_ROUTER_DESC_MAX_AGE;
- for (i = 0; i < smartlist_len(routerlist->old_routers); ++i) {
- sd = smartlist_get(routerlist->old_routers, i);
- if (sd->published_on <= cutoff &&
- !digestmap_get(retain, sd->signed_descriptor_digest)) {
- /* Too old. Remove it. */
- routerlist_remove_old(routerlist, sd, i--);
- }
- }
- /* Now we might have to look at routerlist->old_routers for extraneous
- * members. (We'd keep all the members if we could, but we need to save
- * space.) First, check whether we have too many router descriptors, total.
- * We're okay with having too many for some given router, so long as the
- * total number doesn't approach max_descriptors_per_router()*len(router).
- */
- if (smartlist_len(routerlist->old_routers) <
- smartlist_len(routerlist->routers) * (max_descriptors_per_router() - 1))
- goto done;
- smartlist_sort(routerlist->old_routers, _compare_old_routers_by_identity);
- /* Iterate through the list from back to front, so when we remove descriptors
- * we don't mess up groups we haven't gotten to. */
- for (i = smartlist_len(routerlist->old_routers)-1; i >= 0; --i) {
- signed_descriptor_t *r = smartlist_get(routerlist->old_routers, i);
- if (!cur_id) {
- cur_id = r->identity_digest;
- hi = i;
- }
- if (memcmp(cur_id, r->identity_digest, DIGEST_LEN)) {
- routerlist_remove_old_cached_routers_with_id(cutoff, i+1, hi, retain);
- cur_id = r->identity_digest;
- hi = i;
- }
- }
- if (hi>=0)
- routerlist_remove_old_cached_routers_with_id(cutoff, 0, hi, retain);
- routerlist_assert_ok(routerlist);
- done:
- digestmap_free(retain, NULL);
- }
- /**
- * Code to parse a single router descriptor and insert it into the
- * routerlist. Return -1 if the descriptor was ill-formed; 0 if the
- * descriptor was well-formed but could not be added; and 1 if the
- * descriptor was added.
- *
- * If we don't add it and <b>msg</b> is not NULL, then assign to
- * *<b>msg</b> a static string describing the reason for refusing the
- * descriptor.
- *
- * This is used only by the controller.
- */
- int
- router_load_single_router(const char *s, uint8_t purpose, const char **msg)
- {
- routerinfo_t *ri;
- int r;
- smartlist_t *lst;
- tor_assert(msg);
- *msg = NULL;
- if (!(ri = router_parse_entry_from_string(s, NULL, 1))) {
- log_warn(LD_DIR, "Error parsing router descriptor; dropping.");
- *msg = "Couldn't parse router descriptor.";
- return -1;
- }
- ri->purpose = purpose;
- if (router_is_me(ri)) {
- log_warn(LD_DIR, "Router's identity key matches mine; dropping.");
- *msg = "Router's identity key matches mine.";
- routerinfo_free(ri);
- return 0;
- }
- lst = smartlist_create();
- smartlist_add(lst, ri);
- routers_update_status_from_networkstatus(lst, 0);
- if ((r=router_add_to_routerlist(ri, msg, 0, 0))<0) {
- /* we've already assigned to *msg now, and ri is already freed */
- tor_assert(*msg);
- if (r < -1)
- log_warn(LD_DIR, "Couldn't add router to list: %s Dropping.", *msg);
- smartlist_free(lst);
- return 0;
- } else {
- control_event_descriptors_changed(lst);
- smartlist_free(lst);
- log_debug(LD_DIR, "Added router to list");
- return 1;
- }
- }
- /** Given a string <b>s</b> containing some routerdescs, parse it and put the
- * routers into our directory. If saved_location is SAVED_NOWHERE, the routers
- * are in response to a query to the network: cache them by adding them to
- * the journal.
- *
- * If <b>requested_fingerprints</b> is provided, it must contain a list of
- * uppercased identity fingerprints. Do not update any router whose
- * fingerprint is not on the list; after updating a router, remove its
- * fingerprint from the list.
- */
- void
- router_load_routers_from_string(const char *s, saved_location_t saved_location,
- smartlist_t *requested_fingerprints)
- {
- smartlist_t *routers = smartlist_create(), *changed = smartlist_create();
- char fp[HEX_DIGEST_LEN+1];
- const char *msg;
- int from_cache = (saved_location != SAVED_NOWHERE);
- router_parse_list_from_string(&s, routers, saved_location);
- routers_update_status_from_networkstatus(routers, !from_cache);
- log_info(LD_DIR, "%d elements to add", smartlist_len(routers));
- SMARTLIST_FOREACH(routers, routerinfo_t *, ri,
- {
- base16_encode(fp, sizeof(fp), ri->cache_info.signed_descriptor_digest,
- DIGEST_LEN);
- if (requested_fingerprints) {
- if (smartlist_string_isin(requested_fingerprints, fp)) {
- smartlist_string_remove(requested_fingerprints, fp);
- } else {
- char *requested =
- smartlist_join_strings(requested_fingerprints," ",0,NULL);
- log_warn(LD_DIR,
- "We received a router descriptor with a fingerprint (%s) "
- "that we never requested. (We asked for: %s.) Dropping.",
- fp, requested);
- tor_free(requested);
- routerinfo_free(ri);
- continue;
- }
- }
- if (router_add_to_routerlist(ri, &msg, from_cache, !from_cache) >= 0)
- smartlist_add(changed, ri);
- });
- if (smartlist_len(changed))
- control_event_descriptors_changed(changed);
- routerlist_assert_ok(routerlist);
- router_rebuild_store(0);
- smartlist_free(routers);
- smartlist_free(changed);
- }
- /** 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)
- {
- const char *datadir = get_options()->DataDirectory;
- size_t len = strlen(datadir)+64;
- char fp[HEX_DIGEST_LEN+1];
- char *fn = tor_malloc(len+1);
- base16_encode(fp, HEX_DIGEST_LEN+1, identity_digest, DIGEST_LEN);
- tor_snprintf(fn, len, "%s/cached-status/%s",datadir,fp);
- return fn;
- }
- /** Helper for smartlist_sort: Compare two networkstatus objects by
- * publication date. */
- static int
- _compare_networkstatus_published_on(const void **_a, const void **_b)
- {
- const networkstatus_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 neworkstatus 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,
- networkstatus_source_t source,
- networkstatus_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 (get_options()->DirPort)
- 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(const char *s, time_t arrived_at,
- networkstatus_source_t source, smartlist_t *requested_fingerprints)
- {
- networkstatus_t *ns;
- int i, found;
- time_t now;
- int skewed = 0;
- trusted_dir_server_t *trusted_dir = NULL;
- const char *source_desc = NULL;
- char fp[HEX_DIGEST_LEN+1];
- char published[ISO_TIME_LEN+1];
- ns = networkstatus_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->is_v2_authority) {
- log_info(LD_DIR, "Network status was signed, but not by an authoritative "
- "directory we recognize.");
- if (!get_options()->DirPort) {
- networkstatus_free(ns);
- return 0;
- }
- 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) {
- log_warn(LD_GENERAL, "Network status from %s was published in the future "
- "(%s GMT). Somebody is skewed here: check your clock. "
- "Not caching.",
- source_desc, published);
- control_event_general_status(LOG_WARN,
- "CLOCK_SKEW SOURCE=NETWORKSTATUS:%s:%d",
- ns->source_address, ns->source_dirport);
- skewed = 1;
- }
- if (!networkstatus_list)
- networkstatus_list = smartlist_create();
- 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_free(ns);
- return 0;
- }
- if (requested_fingerprints) {
- if (smartlist_string_isin(requested_fingerprints, fp)) {
- smartlist_string_remove(requested_fingerprints, fp);
- } else {
- char *requested =
- smartlist_join_strings(requested_fingerprints," ",0,NULL);
- if (source != NS_FROM_DIR_ALL) {
- 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 && get_options()->DirPort) {
- /* 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_free(ns);
- }
- return 0;
- }
- if (source != NS_FROM_CACHE && trusted_dir)
- trusted_dir->n_networkstatus_failures = 0;
- found = 0;
- for (i=0; i < smartlist_len(networkstatus_list); ++i) {
- networkstatus_t *old_ns = smartlist_get(networkstatus_list, i);
- if (!memcmp(old_ns->identity_digest, ns->identity_digest, DIGEST_LEN)) {
- if (!memcmp(old_ns->networkstatus_digest,
- ns->networkstatus_digest, DIGEST_LEN)) {
- /* Same one we had before. */
- networkstatus_free(ns);
- 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;
- }
- 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);
- 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_free(ns);
- return 0;
- } else {
- networkstatus_free(old_ns);
- smartlist_set(networkstatus_list, i, ns);
- found = 1;
- break;
- }
- }
- }
- if (!found)
- smartlist_add(networkstatus_list, ns);
- SMARTLIST_FOREACH(ns->entries, routerstatus_t *, rs,
- {
- if (!router_get_by_descriptor_digest(rs->descriptor_digest))
- rs->need_to_mirror = 1;
- });
- 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_list_has_changed = 1;
- router_dir_info_changed();
- smartlist_sort(networkstatus_list, _compare_networkstatus_published_on);
- if (!skewed)
- add_networkstatus_to_cache(s, source, ns);
- networkstatus_list_update_recent(now);
- return 0;
- }
- /** How old do we allow a network-status to get before removing it
- * completely? */
- #define MAX_NETWORKSTATUS_AGE (10*24*60*60)
- /** Remove all very-old network_status_t objects from memory and from the
- * disk cache. */
- void
- networkstatus_list_clean(time_t now)
- {
- int i;
- if (!networkstatus_list)
- return;
- for (i = 0; i < smartlist_len(networkstatus_list); ++i) {
- networkstatus_t *ns = smartlist_get(networkstatus_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_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 (get_options()->DirPort) {
- dirserv_set_cached_networkstatus_v2(NULL, ns->identity_digest, 0);
- }
- networkstatus_free(ns);
- router_dir_info_changed();
- }
- /* And now go through the directory cache for any cached untrusted
- * networkstatuses. */
- dirserv_clear_old_networkstatuses(now - MAX_NETWORKSTATUS_AGE);
- }
- /** Helper for bsearching a list of routerstatus_t pointers.*/
- static int
- _compare_digest_to_routerstatus_entry(const void *_key, const void **_member)
- {
- const char *key = _key;
- const routerstatus_t *rs = *_member;
- return memcmp(key, rs->identity_digest, DIGEST_LEN);
- }
- /** Return the entry in <b>ns</b> for the identity digest <b>digest</b>, or
- * NULL if none was found. */
- static routerstatus_t *
- networkstatus_find_entry(networkstatus_t *ns, const char *digest)
- {
- return smartlist_bsearch(ns->entries, digest,
- _compare_digest_to_routerstatus_entry);
- }
- /** Return the consensus view of the status of the router whose digest is
- * <b>digest</b>, or NULL if we don't know about any such router. */
- local_routerstatus_t *
- router_get_combined_status_by_digest(const char *digest)
- {
- if (!routerstatus_list)
- return NULL;
- return smartlist_bsearch(routerstatus_list, digest,
- _compare_digest_to_routerstatus_entry);
- }
- /** DOCDOC */
- static local_routerstatus_t *
- router_get_combined_status_by_nickname(const char *nickname,
- int warn_if_unnamed)
- {
- char digest[DIGEST_LEN];
- local_routerstatus_t *best=NULL;
- smartlist_t *matches=NULL;
- if (!routerstatus_list || !nickname)
- return NULL;
- if (nickname[0] == '$') {
- if (base16_decode(digest, DIGEST_LEN, nickname+1, strlen(nickname))<0)
- return NULL;
- return router_get_combined_status_by_digest(digest);
- } else if (strlen(nickname) == HEX_DIGEST_LEN &&
- (base16_decode(digest, DIGEST_LEN, nickname+1, strlen(nickname))==0)) {
- return router_get_combined_status_by_digest(digest);
- }
- matches = smartlist_create();
- SMARTLIST_FOREACH(routerstatus_list, local_routerstatus_t *, lrs,
- {
- if (!strcasecmp(lrs->status.nickname, nickname)) {
- if (lrs->status.is_named) {
- smartlist_free(matches);
- return lrs;
- } else {
- smartlist_add(matches, lrs);
- best = lrs;
- }
- }
- });
- if (smartlist_len(matches)>1 && warn_if_unnamed) {
- int any_unwarned=0;
- SMARTLIST_FOREACH(matches, local_routerstatus_t *, lrs,
- {
- if (! lrs->name_lookup_warned) {
- lrs->name_lookup_warned=1;
- any_unwarned=1;
- }
- });
- if (any_unwarned) {
- log_warn(LD_CONFIG,"There are multiple matches for the nickname \"%s\",",
- " but none is listed as named by the directory authorites. "
- "Choosing one arbitrarily.");
- }
- } else if (warn_if_unnamed && best && !best->name_lookup_warned) {
- char fp[HEX_DIGEST_LEN+1];
- base16_encode(fp, sizeof(fp),
- best->status.identity_digest, DIGEST_LEN);
- log_warn(LD_CONFIG,
- "To look up a status, you specified a server \"%s\" by name, but the "
- "directory authorities do not have a binding for this nickname. "
- "To make sure you get the same server in the future, refer to "
- "it by key, as \"$%s\".", nickname, fp);
- best->name_lookup_warned = 1;
- }
- smartlist_free(matches);
- return best;
- }
- /** Find a routerstatus_t that corresponds to <b>hexdigest</b>, if
- * any. Prefer ones that belong to authorities. */
- routerstatus_t *
- routerstatus_get_by_hexdigest(const char *hexdigest)
- {
- char digest[DIGEST_LEN];
- local_routerstatus_t *rs;
- trusted_dir_server_t *ds;
- if (strlen(hexdigest) < HEX_DIGEST_LEN ||
- base16_decode(digest,DIGEST_LEN,hexdigest,HEX_DIGEST_LEN) < 0)
- return NULL;
- if ((ds = router_get_trusteddirserver_by_digest(digest)))
- return &(ds->fake_status.status);
- if ((rs = router_get_combined_status_by_digest(digest)))
- return &(rs->status);
- return NULL;
- }
- /** Return true iff any networkstatus includes a descriptor whose digest
- * is that of <b>desc</b>. */
- static int
- signed_desc_digest_is_recognized(signed_descriptor_t *desc)
- {
- routerstatus_t *rs;
- if (!networkstatus_list)
- return 0;
- SMARTLIST_FOREACH(networkstatus_list, networkstatus_t *, ns,
- {
- if (!(rs = networkstatus_find_entry(ns, desc->identity_digest)))
- continue;
- if (!memcmp(rs->descriptor_digest,
- desc->signed_descriptor_digest, DIGEST_LEN))
- return 1;
- });
- return 0;
- }
- /** How frequently do directory authorities re-download fresh networkstatus
- * documents? */
- #define AUTHORITY_NS_CACHE_INTERVAL (5*60)
- /** How frequently do non-authority directory caches re-download fresh
- * networkstatus documents? */
- #define NONAUTHORITY_NS_CACHE_INTERVAL (15*60)
- /** We are a directory server, and so cache network_status documents.
- * Initiate downloads as needed to update them. For authorities, this means
- * asking each trusted directory for its network-status. For caches, this
- * means asking a random authority for all network-statuses.
- */
- static void
- update_networkstatus_cache_downloads(time_t now)
- {
- int authority = authdir_mode(get_options());
- int interval =
- authority ? AUTHORITY_NS_CACHE_INTERVAL : NONAUTHORITY_NS_CACHE_INTERVAL;
- if (last_networkstatus_download_attempted + interval >= now)
- return;
- if (!trusted_dir_servers)
- return;
- last_networkstatus_download_attempted = now;
- if (authority) {
- /* An authority launches a separate connection for everybody. */
- SMARTLIST_FOREACH(trusted_dir_servers, trusted_dir_server_t *, ds,
- {
- char resource[HEX_DIGEST_LEN+6]; /* fp/hexdigit.z\0 */
- if (!ds->is_v2_authority)
- continue;
- if (router_digest_is_me(ds->digest))
- continue;
- if (connection_get_by_type_addr_port_purpose(
- CONN_TYPE_DIR, ds->addr, ds->dir_port,
- DIR_PURPOSE_FETCH_NETWORKSTATUS)) {
- /* We are already fetching this one. */
- 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.status, DIR_PURPOSE_FETCH_NETWORKSTATUS,
- 0, /* Not private */
- resource,
- NULL, 0 /* No payload. */);
- });
- } 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_NETWORKSTATUS))
- directory_get_from_dirserver(DIR_PURPOSE_FETCH_NETWORKSTATUS,"all.z",1);
- }
- }
- /** How long (in seconds) does a client wait after getting a network status
- * before downloading the next in sequence? */
- #define NETWORKSTATUS_CLIENT_DL_INTERVAL (30*60)
- /** How many times do we allow a networkstatus download to fail before we
- * assume that the authority isn't publishing? */
- #define NETWORKSTATUS_N_ALLOWABLE_FAILURES 3
- /** We are not a directory cache or authority. Update our network-status list
- * by launching a new directory fetch for enough network-status documents "as
- * necessary". See function comments for implementation details.
- */
- static void
- update_networkstatus_client_downloads(time_t now)
- {
- int n_live = 0, n_dirservers, n_running_dirservers, needed = 0;
- int fetch_latest = 0;
- int most_recent_idx = -1;
- trusted_dir_server_t *most_recent = NULL;
- time_t most_recent_received = 0;
- char *resource, *cp;
- size_t resource_len;
- smartlist_t *missing;
- if (connection_get_by_type_purpose(CONN_TYPE_DIR,
- DIR_PURPOSE_FETCH_NETWORKSTATUS))
- return;
- /* This is a little tricky. We want to download enough network-status
- * objects so that we have all of them under
- * NETWORKSTATUS_MAX_AGE publication time. We want to download a new
- * *one* if the most recent one's publication time is under
- * NETWORKSTATUS_CLIENT_DL_INTERVAL.
- */
- if (!get_n_v2_authorities())
- return;
- n_dirservers = n_running_dirservers = 0;
- missing = smartlist_create();
- SMARTLIST_FOREACH(trusted_dir_servers, trusted_dir_server_t *, ds,
- {
- networkstatus_t *ns = networkstatus_get_by_digest(ds->digest);
- if (!ds->is_v2_authority)
- continue;
- ++n_dirservers;
- if (ds->n_networkstatus_failures > NETWORKSTATUS_N_ALLOWABLE_FAILURES)
- continue;
- ++n_running_dirservers;
- if (ns && ns->published_on > now-NETWORKSTATUS_MAX_AGE)
- ++n_live;
- else
- smartlist_add(missing, ds->digest);
- if (ns && (!most_recent || ns->received_on > most_recent_received)) {
- most_recent_idx = ds_sl_idx; /* magic variable from FOREACH */
- most_recent = ds;
- most_recent_received = ns->received_on;
- }
- });
- /* Also, download at least 1 every NETWORKSTATUS_CLIENT_DL_INTERVAL. */
- if (!smartlist_len(missing) &&
- most_recent_received < now-NETWORKSTATUS_CLIENT_DL_INTERVAL) {
- log_info(LD_DIR, "Our most recent network-status document (from %s) "
- "is %d seconds old; downloading another.",
- most_recent?most_recent->description:"nobody",
- (int)(now-most_recent_received));
- fetch_latest = 1;
- needed = 1;
- } else if (smartlist_len(missing)) {
- log_info(LD_DIR, "For %d/%d running directory servers, we have %d live"
- " network-status documents. Downloading %d.",
- n_running_dirservers, n_dirservers, n_live,
- smartlist_len(missing));
- needed = smartlist_len(missing);
- } else {
- smartlist_free(missing);
- return;
- }
- /* If no networkstatus was found, choose a dirserver at random as "most
- * recent". */
- if (most_recent_idx<0)
- most_recent_idx = crypto_rand_int(n_dirservers);
- if (fetch_latest) {
- int i;
- int n_failed = 0;
- for (i = most_recent_idx + 1; 1; ++i) {
- trusted_dir_server_t *ds;
- if (i >= n_dirservers)
- i = 0;
- ds = smartlist_get(trusted_dir_servers, i);
- if (! ds->is_v2_authority)
- continue;
- if (n_failed < n_dirservers &&
- ds->n_networkstatus_failures > NETWORKSTATUS_N_ALLOWABLE_FAILURES) {
- ++n_failed;
- continue;
- }
- smartlist_add(missing, ds->digest);
- break;
- }
- }
- /* Build a request string for all the resources we want. */
- resource_len = smartlist_len(missing) * (HEX_DIGEST_LEN+1) + 6;
- resource = tor_malloc(resource_len);
- memcpy(resource, "fp/", 3);
- cp = resource+3;
- smartlist_sort_digests(missing);
- needed = smartlist_len(missing);
- SMARTLIST_FOREACH(missing, const char *, d,
- {
- base16_encode(cp, HEX_DIGEST_LEN+1, d, DIGEST_LEN);
- cp += HEX_DIGEST_LEN;
- --needed;
- if (needed)
- *cp++ = '+';
- });
- memcpy(cp, ".z", 3);
- directory_get_from_dirserver(DIR_PURPOSE_FETCH_NETWORKSTATUS, resource, 1);
- tor_free(resource);
- smartlist_free(missing);
- }
- /** Launch requests for networkstatus documents as appropriate. */
- void
- update_networkstatus_downloads(time_t now)
- {
- or_options_t *options = get_options();
- if (options->DirPort)
- update_networkstatus_cache_downloads(now);
- else
- update_networkstatus_client_downloads(now);
- }
- /** Return 1 if all running sufficiently-stable routers will reject
- * addr:port, return 0 if any might accept it. */
- int
- router_exit_policy_all_routers_reject(uint32_t addr, uint16_t port,
- int need_uptime)
- {
- addr_policy_result_t r;
- if (!routerlist) return 1;
- SMARTLIST_FOREACH(routerlist->routers, routerinfo_t *, router,
- {
- if (router->is_running &&
- !router_is_unreliable(router, need_uptime, 0, 0)) {
- r = compare_addr_to_addr_policy(addr, port, router->exit_policy);
- if (r != ADDR_POLICY_REJECTED && r != ADDR_POLICY_PROBABLY_REJECTED)
- return 0; /* this one could be ok. good enough. */
- }
- });
- return 1; /* all will reject. */
- }
- /** Return true iff <b>router</b> does not permit exit streams.
- */
- int
- router_exit_policy_rejects_all(routerinfo_t *router)
- {
- return compare_addr_to_addr_policy(0, 0, router->exit_policy)
- == ADDR_POLICY_REJECTED;
- }
- /** Add to the list of authorized directory servers one at
- * <b>address</b>:<b>port</b>, with identity key <b>digest</b>. If
- * <b>address</b> is NULL, add ourself. */
- void
- add_trusted_dir_server(const char *nickname, const char *address,
- uint16_t dir_port, uint16_t or_port,
- const char *digest, int is_v1_authority,
- int is_v2_authority, int is_hidserv_authority)
- {
- trusted_dir_server_t *ent;
- uint32_t a;
- char *hostname = NULL;
- size_t dlen;
- if (!trusted_dir_servers)
- trusted_dir_servers = smartlist_create();
- if (!address) { /* The address is us; we should guess. */
- if (resolve_my_address(LOG_WARN, get_options(), &a, &hostname) < 0) {
- log_warn(LD_CONFIG,
- "Couldn't find a suitable address when adding ourself as a "
- "trusted directory server.");
- return;
- }
- } else {
- if (tor_lookup_hostname(address, &a)) {
- log_warn(LD_CONFIG,
- "Unable to lookup address for directory server at '%s'",
- address);
- return;
- }
- hostname = tor_strdup(address);
- a = ntohl(a);
- }
- ent = tor_malloc_zero(sizeof(trusted_dir_server_t));
- ent->nickname = nickname ? tor_strdup(nickname) : NULL;
- ent->address = hostname;
- ent->addr = a;
- ent->dir_port = dir_port;
- ent->or_port = or_port;
- ent->is_running = 1;
- ent->is_v1_authority = is_v1_authority;
- ent->is_v2_authority = is_v2_authority;
- ent->is_hidserv_authority = is_hidserv_authority;
- memcpy(ent->digest, digest, DIGEST_LEN);
- dlen = 64 + strlen(hostname) + (nickname?strlen(nickname):0);
- ent->description = tor_malloc(dlen);
- if (nickname)
- tor_snprintf(ent->description, dlen, "directory server \"%s\" at %s:%d",
- nickname, hostname, (int)dir_port);
- else
- tor_snprintf(ent->description, dlen, "directory server at %s:%d",
- hostname, (int)dir_port);
- ent->fake_status.status.addr = ent->addr;
- memcpy(ent->fake_status.status.identity_digest, digest, DIGEST_LEN);
- if (nickname)
- strlcpy(ent->fake_status.status.nickname, nickname,
- sizeof(ent->fake_status.status.nickname));
- else
- ent->fake_status.status.nickname[0] = '\0';
- ent->fake_status.status.dir_port = ent->dir_port;
- ent->fake_status.status.or_port = ent->or_port;
- smartlist_add(trusted_dir_servers, ent);
- router_dir_info_changed();
- }
- /** Free storage held in <b>ds</b> */
- void
- trusted_dir_server_free(trusted_dir_server_t *ds)
- {
- tor_free(ds->nickname);
- tor_free(ds->description);
- tor_free(ds->address);
- tor_free(ds);
- }
- /** Remove all members from the list of trusted dir servers. */
- void
- clear_trusted_dir_servers(void)
- {
- if (trusted_dir_servers) {
- SMARTLIST_FOREACH(trusted_dir_servers, trusted_dir_server_t *, ent,
- trusted_dir_server_free(ent));
- smartlist_clear(trusted_dir_servers);
- } else {
- trusted_dir_servers = smartlist_create();
- }
- router_dir_info_changed();
- }
- /** Return 1 if any trusted dir server supports v1 directories,
- * else return 0. */
- int
- any_trusted_dir_is_v1_authority(void)
- {
- if (trusted_dir_servers)
- SMARTLIST_FOREACH(trusted_dir_servers, trusted_dir_server_t *, ent,
- if (ent->is_v1_authority) return 1);
- return 0;
- }
- /** Return the network status with a given identity digest. */
- networkstatus_t *
- networkstatus_get_by_digest(const char *digest)
- {
- SMARTLIST_FOREACH(networkstatus_list, networkstatus_t *, ns,
- {
- if (!memcmp(ns->identity_digest, digest, DIGEST_LEN))
- return ns;
- });
- return NULL;
- }
- /** We believe networkstatuses more recent than this when they tell us that
- * our server is broken, invalid, obsolete, etc. */
- #define SELF_OPINION_INTERVAL (90*60)
- /** Result of checking whether a version is recommended. */
- typedef struct combined_version_status_t {
- /** How many networkstatuses claim to know about versions? */
- int n_versioning;
- /** What do the majority of networkstatuses believe about this version? */
- version_status_t consensus;
- /** How many networkstatuses constitute the majority? */
- int n_concurring;
- } combined_version_status_t;
- /** Return a string naming the versions of Tor recommended by
- * more than half the versioning networkstatuses. */
- static char *
- compute_recommended_versions(time_t now, int client,
- const char *my_version,
- combined_version_status_t *status_out)
- {
- int n_seen;
- char *current;
- smartlist_t *combined, *recommended;
- int n_versioning, n_recommending;
- char *result;
- /** holds the compromise status taken among all non-recommending
- * authorities */
- version_status_t consensus = VS_RECOMMENDED;
- (void) now; /* right now, we consider *all* statuses, regardless of age. */
- tor_assert(my_version);
- tor_assert(status_out);
- memset(status_out, 0, sizeof(combined_version_status_t));
- if (!networkstatus_list)
- return tor_strdup("<none>");
- combined = smartlist_create();
- n_versioning = n_recommending = 0;
- SMARTLIST_FOREACH(networkstatus_list, networkstatus_t *, ns,
- {
- const char *vers;
- smartlist_t *versions;
- version_status_t status;
- if (! ns->recommends_versions)
- continue;
- n_versioning++;
- vers = client ? ns->client_versions : ns->server_versions;
- if (!vers)
- continue;
- versions = smartlist_create();
- smartlist_split_string(versions, vers, ",",
- SPLIT_SKIP_SPACE|SPLIT_IGNORE_BLANK, 0);
- sort_version_list(versions, 1);
- smartlist_add_all(combined, versions);
- smartlist_free(versions);
- /* now, check _our_ version */
- status = tor_version_is_obsolete(my_version, vers);
- if (status == VS_RECOMMENDED)
- n_recommending++;
- consensus = version_status_join(status, consensus);
- });
- sort_version_list(combined, 0);
- current = NULL;
- n_seen = 0;
- recommended = smartlist_create();
- SMARTLIST_FOREACH(combined, char *, cp,
- {
- if (current && !strcmp(cp, current)) {
- ++n_seen;
- } else {
- if (n_seen > n_versioning/2 && current)
- smartlist_add(recommended, current);
- n_seen = 0;
- current = cp;
- }
- });
- if (n_seen > n_versioning/2 && current)
- smartlist_add(recommended, current);
- result = smartlist_join_strings(recommended, ", ", 0, NULL);
- SMARTLIST_FOREACH(combined, char *, cp, tor_free(cp));
- smartlist_free(combined);
- smartlist_free(recommended);
- status_out->n_versioning = n_versioning;
- if (n_recommending > n_versioning/2) {
- status_out->consensus = VS_RECOMMENDED;
- status_out->n_concurring = n_recommending;
- } else {
- status_out->consensus = consensus;
- status_out->n_concurring = n_versioning - n_recommending;
- }
- return result;
- }
- /** How many times do we have to fail at getting a networkstatus we can't find
- * before we're willing to believe it's okay to set up router statuses? */
- #define N_NS_ATTEMPTS_TO_SET_ROUTERS 4
- /** How many times do we have to fail at getting a networkstatus we can't find
- * before we're willing to believe it's okay to check our version? */
- #define N_NS_ATTEMPTS_TO_CHECK_VERSION 4
- /** 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.
- */
- void
- routers_update_all_from_networkstatus(void)
- {
- routerinfo_t *me;
- time_t now;
- if (!routerlist || !networkstatus_list ||
- (!networkstatus_list_has_changed && !routerstatus_list_has_changed))
- return;
- router_dir_info_changed();
- now = time(NULL);
- if (networkstatus_list_has_changed)
- routerstatus_list_update_from_networkstatus(now);
- routers_update_status_from_networkstatus(routerlist->routers, 0);
- me = router_get_my_routerinfo();
- if (me && !have_warned_about_invalid_status &&
- have_tried_downloading_all_statuses(N_NS_ATTEMPTS_TO_SET_ROUTERS)) {
- int n_recent = 0, n_listing = 0, n_valid = 0, n_named = 0, n_naming = 0;
- routerstatus_t *rs;
- SMARTLIST_FOREACH(networkstatus_list, networkstatus_t *, ns,
- {
- if (ns->received_on + SELF_OPINION_INTERVAL < now)
- continue;
- ++n_recent;
- if (ns->binds_names)
- ++n_naming;
- if (!(rs = networkstatus_find_entry(ns, me->cache_info.identity_digest)))
- continue;
- ++n_listing;
- if (rs->is_valid)
- ++n_valid;
- if (rs->is_named)
- ++n_named;
- });
- if (n_listing) {
- if (n_valid <= n_listing/2) {
- log_info(LD_GENERAL,
- "%d/%d recent statements from directory authorities list us "
- "as unapproved. Are you misconfigured?",
- n_listing-n_valid, n_listing);
- have_warned_about_invalid_status = 1;
- } else if (n_naming && !n_named) {
- log_info(LD_GENERAL, "0/%d name-binding directory authorities "
- "recognize your nickname. Please consider sending your "
- "nickname and identity fingerprint to the tor-ops.",
- n_naming);
- have_warned_about_invalid_status = 1;
- }
- }
- }
- entry_guards_compute_status();
- if (!have_warned_about_old_version &&
- have_tried_downloading_all_statuses(N_NS_ATTEMPTS_TO_CHECK_VERSION)) {
- combined_version_status_t st;
- int is_server = server_mode(get_options());
- char *recommended;
- recommended = compute_recommended_versions(now, !is_server, VERSION, &st);
- if (st.n_versioning) {
- if (st.consensus == VS_RECOMMENDED) {
- log_info(LD_GENERAL, "%d/%d statements from version-listing "
- "directory authorities say my version is ok.",
- st.n_concurring, st.n_versioning);
- } else if (st.consensus == VS_NEW || st.consensus == 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 %d/%d version-listing "
- "network statuses. Versions recommended by more than %d "
- "authorit%s are: %s",
- VERSION,
- st.consensus == VS_NEW_IN_SERIES ? " in its series" : "",
- st.n_concurring, st.n_versioning, st.n_versioning/2,
- st.n_versioning/2 > 1 ? "ies" : "y", 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 %d/%d version-"
- "listing network statuses. Versions recommended by "
- "at least %d authorit%s are: %s",
- VERSION,
- st.consensus == VS_OLD ? "obsolete" : "not recommended",
- st.n_concurring, st.n_versioning, st.n_versioning/2,
- st.n_versioning/2 > 1 ? "ies" : "y", recommended);
- have_warned_about_old_version = 1;
- control_event_general_status(LOG_WARN, "DANGEROUS_VERSION "
- "CURRENT=%s REASON=%s RECOMMENDED=\"%s\"",
- VERSION, st.consensus == VS_OLD ? "OLD" : "UNRECOMMENDED",
- recommended);
- }
- }
- tor_free(recommended);
- }
- routerstatus_list_has_changed = 0;
- }
- /** Allow any network-status newer than this to influence our view of who's
- * running. */
- #define DEFAULT_RUNNING_INTERVAL (60*60)
- /** If possible, always allow at least this many network-statuses to influence
- * our view of who's running. */
- #define MIN_TO_INFLUENCE_RUNNING 3
- /** Change the is_recent field of each member of networkstatus_list so that
- * all members more recent than DEFAULT_RUNNING_INTERVAL are recent, and
- * at least the MIN_TO_INFLUENCE_RUNNING most recent members are recent, and no
- * others are recent. Set networkstatus_list_has_changed if anything happened.
- */
- void
- networkstatus_list_update_recent(time_t now)
- {
- int n_statuses, n_recent, changed, i;
- char published[ISO_TIME_LEN+1];
- if (!networkstatus_list)
- return;
- n_statuses = smartlist_len(networkstatus_list);
- n_recent = 0;
- changed = 0;
- for (i=n_statuses-1; i >= 0; --i) {
- networkstatus_t *ns = smartlist_get(networkstatus_list, i);
- trusted_dir_server_t *ds =
- router_get_trusteddirserver_by_digest(ns->identity_digest);
- const char *src = ds?ds->description:ns->source_address;
- if (n_recent < MIN_TO_INFLUENCE_RUNNING ||
- ns->published_on + DEFAULT_RUNNING_INTERVAL > now) {
- if (!ns->is_recent) {
- format_iso_time(published, ns->published_on);
- log_info(LD_DIR,
- "Networkstatus from %s (published %s) is now \"recent\"",
- src, published);
- changed = 1;
- }
- ns->is_recent = 1;
- ++n_recent;
- } else {
- if (ns->is_recent) {
- format_iso_time(published, ns->published_on);
- log_info(LD_DIR,
- "Networkstatus from %s (published %s) is "
- "no longer \"recent\"",
- src, published);
- changed = 1;
- ns->is_recent = 0;
- }
- }
- }
- if (changed) {
- networkstatus_list_has_changed = 1;
- router_dir_info_changed();
- }
- }
- /** Helper for routerstatus_list_update_from_networkstatus: remember how many
- * authorities recommend a given descriptor digest. */
- typedef struct {
- routerstatus_t *rs;
- int count;
- } desc_digest_count_t;
- /** Update our view of router status (as stored in routerstatus_list) from the
- * current set of network status documents (as stored in networkstatus_list).
- * Do nothing unless the network status list has changed since the last time
- * this function was called.
- */
- static void
- routerstatus_list_update_from_networkstatus(time_t now)
- {
- or_options_t *options = get_options();
- int n_trusted, n_statuses, n_recent = 0, n_naming = 0;
- int n_listing_bad_exits = 0, n_listing_bad_directories = 0;
- int i, j, warned;
- int *index, *size;
- networkstatus_t **networkstatus;
- smartlist_t *result, *changed_list;
- strmap_t *name_map;
- char conflict[DIGEST_LEN]; /* Sentinel value */
- desc_digest_count_t *digest_counts = NULL;
- /* compute which network statuses will have a vote now */
- networkstatus_list_update_recent(now);
- router_dir_info_changed();
- if (!networkstatus_list_has_changed)
- return;
- if (!networkstatus_list)
- networkstatus_list = smartlist_create();
- if (!routerstatus_list)
- routerstatus_list = smartlist_create();
- if (!trusted_dir_servers)
- trusted_dir_servers = smartlist_create();
- if (!warned_conflicts)
- warned_conflicts = smartlist_create();
- n_statuses = smartlist_len(networkstatus_list);
- n_trusted = get_n_v2_authorities();
- if (n_statuses <= n_trusted/2) {
- /* Not enough statuses to adjust status. */
- log_info(LD_DIR,
- "Not enough statuses to update router status list. (%d/%d)",
- n_statuses, n_trusted);
- return;
- }
- log_info(LD_DIR, "Rebuilding router status list.");
- index = tor_malloc(sizeof(int)*n_statuses);
- size = tor_malloc(sizeof(int)*n_statuses);
- networkstatus = tor_malloc(sizeof(networkstatus_t *)*n_statuses);
- for (i = 0; i < n_statuses; ++i) {
- index[i] = 0;
- networkstatus[i] = smartlist_get(networkstatus_list, i);
- size[i] = smartlist_len(networkstatus[i]->entries);
- if (networkstatus[i]->binds_names)
- ++n_naming;
- if (networkstatus[i]->is_recent)
- ++n_recent;
- if (networkstatus[i]->lists_bad_exits)
- ++n_listing_bad_exits;
- if (networkstatus[i]->lists_bad_directories)
- ++n_listing_bad_directories;
- }
- /** Iterate over all entries in all networkstatuses, and build
- * name_map as a map from lc nickname to identity digest. If there
- * is a conflict on that nickname, map the lc nickname to conflict.
- */
- name_map = strmap_new();
- /* Clear the global map... */
- if (named_server_map)
- strmap_free(named_server_map, _tor_free);
- named_server_map = strmap_new();
- memset(conflict, 0xff, sizeof(conflict));
- for (i = 0; i < n_statuses; ++i) {
- if (!networkstatus[i]->binds_names)
- continue;
- SMARTLIST_FOREACH(networkstatus[i]->entries, routerstatus_t *, rs,
- {
- const char *other_digest;
- if (!rs->is_named)
- continue;
- other_digest = strmap_get_lc(name_map, rs->nickname);
- warned = smartlist_string_isin(warned_conflicts, rs->nickname);
- if (!other_digest) {
- strmap_set_lc(name_map, rs->nickname, rs->identity_digest);
- strmap_set_lc(named_server_map, rs->nickname,
- tor_memdup(rs->identity_digest, DIGEST_LEN));
- if (warned)
- smartlist_string_remove(warned_conflicts, rs->nickname);
- } else if (memcmp(other_digest, rs->identity_digest, DIGEST_LEN) &&
- other_digest != conflict) {
- if (!warned) {
- char *d;
- int should_warn = options->DirPort && options->AuthoritativeDir;
- char fp1[HEX_DIGEST_LEN+1];
- char fp2[HEX_DIGEST_LEN+1];
- base16_encode(fp1, sizeof(fp1), other_digest, DIGEST_LEN);
- base16_encode(fp2, sizeof(fp2), rs->identity_digest, DIGEST_LEN);
- log_fn(should_warn ? LOG_WARN : LOG_INFO, LD_DIR,
- "Naming authorities disagree about which key goes with %s. "
- "($%s vs $%s)",
- rs->nickname, fp1, fp2);
- strmap_set_lc(name_map, rs->nickname, conflict);
- d = strmap_remove_lc(named_server_map, rs->nickname);
- tor_free(d);
- smartlist_add(warned_conflicts, tor_strdup(rs->nickname));
- }
- } else {
- if (warned)
- smartlist_string_remove(warned_conflicts, rs->nickname);
- }
- });
- }
- result = smartlist_create();
- changed_list = smartlist_create();
- digest_counts = tor_malloc_zero(sizeof(desc_digest_count_t)*n_statuses);
- /* Iterate through all of the sorted routerstatus lists in lockstep.
- * Invariants:
- * - For 0 <= i < n_statuses: index[i] is an index into
- * networkstatus[i]->entries, which has size[i] elements.
- * - For i1, i2, j such that 0 <= i1 < n_statuses, 0 <= i2 < n_statues, 0 <=
- * j < index[i1]: networkstatus[i1]->entries[j]->identity_digest <
- * networkstatus[i2]->entries[index[i2]]->identity_digest.
- *
- * (That is, the indices are always advanced past lower digest before
- * higher.)
- */
- while (1) {
- int n_running=0, n_named=0, n_valid=0, n_listing=0;
- int n_v2_dir=0, n_fast=0, n_stable=0, n_exit=0, n_guard=0, n_bad_exit=0;
- int n_bad_directory=0;
- int n_version_known=0, n_supports_begindir=0;
- int n_desc_digests=0, highest_count=0;
- const char *the_name = NULL;
- local_routerstatus_t *rs_out, *rs_old;
- routerstatus_t *rs, *most_recent;
- networkstatus_t *ns;
- const char *lowest = NULL;
- /* Find out which of the digests appears first. */
- for (i = 0; i < n_statuses; ++i) {
- if (index[i] < size[i]) {
- rs = smartlist_get(networkstatus[i]->entries, index[i]);
- if (!lowest || memcmp(rs->identity_digest, lowest, DIGEST_LEN)<0)
- lowest = rs->identity_digest;
- }
- }
- if (!lowest) {
- /* We're out of routers. Great! */
- break;
- }
- /* Okay. The routers at networkstatus[i]->entries[index[i]] whose digests
- * match "lowest" are next in order. Iterate over them, incrementing those
- * index[i] as we go. */
- for (i = 0; i < n_statuses; ++i) {
- if (index[i] >= size[i])
- continue;
- ns = networkstatus[i];
- rs = smartlist_get(ns->entries, index[i]);
- if (memcmp(rs->identity_digest, lowest, DIGEST_LEN))
- continue;
- /* At this point, we know that we're looking at a routersatus with
- * identity "lowest".
- */
- ++index[i];
- ++n_listing;
- /* Should we name this router? Only if all the names from naming
- * authorities match. */
- if (rs->is_named && ns->binds_names) {
- if (!the_name)
- the_name = rs->nickname;
- if (!strcasecmp(rs->nickname, the_name)) {
- ++n_named;
- } else if (strcmp(the_name,"**mismatch**")) {
- char hd[HEX_DIGEST_LEN+1];
- base16_encode(hd, HEX_DIGEST_LEN+1, rs->identity_digest, DIGEST_LEN);
- if (! smartlist_string_isin(warned_conflicts, hd)) {
- log_warn(LD_DIR,
- "Naming authorities disagree about nicknames for $%s "
- "(\"%s\" vs \"%s\")",
- hd, the_name, rs->nickname);
- smartlist_add(warned_conflicts, tor_strdup(hd));
- }
- the_name = "**mismatch**";
- }
- }
- /* Keep a running count of how often which descriptor digests
- * appear. */
- for (j = 0; j < n_desc_digests; ++j) {
- if (!memcmp(rs->descriptor_digest,
- digest_counts[j].rs->descriptor_digest, DIGEST_LEN)) {
- if (++digest_counts[j].count > highest_count)
- highest_count = digest_counts[j].count;
- goto found;
- }
- }
- digest_counts[n_desc_digests].rs = rs;
- digest_counts[n_desc_digests].count = 1;
- if (!highest_count)
- highest_count = 1;
- ++n_desc_digests;
- found:
- /* Now tally up the easily-tallied flags. */
- if (rs->is_valid)
- ++n_valid;
- if (rs->is_running && ns->is_recent)
- ++n_running;
- if (rs->is_exit)
- ++n_exit;
- if (rs->is_fast)
- ++n_fast;
- if (rs->is_possible_guard)
- ++n_guard;
- if (rs->is_stable)
- ++n_stable;
- if (rs->is_v2_dir)
- ++n_v2_dir;
- if (rs->is_bad_exit)
- ++n_bad_exit;
- if (rs->is_bad_directory)
- ++n_bad_directory;
- if (rs->version_known)
- ++n_version_known;
- if (rs->version_supports_begindir)
- ++n_supports_begindir;
- }
- /* Go over the descriptor digests and figure out which descriptor we
- * want. */
- most_recent = NULL;
- for (i = 0; i < n_desc_digests; ++i) {
- /* If any digest appears twice or more, ignore those that don't.*/
- if (highest_count >= 2 && digest_counts[i].count < 2)
- continue;
- if (!most_recent ||
- digest_counts[i].rs->published_on > most_recent->published_on)
- most_recent = digest_counts[i].rs;
- }
- rs_out = tor_malloc_zero(sizeof(local_routerstatus_t));
- memcpy(&rs_out->status, most_recent, sizeof(routerstatus_t));
- /* Copy status info about this router, if we had any before. */
- if ((rs_old = router_get_combined_status_by_digest(lowest))) {
- if (!memcmp(rs_out->status.descriptor_digest,
- most_recent->descriptor_digest, DIGEST_LEN)) {
- rs_out->n_download_failures = rs_old->n_download_failures;
- rs_out->next_attempt_at = rs_old->next_attempt_at;
- }
- rs_out->name_lookup_warned = rs_old->name_lookup_warned;
- rs_out->last_dir_503_at = rs_old->last_dir_503_at;
- }
- smartlist_add(result, rs_out);
- log_debug(LD_DIR, "Router '%s' is listed by %d/%d directories, "
- "named by %d/%d, validated by %d/%d, and %d/%d recent "
- "directories think it's running.",
- rs_out->status.nickname,
- n_listing, n_statuses, n_named, n_naming, n_valid, n_statuses,
- n_running, n_recent);
- rs_out->status.is_named = 0;
- if (the_name && strcmp(the_name, "**mismatch**") && n_named > 0) {
- const char *d = strmap_get_lc(name_map, the_name);
- if (d && d != conflict)
- rs_out->status.is_named = 1;
- if (smartlist_string_isin(warned_conflicts, rs_out->status.nickname))
- smartlist_string_remove(warned_conflicts, rs_out->status.nickname);
- }
- if (rs_out->status.is_named)
- strlcpy(rs_out->status.nickname, the_name,
- sizeof(rs_out->status.nickname));
- rs_out->status.is_valid = n_valid > n_statuses/2;
- rs_out->status.is_running = n_running > n_recent/2;
- rs_out->status.is_exit = n_exit > n_statuses/2;
- rs_out->status.is_fast = n_fast > n_statuses/2;
- rs_out->status.is_possible_guard = n_guard > n_statuses/2;
- rs_out->status.is_stable = n_stable > n_statuses/2;
- rs_out->status.is_v2_dir = n_v2_dir > n_statuses/2;
- rs_out->status.is_bad_exit = n_bad_exit > n_listing_bad_exits/2;
- rs_out->status.is_bad_directory =
- n_bad_directory > n_listing_bad_directories/2;
- rs_out->status.version_known = n_version_known > 0;
- rs_out->status.version_supports_begindir =
- n_supports_begindir > n_version_known/2;
- if (!rs_old || memcmp(rs_old, rs_out, sizeof(local_routerstatus_t)))
- smartlist_add(changed_list, rs_out);
- }
- SMARTLIST_FOREACH(routerstatus_list, local_routerstatus_t *, rs,
- local_routerstatus_free(rs));
- smartlist_free(routerstatus_list);
- routerstatus_list = result;
- tor_free(networkstatus);
- tor_free(index);
- tor_free(size);
- tor_free(digest_counts);
- strmap_free(name_map, NULL);
- networkstatus_list_has_changed = 0;
- routerstatus_list_has_changed = 1;
- control_event_networkstatus_changed(changed_list);
- smartlist_free(changed_list);
- }
- /** Given a list <b>routers</b> of routerinfo_t *, update each routers's
- * is_named, is_valid, and is_running fields according to our current
- * networkstatus_t documents. */
- void
- routers_update_status_from_networkstatus(smartlist_t *routers,
- int reset_failures)
- {
- trusted_dir_server_t *ds;
- local_routerstatus_t *rs;
- or_options_t *options = get_options();
- int authdir = options->AuthoritativeDir;
- int namingdir = options->AuthoritativeDir &&
- options->NamingAuthoritativeDir;
- if (!routerstatus_list)
- return;
- SMARTLIST_FOREACH(routers, routerinfo_t *, router,
- {
- const char *digest = router->cache_info.identity_digest;
- rs = router_get_combined_status_by_digest(digest);
- ds = router_get_trusteddirserver_by_digest(digest);
- if (!rs)
- continue;
- if (!namingdir)
- router->is_named = rs->status.is_named;
- if (!authdir) {
- /* If we're not an authdir, believe others. */
- router->is_valid = rs->status.is_valid;
- router->is_running = rs->status.is_running;
- router->is_fast = rs->status.is_fast;
- router->is_stable = rs->status.is_stable;
- router->is_possible_guard = rs->status.is_possible_guard;
- router->is_exit = rs->status.is_exit;
- router->is_bad_exit = rs->status.is_bad_exit;
- }
- if (router->is_running && ds) {
- ds->n_networkstatus_failures = 0;
- }
- if (reset_failures) {
- rs->n_download_failures = 0;
- rs->next_attempt_at = 0;
- }
- });
- router_dir_info_changed();
- }
- /** For every router descriptor we are currently downloading by descriptor
- * digest, set result[d] to 1. */
- static void
- list_pending_descriptor_downloads(digestmap_t *result)
- {
- const char *prefix = "d/";
- size_t p_len = strlen(prefix);
- int i, n_conns;
- connection_t **carray;
- smartlist_t *tmp = smartlist_create();
- tor_assert(result);
- get_connection_array(&carray, &n_conns);
- for (i = 0; i < n_conns; ++i) {
- connection_t *conn = carray[i];
- if (conn->type == CONN_TYPE_DIR &&
- conn->purpose == DIR_PURPOSE_FETCH_SERVERDESC &&
- !conn->marked_for_close) {
- const char *resource = TO_DIR_CONN(conn)->requested_resource;
- if (!strcmpstart(resource, prefix))
- dir_split_resource_into_fingerprints(resource + p_len,
- tmp, NULL, 1, 0);
- }
- }
- SMARTLIST_FOREACH(tmp, char *, d,
- {
- digestmap_set(result, d, (void*)1);
- tor_free(d);
- });
- smartlist_free(tmp);
- }
- /** Launch downloads for all the descriptors whose digests are listed
- * as digests[i] for lo <= i < hi. (Lo and hi may be out of range.)
- * If <b>source</b> is given, download from <b>source</b>; otherwise,
- * download from an appropriate random directory server.
- */
- static void
- initiate_descriptor_downloads(routerstatus_t *source,
- smartlist_t *digests,
- int lo, int hi)
- {
- int i, n = hi-lo;
- char *resource, *cp;
- size_t r_len;
- if (n <= 0)
- return;
- if (lo < 0)
- lo = 0;
- if (hi > smartlist_len(digests))
- hi = smartlist_len(digests);
- r_len = 8 + (HEX_DIGEST_LEN+1)*n;
- cp = resource = tor_malloc(r_len);
- memcpy(cp, "d/", 2);
- cp += 2;
- for (i = lo; i < hi; ++i) {
- base16_encode(cp, r_len-(cp-resource),
- smartlist_get(digests,i), DIGEST_LEN);
- cp += HEX_DIGEST_LEN;
- *cp++ = '+';
- }
- memcpy(cp-1, ".z", 3);
- if (source) {
- /* We know which authority we want. */
- directory_initiate_command_routerstatus(source,
- DIR_PURPOSE_FETCH_SERVERDESC,
- 0, /* not private */
- resource, NULL, 0);
- } else {
- directory_get_from_dirserver(DIR_PURPOSE_FETCH_SERVERDESC,
- resource,
- 1);
- }
- tor_free(resource);
- }
- /** Clients don't download any descriptor this recent, since it will probably
- * not have propageted to enough caches. */
- #define ESTIMATED_PROPAGATION_TIME (10*60)
- /** 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. */
- static INLINE int
- client_would_use_router(routerstatus_t *rs, time_t now, or_options_t *options)
- {
- if (!rs->is_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 + ESTIMATED_PROPAGATION_TIME > now) {
- /* Most caches probably don't have this descriptor yet. */
- return 0;
- }
- return 1;
- }
- /** Return new list of ID fingerprints for routers that we (as a client) would
- * like to download.
- */
- static smartlist_t *
- router_list_client_downloadable(void)
- {
- int n_downloadable = 0;
- smartlist_t *downloadable = smartlist_create();
- digestmap_t *downloading;
- time_t now = time(NULL);
- /* these are just used for logging */
- int n_not_ready = 0, n_in_progress = 0, n_uptodate = 0, n_wouldnt_use = 0;
- or_options_t *options = get_options();
- if (!routerstatus_list)
- return downloadable;
- downloading = digestmap_new();
- list_pending_descriptor_downloads(downloading);
- routerstatus_list_update_from_networkstatus(now);
- SMARTLIST_FOREACH(routerstatus_list, local_routerstatus_t *, rs,
- {
- routerinfo_t *ri;
- if (router_get_by_descriptor_digest(rs->status.descriptor_digest)) {
- /* We have the 'best' descriptor for this router. */
- ++n_uptodate;
- } else if (!client_would_use_router(&rs->status, now, options)) {
- /* We wouldn't want this descriptor even if we got it. */
- ++n_wouldnt_use;
- } else if (digestmap_get(downloading, rs->status.descriptor_digest)) {
- /* We're downloading this one now. */
- ++n_in_progress;
- } else if ((ri = router_get_by_digest(rs->status.identity_digest)) &&
- ri->cache_info.published_on > rs->status.published_on) {
- /* Oddly, we have a descriptor more recent than the 'best' one, but it
- was once best. So that's okay. */
- ++n_uptodate;
- } else if (rs->next_attempt_at > now) {
- /* We failed too recently to try again. */
- ++n_not_ready;
- } else {
- /* Okay, time to try it. */
- smartlist_add(downloadable, rs->status.descriptor_digest);
- ++n_downloadable;
- }
- });
- #if 0
- log_info(LD_DIR,
- "%d router descriptors are downloadable. "
- "%d are in progress. %d are up-to-date. "
- "%d are non-useful. %d failed too recently to retry.",
- n_downloadable, n_in_progress, n_uptodate,
- n_wouldnt_use, n_not_ready);
- #endif
- digestmap_free(downloading, NULL);
- return downloadable;
- }
- /** Initiate new router downloads as needed, using the strategy for
- * non-directory-servers.
- *
- * We don't launch any downloads if there are fewer than MAX_DL_TO_DELAY
- * descriptors to get and less than MAX_CLIENT_INTERVAL_WITHOUT_REQUEST
- * seconds have passed.
- *
- * Otherwise, we ask for all descriptors that we think are different from what
- * we have, and that we don't currently have an in-progress download attempt
- * for. */
- static void
- update_router_descriptor_client_downloads(time_t now)
- {
- /** Max amount of hashes to download per request.
- * Since squid does not like URLs >= 4096 bytes we limit it to 96.
- * 4096 - strlen(http://255.255.255.255/tor/server/d/.z) == 4058
- * 4058/41 (40 for the hash and 1 for the + that separates them) => 98
- * So use 96 because it's a nice number.
- */
- #define MAX_DL_PER_REQUEST 96
- /** Don't split our requests so finely that we are requesting fewer than
- * this number per server. */
- #define MIN_DL_PER_REQUEST 4
- /** To prevent a single screwy cache from confusing us by selective reply,
- * try to split our requests into at least this this many requests. */
- #define MIN_REQUESTS 3
- /** If we want fewer than this many descriptors, wait until we
- * want more, or until MAX_CLIENT_INTERVAL_WITHOUT_REQUEST has
- * passed. */
- #define MAX_DL_TO_DELAY 16
- /** When directory clients have only a few servers to request, they batch
- * them until they have more, or until this amount of time has passed. */
- #define MAX_CLIENT_INTERVAL_WITHOUT_REQUEST (10*60)
- smartlist_t *downloadable = NULL;
- int should_delay, n_downloadable;
- or_options_t *options = get_options();
- if (options->DirPort) {
- log_warn(LD_BUG,
- "Called router_descriptor_client_downloads() on a dir mirror?");
- }
- if (rep_hist_circbuilding_dormant(now)) {
- log_info(LD_CIRC, "Skipping descriptor downloads: we haven't needed "
- "any circuits lately.");
- return;
- }
- if (networkstatus_list &&
- smartlist_len(networkstatus_list) <= get_n_v2_authorities()/2) {
- log_info(LD_DIR,
- "Not enough networkstatus documents to launch requests.");
- return;
- }
- downloadable = router_list_client_downloadable();
- n_downloadable = smartlist_len(downloadable);
- if (n_downloadable >= MAX_DL_TO_DELAY) {
- log_debug(LD_DIR,
- "There are enough downloadable routerdescs to launch requests.");
- should_delay = 0;
- } else if (n_downloadable == 0) {
- // log_debug(LD_DIR, "No routerdescs need to be downloaded.");
- should_delay = 1;
- } else {
- should_delay = (last_routerdesc_download_attempted +
- MAX_CLIENT_INTERVAL_WITHOUT_REQUEST) > now;
- if (!should_delay) {
- if (last_routerdesc_download_attempted) {
- log_info(LD_DIR,
- "There are not many downloadable routerdescs, but we've "
- "been waiting long enough (%d seconds). Downloading.",
- (int)(now-last_routerdesc_download_attempted));
- } else {
- log_info(LD_DIR,
- "There are not many downloadable routerdescs, but we haven't "
- "tried downloading descriptors recently. Downloading.");
- }
- }
- }
- if (! should_delay) {
- int i, n_per_request;
- n_per_request = (n_downloadable+MIN_REQUESTS-1) / MIN_REQUESTS;
- if (n_per_request > MAX_DL_PER_REQUEST)
- n_per_request = MAX_DL_PER_REQUEST;
- if (n_per_request < MIN_DL_PER_REQUEST)
- n_per_request = MIN_DL_PER_REQUEST;
- log_info(LD_DIR,
- "Launching %d request%s for %d router%s, %d at a time",
- (n_downloadable+n_per_request-1)/n_per_request,
- n_downloadable>n_per_request?"s":"",
- n_downloadable, n_downloadable>1?"s":"", n_per_request);
- smartlist_sort_digests(downloadable);
- for (i=0; i < n_downloadable; i += n_per_request) {
- initiate_descriptor_downloads(NULL, downloadable, i, i+n_per_request);
- }
- last_routerdesc_download_attempted = now;
- }
- smartlist_free(downloadable);
- }
- /** Launch downloads for router status as needed, using the strategy used by
- * authorities and caches: download every descriptor we don't have but would
- * serve, from a random authority that lists it. */
- static void
- update_router_descriptor_cache_downloads(time_t now)
- {
- smartlist_t **downloadable; /* For each authority, what can we dl from it? */
- smartlist_t **download_from; /* ... and, what will we dl from it? */
- digestmap_t *map; /* Which descs are in progress, or assigned? */
- int i, j, n;
- int n_download;
- or_options_t *options = get_options();
- (void) now;
- if (!options->DirPort) {
- log_warn(LD_BUG, "Called update_router_descriptor_cache_downloads() "
- "on a non-dir-mirror?");
- }
- if (!networkstatus_list || !smartlist_len(networkstatus_list))
- return;
- map = digestmap_new();
- n = smartlist_len(networkstatus_list);
- downloadable = tor_malloc_zero(sizeof(smartlist_t*) * n);
- download_from = tor_malloc_zero(sizeof(smartlist_t*) * n);
- /* Set map[d]=1 for the digest of every descriptor that we are currently
- * downloading. */
- list_pending_descriptor_downloads(map);
- /* For the digest of every descriptor that we don't have, and that we aren't
- * downloading, add d to downloadable[i] if the i'th networkstatus knows
- * about that descriptor, and we haven't already failed to get that
- * descriptor from the corresponding authority.
- */
- n_download = 0;
- SMARTLIST_FOREACH(networkstatus_list, networkstatus_t *, ns,
- {
- smartlist_t *dl = smartlist_create();
- downloadable[ns_sl_idx] = dl;
- download_from[ns_sl_idx] = smartlist_create();
- SMARTLIST_FOREACH(ns->entries, routerstatus_t * , rs,
- {
- if (!rs->need_to_mirror)
- continue;
- if (router_get_by_descriptor_digest(rs->descriptor_digest)) {
- log_warn(LD_BUG,
- "Bug: We have a router descriptor, but need_to_mirror=1.");
- rs->need_to_mirror = 0;
- continue;
- }
- if (options->AuthoritativeDir && dirserv_would_reject_router(rs)) {
- rs->need_to_mirror = 0;
- continue;
- }
- if (digestmap_get(map, rs->descriptor_digest)) {
- /* We're downloading it already. */
- continue;
- } else {
- /* We could download it from this guy. */
- smartlist_add(dl, rs->descriptor_digest);
- ++n_download;
- }
- });
- });
- /* At random, assign descriptors to authorities such that:
- * - if d is a member of some downloadable[x], d is a member of some
- * download_from[y]. (Everything we want to download, we try to download
- * from somebody.)
- * - If d is a member of download_from[y], d is a member of downloadable[y].
- * (We only try to download descriptors from authorities who claim to have
- * them.)
- * - No d is a member of download_from[x] and download_from[y] s.t. x != y.
- * (We don't try to download anything from two authorities concurrently.)
- */
- while (n_download) {
- int which_ns = crypto_rand_int(n);
- smartlist_t *dl = downloadable[which_ns];
- int idx;
- char *d;
- tor_assert(dl);
- if (!smartlist_len(dl))
- continue;
- idx = crypto_rand_int(smartlist_len(dl));
- d = smartlist_get(dl, idx);
- if (! digestmap_get(map, d)) {
- smartlist_add(download_from[which_ns], d);
- digestmap_set(map, d, (void*) 1);
- }
- smartlist_del(dl, idx);
- --n_download;
- }
- /* Now, we can actually launch our requests. */
- for (i=0; i<n; ++i) {
- networkstatus_t *ns = smartlist_get(networkstatus_list, i);
- trusted_dir_server_t *ds =
- router_get_trusteddirserver_by_digest(ns->identity_digest);
- smartlist_t *dl = download_from[i];
- if (!ds) {
- log_warn(LD_BUG, "Networkstatus with no corresponding authority!");
- continue;
- }
- if (! smartlist_len(dl))
- continue;
- log_info(LD_DIR, "Requesting %d descriptors from authority \"%s\"",
- smartlist_len(dl), ds->nickname);
- for (j=0; j < smartlist_len(dl); j += MAX_DL_PER_REQUEST) {
- initiate_descriptor_downloads(&(ds->fake_status.status), dl, j,
- j+MAX_DL_PER_REQUEST);
- }
- }
- for (i=0; i<n; ++i) {
- smartlist_free(download_from[i]);
- smartlist_free(downloadable[i]);
- }
- tor_free(download_from);
- tor_free(downloadable);
- digestmap_free(map,NULL);
- }
- /** Launch downloads for router status as needed. */
- void
- update_router_descriptor_downloads(time_t now)
- {
- or_options_t *options = get_options();
- if (options->DirPort) {
- update_router_descriptor_cache_downloads(now);
- } else {
- update_router_descriptor_client_downloads(now);
- }
- }
- /** DOCDOC */
- static int
- routerstatus_count_usable_entries(smartlist_t *entries)
- {
- int count = 0;
- time_t now = time(NULL);
- or_options_t *options = get_options();
- SMARTLIST_FOREACH(entries, routerstatus_t *, rs,
- if (client_would_use_router(rs, now, options)) count++);
- return count;
- }
- /** DOCDOC */
- static int have_min_dir_info = 0;
- /** DOCDOC */
- static int need_to_update_have_min_dir_info = 1;
- /** Return true iff we have enough networkstatus and router information to
- * start building circuits. Right now, this means "more than half the
- * networkstatus documents, and at least 1/4 of expected routers." */
- //XXX should consider whether we have enough exiting nodes here.
- int
- router_have_minimum_dir_info(void)
- {
- if (need_to_update_have_min_dir_info) {
- update_router_have_minimum_dir_info();
- need_to_update_have_min_dir_info = 0;
- }
- return have_min_dir_info;
- }
- /** Called when our internal view of the directory has changed. This can be
- * when the authorities change, networkstatuses change, the list of routerdescs
- * changes, or number of running routers changes.
- */
- static void
- router_dir_info_changed(void)
- {
- need_to_update_have_min_dir_info = 1;
- }
- /** Change the value of have_min_dir_info, setting it true iff we have enough
- * network and router information to build circuits. Clear the value of
- * need_to_update_have_min_dir_info. */
- static void
- update_router_have_minimum_dir_info(void)
- {
- int tot = 0, num_running = 0;
- int n_ns, n_authorities, res, avg;
- if (!networkstatus_list || !routerlist) {
- res = 0;
- goto done;
- }
- n_authorities = get_n_v2_authorities();
- n_ns = smartlist_len(networkstatus_list);
- if (n_ns<=n_authorities/2) {
- log_info(LD_DIR,
- "We have %d of %d network statuses, and we want "
- "more than %d.", n_ns, n_authorities, n_authorities/2);
- res = 0;
- goto done;
- }
- SMARTLIST_FOREACH(networkstatus_list, networkstatus_t *, ns,
- tot += routerstatus_count_usable_entries(ns->entries));
- avg = tot / n_ns;
- if (!routerstatus_list)
- routerstatus_list = smartlist_create();
- SMARTLIST_FOREACH(routerstatus_list, local_routerstatus_t *, rs,
- {
- if (rs->status.is_running)
- num_running++;
- });
- res = smartlist_len(routerlist->routers) >= (avg/4) && num_running > 2;
- done:
- if (res && !have_min_dir_info) {
- log(LOG_NOTICE, LD_DIR,
- "We now have enough directory information to build circuits.");
- control_event_client_status(LOG_NOTICE, "ENOUGH_DIR_INFO");
- }
- if (!res && have_min_dir_info) {
- log(LOG_NOTICE, LD_DIR,"Our directory information is no longer up-to-date "
- "enough to build circuits.%s",
- num_running > 2 ? "" : " (Not enough servers seem reachable -- "
- "is your network connection down?)");
- control_event_client_status(LOG_NOTICE, "NOT_ENOUGH_DIR_INFO");
- }
- have_min_dir_info = res;
- }
- /** Return true iff we have downloaded, or attempted to download at least
- * n_failures times, a network status for each authority. */
- static int
- have_tried_downloading_all_statuses(int n_failures)
- {
- if (!trusted_dir_servers)
- return 0;
- SMARTLIST_FOREACH(trusted_dir_servers, trusted_dir_server_t *, ds,
- {
- if (!ds->is_v2_authority)
- continue;
- /* If we don't have the status, and we haven't failed to get the status,
- * we haven't tried to get the status. */
- if (!networkstatus_get_by_digest(ds->digest) &&
- ds->n_networkstatus_failures <= n_failures)
- return 0;
- });
- return 1;
- }
- /** Reset the descriptor download failure count on all routers, so that we
- * can retry any long-failed routers immediately.
- */
- void
- router_reset_descriptor_download_failures(void)
- {
- if (!routerstatus_list)
- return;
- SMARTLIST_FOREACH(routerstatus_list, local_routerstatus_t *, rs,
- {
- rs->n_download_failures = 0;
- rs->next_attempt_at = 0;
- });
- tor_assert(networkstatus_list);
- SMARTLIST_FOREACH(networkstatus_list, networkstatus_t *, ns,
- SMARTLIST_FOREACH(ns->entries, routerstatus_t *, rs,
- {
- if (!router_get_by_descriptor_digest(rs->descriptor_digest))
- rs->need_to_mirror = 1;
- }));
- last_routerdesc_download_attempted = 0;
- }
- /** Any changes in a router descriptor's publication time larger than this are
- * automatically non-cosmetic. */
- #define ROUTER_MAX_COSMETIC_TIME_DIFFERENCE (12*60*60)
- /** We allow uptime to vary from how much it ought to be by this much. */
- #define ROUTER_ALLOW_UPTIME_DRIFT (6*60*60)
- /** Return true iff the only differences between r1 and r2 are such that
- * would not cause a recent (post 0.1.1.6) dirserver to republish.
- */
- int
- router_differences_are_cosmetic(routerinfo_t *r1, routerinfo_t *r2)
- {
- time_t r1pub, r2pub;
- int time_difference;
- tor_assert(r1 && r2);
- /* r1 should be the one that was published first. */
- if (r1->cache_info.published_on > r2->cache_info.published_on) {
- routerinfo_t *ri_tmp = r2;
- r2 = r1;
- r1 = ri_tmp;
- }
- /* If any key fields differ, they're different. */
- if (strcasecmp(r1->address, r2->address) ||
- strcasecmp(r1->nickname, r2->nickname) ||
- r1->or_port != r2->or_port ||
- r1->dir_port != r2->dir_port ||
- crypto_pk_cmp_keys(r1->onion_pkey, r2->onion_pkey) ||
- crypto_pk_cmp_keys(r1->identity_pkey, r2->identity_pkey) ||
- strcasecmp(r1->platform, r2->platform) ||
- (r1->contact_info && !r2->contact_info) || /* contact_info is optional */
- (!r1->contact_info && r2->contact_info) ||
- (r1->contact_info && r2->contact_info &&
- strcasecmp(r1->contact_info, r2->contact_info)) ||
- r1->is_hibernating != r2->is_hibernating ||
- r1->has_old_dnsworkers != r2->has_old_dnsworkers ||
- cmp_addr_policies(r1->exit_policy, r2->exit_policy))
- return 0;
- if ((r1->declared_family == NULL) != (r2->declared_family == NULL))
- return 0;
- if (r1->declared_family && r2->declared_family) {
- int i, n;
- if (smartlist_len(r1->declared_family)!=smartlist_len(r2->declared_family))
- return 0;
- n = smartlist_len(r1->declared_family);
- for (i=0; i < n; ++i) {
- if (strcasecmp(smartlist_get(r1->declared_family, i),
- smartlist_get(r2->declared_family, i)))
- return 0;
- }
- }
- /* Did bandwidth change a lot? */
- if ((r1->bandwidthcapacity < r2->bandwidthcapacity/2) ||
- (r2->bandwidthcapacity < r1->bandwidthcapacity/2))
- return 0;
- /* Did more than 12 hours pass? */
- if (r1->cache_info.published_on + ROUTER_MAX_COSMETIC_TIME_DIFFERENCE
- < r2->cache_info.published_on)
- return 0;
- /* Did uptime fail to increase by approximately the amount we would think,
- * give or take some slop? */
- r1pub = r1->cache_info.published_on;
- r2pub = r2->cache_info.published_on;
- time_difference = abs(r2->uptime - (r1->uptime + (r2pub - r1pub)));
- if (time_difference > ROUTER_ALLOW_UPTIME_DRIFT &&
- time_difference > r1->uptime * .05 &&
- time_difference > r2->uptime * .05)
- return 0;
- /* Otherwise, the difference is cosmetic. */
- return 1;
- }
- /** 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.) */
- /* XXXX This should eventually merge into generate_v2_networkstatus() */
- char *
- networkstatus_getinfo_helper_single(routerstatus_t *rs)
- {
- char buf[192];
- int r;
- struct in_addr in;
- int f_authority;
- char published[ISO_TIME_LEN+1];
- char ipaddr[INET_NTOA_BUF_LEN];
- char identity64[BASE64_DIGEST_LEN+1];
- char digest64[BASE64_DIGEST_LEN+1];
- format_iso_time(published, rs->published_on);
- digest_to_base64(identity64, rs->identity_digest);
- digest_to_base64(digest64, rs->descriptor_digest);
- in.s_addr = htonl(rs->addr);
- tor_inet_ntoa(&in, ipaddr, sizeof(ipaddr));
- f_authority = router_digest_is_trusted_dir(rs->identity_digest);
- r = tor_snprintf(buf, sizeof(buf),
- "r %s %s %s %s %s %d %d\n"
- "s%s%s%s%s%s%s%s%s%s%s\n",
- rs->nickname,
- identity64,
- digest64,
- published,
- ipaddr,
- (int)rs->or_port,
- (int)rs->dir_port,
- f_authority?" Authority":"",
- rs->is_bad_exit?" BadExit":"",
- rs->is_exit?" Exit":"",
- rs->is_fast?" Fast":"",
- rs->is_possible_guard?" Guard":"",
- rs->is_named?" Named":"",
- rs->is_stable?" Stable":"",
- rs->is_running?" Running":"",
- rs->is_valid?" Valid":"",
- rs->is_v2_dir?" V2Dir":"");
- if (r<0)
- log_warn(LD_BUG, "Not enough space in buffer.");
- return tor_strdup(buf);
- }
- /** 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)
- {
- local_routerstatus_t *status;
- (void) conn;
- if (!routerstatus_list) {
- *answer = tor_strdup("");
- return 0;
- }
- if (!strcmp(question, "ns/all")) {
- smartlist_t *statuses = smartlist_create();
- SMARTLIST_FOREACH(routerstatus_list, local_routerstatus_t *, lrs,
- {
- routerstatus_t *rs = &(lrs->status);
- 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];
- if (base16_decode(d, DIGEST_LEN, question+6, strlen(question+6)))
- return -1;
- status = router_get_combined_status_by_digest(d);
- } else if (!strcmpstart(question, "ns/name/")) {
- status = router_get_combined_status_by_nickname(question+8, 0);
- } else {
- return -1;
- }
- if (status) {
- *answer = networkstatus_getinfo_helper_single(&status->status);
- }
- return 0;
- }
- /** Assert that the internal representation of <b>rl</b> is
- * self-consistent. */
- static void
- routerlist_assert_ok(routerlist_t *rl)
- {
- digestmap_iter_t *iter;
- routerinfo_t *r2;
- signed_descriptor_t *sd2;
- if (!routerlist)
- return;
- SMARTLIST_FOREACH(rl->routers, routerinfo_t *, r,
- {
- r2 = digestmap_get(rl->identity_map, r->cache_info.identity_digest);
- tor_assert(r == r2);
- sd2 = digestmap_get(rl->desc_digest_map,
- r->cache_info.signed_descriptor_digest);
- tor_assert(&(r->cache_info) == sd2);
- tor_assert(r->routerlist_index == r_sl_idx);
- });
- SMARTLIST_FOREACH(rl->old_routers, signed_descriptor_t *, sd,
- {
- r2 = digestmap_get(rl->identity_map, sd->identity_digest);
- tor_assert(sd != &(r2->cache_info));
- sd2 = digestmap_get(rl->desc_digest_map, sd->signed_descriptor_digest);
- tor_assert(sd == sd2);
- });
- iter = digestmap_iter_init(rl->identity_map);
- while (!digestmap_iter_done(iter)) {
- const char *d;
- void *_r;
- routerinfo_t *r;
- digestmap_iter_get(iter, &d, &_r);
- r = _r;
- tor_assert(!memcmp(r->cache_info.identity_digest, d, DIGEST_LEN));
- iter = digestmap_iter_next(rl->identity_map, iter);
- }
- iter = digestmap_iter_init(rl->desc_digest_map);
- while (!digestmap_iter_done(iter)) {
- const char *d;
- void *_sd;
- signed_descriptor_t *sd;
- digestmap_iter_get(iter, &d, &_sd);
- sd = _sd;
- tor_assert(!memcmp(sd->signed_descriptor_digest, d, DIGEST_LEN));
- iter = digestmap_iter_next(rl->desc_digest_map, iter);
- }
- }
- /** Allocate and return a new string representing the contact info
- * and platform string for <b>router</b>,
- * surrounded by quotes and using standard C escapes.
- *
- * THIS FUNCTION IS NOT REENTRANT. Don't call it from outside the main
- * thread. Also, each call invalidates the last-returned value, so don't
- * try log_warn(LD_GENERAL, "%s %s", esc_router_info(a), esc_router_info(b));
- */
- const char *
- esc_router_info(routerinfo_t *router)
- {
- static char *info;
- char *esc_contact, *esc_platform;
- size_t len;
- if (info)
- tor_free(info);
- esc_contact = esc_for_log(router->contact_info);
- esc_platform = esc_for_log(router->platform);
- len = strlen(esc_contact)+strlen(esc_platform)+32;
- info = tor_malloc(len);
- tor_snprintf(info, len, "Contact %s, Platform %s", esc_contact,
- esc_platform);
- tor_free(esc_contact);
- tor_free(esc_platform);
- return info;
- }
|