Subversion Repositories SvarDOS

Rev

Rev 1690 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1690 Rev 2233
Line 28... Line 28...
28
 
28
 
29
#include <direct.h> /* opendir() and friends */
29
#include <direct.h> /* opendir() and friends */
30
#include <stdio.h>
30
#include <stdio.h>
31
#include <stdlib.h>
31
#include <stdlib.h>
32
#include <string.h>
32
#include <string.h>
-
 
33
#include <strings.h>
33
#include <time.h>
34
#include <time.h>
34
 
35
 
35
#include "net.h"
36
#include "net.h"
36
#include "unchunk.h"
37
#include "unchunk.h"
37
 
38
 
38
#include "svarlang.lib\svarlang.h"
39
#include "svarlang.lib/svarlang.h"
39
 
40
 
40
#include "../../pkg/trunk/lsm.h"
41
#include "../../pkg/trunk/lsm.h"
41
 
42
 
42
 
43
 
43
#define PVER "20240201"
44
#define PVER "20240201"
Line 231... Line 232...
231
    if (strcasecmp(ep->d_name + tlen - 4, ".lsm") != 0) continue;  /* if not an .lsm file, skip it silently */
232
    if (strcasecmp(ep->d_name + tlen - 4, ".lsm") != 0) continue;  /* if not an .lsm file, skip it silently */
232
    ep->d_name[tlen - 4] = 0; /* trim out the ".lsm" suffix */
233
    ep->d_name[tlen - 4] = 0; /* trim out the ".lsm" suffix */
233
 
234
 
234
    /* load the metadata from %DOSDIR\APPINFO\*.lsm */
235
    /* load the metadata from %DOSDIR\APPINFO\*.lsm */
235
    sprintf(buff, "%s\\appinfo\\%s.lsm", dosdir, ep->d_name);
236
    sprintf(buff, "%s\\appinfo\\%s.lsm", dosdir, ep->d_name);
236
    readlsm(buff, ver, sizeof(ver));
237
    readlsm(buff, "version", ver, sizeof(ver));
237
 
238
 
238
    return(sprintf(buff, "%s\t%s\n", ep->d_name, ver));
239
    return(sprintf(buff, "%s\t%s\n", ep->d_name, ver));
239
  }
240
  }
240
}
241
}
241
 
242