contrib/lar:
- unify code style and data types - optimizations for string operations
This commit is contained in:
parent
598e9ef533
commit
b848def429
2 changed files with 46 additions and 48 deletions
|
@ -31,7 +31,8 @@ lar_index * lar_get_index( lar_archive *ar )
|
|||
uint32_t i;
|
||||
uint32_t idx_offset;
|
||||
uint32_t idx_length;
|
||||
lar_index *idx_map, *idx_ptr;
|
||||
lar_index *idx_map;
|
||||
lar_index *idx_ptr;
|
||||
|
||||
if( lseek(ar->fd, -(sizeof(idx_offset)), SEEK_END) == -1 )
|
||||
LAR_DIE("Unable to seek to end of archive");
|
||||
|
@ -45,9 +46,7 @@ lar_index * lar_get_index( lar_archive *ar )
|
|||
|
||||
idx_map = NULL;
|
||||
|
||||
for( i = 0; i < idx_length; \
|
||||
i += (sizeof(lar_index) - sizeof(char *))
|
||||
) {
|
||||
for( i = 0; i < idx_length; i += (sizeof(lar_index) - sizeof(char *)) ) {
|
||||
idx_ptr = (lar_index *)malloc(sizeof(lar_index));
|
||||
|
||||
lar_read32(ar->fd, &idx_ptr->noffset);
|
||||
|
@ -64,9 +63,8 @@ lar_index * lar_get_index( lar_archive *ar )
|
|||
return idx_map;
|
||||
}
|
||||
|
||||
uint32_t lar_get_filename( lar_archive *ar,
|
||||
lar_index *idx_ptr, char *filename
|
||||
) {
|
||||
uint32_t lar_get_filename( lar_archive *ar, lar_index *idx_ptr, char *filename )
|
||||
{
|
||||
if( idx_ptr->nlength >= LAR_FNAME_BUFFER )
|
||||
LAR_DIE("Filename exceeds maximum allowed length");
|
||||
|
||||
|
@ -76,7 +74,7 @@ uint32_t lar_get_filename( lar_archive *ar,
|
|||
if( read(ar->fd, filename, idx_ptr->nlength) < idx_ptr->nlength )
|
||||
LAR_DIE("Unexpected EOF while reading filename");
|
||||
|
||||
filename[idx_ptr->nlength] = 0;
|
||||
filename[idx_ptr->nlength] = '\0';
|
||||
|
||||
return idx_ptr->nlength;
|
||||
}
|
||||
|
@ -85,9 +83,10 @@ lar_member * lar_open_member( lar_archive *ar, const char *name )
|
|||
{
|
||||
lar_index *idx_ptr = ar->index;
|
||||
lar_member *member;
|
||||
char memberfile[LAR_FNAME_BUFFER];
|
||||
char *memberdata;
|
||||
size_t pgsz = getpagesize();
|
||||
size_t pgof;
|
||||
size_t pgsz = getpagesize();
|
||||
LAR_FNAME(memberfile);
|
||||
|
||||
while(idx_ptr)
|
||||
{
|
||||
|
@ -95,10 +94,11 @@ lar_member * lar_open_member( lar_archive *ar, const char *name )
|
|||
|
||||
if( !strncmp(memberfile, name, idx_ptr->nlength) )
|
||||
{
|
||||
pgof = ( idx_ptr->foffset % pgsz );
|
||||
|
||||
memberdata = mmap(
|
||||
0, idx_ptr->flength + ( idx_ptr->foffset % pgsz ),
|
||||
PROT_READ, MAP_PRIVATE, ar->fd,
|
||||
idx_ptr->foffset - ( idx_ptr->foffset % pgsz )
|
||||
0, idx_ptr->flength + pgof, PROT_READ, MAP_PRIVATE,
|
||||
ar->fd, idx_ptr->foffset - pgof
|
||||
);
|
||||
|
||||
if( memberdata == MAP_FAILED )
|
||||
|
@ -108,10 +108,10 @@ lar_member * lar_open_member( lar_archive *ar, const char *name )
|
|||
member->type = idx_ptr->type;
|
||||
member->flags = idx_ptr->flags;
|
||||
member->length = idx_ptr->flength;
|
||||
member->data = &memberdata[idx_ptr->foffset % pgsz];
|
||||
member->data = &memberdata[pgof];
|
||||
|
||||
member->mmap = memberdata;
|
||||
member->mlen = idx_ptr->flength + ( idx_ptr->foffset % pgsz );
|
||||
member->mlen = idx_ptr->flength + pgof;
|
||||
|
||||
return member;
|
||||
}
|
||||
|
@ -176,10 +176,11 @@ int lar_close( lar_archive *ar )
|
|||
|
||||
lar_archive * lar_find_archive( const char *package, const char *path )
|
||||
{
|
||||
int seg = 1;
|
||||
int len = 0;
|
||||
int pln = 0;
|
||||
int i, j;
|
||||
uint32_t i;
|
||||
uint32_t j;
|
||||
uint32_t seg = 1;
|
||||
uint32_t len = 0;
|
||||
uint32_t pln = 0;
|
||||
struct stat s;
|
||||
LAR_FNAME(buffer);
|
||||
|
||||
|
@ -211,8 +212,7 @@ lar_archive * lar_find_archive( const char *package, const char *path )
|
|||
buffer[pln+i] = ( package[i] == '.' ) ? LAR_DIRSEP : package[i];
|
||||
}
|
||||
|
||||
buffer[pln+i+0] = '.'; buffer[pln+i+1] = 'l'; buffer[pln+i+2] = 'a';
|
||||
buffer[pln+i+3] = 'r'; buffer[pln+i+4] = '\0';
|
||||
strcpy(&buffer[pln+i], ".lar");
|
||||
|
||||
if( (stat(buffer, &s) > -1) && (s.st_mode & S_IFREG) )
|
||||
return lar_open(buffer);
|
||||
|
@ -236,8 +236,7 @@ lar_member * lar_find_member( lar_archive *ar, const char *package )
|
|||
buffer[len] = ( package[len] == '.' ) ? '/' : package[len];
|
||||
}
|
||||
|
||||
buffer[len+0] = '.'; buffer[len+1] = 'l'; buffer[len+2] = 'u';
|
||||
buffer[len+3] = 'a'; buffer[len+4] = '\0';
|
||||
strcpy(&buffer[len], ".lua");
|
||||
|
||||
return lar_open_member(ar, buffer);
|
||||
}
|
||||
|
|
|
@ -12,8 +12,8 @@ diff -Nurb lua-5.1.4.orig/src/Makefile lua-5.1.4/src/Makefile
|
|||
LUA_O= lua.o
|
||||
diff -Nurb lua-5.1.4.orig/src/lar.c lua-5.1.4/src/lar.c
|
||||
--- lua-5.1.4.orig/src/lar.c 1970-01-01 01:00:00.000000000 +0100
|
||||
+++ lua-5.1.4/src/lar.c 2009-04-07 00:35:55.000000000 +0200
|
||||
@@ -0,0 +1,243 @@
|
||||
+++ lua-5.1.4/src/lar.c 2009-04-07 03:53:29.000000000 +0200
|
||||
@@ -0,0 +1,242 @@
|
||||
+#include "lar.h"
|
||||
+
|
||||
+int lar_read32( int fd, uint32_t *val )
|
||||
|
@ -47,7 +47,8 @@ diff -Nurb lua-5.1.4.orig/src/lar.c lua-5.1.4/src/lar.c
|
|||
+ uint32_t i;
|
||||
+ uint32_t idx_offset;
|
||||
+ uint32_t idx_length;
|
||||
+ lar_index *idx_map, *idx_ptr;
|
||||
+ lar_index *idx_map;
|
||||
+ lar_index *idx_ptr;
|
||||
+
|
||||
+ if( lseek(ar->fd, -(sizeof(idx_offset)), SEEK_END) == -1 )
|
||||
+ LAR_DIE("Unable to seek to end of archive");
|
||||
|
@ -61,9 +62,7 @@ diff -Nurb lua-5.1.4.orig/src/lar.c lua-5.1.4/src/lar.c
|
|||
+
|
||||
+ idx_map = NULL;
|
||||
+
|
||||
+ for( i = 0; i < idx_length; \
|
||||
+ i += (sizeof(lar_index) - sizeof(char *))
|
||||
+ ) {
|
||||
+ for( i = 0; i < idx_length; i += (sizeof(lar_index) - sizeof(char *)) ) {
|
||||
+ idx_ptr = (lar_index *)malloc(sizeof(lar_index));
|
||||
+
|
||||
+ lar_read32(ar->fd, &idx_ptr->noffset);
|
||||
|
@ -80,9 +79,8 @@ diff -Nurb lua-5.1.4.orig/src/lar.c lua-5.1.4/src/lar.c
|
|||
+ return idx_map;
|
||||
+}
|
||||
+
|
||||
+uint32_t lar_get_filename( lar_archive *ar,
|
||||
+ lar_index *idx_ptr, char *filename
|
||||
+) {
|
||||
+uint32_t lar_get_filename( lar_archive *ar, lar_index *idx_ptr, char *filename )
|
||||
+{
|
||||
+ if( idx_ptr->nlength >= LAR_FNAME_BUFFER )
|
||||
+ LAR_DIE("Filename exceeds maximum allowed length");
|
||||
+
|
||||
|
@ -92,7 +90,7 @@ diff -Nurb lua-5.1.4.orig/src/lar.c lua-5.1.4/src/lar.c
|
|||
+ if( read(ar->fd, filename, idx_ptr->nlength) < idx_ptr->nlength )
|
||||
+ LAR_DIE("Unexpected EOF while reading filename");
|
||||
+
|
||||
+ filename[idx_ptr->nlength] = 0;
|
||||
+ filename[idx_ptr->nlength] = '\0';
|
||||
+
|
||||
+ return idx_ptr->nlength;
|
||||
+}
|
||||
|
@ -101,9 +99,10 @@ diff -Nurb lua-5.1.4.orig/src/lar.c lua-5.1.4/src/lar.c
|
|||
+{
|
||||
+ lar_index *idx_ptr = ar->index;
|
||||
+ lar_member *member;
|
||||
+ char memberfile[LAR_FNAME_BUFFER];
|
||||
+ char *memberdata;
|
||||
+ size_t pgsz = getpagesize();
|
||||
+ size_t pgof;
|
||||
+ size_t pgsz = getpagesize();
|
||||
+ LAR_FNAME(memberfile);
|
||||
+
|
||||
+ while(idx_ptr)
|
||||
+ {
|
||||
|
@ -111,10 +110,11 @@ diff -Nurb lua-5.1.4.orig/src/lar.c lua-5.1.4/src/lar.c
|
|||
+
|
||||
+ if( !strncmp(memberfile, name, idx_ptr->nlength) )
|
||||
+ {
|
||||
+ pgof = ( idx_ptr->foffset % pgsz );
|
||||
+
|
||||
+ memberdata = mmap(
|
||||
+ 0, idx_ptr->flength + ( idx_ptr->foffset % pgsz ),
|
||||
+ PROT_READ, MAP_PRIVATE, ar->fd,
|
||||
+ idx_ptr->foffset - ( idx_ptr->foffset % pgsz )
|
||||
+ 0, idx_ptr->flength + pgof, PROT_READ, MAP_PRIVATE,
|
||||
+ ar->fd, idx_ptr->foffset - pgof
|
||||
+ );
|
||||
+
|
||||
+ if( memberdata == MAP_FAILED )
|
||||
|
@ -124,10 +124,10 @@ diff -Nurb lua-5.1.4.orig/src/lar.c lua-5.1.4/src/lar.c
|
|||
+ member->type = idx_ptr->type;
|
||||
+ member->flags = idx_ptr->flags;
|
||||
+ member->length = idx_ptr->flength;
|
||||
+ member->data = &memberdata[idx_ptr->foffset % pgsz];
|
||||
+ member->data = &memberdata[pgof];
|
||||
+
|
||||
+ member->mmap = memberdata;
|
||||
+ member->mlen = idx_ptr->flength + ( idx_ptr->foffset % pgsz );
|
||||
+ member->mlen = idx_ptr->flength + pgof;
|
||||
+
|
||||
+ return member;
|
||||
+ }
|
||||
|
@ -192,10 +192,11 @@ diff -Nurb lua-5.1.4.orig/src/lar.c lua-5.1.4/src/lar.c
|
|||
+
|
||||
+lar_archive * lar_find_archive( const char *package, const char *path )
|
||||
+{
|
||||
+ int seg = 1;
|
||||
+ int len = 0;
|
||||
+ int pln = 0;
|
||||
+ int i, j;
|
||||
+ uint32_t i;
|
||||
+ uint32_t j;
|
||||
+ uint32_t seg = 1;
|
||||
+ uint32_t len = 0;
|
||||
+ uint32_t pln = 0;
|
||||
+ struct stat s;
|
||||
+ LAR_FNAME(buffer);
|
||||
+
|
||||
|
@ -227,8 +228,7 @@ diff -Nurb lua-5.1.4.orig/src/lar.c lua-5.1.4/src/lar.c
|
|||
+ buffer[pln+i] = ( package[i] == '.' ) ? LAR_DIRSEP : package[i];
|
||||
+ }
|
||||
+
|
||||
+ buffer[pln+i+0] = '.'; buffer[pln+i+1] = 'l'; buffer[pln+i+2] = 'a';
|
||||
+ buffer[pln+i+3] = 'r'; buffer[pln+i+4] = '\0';
|
||||
+ strcpy(&buffer[pln+i], ".lar");
|
||||
+
|
||||
+ if( (stat(buffer, &s) > -1) && (s.st_mode & S_IFREG) )
|
||||
+ return lar_open(buffer);
|
||||
|
@ -252,8 +252,7 @@ diff -Nurb lua-5.1.4.orig/src/lar.c lua-5.1.4/src/lar.c
|
|||
+ buffer[len] = ( package[len] == '.' ) ? '/' : package[len];
|
||||
+ }
|
||||
+
|
||||
+ buffer[len+0] = '.'; buffer[len+1] = 'l'; buffer[len+2] = 'u';
|
||||
+ buffer[len+3] = 'a'; buffer[len+4] = '\0';
|
||||
+ strcpy(&buffer[len], ".lua");
|
||||
+
|
||||
+ return lar_open_member(ar, buffer);
|
||||
+}
|
||||
|
|
Loading…
Reference in a new issue