int128main.c

p2p类源代码 kadc协议官方源代码

#include <stdio.h>
#include <int128.h>
#include <stdlib.h>

/* Print an IP address in host byte order (LSB first) */
void printip(unsigned int *ip) {
	unsigned char *b = (unsigned char *)ip;
	printf("%d.%d.%d.%d", b[3], b[2], b[1], b[0]);
}

int main(int ac, char *av[]){
	int i,j;
	FILE *fn, *fp;
	unsigned int clientbinip;
	unsigned short int clientudpport;
	unsigned long int clientid[4];

	int numContacts;
	unsigned long int id[4];
	unsigned int binip;
	unsigned short int udpport;
	unsigned short int tcpport;
	unsigned char type;

	unsigned char buf[16], buf1[16];
	int128 clientidint128 = buf;
	int128 idint128 = buf1;

	int commonhist[32];


	if(ac <= 1) {
		char *p;
		char buf[33];
		printf("usage: %s nodes.dat [preferencesK.dat]\n", av[0]);
		printf("or testing conversions:\n");

		p = "de2db47b13029fdd64827ceadf8c246d";
		printf("int128print(stdout,string2int128(idint128, %s)):\n",p);
		int128print(stdout, string2int128(idint128, p));
		printf("\n");
		printf("int128sprintf(buf, string2int128(idint128, %s)):\n", p);
		printf("%s\n", int128sprintf(buf, string2int128(idint128, p)));

		p = "00112233445566778899aabbccddeeff123456";
		printf("int128print(stdout,string2int128(idint128, %s)):\n",p);
		int128print(stdout, string2int128(idint128, p));
		printf("\n");
		printf("int128sprintf(buf, string2int128(idint128, %s)):\n", p);
		printf("%s\n",int128sprintf(buf, string2int128(idint128, p)));

		p = "112233";
		printf("int128print(stdout,string2int128(idint128, %s)):\n",p);
		int128print(stdout, string2int128(idint128, p));
		printf("\n");
		printf("int128sprintf(buf, string2int128(idint128, %s)):\n", p);
		printf("%s\n",int128sprintf(buf, string2int128(idint128, p)));

		p = "11223";
		printf("int128print(stdout,string2int128(idint128, %s)):\n",p);
		int128print(stdout, string2int128(idint128, p));
		printf("\n");
		printf("int128sprintf(buf, string2int128(idint128, %s)):\n", p);
		printf("%s\n",int128sprintf(buf, string2int128(idint128, p)));

		p = "1122z344";
		printf("int128print(stdout,string2int128(idint128, %s)):\n",p);
		int128print(stdout, string2int128(idint128, p));
		printf("\n");
		printf("int128sprintf(buf, string2int128(idint128, %s)):\n", p);
		printf("%s\n",int128sprintf(buf, string2int128(idint128, p)));

		exit(1);
	}

	if(ac > 2) {

		fp = fopen(av[2], "rb");
		if(fp == NULL) {
			printf("can't open %s\n", av[2]);
			exit(1);
		}

		if(fread(&clientbinip, sizeof(clientbinip), 1, fp) != 1)
			goto err2;

		if(fread(&clientudpport, sizeof(clientudpport), 1, fp) != 1)
			goto err2;

		if(fread(&clientid, sizeof(clientid), 1, fp) != 1)
			goto err;

		printf("Client IP: ");
		printip(&binip);
		printf(" port: %6u",clientudpport);
		printf(" ID: ");
		for(i=0;i<4;i++) printf("%08lx", clientid[i]);
		printf("\n\n");
		fclose(fp);

		/* convert into good KadC's int128 format */

		int128eMule2KadC(clientidint128, clientid);

		printf("clientidint128 in KadC format: ");
		for(i=0; i<16; i++)
			printf("%02x", clientidint128[i]);
		printf("\n\n");

	}

	fn = fopen(av[1], "rb");
	if(fn == NULL) {
		printf("can't open %s\n", av[1]);
		exit(1);
	}

	if(fread(&numContacts, sizeof(numContacts), 1, fn) != 1)
		numContacts = 0;

	if(numContacts == 0) {
		printf("no contacts in %s\n", av[1]);
		exit(1);
	} else {
		printf("%s contains %d contacts:\n", av[1], numContacts);
	}

	for(i=0; i < numContacts; i++) {
		int xl;
		unsigned char xb[16];

		printf("%4d: ",i);
		if(fread(&id, sizeof(id), 1, fn) != 1)
			goto err;
		if(fread(&binip, sizeof(binip), 1, fn) != 1)
			goto err;
		if(fread(&udpport, sizeof(udpport), 1, fn) != 1)
			goto err;
		if(fread(&tcpport, sizeof(tcpport), 1, fn) != 1)
			goto err;
		if(fread(&type, sizeof(type), 1, fn) != 1)
			goto err;

		/* also MD4 in nodes.dat are little endian */
		for(j=0;j<4;j++) printf("%08lx", id[j]);


		if(ac > 2) { /* if we have a Client ID to compute distance from */
		/* convert into good KadC's int128 format */

			int128eMule2KadC(idint128, id);

			printf(" ");

			int128xor(xb, idint128, clientidint128);

			for(j=0;j<16;j++) printf("%02x", xb[j]);

			xl = int128xorlog(idint128, clientidint128);
			commonhist[127-xl]++;

			printf(" %d", 127-xl);
		}
		printf("%6u", udpport);
		printf("%6u", tcpport);
		printf("%4u", type);
		printf(" ");
		printip(&binip);
		printf("\n");
	}
	fclose(fn);


	exit(0);
err:
	printf("premature EOF or error encountered on %s.\n", av[1]);
	exit(1);
err2:
	printf("premature EOF or error encountered on %s.\n", av[2]);
	exit(1);
}