btlist.c

libbt-1.01 BT应用软件 是BT客户端的源代码

#include "config.h"

#ifdef WITH_DMALLOC
#include <dmalloc.h>
#endif /* WITH_DMALLOC */

#include <openssl/sha.h>
#include <stdlib.h>
#include <string.h>
#include "bts.h"
#include "types.h"
#include "benc.h"

int main( int argc, char **argv) {
   char *fname;
   btStream *in;
   btObject *o;
   btString *s;
   btInteger *i;
   btList *l;
   btDict *d;
   int idx;

   fname = argv[1];
   printf("%s\n\n", argv[0]);

   in = bts_create_filestream( fname, BTS_INPUT);

   if (benc_get_object( in, &o)) {
       printf("read failed.\n");
       exit(1);
   } 
   
/* 
* Metainfo files are bencoded dictionaries with the following keys -
* 
*    md={
*      announce=>'url',
*      info=>{
*          name=>'top-level-file-or-directory-name',
*          piece length=>12345,
*          pieces=>'md5sums',
* 
*          length=>12345,      
*            -or-
*          files=>[
*              {
*                  length=>12345,
*                  path=>['sub','directory','path','and','filename']
*                           
*              }, ... {}
*          ]
*      }
* 
*/

   printf("metainfo file.: %s\n", fname);
   btObject_dump(0,o);

   {
       /* SHA1 */ 
       btStream *tmpbts; 
       unsigned char digest[SHA_DIGEST_LENGTH];
       struct btstrbuf out;

       d=BTDICT( btObject_val( o, "info"));
       tmpbts = bts_create_strstream();
       benc_put_dict( tmpbts, d);
       out = bts_get_buf( tmpbts);
       SHA1( out.buf, out.len, digest);
       printf("info hash.....: ");
       for (idx=0; idx<sizeof(digest); idx++) {
	   printf("%02x",digest[idx]);
       }
       bts_destroy( tmpbts);
       printf("\n");
   }

   i=BTINTEGER( btObject_val(o, "info/length"));
   if (i) {
       /* file mode */
       btInteger *pl;
       s=BTSTRING( btObject_val( o, "info/name")); 
       printf("file name.....: %s\n", s->buf);
       s=BTSTRING( btObject_val( o, "info/pieces"));
       pl=BTINTEGER( btObject_val(o, "info/piece length"));
       printf("file size.....: %lld (%lld * %lld + %lld)\n", i->ival, i->ival/pl->ival, pl->ival, i->ival % pl->ival);
   } else {
       /* dir mode */
       _int64 tsize=0;
       s=BTSTRING( btObject_val( o, "info/name")); 
       printf("directory name: %s\n", s->buf);

       l=BTLIST( btObject_val(o, "info/files"));
       printf("files.........: %d\n", l->len);

       for (idx=0; idx<l->len; idx++) {
           int pathel;
           btList *filepath;
           btInteger *filesize;
           filepath=BTLIST( btObject_val( l->list[idx], "path"));
           filesize=BTINTEGER( btObject_val( l->list[idx], "length"));
           printf("   ");
           for (pathel=0; pathel<filepath->len; pathel++) {
               if (pathel>0) printf("/");
               printf("%s", BTSTRING(filepath->list[pathel])->buf);
           }
           printf(" (%lld)\n", filesize->ival);
           tsize+=filesize->ival;
       }

       s=BTSTRING( btObject_val( o, "info/pieces"));
       i=BTINTEGER( btObject_val(o, "info/piece length"));
       printf("archive size..: %lld (%lld * %lld + %lld)\n",
           tsize, tsize/i->ival, i->ival, tsize%i->ival);
   }

   s=BTSTRING( btObject_val( o, "announce"));
   printf("announce url..: %s\n", s->buf);

   printf("\n");

   btObject_destroy( o);
   bts_destroy( in);
   return 0;
}