contrib/lar:
[project/luci.git] / contrib / lar / openwrt / 050-lar-source-loader.patch
index fbf21f7..c17c2f5 100644 (file)
@@ -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);
 +}