summaryrefslogtreecommitdiffhomepage
path: root/contrib/lar
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/lar')
-rw-r--r--contrib/lar/lar.c45
-rw-r--r--contrib/lar/openwrt/050-lar-source-loader.patch49
2 files changed, 46 insertions, 48 deletions
diff --git a/contrib/lar/lar.c b/contrib/lar/lar.c
index 6bac9d6b8..f968634af 100644
--- a/contrib/lar/lar.c
+++ b/contrib/lar/lar.c
@@ -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);
}
diff --git a/contrib/lar/openwrt/050-lar-source-loader.patch b/contrib/lar/openwrt/050-lar-source-loader.patch
index fbf21f7be..c17c2f5c8 100644
--- a/contrib/lar/openwrt/050-lar-source-loader.patch
+++ b/contrib/lar/openwrt/050-lar-source-loader.patch
@@ -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);
+}