123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418 |
- /*
- This file is part of GNUnet.
- Copyright (C) 2001-2012 GNUnet e.V.
- GNUnet is free software: you can redistribute it and/or modify it
- under the terms of the GNU Affero General Public License as published
- by the Free Software Foundation, either version 3 of the License,
- or (at your option) any later version.
- GNUnet is distributed in the hope that it will be useful, but
- WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- Affero General Public License for more details.
- You should have received a copy of the GNU Affero General Public License
- along with this program. If not, see <http://www.gnu.org/licenses/>.
- SPDX-License-Identifier: AGPL3.0-or-later
- */
- /**
- * @file fs/fs_download.c
- * @brief download methods
- * @author Christian Grothoff
- */
- #include "platform.h"
- #include "gnunet_constants.h"
- #include "gnunet_fs_service.h"
- #include "fs_api.h"
- #include "fs_tree.h"
- /**
- * Determine if the given download (options and meta data) should cause
- * use to try to do a recursive download.
- */
- static int
- is_recursive_download (struct GNUNET_FS_DownloadContext *dc)
- {
- return (0 != (dc->options & GNUNET_FS_DOWNLOAD_OPTION_RECURSIVE)) &&
- ((GNUNET_YES == GNUNET_FS_meta_data_test_for_directory (dc->meta)) ||
- ((NULL == dc->meta) &&
- ((NULL == dc->filename) ||
- ((strlen (dc->filename) >= strlen (GNUNET_FS_DIRECTORY_EXT)) &&
- (NULL != strstr (dc->filename + strlen (dc->filename)
- - strlen (GNUNET_FS_DIRECTORY_EXT),
- GNUNET_FS_DIRECTORY_EXT))))));
- }
- /**
- * We're storing the IBLOCKS after the DBLOCKS on disk (so that we
- * only have to truncate the file once we're done).
- *
- * Given the offset of a block (with respect to the DBLOCKS) and its
- * depth, return the offset where we would store this block in the
- * file.
- *
- * @param fsize overall file size
- * @param off offset of the block in the file
- * @param depth depth of the block in the tree, 0 for DBLOCK
- * @return off for DBLOCKS (depth == treedepth),
- * otherwise an offset past the end
- * of the file that does not overlap
- * with the range for any other block
- */
- static uint64_t
- compute_disk_offset (uint64_t fsize, uint64_t off, unsigned int depth)
- {
- unsigned int i;
- uint64_t lsize; /* what is the size of all IBlocks for depth "i"? */
- uint64_t loff; /* where do IBlocks for depth "i" start? */
- unsigned int ioff; /* which IBlock corresponds to "off" at depth "i"? */
- if (0 == depth)
- return off;
- /* first IBlocks start at the end of file, rounded up
- * to full DBLOCK_SIZE */
- loff = ((fsize + DBLOCK_SIZE - 1) / DBLOCK_SIZE) * DBLOCK_SIZE;
- lsize =
- ((fsize + DBLOCK_SIZE - 1) / DBLOCK_SIZE) * sizeof(struct ContentHashKey);
- GNUNET_assert (0 == (off % DBLOCK_SIZE));
- ioff = (off / DBLOCK_SIZE);
- for (i = 1; i < depth; i++)
- {
- loff += lsize;
- lsize = (lsize + CHK_PER_INODE - 1) / CHK_PER_INODE;
- GNUNET_assert (lsize > 0);
- GNUNET_assert (0 == (ioff % CHK_PER_INODE));
- ioff /= CHK_PER_INODE;
- }
- return loff + ioff * sizeof(struct ContentHashKey);
- }
- /**
- * Fill in all of the generic fields for a download event and call the
- * callback.
- *
- * @param pi structure to fill in
- * @param dc overall download context
- */
- void
- GNUNET_FS_download_make_status_ (struct GNUNET_FS_ProgressInfo *pi,
- struct GNUNET_FS_DownloadContext *dc)
- {
- pi->value.download.dc = dc;
- pi->value.download.cctx = dc->client_info;
- pi->value.download.pctx =
- (NULL == dc->parent) ? NULL : dc->parent->client_info;
- pi->value.download.sctx =
- (NULL == dc->search) ? NULL : dc->search->client_info;
- pi->value.download.uri = dc->uri;
- pi->value.download.filename = dc->filename;
- pi->value.download.size = dc->length;
- /* FIXME: Fix duration calculation to account for pauses */
- pi->value.download.duration =
- GNUNET_TIME_absolute_get_duration (dc->start_time);
- pi->value.download.completed = dc->completed;
- pi->value.download.anonymity = dc->anonymity;
- pi->value.download.eta =
- GNUNET_TIME_calculate_eta (dc->start_time, dc->completed, dc->length);
- pi->value.download.is_active = (NULL == dc->mq) ? GNUNET_NO : GNUNET_YES;
- pi->fsh = dc->h;
- if (0 == (dc->options & GNUNET_FS_DOWNLOAD_IS_PROBE))
- dc->client_info = dc->h->upcb (dc->h->upcb_cls, pi);
- else
- dc->client_info = GNUNET_FS_search_probe_progress_ (NULL, pi);
- }
- /**
- * Closure for iterator processing results.
- */
- struct ProcessResultClosure
- {
- /**
- * Hash of data.
- */
- struct GNUNET_HashCode query;
- /**
- * Data found in P2P network.
- */
- const void *data;
- /**
- * Our download context.
- */
- struct GNUNET_FS_DownloadContext *dc;
- /**
- * When did we last transmit the request?
- */
- struct GNUNET_TIME_Absolute last_transmission;
- /**
- * Number of bytes in data.
- */
- size_t size;
- /**
- * Type of data.
- */
- enum GNUNET_BLOCK_Type type;
- /**
- * Flag to indicate if this block should be stored on disk.
- */
- int do_store;
- /**
- * how much respect did we offer to get this reply?
- */
- uint32_t respect_offered;
- /**
- * how often did we transmit the query?
- */
- uint32_t num_transmissions;
- };
- /**
- * Iterator over entries in the pending requests in the 'active' map for the
- * reply that we just got.
- *
- * @param cls closure (our 'struct ProcessResultClosure')
- * @param key query for the given value / request
- * @param value value in the hash map (a 'struct DownloadRequest')
- * @return #GNUNET_YES (we should continue to iterate); unless serious error
- */
- static int
- process_result_with_request (void *cls,
- const struct GNUNET_HashCode *key,
- void *value);
- /**
- * We've found a matching block without downloading it.
- * Encrypt it and pass it to our "receive" function as
- * if we had received it from the network.
- *
- * @param dc download in question
- * @param chk request this relates to
- * @param dr request details
- * @param block plaintext data matching request
- * @param len number of bytes in block
- * @param do_store should we still store the block on disk?
- * @return GNUNET_OK on success
- */
- static int
- encrypt_existing_match (struct GNUNET_FS_DownloadContext *dc,
- const struct ContentHashKey *chk,
- struct DownloadRequest *dr,
- const char *block,
- size_t len,
- int do_store)
- {
- struct ProcessResultClosure prc;
- char enc[len];
- struct GNUNET_CRYPTO_SymmetricSessionKey sk;
- struct GNUNET_CRYPTO_SymmetricInitializationVector iv;
- struct GNUNET_HashCode query;
- GNUNET_CRYPTO_hash_to_aes_key (&chk->key, &sk, &iv);
- if (-1 == GNUNET_CRYPTO_symmetric_encrypt (block, len, &sk, &iv, enc))
- {
- GNUNET_break (0);
- return GNUNET_SYSERR;
- }
- GNUNET_CRYPTO_hash (enc, len, &query);
- if (0 != memcmp (&query, &chk->query, sizeof(struct GNUNET_HashCode)))
- {
- GNUNET_break_op (0);
- return GNUNET_SYSERR;
- }
- GNUNET_log (
- GNUNET_ERROR_TYPE_DEBUG,
- "Matching %u byte block for `%s' at offset %llu already present, no need for download!\n",
- (unsigned int) len,
- dc->filename,
- (unsigned long long) dr->offset);
- /* already got it! */
- prc.dc = dc;
- prc.data = enc;
- prc.size = len;
- prc.type = (0 == dr->depth) ? GNUNET_BLOCK_TYPE_FS_DBLOCK
- : GNUNET_BLOCK_TYPE_FS_IBLOCK;
- prc.query = chk->query;
- prc.do_store = do_store;
- prc.last_transmission = GNUNET_TIME_UNIT_FOREVER_ABS;
- process_result_with_request (&prc, &chk->key, dr);
- return GNUNET_OK;
- }
- /**
- * We've lost our connection with the FS service.
- * Re-establish it and re-transmit all of our
- * pending requests.
- *
- * @param dc download context that is having trouble
- */
- static void
- try_reconnect (struct GNUNET_FS_DownloadContext *dc);
- /**
- * We found an entry in a directory. Check if the respective child
- * already exists and if not create the respective child download.
- *
- * @param cls the parent download
- * @param filename name of the file in the directory
- * @param uri URI of the file (CHK or LOC)
- * @param meta meta data of the file
- * @param length number of bytes in data
- * @param data contents of the file (or NULL if they were not inlined)
- */
- static void
- trigger_recursive_download (void *cls,
- const char *filename,
- const struct GNUNET_FS_Uri *uri,
- const struct GNUNET_CONTAINER_MetaData *meta,
- size_t length,
- const void *data);
- /**
- * We're done downloading a directory. Open the file and
- * trigger all of the (remaining) child downloads.
- *
- * @param dc context of download that just completed
- */
- static void
- full_recursive_download (struct GNUNET_FS_DownloadContext *dc)
- {
- size_t size;
- uint64_t size64;
- void *data;
- struct GNUNET_DISK_FileHandle *h;
- struct GNUNET_DISK_MapHandle *m;
- size64 = GNUNET_FS_uri_chk_get_file_size (dc->uri);
- size = (size_t) size64;
- if (size64 != (uint64_t) size)
- {
- GNUNET_log (
- GNUNET_ERROR_TYPE_ERROR,
- _ (
- "Recursive downloads of directories larger than 4 GB are not supported on 32-bit systems\n"));
- return;
- }
- if (NULL != dc->filename)
- {
- h = GNUNET_DISK_file_open (dc->filename,
- GNUNET_DISK_OPEN_READ,
- GNUNET_DISK_PERM_NONE);
- }
- else
- {
- GNUNET_assert (NULL != dc->temp_filename);
- h = GNUNET_DISK_file_open (dc->temp_filename,
- GNUNET_DISK_OPEN_READ,
- GNUNET_DISK_PERM_NONE);
- }
- if (NULL == h)
- return; /* oops */
- data = GNUNET_DISK_file_map (h, &m, GNUNET_DISK_MAP_TYPE_READ, size);
- if (NULL == data)
- {
- GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
- _ ("Directory too large for system address space\n"));
- }
- else
- {
- if (GNUNET_OK !=
- GNUNET_FS_directory_list_contents (size,
- data,
- 0,
- &trigger_recursive_download,
- dc))
- {
- GNUNET_log (
- GNUNET_ERROR_TYPE_WARNING,
- _ (
- "Failed to access full directroy contents of `%s' for recursive download\n"),
- dc->filename);
- }
- GNUNET_DISK_file_unmap (m);
- }
- GNUNET_DISK_file_close (h);
- if (NULL == dc->filename)
- {
- if (0 != unlink (dc->temp_filename))
- GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING,
- "unlink",
- dc->temp_filename);
- GNUNET_free (dc->temp_filename);
- dc->temp_filename = NULL;
- }
- }
- /**
- * Check if all child-downloads have completed (or trigger them if
- * necessary) and once we're completely done, signal completion (and
- * possibly recurse to parent). This function MUST be called when the
- * download of a file itself is done or when the download of a file is
- * done and then later a direct child download has completed (and
- * hence this download may complete itself).
- *
- * @param dc download to check for completion of children
- */
- static void
- check_completed (struct GNUNET_FS_DownloadContext *dc)
- {
- struct GNUNET_FS_ProgressInfo pi;
- struct GNUNET_FS_DownloadContext *pos;
- /* first, check if we need to download children */
- if (is_recursive_download (dc))
- full_recursive_download (dc);
- /* then, check if children are done already */
- for (pos = dc->child_head; NULL != pos; pos = pos->next)
- {
- if ((NULL == pos->emsg) && (pos->completed < pos->length))
- return; /* not done yet */
- if ((NULL != pos->child_head) && (pos->has_finished != GNUNET_YES))
- return; /* not transitively done yet */
- }
- /* All of our children are done, so mark this download done */
- dc->has_finished = GNUNET_YES;
- if (NULL != dc->job_queue)
- {
- GNUNET_FS_dequeue_ (dc->job_queue);
- dc->job_queue = NULL;
- }
- if (NULL != dc->task)
- {
- GNUNET_SCHEDULER_cancel (dc->task);
- dc->task = NULL;
- }
- if (NULL != dc->rfh)
- {
- GNUNET_break (GNUNET_OK == GNUNET_DISK_file_close (dc->rfh));
- dc->rfh = NULL;
- }
- GNUNET_FS_download_sync_ (dc);
- /* signal completion */
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_COMPLETED;
- GNUNET_FS_download_make_status_ (&pi, dc);
- /* let parent know */
- if (NULL != dc->parent)
- check_completed (dc->parent);
- }
- /**
- * We got a block of plaintext data (from the meta data).
- * Try it for upward reconstruction of the data. On success,
- * the top-level block will move to state BRS_DOWNLOAD_UP.
- *
- * @param dc context for the download
- * @param dr download request to match against
- * @param data plaintext data, starting from the beginning of the file
- * @param data_len number of bytes in data
- */
- static void
- try_match_block (struct GNUNET_FS_DownloadContext *dc,
- struct DownloadRequest *dr,
- const char *data,
- size_t data_len)
- {
- struct GNUNET_FS_ProgressInfo pi;
- unsigned int i;
- char enc[DBLOCK_SIZE];
- struct ContentHashKey chks[CHK_PER_INODE];
- struct ContentHashKey in_chk;
- struct GNUNET_CRYPTO_SymmetricSessionKey sk;
- struct GNUNET_CRYPTO_SymmetricInitializationVector iv;
- size_t dlen;
- struct DownloadRequest *drc;
- struct GNUNET_DISK_FileHandle *fh;
- int complete;
- const char *fn;
- const char *odata;
- size_t odata_len;
- odata = data;
- odata_len = data_len;
- if (BRS_DOWNLOAD_UP == dr->state)
- return;
- if (dr->depth > 0)
- {
- if ((dc->offset > 0) ||
- (dc->length < GNUNET_ntohll (dc->uri->data.chk.file_length)))
- {
- /* NOTE: this test is not tight, but should suffice; the issue
- here is that 'dr->num_children' may inherently only specify a
- smaller range than what is in the original file;
- thus, reconstruction of (some) inner blocks will fail.
- FIXME: we might eventually want to write a tighter test to
- maximize the circumstances under which we do succeed with
- IBlock reconstruction. (need good tests though). */return;
- }
- complete = GNUNET_YES;
- for (i = 0; i < dr->num_children; i++)
- {
- drc = dr->children[i];
- try_match_block (dc, drc, data, data_len);
- if (drc->state != BRS_RECONSTRUCT_META_UP)
- complete = GNUNET_NO;
- else
- chks[i] = drc->chk;
- }
- if (GNUNET_YES != complete)
- return;
- data = (const char *) chks;
- dlen = dr->num_children * sizeof(struct ContentHashKey);
- }
- else
- {
- if (dr->offset > data_len)
- return; /* oops */
- dlen = GNUNET_MIN (data_len - dr->offset, DBLOCK_SIZE);
- }
- GNUNET_CRYPTO_hash (&data[dr->offset], dlen, &in_chk.key);
- GNUNET_CRYPTO_hash_to_aes_key (&in_chk.key, &sk, &iv);
- if (-1 ==
- GNUNET_CRYPTO_symmetric_encrypt (&data[dr->offset], dlen, &sk, &iv, enc))
- {
- GNUNET_break (0);
- return;
- }
- GNUNET_CRYPTO_hash (enc, dlen, &in_chk.query);
- switch (dr->state)
- {
- case BRS_INIT:
- dr->chk = in_chk;
- dr->state = BRS_RECONSTRUCT_META_UP;
- break;
- case BRS_CHK_SET:
- if (0 != memcmp (&in_chk, &dr->chk, sizeof(struct ContentHashKey)))
- {
- /* other peer provided bogus meta data */
- GNUNET_break_op (0);
- break;
- }
- /* write block to disk */
- fn = (NULL != dc->filename) ? dc->filename : dc->temp_filename;
- if (NULL != fn)
- {
- fh = GNUNET_DISK_file_open (fn,
- GNUNET_DISK_OPEN_READWRITE
- | GNUNET_DISK_OPEN_CREATE
- | GNUNET_DISK_OPEN_TRUNCATE,
- GNUNET_DISK_PERM_USER_READ
- | GNUNET_DISK_PERM_USER_WRITE
- | GNUNET_DISK_PERM_GROUP_READ
- | GNUNET_DISK_PERM_OTHER_READ);
- if (NULL == fh)
- {
- GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR, "open", fn);
- GNUNET_asprintf (&dc->emsg,
- _ ("Failed to open file `%s' for writing"),
- fn);
- GNUNET_DISK_file_close (fh);
- dr->state = BRS_ERROR;
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_ERROR;
- pi.value.download.specifics.error.message = dc->emsg;
- GNUNET_FS_download_make_status_ (&pi, dc);
- return;
- }
- if (data_len != GNUNET_DISK_file_write (fh, odata, odata_len))
- {
- GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR, "write", fn);
- GNUNET_asprintf (&dc->emsg,
- _ ("Failed to open file `%s' for writing"),
- fn);
- GNUNET_DISK_file_close (fh);
- dr->state = BRS_ERROR;
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_ERROR;
- pi.value.download.specifics.error.message = dc->emsg;
- GNUNET_FS_download_make_status_ (&pi, dc);
- return;
- }
- GNUNET_DISK_file_close (fh);
- }
- /* signal success */
- dr->state = BRS_DOWNLOAD_UP;
- dc->completed = dc->length;
- GNUNET_FS_download_sync_ (dc);
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_PROGRESS;
- pi.value.download.specifics.progress.data = data;
- pi.value.download.specifics.progress.offset = 0;
- pi.value.download.specifics.progress.data_len = dlen;
- pi.value.download.specifics.progress.depth = 0;
- pi.value.download.specifics.progress.respect_offered = 0;
- pi.value.download.specifics.progress.block_download_duration =
- GNUNET_TIME_UNIT_ZERO;
- GNUNET_FS_download_make_status_ (&pi, dc);
- if ((NULL != dc->filename) &&
- (0 != truncate (dc->filename,
- GNUNET_ntohll (dc->uri->data.chk.file_length))))
- GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING,
- "truncate",
- dc->filename);
- check_completed (dc);
- break;
- default:
- /* how did we get here? */
- GNUNET_break (0);
- break;
- }
- }
- /**
- * Type of a function that libextractor calls for each
- * meta data item found. If we find full data meta data,
- * call 'try_match_block' on it.
- *
- * @param cls our 'struct GNUNET_FS_DownloadContext*'
- * @param plugin_name name of the plugin that produced this value;
- * special values can be used (i.e. '<zlib>' for zlib being
- * used in the main libextractor library and yielding
- * meta data).
- * @param type libextractor-type describing the meta data
- * @param format basic format information about data
- * @param data_mime_type mime-type of data (not of the original file);
- * can be NULL (if mime-type is not known)
- * @param data actual meta-data found
- * @param data_len number of bytes in data
- * @return 0 to continue extracting, 1 to abort
- */
- static int
- match_full_data (void *cls,
- const char *plugin_name,
- enum EXTRACTOR_MetaType type,
- enum EXTRACTOR_MetaFormat format,
- const char *data_mime_type,
- const char *data,
- size_t data_len)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- if (EXTRACTOR_METATYPE_GNUNET_FULL_DATA != type)
- return 0;
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Found %u bytes of FD!\n",
- (unsigned int) data_len);
- if (GNUNET_FS_uri_chk_get_file_size (dc->uri) != data_len)
- {
- GNUNET_break_op (0);
- return 1; /* bogus meta data */
- }
- try_match_block (dc, dc->top_request, data, data_len);
- return 1;
- }
- /**
- * Set the state of the given download request to
- * BRS_DOWNLOAD_UP and propagate it up the tree.
- *
- * @param dr download request that is done
- */
- static void
- propagate_up (struct DownloadRequest *dr)
- {
- unsigned int i;
- do
- {
- dr->state = BRS_DOWNLOAD_UP;
- dr = dr->parent;
- if (NULL == dr)
- break;
- for (i = 0; i < dr->num_children; i++)
- if (dr->children[i]->state != BRS_DOWNLOAD_UP)
- break;
- }
- while (i == dr->num_children);
- }
- /**
- * Try top-down reconstruction. Before, the given request node
- * must have the state BRS_CHK_SET. Afterwards, more nodes may
- * have that state or advanced to BRS_DOWNLOAD_DOWN or even
- * BRS_DOWNLOAD_UP. It is also possible to get BRS_ERROR on the
- * top level.
- *
- * @param dc overall download this block belongs to
- * @param dr block to reconstruct
- */
- static void
- try_top_down_reconstruction (struct GNUNET_FS_DownloadContext *dc,
- struct DownloadRequest *dr)
- {
- uint64_t off;
- char block[DBLOCK_SIZE];
- struct GNUNET_HashCode key;
- uint64_t total;
- size_t len;
- unsigned int i;
- struct DownloadRequest *drc;
- uint64_t child_block_size;
- const struct ContentHashKey *chks;
- int up_done;
- GNUNET_assert (NULL != dc->rfh);
- GNUNET_assert (BRS_CHK_SET == dr->state);
- total = GNUNET_FS_uri_chk_get_file_size (dc->uri);
- GNUNET_assert (dr->depth < dc->treedepth);
- len = GNUNET_FS_tree_calculate_block_size (total, dr->offset, dr->depth);
- GNUNET_assert (len <= DBLOCK_SIZE);
- off = compute_disk_offset (total, dr->offset, dr->depth);
- if (dc->old_file_size < off + len)
- return; /* failure */
- if (off != GNUNET_DISK_file_seek (dc->rfh, off, GNUNET_DISK_SEEK_SET))
- {
- GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "seek", dc->filename);
- return; /* failure */
- }
- if (len != GNUNET_DISK_file_read (dc->rfh, block, len))
- {
- GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "read", dc->filename);
- return; /* failure */
- }
- GNUNET_CRYPTO_hash (block, len, &key);
- if (0 != memcmp (&key, &dr->chk.key, sizeof(struct GNUNET_HashCode)))
- return; /* mismatch */
- if (GNUNET_OK !=
- encrypt_existing_match (dc, &dr->chk, dr, block, len, GNUNET_NO))
- {
- /* hash matches but encrypted block does not, really bad */
- dr->state = BRS_ERROR;
- /* propagate up */
- while (NULL != dr->parent)
- {
- dr = dr->parent;
- dr->state = BRS_ERROR;
- }
- return;
- }
- /* block matches */
- dr->state = BRS_DOWNLOAD_DOWN;
- /* set CHKs for children */
- up_done = GNUNET_YES;
- chks = (const struct ContentHashKey *) block;
- for (i = 0; i < dr->num_children; i++)
- {
- drc = dr->children[i];
- GNUNET_assert (drc->offset >= dr->offset);
- child_block_size = GNUNET_FS_tree_compute_tree_size (drc->depth);
- GNUNET_assert (0 == (drc->offset - dr->offset) % child_block_size);
- if (BRS_INIT == drc->state)
- {
- drc->state = BRS_CHK_SET;
- drc->chk = chks[drc->chk_idx];
- try_top_down_reconstruction (dc, drc);
- }
- if (BRS_DOWNLOAD_UP != drc->state)
- up_done = GNUNET_NO; /* children not all done */
- }
- if (GNUNET_YES == up_done)
- propagate_up (dr); /* children all done (or no children...) */
- }
- /**
- * Add entries to the message queue.
- *
- * @param cls our download context
- * @param key unused
- * @param entry entry of type `struct DownloadRequest`
- * @return #GNUNET_OK
- */
- static int
- retry_entry (void *cls, const struct GNUNET_HashCode *key, void *entry)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- struct DownloadRequest *dr = entry;
- struct SearchMessage *sm;
- struct GNUNET_MQ_Envelope *env;
- env = GNUNET_MQ_msg (sm, GNUNET_MESSAGE_TYPE_FS_START_SEARCH);
- if (0 != (dc->options & GNUNET_FS_DOWNLOAD_OPTION_LOOPBACK_ONLY))
- sm->options = htonl (GNUNET_FS_SEARCH_OPTION_LOOPBACK_ONLY);
- else
- sm->options = htonl (GNUNET_FS_SEARCH_OPTION_NONE);
- if (0 == dr->depth)
- sm->type = htonl (GNUNET_BLOCK_TYPE_FS_DBLOCK);
- else
- sm->type = htonl (GNUNET_BLOCK_TYPE_FS_IBLOCK);
- sm->anonymity_level = htonl (dc->anonymity);
- sm->target = dc->target;
- sm->query = dr->chk.query;
- GNUNET_MQ_send (dc->mq, env);
- return GNUNET_OK;
- }
- /**
- * Schedule the download of the specified block in the tree.
- *
- * @param dc overall download this block belongs to
- * @param dr request to schedule
- */
- static void
- schedule_block_download (struct GNUNET_FS_DownloadContext *dc,
- struct DownloadRequest *dr)
- {
- unsigned int i;
- switch (dr->state)
- {
- case BRS_INIT:
- GNUNET_assert (0);
- break;
- case BRS_RECONSTRUCT_DOWN:
- GNUNET_assert (0);
- break;
- case BRS_RECONSTRUCT_META_UP:
- GNUNET_assert (0);
- break;
- case BRS_RECONSTRUCT_UP:
- GNUNET_assert (0);
- break;
- case BRS_CHK_SET:
- /* normal case, start download */
- break;
- case BRS_DOWNLOAD_DOWN:
- for (i = 0; i < dr->num_children; i++)
- schedule_block_download (dc, dr->children[i]);
- return;
- case BRS_DOWNLOAD_UP:
- /* We're done! */
- return;
- case BRS_ERROR:
- GNUNET_break (0);
- return;
- }
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Scheduling download at offset %llu and depth %u for `%s'\n",
- (unsigned long long) dr->offset,
- dr->depth,
- GNUNET_h2s (&dr->chk.query));
- if (GNUNET_NO != GNUNET_CONTAINER_multihashmap_contains_value (dc->active,
- &dr->chk.query,
- dr))
- return; /* already active */
- GNUNET_CONTAINER_multihashmap_put (dc->active,
- &dr->chk.query,
- dr,
- GNUNET_CONTAINER_MULTIHASHMAPOPTION_MULTIPLE);
- if (NULL == dc->mq)
- return; /* download not active */
- retry_entry (dc, &dr->chk.query, dr);
- }
- #define GNUNET_FS_URI_CHK_PREFIX GNUNET_FS_URI_PREFIX GNUNET_FS_URI_CHK_INFIX
- /**
- * We found an entry in a directory. Check if the respective child
- * already exists and if not create the respective child download.
- *
- * @param cls the parent download
- * @param filename name of the file in the directory
- * @param uri URI of the file (CHK or LOC)
- * @param meta meta data of the file
- * @param length number of bytes in data
- * @param data contents of the file (or NULL if they were not inlined)
- */
- static void
- trigger_recursive_download (void *cls,
- const char *filename,
- const struct GNUNET_FS_Uri *uri,
- const struct GNUNET_CONTAINER_MetaData *meta,
- size_t length,
- const void *data)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- struct GNUNET_FS_DownloadContext *cpos;
- char *temp_name;
- char *fn;
- char *us;
- char *ext;
- char *dn;
- char *pos;
- char *full_name;
- char *sfn;
- if (NULL == uri)
- return; /* entry for the directory itself */
- cpos = dc->child_head;
- while (NULL != cpos)
- {
- if ((GNUNET_FS_uri_test_equal (uri, cpos->uri)) ||
- ((NULL != filename) && (0 == strcmp (cpos->filename, filename))))
- break;
- cpos = cpos->next;
- }
- if (NULL != cpos)
- return; /* already exists */
- fn = NULL;
- if (NULL == filename)
- {
- fn = GNUNET_FS_meta_data_suggest_filename (meta);
- if (NULL == fn)
- {
- us = GNUNET_FS_uri_to_string (uri);
- fn = GNUNET_strdup (&us[strlen (GNUNET_FS_URI_CHK_PREFIX)]);
- GNUNET_free (us);
- }
- else if ('.' == fn[0])
- {
- ext = fn;
- us = GNUNET_FS_uri_to_string (uri);
- GNUNET_asprintf (&fn,
- "%s%s",
- &us[strlen (GNUNET_FS_URI_CHK_PREFIX)],
- ext);
- GNUNET_free (ext);
- GNUNET_free (us);
- }
- /* change '\' to '/' (this should have happened
- * during insertion, but malicious peers may
- * not have done this) */
- while (NULL != (pos = strstr (fn, "\\")))
- *pos = '/';
- /* remove '../' everywhere (again, well-behaved
- * peers don't do this, but don't trust that
- * we did not get something nasty) */
- while (NULL != (pos = strstr (fn, "../")))
- {
- pos[0] = '_';
- pos[1] = '_';
- pos[2] = '_';
- }
- filename = fn;
- }
- if (NULL == dc->filename)
- {
- full_name = NULL;
- }
- else
- {
- dn = GNUNET_strdup (dc->filename);
- GNUNET_break (
- (strlen (dn) >= strlen (GNUNET_FS_DIRECTORY_EXT)) &&
- (NULL != strstr (dn + strlen (dn) - strlen (GNUNET_FS_DIRECTORY_EXT),
- GNUNET_FS_DIRECTORY_EXT)));
- sfn = GNUNET_strdup (filename);
- while ((strlen (sfn) > 0) && ('/' == filename[strlen (sfn) - 1]))
- sfn[strlen (sfn) - 1] = '\0';
- if ((strlen (dn) >= strlen (GNUNET_FS_DIRECTORY_EXT)) &&
- (NULL != strstr (dn + strlen (dn) - strlen (GNUNET_FS_DIRECTORY_EXT),
- GNUNET_FS_DIRECTORY_EXT)))
- dn[strlen (dn) - strlen (GNUNET_FS_DIRECTORY_EXT)] = '\0';
- if ((GNUNET_YES == GNUNET_FS_meta_data_test_for_directory (meta)) &&
- ((strlen (filename) < strlen (GNUNET_FS_DIRECTORY_EXT)) ||
- (NULL == strstr (filename + strlen (filename)
- - strlen (GNUNET_FS_DIRECTORY_EXT),
- GNUNET_FS_DIRECTORY_EXT))))
- {
- GNUNET_asprintf (&full_name,
- "%s%s%s%s",
- dn,
- DIR_SEPARATOR_STR,
- sfn,
- GNUNET_FS_DIRECTORY_EXT);
- }
- else
- {
- GNUNET_asprintf (&full_name, "%s%s%s", dn, DIR_SEPARATOR_STR, sfn);
- }
- GNUNET_free (sfn);
- GNUNET_free (dn);
- }
- if ((NULL != full_name) &&
- (GNUNET_OK != GNUNET_DISK_directory_create_for_file (full_name)))
- {
- GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
- _ (
- "Failed to create directory for recursive download of `%s'\n"),
- full_name);
- GNUNET_free (full_name);
- GNUNET_free (fn);
- return;
- }
- temp_name = NULL;
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Triggering recursive download of size %llu with %u bytes MD\n",
- (unsigned long long) GNUNET_FS_uri_chk_get_file_size (uri),
- (unsigned int) GNUNET_CONTAINER_meta_data_get_serialized_size (
- meta));
- GNUNET_FS_download_start (dc->h,
- uri,
- meta,
- full_name,
- temp_name,
- 0,
- GNUNET_FS_uri_chk_get_file_size (uri),
- dc->anonymity,
- dc->options,
- NULL,
- dc);
- GNUNET_free (full_name);
- GNUNET_free (temp_name);
- GNUNET_free (fn);
- }
- /**
- * (recursively) free download request structure
- *
- * @param dr request to free
- */
- void
- GNUNET_FS_free_download_request_ (struct DownloadRequest *dr)
- {
- if (NULL == dr)
- return;
- for (unsigned int i = 0; i < dr->num_children; i++)
- GNUNET_FS_free_download_request_ (dr->children[i]);
- GNUNET_free (dr->children);
- GNUNET_free (dr);
- }
- /**
- * Iterator over entries in the pending requests in the 'active' map for the
- * reply that we just got.
- *
- * @param cls closure (our `struct ProcessResultClosure`)
- * @param key query for the given value / request
- * @param value value in the hash map (a `struct DownloadRequest`)
- * @return #GNUNET_YES (we should continue to iterate); unless serious error
- */
- static int
- process_result_with_request (void *cls,
- const struct GNUNET_HashCode *key,
- void *value)
- {
- struct ProcessResultClosure *prc = cls;
- struct DownloadRequest *dr = value;
- struct GNUNET_FS_DownloadContext *dc = prc->dc;
- struct DownloadRequest *drc;
- struct GNUNET_DISK_FileHandle *fh = NULL;
- struct GNUNET_CRYPTO_SymmetricSessionKey skey;
- struct GNUNET_CRYPTO_SymmetricInitializationVector iv;
- char pt[prc->size];
- struct GNUNET_FS_ProgressInfo pi;
- uint64_t off;
- size_t bs;
- size_t app;
- int i;
- struct ContentHashKey *chkarr;
- GNUNET_log (
- GNUNET_ERROR_TYPE_DEBUG,
- "Received %u byte block `%s' matching pending request at depth %u and offset %llu/%llu\n",
- (unsigned int) prc->size,
- GNUNET_h2s (key),
- dr->depth,
- (unsigned long long) dr->offset,
- (unsigned long long) GNUNET_ntohll (dc->uri->data.chk.file_length));
- bs = GNUNET_FS_tree_calculate_block_size (GNUNET_ntohll (
- dc->uri->data.chk.file_length),
- dr->offset,
- dr->depth);
- if (prc->size != bs)
- {
- GNUNET_asprintf (
- &dc->emsg,
- _ (
- "Internal error or bogus download URI (expected %lu bytes at depth %u and offset %llu/%llu, got %lu bytes)"),
- bs,
- dr->depth,
- (unsigned long long) dr->offset,
- (unsigned long long) GNUNET_ntohll (dc->uri->data.chk.file_length),
- prc->size);
- GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "%s\n", dc->emsg);
- while (NULL != dr->parent)
- {
- dr->state = BRS_ERROR;
- dr = dr->parent;
- }
- dr->state = BRS_ERROR;
- goto signal_error;
- }
- (void) GNUNET_CONTAINER_multihashmap_remove (dc->active, &prc->query, dr);
- GNUNET_CRYPTO_hash_to_aes_key (&dr->chk.key, &skey, &iv);
- if (-1 ==
- GNUNET_CRYPTO_symmetric_decrypt (prc->data, prc->size, &skey, &iv, pt))
- {
- GNUNET_break (0);
- dc->emsg = GNUNET_strdup (_ ("internal error decrypting content"));
- goto signal_error;
- }
- off = compute_disk_offset (GNUNET_ntohll (dc->uri->data.chk.file_length),
- dr->offset,
- dr->depth);
- /* save to disk */
- if ((GNUNET_YES == prc->do_store) &&
- ((NULL != dc->filename) || (is_recursive_download (dc))) &&
- ((dr->depth == dc->treedepth) ||
- (0 == (dc->options & GNUNET_FS_DOWNLOAD_NO_TEMPORARIES))))
- {
- fh = GNUNET_DISK_file_open (NULL != dc->filename ? dc->filename
- : dc->temp_filename,
- GNUNET_DISK_OPEN_READWRITE
- | GNUNET_DISK_OPEN_CREATE,
- GNUNET_DISK_PERM_USER_READ
- | GNUNET_DISK_PERM_USER_WRITE
- | GNUNET_DISK_PERM_GROUP_READ
- | GNUNET_DISK_PERM_OTHER_READ);
- if (NULL == fh)
- {
- GNUNET_asprintf (&dc->emsg,
- _ ("Download failed: could not open file `%s': %s"),
- dc->filename,
- strerror (errno));
- goto signal_error;
- }
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Saving decrypted block to disk at offset %llu\n",
- (unsigned long long) off);
- if ((off != GNUNET_DISK_file_seek (fh, off, GNUNET_DISK_SEEK_SET)))
- {
- GNUNET_asprintf (&dc->emsg,
- _ ("Failed to seek to offset %llu in file `%s': %s"),
- (unsigned long long) off,
- dc->filename,
- strerror (errno));
- goto signal_error;
- }
- if (prc->size != GNUNET_DISK_file_write (fh, pt, prc->size))
- {
- GNUNET_asprintf (
- &dc->emsg,
- _ ("Failed to write block of %u bytes at offset %llu in file `%s': %s"),
- (unsigned int) prc->size,
- (unsigned long long) off,
- dc->filename,
- strerror (errno));
- goto signal_error;
- }
- GNUNET_break (GNUNET_OK == GNUNET_DISK_file_close (fh));
- fh = NULL;
- }
- if (0 == dr->depth)
- {
- /* DBLOCK, update progress and try recursion if applicable */
- app = prc->size;
- if (dr->offset < dc->offset)
- {
- /* starting offset begins in the middle of pt,
- * do not count first bytes as progress */
- GNUNET_assert (app > (dc->offset - dr->offset));
- app -= (dc->offset - dr->offset);
- }
- if (dr->offset + prc->size > dc->offset + dc->length)
- {
- /* end of block is after relevant range,
- * do not count last bytes as progress */
- GNUNET_assert (app >
- (dr->offset + prc->size) - (dc->offset + dc->length));
- app -= (dr->offset + prc->size) - (dc->offset + dc->length);
- }
- dc->completed += app;
- /* do recursive download if option is set and either meta data
- * says it is a directory or if no meta data is given AND filename
- * ends in '.gnd' (top-level case) */
- if (is_recursive_download (dc))
- GNUNET_FS_directory_list_contents (prc->size,
- pt,
- off,
- &trigger_recursive_download,
- dc);
- }
- GNUNET_assert (dc->completed <= dc->length);
- dr->state = BRS_DOWNLOAD_DOWN;
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_PROGRESS;
- pi.value.download.specifics.progress.data = pt;
- pi.value.download.specifics.progress.offset = dr->offset;
- pi.value.download.specifics.progress.data_len = prc->size;
- pi.value.download.specifics.progress.depth = dr->depth;
- pi.value.download.specifics.progress.respect_offered = prc->respect_offered;
- pi.value.download.specifics.progress.num_transmissions =
- prc->num_transmissions;
- if (prc->last_transmission.abs_value_us !=
- GNUNET_TIME_UNIT_FOREVER_ABS.abs_value_us)
- pi.value.download.specifics.progress.block_download_duration =
- GNUNET_TIME_absolute_get_duration (prc->last_transmission);
- else
- pi.value.download.specifics.progress.block_download_duration =
- GNUNET_TIME_UNIT_ZERO; /* found locally */
- GNUNET_FS_download_make_status_ (&pi, dc);
- if (0 == dr->depth)
- propagate_up (dr);
- if (dc->completed == dc->length)
- {
- /* download completed, signal */
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Download completed, truncating file to desired length %llu\n",
- (unsigned long long) GNUNET_ntohll (
- dc->uri->data.chk.file_length));
- /* truncate file to size (since we store IBlocks at the end) */
- if (NULL != dc->filename)
- {
- if (0 != truncate (dc->filename,
- GNUNET_ntohll (dc->uri->data.chk.file_length)))
- GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING,
- "truncate",
- dc->filename);
- }
- GNUNET_assert (0 == dr->depth);
- check_completed (dc);
- }
- if (0 == dr->depth)
- {
- /* bottom of the tree, no child downloads possible, just sync */
- GNUNET_FS_download_sync_ (dc);
- return GNUNET_YES;
- }
- GNUNET_log (
- GNUNET_ERROR_TYPE_DEBUG,
- "Triggering downloads of children (this block was at depth %u and offset %llu)\n",
- dr->depth,
- (unsigned long long) dr->offset);
- GNUNET_assert (0 == (prc->size % sizeof(struct ContentHashKey)));
- chkarr = (struct ContentHashKey *) pt;
- for (i = dr->num_children - 1; i >= 0; i--)
- {
- drc = dr->children[i];
- switch (drc->state)
- {
- case BRS_INIT:
- if ((drc->chk_idx + 1) * sizeof(struct ContentHashKey) > prc->size)
- {
- /* 'chkarr' does not have enough space for this chk_idx;
- internal error! */
- GNUNET_break (0);
- GNUNET_assert (0);
- dc->emsg = GNUNET_strdup (_ ("internal error decoding tree"));
- goto signal_error;
- }
- drc->chk = chkarr[drc->chk_idx];
- drc->state = BRS_CHK_SET;
- if (GNUNET_YES == dc->issue_requests)
- schedule_block_download (dc, drc);
- break;
- case BRS_RECONSTRUCT_DOWN:
- GNUNET_assert (0);
- break;
- case BRS_RECONSTRUCT_META_UP:
- GNUNET_assert (0);
- break;
- case BRS_RECONSTRUCT_UP:
- GNUNET_assert (0);
- break;
- case BRS_CHK_SET:
- GNUNET_assert (0);
- break;
- case BRS_DOWNLOAD_DOWN:
- GNUNET_assert (0);
- break;
- case BRS_DOWNLOAD_UP:
- GNUNET_assert (0);
- break;
- case BRS_ERROR:
- GNUNET_assert (0);
- break;
- default:
- GNUNET_assert (0);
- break;
- }
- }
- GNUNET_FS_download_sync_ (dc);
- return GNUNET_YES;
- signal_error:
- if (NULL != fh)
- GNUNET_DISK_file_close (fh);
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_ERROR;
- pi.value.download.specifics.error.message = dc->emsg;
- GNUNET_FS_download_make_status_ (&pi, dc);
- GNUNET_MQ_destroy (dc->mq);
- dc->mq = NULL;
- GNUNET_FS_free_download_request_ (dc->top_request);
- dc->top_request = NULL;
- if (NULL != dc->job_queue)
- {
- GNUNET_FS_dequeue_ (dc->job_queue);
- dc->job_queue = NULL;
- }
- GNUNET_FS_download_sync_ (dc);
- return GNUNET_NO;
- }
- /**
- * Type of a function to call when we check the PUT message
- * from the service.
- *
- * @param cls closure
- * @param msg message received
- */
- static int
- check_put (void *cls, const struct ClientPutMessage *cm)
- {
- /* any varsize length is OK */
- return GNUNET_OK;
- }
- /**
- * Type of a function to call when we receive a message
- * from the service.
- *
- * @param cls closure
- * @param msg message received
- */
- static void
- handle_put (void *cls, const struct ClientPutMessage *cm)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- uint16_t msize = ntohs (cm->header.size) - sizeof(*cm);
- struct ProcessResultClosure prc;
- prc.dc = dc;
- prc.data = &cm[1];
- prc.last_transmission = GNUNET_TIME_absolute_ntoh (cm->last_transmission);
- prc.size = msize;
- prc.type = ntohl (cm->type);
- prc.do_store = GNUNET_YES;
- prc.respect_offered = ntohl (cm->respect_offered);
- prc.num_transmissions = ntohl (cm->num_transmissions);
- GNUNET_CRYPTO_hash (prc.data, msize, &prc.query);
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Received result for query `%s' from FS service\n",
- GNUNET_h2s (&prc.query));
- GNUNET_CONTAINER_multihashmap_get_multiple (dc->active,
- &prc.query,
- &process_result_with_request,
- &prc);
- }
- /**
- * Generic error handler, called with the appropriate error code and
- * the same closure specified at the creation of the message queue.
- * Not every message queue implementation supports an error handler.
- *
- * @param cls closure with the `struct GNUNET_FS_DownloadContext *`
- * @param error error code
- */
- static void
- download_mq_error_handler (void *cls, enum GNUNET_MQ_Error error)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- if (NULL != dc->mq)
- {
- GNUNET_MQ_destroy (dc->mq);
- dc->mq = NULL;
- }
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Transmitting download request failed, trying to reconnect\n");
- try_reconnect (dc);
- }
- /**
- * Reconnect to the FS service and transmit our queries NOW.
- *
- * @param cls our download context
- */
- static void
- do_reconnect (void *cls)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- struct GNUNET_MQ_MessageHandler handlers[] =
- { GNUNET_MQ_hd_var_size (put,
- GNUNET_MESSAGE_TYPE_FS_PUT,
- struct ClientPutMessage,
- dc),
- GNUNET_MQ_handler_end () };
- dc->task = NULL;
- dc->mq = GNUNET_CLIENT_connect (dc->h->cfg,
- "fs",
- handlers,
- &download_mq_error_handler,
- dc);
- if (NULL == dc->mq)
- {
- GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
- "Connecting to `%s'-service failed, will try again.\n",
- "FS");
- try_reconnect (dc);
- return;
- }
- GNUNET_CONTAINER_multihashmap_iterate (dc->active, &retry_entry, dc);
- }
- /**
- * We've lost our connection with the FS service.
- * Re-establish it and re-transmit all of our
- * pending requests.
- *
- * @param dc download context that is having trouble
- */
- static void
- try_reconnect (struct GNUNET_FS_DownloadContext *dc)
- {
- if (NULL != dc->mq)
- {
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Moving all requests back to pending list\n");
- GNUNET_MQ_destroy (dc->mq);
- dc->mq = NULL;
- }
- if (0 == dc->reconnect_backoff.rel_value_us)
- dc->reconnect_backoff = GNUNET_TIME_UNIT_MILLISECONDS;
- else
- dc->reconnect_backoff = GNUNET_TIME_STD_BACKOFF (dc->reconnect_backoff);
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Will try to reconnect in %s\n",
- GNUNET_STRINGS_relative_time_to_string (dc->reconnect_backoff,
- GNUNET_YES));
- GNUNET_break (NULL != dc->job_queue);
- dc->task =
- GNUNET_SCHEDULER_add_delayed (dc->reconnect_backoff, &do_reconnect, dc);
- }
- /**
- * We're allowed to ask the FS service for our blocks. Start the download.
- *
- * @param cls the 'struct GNUNET_FS_DownloadContext'
- * @param mq handle to use for communcation with FS (we must destroy it!)
- */
- static void
- activate_fs_download (void *cls)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- struct GNUNET_FS_ProgressInfo pi;
- GNUNET_assert (NULL == dc->mq);
- GNUNET_assert (NULL != dc->active);
- do_reconnect (dc);
- if (NULL != dc->mq)
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Download activated\n");
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_ACTIVE;
- GNUNET_FS_download_make_status_ (&pi, dc);
- }
- /**
- * We must stop to ask the FS service for our blocks. Pause the download.
- *
- * @param cls the `struct GNUNET_FS_DownloadContext`
- */
- static void
- deactivate_fs_download (void *cls)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- struct GNUNET_FS_ProgressInfo pi;
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Download deactivated\n");
- if (NULL != dc->mq)
- {
- GNUNET_MQ_destroy (dc->mq);
- dc->mq = NULL;
- }
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_INACTIVE;
- GNUNET_FS_download_make_status_ (&pi, dc);
- }
- /**
- * (recursively) Create a download request structure.
- *
- * @param parent parent of the current entry
- * @param chk_idx index of the chk for this block in the parent block
- * @param depth depth of the current entry, 0 are the DBLOCKs,
- * top level block is 'dc->treedepth - 1'
- * @param dr_offset offset in the original file this block maps to
- * (as in, offset of the first byte of the first DBLOCK
- * in the subtree rooted in the returned download request tree)
- * @param file_start_offset desired starting offset for the download
- * in the original file; requesting tree should not contain
- * DBLOCKs prior to the file_start_offset
- * @param desired_length desired number of bytes the user wanted to access
- * (from file_start_offset). Resulting tree should not contain
- * DBLOCKs after file_start_offset + file_length.
- * @return download request tree for the given range of DBLOCKs at
- * the specified depth
- */
- static struct DownloadRequest *
- create_download_request (struct DownloadRequest *parent,
- unsigned int chk_idx,
- unsigned int depth,
- uint64_t dr_offset,
- uint64_t file_start_offset,
- uint64_t desired_length)
- {
- struct DownloadRequest *dr;
- unsigned int i;
- unsigned int head_skip;
- uint64_t child_block_size;
- dr = GNUNET_new (struct DownloadRequest);
- dr->parent = parent;
- dr->depth = depth;
- dr->offset = dr_offset;
- dr->chk_idx = chk_idx;
- if (0 == depth)
- return dr;
- child_block_size = GNUNET_FS_tree_compute_tree_size (depth - 1);
- /* calculate how many blocks at this level are not interesting
- * from the start (rounded down), either because of the requested
- * file offset or because this IBlock is further along */
- if (dr_offset < file_start_offset)
- {
- head_skip = (file_start_offset - dr_offset) / child_block_size;
- }
- else
- {
- head_skip = 0;
- }
- /* calculate index of last block at this level that is interesting (rounded up) */
- dr->num_children =
- (file_start_offset + desired_length - dr_offset) / child_block_size;
- if (dr->num_children * child_block_size <
- file_start_offset + desired_length - dr_offset)
- dr->num_children++; /* round up */
- GNUNET_assert (dr->num_children > head_skip);
- dr->num_children -= head_skip;
- if (dr->num_children > CHK_PER_INODE)
- dr->num_children = CHK_PER_INODE; /* cap at max */
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Block at offset %llu and depth %u has %u children\n",
- (unsigned long long) dr_offset,
- depth,
- dr->num_children);
- /* now we can get the total number of *interesting* children for this block */
- /* why else would we have gotten here to begin with? (that'd be a bad logic error) */
- GNUNET_assert (dr->num_children > 0);
- dr->children = GNUNET_new_array (dr->num_children, struct DownloadRequest *);
- for (i = 0; i < dr->num_children; i++)
- {
- dr->children[i] =
- create_download_request (dr,
- i + head_skip,
- depth - 1,
- dr_offset + (i + head_skip) * child_block_size,
- file_start_offset,
- desired_length);
- }
- return dr;
- }
- /**
- * Continuation after a possible attempt to reconstruct
- * the current IBlock from the existing file.
- *
- * @param cls the 'struct ReconstructContext'
- */
- static void
- reconstruct_cont (void *cls)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- /* clean up state from tree encoder */
- if (NULL != dc->task)
- {
- GNUNET_SCHEDULER_cancel (dc->task);
- dc->task = NULL;
- }
- if (NULL != dc->rfh)
- {
- GNUNET_break (GNUNET_OK == GNUNET_DISK_file_close (dc->rfh));
- dc->rfh = NULL;
- }
- /* start "normal" download */
- dc->issue_requests = GNUNET_YES;
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Starting normal download\n");
- schedule_block_download (dc, dc->top_request);
- }
- /**
- * Task requesting the next block from the tree encoder.
- *
- * @param cls the 'struct GNUJNET_FS_DownloadContext' we're processing
- */
- static void
- get_next_block (void *cls)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- dc->task = NULL;
- GNUNET_FS_tree_encoder_next (dc->te);
- }
- /**
- * Function called asking for the current (encoded)
- * block to be processed. After processing the
- * client should either call "GNUNET_FS_tree_encode_next"
- * or (on error) "GNUNET_FS_tree_encode_finish".
- *
- * This function checks if the content on disk matches
- * the expected content based on the URI.
- *
- * @param cls closure
- * @param chk content hash key for the block
- * @param offset offset of the block
- * @param depth depth of the block, 0 for DBLOCK
- * @param type type of the block (IBLOCK or DBLOCK)
- * @param block the (encrypted) block
- * @param block_size size of block (in bytes)
- */
- static void
- reconstruct_cb (void *cls,
- const struct ContentHashKey *chk,
- uint64_t offset,
- unsigned int depth,
- enum GNUNET_BLOCK_Type type,
- const void *block,
- uint16_t block_size)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- struct GNUNET_FS_ProgressInfo pi;
- struct DownloadRequest *dr;
- uint64_t blen;
- unsigned int chld;
- /* find corresponding request entry */
- dr = dc->top_request;
- while (dr->depth > depth)
- {
- GNUNET_assert (dr->num_children > 0);
- blen = GNUNET_FS_tree_compute_tree_size (dr->depth - 1);
- chld = (offset - dr->offset) / blen;
- if (chld < dr->children[0]->chk_idx)
- {
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Block %u < %u irrelevant for our range\n",
- chld,
- dr->children[0]->chk_idx);
- dc->task = GNUNET_SCHEDULER_add_now (&get_next_block, dc);
- return; /* irrelevant block */
- }
- if (chld > dr->children[dr->num_children - 1]->chk_idx)
- {
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Block %u > %u irrelevant for our range\n",
- chld,
- dr->children[dr->num_children - 1]->chk_idx);
- dc->task = GNUNET_SCHEDULER_add_now (&get_next_block, dc);
- return; /* irrelevant block */
- }
- dr = dr->children[chld - dr->children[0]->chk_idx];
- }
- GNUNET_log (
- GNUNET_ERROR_TYPE_DEBUG,
- "Matched TE block with request at offset %llu and depth %u in state %d\n",
- (unsigned long long) dr->offset,
- dr->depth,
- dr->state);
- /* FIXME: this code needs more testing and might
- need to handle more states... */
- switch (dr->state)
- {
- case BRS_INIT:
- break;
- case BRS_RECONSTRUCT_DOWN:
- break;
- case BRS_RECONSTRUCT_META_UP:
- break;
- case BRS_RECONSTRUCT_UP:
- break;
- case BRS_CHK_SET:
- if (0 == memcmp (chk, &dr->chk, sizeof(struct ContentHashKey)))
- {
- GNUNET_log (
- GNUNET_ERROR_TYPE_DEBUG,
- "Reconstruction succeeded, can use block at offset %llu, depth %u\n",
- (unsigned long long) offset,
- depth);
- /* block matches, hence tree below matches;
- * this request is done! */
- dr->state = BRS_DOWNLOAD_UP;
- (void) GNUNET_CONTAINER_multihashmap_remove (dc->active,
- &dr->chk.query,
- dr);
- /* calculate how many bytes of payload this block
- * corresponds to */
- blen = GNUNET_FS_tree_compute_tree_size (dr->depth);
- /* how many of those bytes are in the requested range? */
- blen = GNUNET_MIN (blen, dc->length + dc->offset - dr->offset);
- /* signal progress */
- dc->completed += blen;
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_PROGRESS;
- pi.value.download.specifics.progress.data = NULL;
- pi.value.download.specifics.progress.offset = offset;
- pi.value.download.specifics.progress.data_len = 0;
- pi.value.download.specifics.progress.depth = 0;
- pi.value.download.specifics.progress.respect_offered = 0;
- pi.value.download.specifics.progress.block_download_duration =
- GNUNET_TIME_UNIT_ZERO;
- GNUNET_FS_download_make_status_ (&pi, dc);
- /* FIXME: duplicated code from 'process_result_with_request - refactor */
- if (dc->completed == dc->length)
- {
- /* download completed, signal */
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Download completed, truncating file to desired length %llu\n",
- (unsigned long long) GNUNET_ntohll (
- dc->uri->data.chk.file_length));
- /* truncate file to size (since we store IBlocks at the end) */
- if (NULL != dc->filename)
- {
- if (0 != truncate (dc->filename,
- GNUNET_ntohll (dc->uri->data.chk.file_length)))
- GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING,
- "truncate",
- dc->filename);
- }
- }
- }
- else
- GNUNET_log (
- GNUNET_ERROR_TYPE_DEBUG,
- "Reconstruction failed, need to download block at offset %llu, depth %u\n",
- (unsigned long long) offset,
- depth);
- break;
- case BRS_DOWNLOAD_DOWN:
- break;
- case BRS_DOWNLOAD_UP:
- break;
- case BRS_ERROR:
- break;
- default:
- GNUNET_assert (0);
- break;
- }
- dc->task = GNUNET_SCHEDULER_add_now (&get_next_block, dc);
- if ((dr == dc->top_request) && (dr->state == BRS_DOWNLOAD_UP))
- check_completed (dc);
- }
- /**
- * Function called by the tree encoder to obtain a block of plaintext
- * data (for the lowest level of the tree).
- *
- * @param cls our 'struct ReconstructContext'
- * @param offset identifies which block to get
- * @param max (maximum) number of bytes to get; returning
- * fewer will also cause errors
- * @param buf where to copy the plaintext buffer
- * @param emsg location to store an error message (on error)
- * @return number of bytes copied to buf, 0 on error
- */
- static size_t
- fh_reader (void *cls, uint64_t offset, size_t max, void *buf, char **emsg)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- struct GNUNET_DISK_FileHandle *fh = dc->rfh;
- ssize_t ret;
- if (NULL != emsg)
- *emsg = NULL;
- if (offset != GNUNET_DISK_file_seek (fh, offset, GNUNET_DISK_SEEK_SET))
- {
- if (NULL != emsg)
- *emsg = GNUNET_strdup (strerror (errno));
- return 0;
- }
- ret = GNUNET_DISK_file_read (fh, buf, max);
- if (ret < 0)
- {
- if (NULL != emsg)
- *emsg = GNUNET_strdup (strerror (errno));
- return 0;
- }
- return ret;
- }
- /**
- * Task that creates the initial (top-level) download
- * request for the file.
- *
- * @param cls the 'struct GNUNET_FS_DownloadContext'
- */
- void
- GNUNET_FS_download_start_task_ (void *cls)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- struct GNUNET_FS_ProgressInfo pi;
- struct GNUNET_DISK_FileHandle *fh;
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Start task running...\n");
- dc->task = NULL;
- if (0 == dc->length)
- {
- /* no bytes required! */
- if (NULL != dc->filename)
- {
- fh = GNUNET_DISK_file_open (dc->filename,
- GNUNET_DISK_OPEN_READWRITE
- | GNUNET_DISK_OPEN_CREATE
- | ((0 ==
- GNUNET_FS_uri_chk_get_file_size (dc->uri))
- ? GNUNET_DISK_OPEN_TRUNCATE
- : 0),
- GNUNET_DISK_PERM_USER_READ
- | GNUNET_DISK_PERM_USER_WRITE
- | GNUNET_DISK_PERM_GROUP_READ
- | GNUNET_DISK_PERM_OTHER_READ);
- GNUNET_DISK_file_close (fh);
- }
- GNUNET_FS_download_sync_ (dc);
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_START;
- pi.value.download.specifics.start.meta = dc->meta;
- GNUNET_FS_download_make_status_ (&pi, dc);
- check_completed (dc);
- return;
- }
- if (NULL != dc->emsg)
- return;
- if (NULL == dc->top_request)
- {
- dc->top_request = create_download_request (NULL,
- 0,
- dc->treedepth - 1,
- 0,
- dc->offset,
- dc->length);
- dc->top_request->state = BRS_CHK_SET;
- dc->top_request->chk = (dc->uri->type == GNUNET_FS_URI_CHK)
- ? dc->uri->data.chk.chk
- : dc->uri->data.loc.fi.chk;
- /* signal start */
- GNUNET_FS_download_sync_ (dc);
- if (NULL != dc->search)
- GNUNET_FS_search_result_sync_ (dc->search);
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_START;
- pi.value.download.specifics.start.meta = dc->meta;
- GNUNET_FS_download_make_status_ (&pi, dc);
- }
- GNUNET_FS_download_start_downloading_ (dc);
- /* attempt reconstruction from disk */
- if (GNUNET_YES == GNUNET_DISK_file_test (dc->filename))
- dc->rfh = GNUNET_DISK_file_open (dc->filename,
- GNUNET_DISK_OPEN_READ,
- GNUNET_DISK_PERM_NONE);
- if (dc->top_request->state == BRS_CHK_SET)
- {
- if (NULL != dc->rfh)
- {
- /* first, try top-down */
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Trying top-down reconstruction for `%s'\n",
- dc->filename);
- try_top_down_reconstruction (dc, dc->top_request);
- switch (dc->top_request->state)
- {
- case BRS_CHK_SET:
- break; /* normal */
- case BRS_DOWNLOAD_DOWN:
- break; /* normal, some blocks already down */
- case BRS_DOWNLOAD_UP:
- /* already done entirely, party! */
- if (NULL != dc->rfh)
- {
- /* avoid hanging on to file handle longer than
- * necessary */
- GNUNET_DISK_file_close (dc->rfh);
- dc->rfh = NULL;
- }
- return;
- case BRS_ERROR:
- GNUNET_asprintf (&dc->emsg, _ ("Invalid URI"));
- GNUNET_FS_download_sync_ (dc);
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_ERROR;
- pi.value.download.specifics.error.message = dc->emsg;
- GNUNET_FS_download_make_status_ (&pi, dc);
- return;
- default:
- GNUNET_assert (0);
- break;
- }
- }
- }
- /* attempt reconstruction from meta data */
- if ((GNUNET_FS_uri_chk_get_file_size (dc->uri) <= MAX_INLINE_SIZE) &&
- (NULL != dc->meta))
- {
- GNUNET_log (
- GNUNET_ERROR_TYPE_DEBUG,
- "Trying to find embedded meta data for download of size %llu with %u bytes MD\n",
- (unsigned long long) GNUNET_FS_uri_chk_get_file_size (dc->uri),
- (unsigned int) GNUNET_CONTAINER_meta_data_get_serialized_size (dc->meta));
- GNUNET_CONTAINER_meta_data_iterate (dc->meta, &match_full_data, dc);
- if (BRS_DOWNLOAD_UP == dc->top_request->state)
- {
- if (NULL != dc->rfh)
- {
- /* avoid hanging on to file handle longer than
- * necessary */
- GNUNET_DISK_file_close (dc->rfh);
- dc->rfh = NULL;
- }
- return; /* finished, status update was already done for us */
- }
- }
- if (NULL != dc->rfh)
- {
- /* finally, actually run bottom-up */
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Trying bottom-up reconstruction of file `%s'\n",
- dc->filename);
- dc->te =
- GNUNET_FS_tree_encoder_create (dc->h,
- GNUNET_FS_uri_chk_get_file_size (dc->uri),
- dc,
- &fh_reader,
- &reconstruct_cb,
- NULL,
- &reconstruct_cont);
- dc->task = GNUNET_SCHEDULER_add_now (&get_next_block, dc);
- }
- else
- {
- /* simple, top-level download */
- dc->issue_requests = GNUNET_YES;
- schedule_block_download (dc, dc->top_request);
- }
- if (BRS_DOWNLOAD_UP == dc->top_request->state)
- check_completed (dc);
- }
- /**
- * Create SUSPEND event for the given download operation
- * and then clean up our state (without stop signal).
- *
- * @param cls the 'struct GNUNET_FS_DownloadContext' to signal for
- */
- void
- GNUNET_FS_download_signal_suspend_ (void *cls)
- {
- struct GNUNET_FS_DownloadContext *dc = cls;
- struct GNUNET_FS_ProgressInfo pi;
- if (NULL != dc->top)
- GNUNET_FS_end_top (dc->h, dc->top);
- while (NULL != dc->child_head)
- GNUNET_FS_download_signal_suspend_ (dc->child_head);
- if (NULL != dc->search)
- {
- dc->search->download = NULL;
- dc->search = NULL;
- }
- if (NULL != dc->job_queue)
- {
- GNUNET_FS_dequeue_ (dc->job_queue);
- dc->job_queue = NULL;
- }
- if (NULL != dc->parent)
- GNUNET_CONTAINER_DLL_remove (dc->parent->child_head,
- dc->parent->child_tail,
- dc);
- if (NULL != dc->task)
- {
- GNUNET_SCHEDULER_cancel (dc->task);
- dc->task = NULL;
- }
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_SUSPEND;
- GNUNET_FS_download_make_status_ (&pi, dc);
- if (NULL != dc->te)
- {
- GNUNET_FS_tree_encoder_finish (dc->te, NULL);
- dc->te = NULL;
- }
- if (NULL != dc->rfh)
- {
- GNUNET_DISK_file_close (dc->rfh);
- dc->rfh = NULL;
- }
- GNUNET_FS_free_download_request_ (dc->top_request);
- if (NULL != dc->active)
- {
- GNUNET_CONTAINER_multihashmap_destroy (dc->active);
- dc->active = NULL;
- }
- GNUNET_free (dc->filename);
- GNUNET_CONTAINER_meta_data_destroy (dc->meta);
- GNUNET_FS_uri_destroy (dc->uri);
- GNUNET_free (dc->temp_filename);
- GNUNET_free (dc->serialization);
- GNUNET_assert (NULL == dc->job_queue);
- GNUNET_free (dc);
- }
- /**
- * Helper function to setup the download context.
- *
- * @param h handle to the file sharing subsystem
- * @param uri the URI of the file (determines what to download); CHK or LOC URI
- * @param meta known metadata for the file (can be NULL)
- * @param filename where to store the file, maybe NULL (then no file is
- * created on disk and data must be grabbed from the callbacks)
- * @param tempname where to store temporary file data, not used if filename is non-NULL;
- * can be NULL (in which case we will pick a name if needed); the temporary file
- * may already exist, in which case we will try to use the data that is there and
- * if it is not what is desired, will overwrite it
- * @param offset at what offset should we start the download (typically 0)
- * @param length how many bytes should be downloaded starting at offset
- * @param anonymity anonymity level to use for the download
- * @param options various options
- * @param cctx initial value for the client context for this download
- * @return context that can be used to control this download
- */
- struct GNUNET_FS_DownloadContext *
- create_download_context (struct GNUNET_FS_Handle *h,
- const struct GNUNET_FS_Uri *uri,
- const struct GNUNET_CONTAINER_MetaData *meta,
- const char *filename,
- const char *tempname,
- uint64_t offset,
- uint64_t length,
- uint32_t anonymity,
- enum GNUNET_FS_DownloadOptions options,
- void *cctx)
- {
- struct GNUNET_FS_DownloadContext *dc;
- GNUNET_assert (GNUNET_FS_uri_test_chk (uri) || GNUNET_FS_uri_test_loc (uri));
- if ((offset + length < offset) ||
- (offset + length > GNUNET_FS_uri_chk_get_file_size (uri)))
- {
- GNUNET_break (0);
- return NULL;
- }
- dc = GNUNET_new (struct GNUNET_FS_DownloadContext);
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Starting download %p, %u bytes at offset %llu\n",
- dc,
- (unsigned int) length,
- (unsigned long long) offset);
- dc->h = h;
- dc->uri = GNUNET_FS_uri_dup (uri);
- dc->meta = GNUNET_CONTAINER_meta_data_duplicate (meta);
- dc->client_info = cctx;
- dc->start_time = GNUNET_TIME_absolute_get ();
- if (NULL != filename)
- {
- dc->filename = GNUNET_strdup (filename);
- if (GNUNET_YES == GNUNET_DISK_file_test (filename))
- GNUNET_break (GNUNET_OK == GNUNET_DISK_file_size (filename,
- &dc->old_file_size,
- GNUNET_YES,
- GNUNET_YES));
- }
- if (GNUNET_FS_uri_test_loc (dc->uri))
- GNUNET_assert (GNUNET_OK ==
- GNUNET_FS_uri_loc_get_peer_identity (dc->uri, &dc->target));
- dc->offset = offset;
- dc->length = length;
- dc->anonymity = anonymity;
- dc->options = options;
- dc->active =
- GNUNET_CONTAINER_multihashmap_create (1 + 2 * (length / DBLOCK_SIZE),
- GNUNET_NO);
- dc->treedepth =
- GNUNET_FS_compute_depth (GNUNET_FS_uri_chk_get_file_size (dc->uri));
- if ((NULL == filename) && (is_recursive_download (dc)))
- {
- if (NULL != tempname)
- dc->temp_filename = GNUNET_strdup (tempname);
- else
- dc->temp_filename = GNUNET_DISK_mktemp ("gnunet-directory-download-tmp");
- }
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Starting download `%s' of %llu bytes with tree depth %u\n",
- filename,
- (unsigned long long) length,
- dc->treedepth);
- GNUNET_assert (NULL == dc->job_queue);
- dc->task = GNUNET_SCHEDULER_add_now (&GNUNET_FS_download_start_task_, dc);
- return dc;
- }
- /**
- * Download parts of a file. Note that this will store
- * the blocks at the respective offset in the given file. Also, the
- * download is still using the blocking of the underlying FS
- * encoding. As a result, the download may *write* outside of the
- * given boundaries (if offset and length do not match the 32k FS
- * block boundaries). <p>
- *
- * This function should be used to focus a download towards a
- * particular portion of the file (optimization), not to strictly
- * limit the download to exactly those bytes.
- *
- * @param h handle to the file sharing subsystem
- * @param uri the URI of the file (determines what to download); CHK or LOC URI
- * @param meta known metadata for the file (can be NULL)
- * @param filename where to store the file, maybe NULL (then no file is
- * created on disk and data must be grabbed from the callbacks)
- * @param tempname where to store temporary file data, not used if filename is non-NULL;
- * can be NULL (in which case we will pick a name if needed); the temporary file
- * may already exist, in which case we will try to use the data that is there and
- * if it is not what is desired, will overwrite it
- * @param offset at what offset should we start the download (typically 0)
- * @param length how many bytes should be downloaded starting at offset
- * @param anonymity anonymity level to use for the download
- * @param options various options
- * @param cctx initial value for the client context for this download
- * @param parent parent download to associate this download with (use NULL
- * for top-level downloads; useful for manually-triggered recursive downloads)
- * @return context that can be used to control this download
- */
- struct GNUNET_FS_DownloadContext *
- GNUNET_FS_download_start (struct GNUNET_FS_Handle *h,
- const struct GNUNET_FS_Uri *uri,
- const struct GNUNET_CONTAINER_MetaData *meta,
- const char *filename,
- const char *tempname,
- uint64_t offset,
- uint64_t length,
- uint32_t anonymity,
- enum GNUNET_FS_DownloadOptions options,
- void *cctx,
- struct GNUNET_FS_DownloadContext *parent)
- {
- struct GNUNET_FS_DownloadContext *dc;
- dc = create_download_context (h,
- uri,
- meta,
- filename,
- tempname,
- offset,
- length,
- anonymity,
- options,
- cctx);
- if (NULL == dc)
- return NULL;
- dc->parent = parent;
- if (NULL != parent)
- GNUNET_CONTAINER_DLL_insert (parent->child_head, parent->child_tail, dc);
- else if (0 == (GNUNET_FS_DOWNLOAD_IS_PROBE & options))
- dc->top =
- GNUNET_FS_make_top (dc->h, &GNUNET_FS_download_signal_suspend_, dc);
- return dc;
- }
- /**
- * Download parts of a file based on a search result. The download
- * will be associated with the search result (and the association
- * will be preserved when serializing/deserializing the state).
- * If the search is stopped, the download will not be aborted but
- * be 'promoted' to a stand-alone download.
- *
- * As with the other download function, this will store
- * the blocks at the respective offset in the given file. Also, the
- * download is still using the blocking of the underlying FS
- * encoding. As a result, the download may *write* outside of the
- * given boundaries (if offset and length do not match the 32k FS
- * block boundaries). <p>
- *
- * The given range can be used to focus a download towards a
- * particular portion of the file (optimization), not to strictly
- * limit the download to exactly those bytes.
- *
- * @param h handle to the file sharing subsystem
- * @param sr the search result to use for the download (determines uri and
- * meta data and associations)
- * @param filename where to store the file, maybe NULL (then no file is
- * created on disk and data must be grabbed from the callbacks)
- * @param tempname where to store temporary file data, not used if filename is non-NULL;
- * can be NULL (in which case we will pick a name if needed); the temporary file
- * may already exist, in which case we will try to use the data that is there and
- * if it is not what is desired, will overwrite it
- * @param offset at what offset should we start the download (typically 0)
- * @param length how many bytes should be downloaded starting at offset
- * @param anonymity anonymity level to use for the download
- * @param options various download options
- * @param cctx initial value for the client context for this download
- * @return context that can be used to control this download
- */
- struct GNUNET_FS_DownloadContext *
- GNUNET_FS_download_start_from_search (struct GNUNET_FS_Handle *h,
- struct GNUNET_FS_SearchResult *sr,
- const char *filename,
- const char *tempname,
- uint64_t offset,
- uint64_t length,
- uint32_t anonymity,
- enum GNUNET_FS_DownloadOptions options,
- void *cctx)
- {
- struct GNUNET_FS_DownloadContext *dc;
- if ((NULL == sr) || (NULL != sr->download))
- {
- GNUNET_break (0);
- return NULL;
- }
- dc = create_download_context (h,
- sr->uri,
- sr->meta,
- filename,
- tempname,
- offset,
- length,
- anonymity,
- options,
- cctx);
- if (NULL == dc)
- return NULL;
- dc->search = sr;
- sr->download = dc;
- if (NULL != sr->probe_ctx)
- {
- GNUNET_FS_download_stop (sr->probe_ctx, GNUNET_YES);
- sr->probe_ctx = NULL;
- GNUNET_FS_stop_probe_ping_task_ (sr);
- }
- return dc;
- }
- /**
- * Start the downloading process (by entering the queue).
- *
- * @param dc our download context
- */
- void
- GNUNET_FS_download_start_downloading_ (struct GNUNET_FS_DownloadContext *dc)
- {
- if (dc->completed == dc->length)
- return;
- if (NULL != dc->mq)
- return; /* already running */
- GNUNET_assert (NULL == dc->job_queue);
- GNUNET_assert (NULL == dc->task);
- GNUNET_assert (NULL != dc->active);
- dc->job_queue =
- GNUNET_FS_queue_ (dc->h,
- &activate_fs_download,
- &deactivate_fs_download,
- dc,
- (dc->length + DBLOCK_SIZE - 1) / DBLOCK_SIZE,
- (0 == (dc->options & GNUNET_FS_DOWNLOAD_IS_PROBE))
- ? GNUNET_FS_QUEUE_PRIORITY_NORMAL
- : GNUNET_FS_QUEUE_PRIORITY_PROBE);
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Download %p put into queue as job %p\n",
- dc,
- dc->job_queue);
- }
- /**
- * Suspend a download.
- *
- * @param dc handle for the download
- */
- void
- GNUNET_FS_download_suspend (struct GNUNET_FS_DownloadContext *dc)
- {
- deactivate_fs_download (dc);
- }
- /**
- * Resume a suspended download.
- *
- * @param dc handle for the download
- */
- void
- GNUNET_FS_download_resume (struct GNUNET_FS_DownloadContext *dc)
- {
- struct GNUNET_FS_ProgressInfo pi;
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_ACTIVE;
- GNUNET_FS_download_make_status_ (&pi, dc);
- GNUNET_assert (NULL == dc->task);
- dc->job_queue =
- GNUNET_FS_queue_ (dc->h,
- &activate_fs_download,
- &deactivate_fs_download,
- dc,
- (dc->length + DBLOCK_SIZE - 1) / DBLOCK_SIZE,
- (0 == (dc->options & GNUNET_FS_DOWNLOAD_IS_PROBE))
- ? GNUNET_FS_QUEUE_PRIORITY_NORMAL
- : GNUNET_FS_QUEUE_PRIORITY_PROBE);
- }
- /**
- * Stop a download (aborts if download is incomplete).
- *
- * @param dc handle for the download
- * @param do_delete delete files of incomplete downloads
- */
- void
- GNUNET_FS_download_stop (struct GNUNET_FS_DownloadContext *dc, int do_delete)
- {
- struct GNUNET_FS_ProgressInfo pi;
- int have_children;
- int search_was_null;
- if (NULL != dc->top)
- GNUNET_FS_end_top (dc->h, dc->top);
- if (NULL != dc->task)
- {
- GNUNET_SCHEDULER_cancel (dc->task);
- dc->task = NULL;
- }
- search_was_null = (NULL == dc->search);
- if (NULL != dc->search)
- {
- dc->search->download = NULL;
- GNUNET_FS_search_result_sync_ (dc->search);
- dc->search = NULL;
- }
- if (NULL != dc->job_queue)
- {
- GNUNET_FS_dequeue_ (dc->job_queue);
- dc->job_queue = NULL;
- }
- if (NULL != dc->te)
- {
- GNUNET_FS_tree_encoder_finish (dc->te, NULL);
- dc->te = NULL;
- }
- have_children = (NULL != dc->child_head) ? GNUNET_YES : GNUNET_NO;
- while (NULL != dc->child_head)
- GNUNET_FS_download_stop (dc->child_head, do_delete);
- if (NULL != dc->parent)
- GNUNET_CONTAINER_DLL_remove (dc->parent->child_head,
- dc->parent->child_tail,
- dc);
- if (NULL != dc->serialization)
- GNUNET_FS_remove_sync_file_ (dc->h,
- ((NULL != dc->parent) || (! search_was_null))
- ? GNUNET_FS_SYNC_PATH_CHILD_DOWNLOAD
- : GNUNET_FS_SYNC_PATH_MASTER_DOWNLOAD,
- dc->serialization);
- if ((GNUNET_YES == have_children) && (NULL == dc->parent))
- GNUNET_FS_remove_sync_dir_ (dc->h,
- (! search_was_null)
- ? GNUNET_FS_SYNC_PATH_CHILD_DOWNLOAD
- : GNUNET_FS_SYNC_PATH_MASTER_DOWNLOAD,
- dc->serialization);
- pi.status = GNUNET_FS_STATUS_DOWNLOAD_STOPPED;
- GNUNET_FS_download_make_status_ (&pi, dc);
- GNUNET_FS_free_download_request_ (dc->top_request);
- dc->top_request = NULL;
- if (NULL != dc->active)
- {
- GNUNET_CONTAINER_multihashmap_destroy (dc->active);
- dc->active = NULL;
- }
- if (NULL != dc->filename)
- {
- if ((dc->completed != dc->length) && (GNUNET_YES == do_delete))
- {
- if ((0 != unlink (dc->filename)) && (ENOENT != errno))
- GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING,
- "unlink",
- dc->filename);
- }
- GNUNET_free (dc->filename);
- }
- GNUNET_CONTAINER_meta_data_destroy (dc->meta);
- GNUNET_FS_uri_destroy (dc->uri);
- if (NULL != dc->temp_filename)
- {
- if (0 != unlink (dc->temp_filename))
- GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR,
- "unlink",
- dc->temp_filename);
- GNUNET_free (dc->temp_filename);
- }
- GNUNET_free (dc->serialization);
- GNUNET_assert (NULL == dc->job_queue);
- GNUNET_free (dc);
- }
- /* end of fs_download.c */
|