0,0 → 1,249 |
/* |
SvarDOS repo index builder |
Copyright (C) Mateusz Viste 2012-2021 |
|
buildidx computes an index tsv file for the SvarDOS repository. |
it must be executed pointing to a directory that stores packages (zip) |
files. buildidx will generate the index file and save it into the package |
repository. |
|
13 jan 2021: removed the identification line, changed CRC32 to bsum, not creating the listing.txt file and stopped compressing index |
23 apr 2017: uncompressed index is no longer created, added CRC32 of zib (bin only) files, if present |
28 aug 2016: listing.txt is always written inside the repo dir (instead of inside current dir) |
27 aug 2016: accepting full paths to repos (starting with /...) |
07 dec 2013: rewritten buildidx in ANSI C89 |
19 aug 2013: add a compressed version of the index file to repos (index.gz) |
22 jul 2013: creating a listing.txt file with list of packages |
18 jul 2013: writing the number of packaged into the first line of the lst file |
11 jul 2013: added a switch to 7za to make it case insensitive when extracting lsm files |
10 jul 2013: changed unzip calls to 7za (to handle cases when appinfo is compressed with lzma) |
04 feb 2013: added CRC32 support |
22 sep 2012: forked 1st version from FDUPDATE builder |
*/ |
|
#include <errno.h> |
#include <stdio.h> /* fopen, fclose... */ |
#include <stdint.h> |
#include <stdlib.h> /* system() */ |
#include <string.h> /* strcasecmp() */ |
#include <time.h> /* time(), ctime() */ |
#include <unistd.h> /* read() */ |
#include <dirent.h> |
#include <sys/types.h> |
|
#define pVer "2021-01-13" |
|
|
/* computes the BSD sum of a file and returns it. returns 0 on error. */ |
static uint16_t file2bsum(char *filename) { |
uint16_t result = 0; |
unsigned char buff[1024 * 1024]; |
size_t i, buffread; |
FILE *fd; |
fd = fopen(filename, "rb"); |
if (fd == NULL) return(0); |
while ((buffread = fread(buff, 1, sizeof(buff), fd)) > 0) { |
for (i = 0; i < buffread; i++) { |
/* rotr */ |
result = (result >> 1) | (result << 15); |
/* */ |
result += buff[i]; |
} |
} |
fclose(fd); |
return(result); |
} |
|
|
static void trim(char *str) { |
int x, y, firstchar = -1, lastchar = -1; |
for (x = 0; str[x] != 0; x++) { |
switch (str[x]) { |
case ' ': |
case '\t': |
case '\n': |
case '\r': |
break; |
default: |
if (firstchar < 0) firstchar = x; |
lastchar = x; |
break; |
} |
} |
str[lastchar + 1] = 0; /* right trim */ |
if (firstchar > 0) { /* left trim (shift to the left ) */ |
y = 0; |
for (x = firstchar; str[x] != 0; x++) str[y++] = str[x]; |
str[y] = 0; |
} |
} |
|
|
/* reads a line from a file descriptor, and writes it to *line, the *line array is filled no more than maxlen bytes. returns the number of byte read on success, or a negative value on failure (reaching EOF is considered an error condition) */ |
static int readline_fromfile(FILE *fd, char *line, int maxlen) { |
int bytebuff, linelen = 0; |
for (;;) { |
bytebuff = fgetc(fd); |
if (bytebuff == EOF) { |
line[linelen] = 0; |
if (linelen == 0) return(-1); |
return(linelen); |
} |
if (bytebuff < 0) return(-1); |
if (bytebuff == '\r') continue; /* ignore CR */ |
if (bytebuff == '\n') { |
line[linelen] = 0; |
return(linelen); |
} |
if (linelen < maxlen) line[linelen++] = bytebuff; |
} |
} |
|
static int readlsm(char *filename, char *version, char *title, char *description) { |
char linebuff[1024]; |
char *valuestr; |
int x; |
FILE *fd; |
/* reset fields to be read to empty values */ |
version[0] = 0; |
description[0] = 0; |
title[0] = 0; |
/* open the file */ |
fd = fopen(filename, "rb"); |
if (fd == NULL) return(-1); |
/* check the file's header */ |
if (readline_fromfile(fd, linebuff, 64) < 0) return(-1); |
if (strcasecmp(linebuff, "begin3") != 0) return(-1); |
/* read the LSM file line by line */ |
while (readline_fromfile(fd, linebuff, 127) >= 0) { |
for (x = 0;; x++) { |
if (linebuff[x] == 0) { |
x = -1; |
break; |
} else if (linebuff[x] == ':') { |
break; |
} |
} |
if (x > 0) { |
linebuff[x] = 0; |
valuestr = linebuff + x + 1; |
trim(linebuff); |
trim(valuestr); |
if (strcasecmp(linebuff, "version") == 0) { |
sprintf(version, "%s", valuestr); |
} else if (strcasecmp(linebuff, "title") == 0) { |
sprintf(title, "%s", valuestr); |
} else if (strcasecmp(linebuff, "description") == 0) { |
sprintf(description, "%s", valuestr); |
} |
} |
} |
fclose(fd); |
return(0); |
} |
|
|
static int cmpstring(const void *p1, const void *p2) { |
/* The actual arguments to this function are "pointers to |
pointers to char", but strcmp(3) arguments are "pointers |
to char", hence the following cast plus dereference */ |
return(strcasecmp(* (char * const *) p1, * (char * const *) p2)); |
} |
|
|
static void GenIndexes(char *repodir) { |
char *LsmFileList[4096]; |
char tmpbuf[64]; |
char *LsmFile, LSMpackage[64], LSMtitle[128], LSMversion[128], LSMdescription[1024]; |
int LsmCount = 0, x; |
FILE *idx; |
DIR *dir; |
struct dirent *diritem; |
|
dir = opendir("appinfo"); |
if (dir == NULL) { |
printf("ERROR: Unable to open directory '%s' (%s)\n", repodir, strerror(errno)); |
return; |
} |
|
/* load the content of the appinfo directory */ |
while ((diritem = readdir(dir)) != NULL) { |
if (strstr(diritem->d_name, ".lsm") == NULL) continue; /* skip files that do not contain '.lsm' */ |
LsmFileList[LsmCount] = strdup(diritem->d_name); |
/* printf("Loaded LSM file: %s\n", LsmFileList[LsmCount]); */ |
LsmCount += 1; |
} |
|
closedir(dir); |
|
printf("Found %d LSM files\n", LsmCount); |
|
/* sort the entries */ |
qsort(&LsmFileList[0], LsmCount, sizeof(char *), cmpstring); |
|
/* Create the index file */ |
sprintf(tmpbuf, "%s/index.tsv", repodir); |
idx = fopen(tmpbuf, "wb"); |
|
/* Read every LSM */ |
for (x = 0; x < LsmCount; x++) { |
uint16_t bsum; |
LsmFile = LsmFileList[x]; |
sprintf(LSMpackage, "%s", LsmFile); |
LSMpackage[strlen(LSMpackage) - 4] = 0; |
|
/* compute the BSD sum of the zip package */ |
sprintf(tmpbuf, "%s/%s.zip", repodir, LSMpackage); |
bsum = file2bsum(tmpbuf); |
|
printf("Processing %s... BSUM %04X\n", LsmFile, bsum); |
|
sprintf(tmpbuf, "appinfo/%s", LsmFile); |
readlsm(tmpbuf, LSMversion, LSMtitle, LSMdescription); |
|
if (strlen(LSMpackage) > 8) printf("Warning: %s.zip is not in 8.3 format!\n", LSMpackage); |
if (LSMtitle[0] == 0) printf("Warning: no LSM title for %s.zip\n", LSMpackage); |
if (LSMversion[0] == 0) printf("Warning: no LSM version for %s.zip!\n", LSMpackage); |
if (LSMdescription[0] == 0) printf("Warning: no LSM description for %s.zip!\n", LSMpackage); |
fprintf(idx, "%s\t%s\t%s\t%u\n", LSMpackage, LSMversion, LSMdescription, bsum); |
} |
fclose(idx); |
printf("%d packages found.\n", LsmCount); |
} |
|
|
|
int main(int argc, char **argv) { |
char *repodir; |
char cmdbuff[1024]; |
|
puts("FDNPKG server repository generator version " pVer); |
|
if (argc != 2) { |
puts("Usage: buildidx repodir"); |
return(1); |
} |
|
if ((argv[1][0] == '?') || (argv[1][0] == '-') || (argv[1][0]) == 0) { |
puts("Usage: buildidx repodir"); |
return(1); |
} |
|
repodir = argv[1]; |
|
printf("Will build index for %s directory.\n", repodir); |
puts("Recreating the appinfo directory..."); |
|
system("rm -rf appinfo"); |
system("mkdir appinfo"); |
|
puts("Populating appinfo with LSM files from archives..."); |
sprintf(cmdbuff, "unzip -C -j -L -o '%s/*.zip' 'appinfo/*.lsm' -d appinfo", repodir); |
system(cmdbuff); |
|
puts("Generating the index file..."); |
GenIndexes(repodir); |
|
system("rm -rf appinfo"); |
return(0); |
} |