}

}

void FioTarAddLink(const char *src, const char *dest)

{

	TarAddLink(src, dest);

}

/**

 * Simplify filenames from tars.

 * Replace '/' by PATHSEPCHAR, and force 'name' to lowercase.

 * @param name Filename to process.

 */

static void SimplifyFileName(char *name)

{

	/* Force lowercase */

	strtolower(name);

	/* Tar-files always have '/' path-seperator, but we want our PATHSEPCHAR */

#if (PATHSEPCHAR != '/')

	for (char *n = name; *n != '\0'; n++) if (*n == '/') *n = PATHSEPCHAR;

#endif

}

	DEBUG(misc, 1, "Scanning for tars");

	TarScanner fs;

	uint num = fs.Scan(".tar", DATA_DIR, false);

	num += fs.Scan(".tar", AI_DIR, false);

	num += fs.Scan(".tar", AI_LIBRARY_DIR, false);

	num += fs.Scan(".tar", SCENARIO_DIR, false);

	DEBUG(misc, 1, "Scan complete, found %d files", num);

	return num;

}

bool TarScanner::AddFile(const char *filename, size_t basepath_length)

{

	/* The TAR-header, repeated for every file */

	typedef struct TarHeader {

		char name[100];      ///< Name of the file

		char mode[8];

		char uid[8];

		char gid[8];

		char size[12];       ///< Size of the file, in ASCII

		char mtime[12];

		char chksum[8];

		char typeflag;

		char linkname[100];

		char magic[6];