Remove debugging statement.
[oweals/busybox.git] / insmod.c
index 27f4a50e2045123f0aa1ce7da403bea9385a8c42..4b00515942fb7d756a239dcef08eec95a308a14e 100644 (file)
--- a/insmod.c
+++ b/insmod.c
 # define old_sys_init_module   init_module
 #endif
 
+#ifdef BB_FEATURE_INSMOD_LOADINKMEM
+#define LOADBITS 0     
+#else
+#define LOADBITS 1
+#endif
+
 #if defined(__powerpc__)
 #define BB_USE_PLT_ENTRIES
 #define BB_PLT_ENTRY_SIZE 16
 #ifndef MODUTILS_MODULE_H
 static const int MODUTILS_MODULE_H = 1;
 
-#ident "$Id: insmod.c,v 1.60 2001/04/26 19:29:58 andersen Exp $"
+#ident "$Id: insmod.c,v 1.67 2001/06/28 21:36:06 andersen Exp $"
 
 /* This file contains the structures used by the 2.0 and 2.1 kernels.
    We do not use the kernel headers directly because we do not wish
@@ -257,8 +263,19 @@ struct new_module
   unsigned tgt_long persist_end;
   unsigned tgt_long can_unload;
   unsigned tgt_long runsize;
+#ifdef BB_FEATURE_NEW_MODULE_INTERFACE
+  const char *kallsyms_start;     /* All symbols for kernel debugging */
+  const char *kallsyms_end;
+  const char *archdata_start;     /* arch specific data for module */
+  const char *archdata_end;
+  const char *kernel_data;        /* Reserved for kernel internal use */
+#endif
 };
 
+#define ARCHDATA_SEC_NAME "__archdata"
+#define KALLSYMS_SEC_NAME "__kallsyms"
+
+
 struct new_module_info
 {
   unsigned long addr;
@@ -330,7 +347,7 @@ int delete_module(const char *);
 #ifndef MODUTILS_OBJ_H
 static const int MODUTILS_OBJ_H = 1;
 
-#ident "$Id: insmod.c,v 1.60 2001/04/26 19:29:58 andersen Exp $"
+#ident "$Id: insmod.c,v 1.67 2001/06/28 21:36:06 andersen Exp $"
 
 /* The relocatable object is manipulated using elfin types.  */
 
@@ -355,6 +372,12 @@ static const int MODUTILS_OBJ_H = 1;
 
 #define ELFCLASSM      ELFCLASS32
 
+#if (defined(__mc68000__))                                     
+#define ELFDATAM       ELFDATA2MSB
+#endif
+
+
+
 #if defined(__sh__)
 
 #define MATCH_MACHINE(x) (x == EM_SH)
@@ -374,7 +397,7 @@ static const int MODUTILS_OBJ_H = 1;
 #define MATCH_MACHINE(x) (x == EM_PPC)
 #define SHT_RELM       SHT_RELA
 #define Elf32_RelM     Elf32_Rela
-#define ELFDATAM        ELFDATA2MSB
+#define ELFDATAM    ELFDATA2MSB
 
 #elif defined(__mips__)
 
@@ -412,6 +435,12 @@ static const int MODUTILS_OBJ_H = 1;
 #define Elf32_RelM     Elf32_Rel
 #define ELFDATAM       ELFDATA2LSB
 
+#elif defined(__mc68000__) 
+
+#define MATCH_MACHINE(x)       (x == EM_68K)
+#define SHT_RELM                       SHT_RELA
+#define Elf32_RelM                     Elf32_Rela
+
 #else
 #error Sorry, but insmod.c does not yet support this architecture...
 #endif
@@ -558,7 +587,7 @@ unsigned long obj_load_size (struct obj_file *f);
 
 int obj_relocate (struct obj_file *f, ElfW(Addr) base);
 
-struct obj_file *obj_load(FILE *f);
+struct obj_file *obj_load(FILE *f, int loadprogbits);
 
 int obj_create_image (struct obj_file *f, char *image);
 
@@ -677,50 +706,35 @@ size_t nksyms;
 struct external_module *ext_modules;
 int n_ext_modules;
 int n_ext_modules_used;
-
-
 extern int delete_module(const char *);
 
+static char m_filename[FILENAME_MAX + 1];
+static char m_fullName[FILENAME_MAX + 1];
 
-/* This is kind of troublesome. See, we don't actually support
-   the m68k or the arm the same way we support i386 and (now)
-   sh. In doing my SH patch, I just assumed that whatever works
-   for i386 also works for m68k and arm since currently insmod.c
-   does nothing special for them. If this isn't true, the below
-   line is rather misleading IMHO, and someone should either
-   change it or add more proper architecture-dependent support
-   for these boys.
-
-   -- Bryan Rittmeyer <bryan@ixiacom.com>                    */
 
-static char m_filename[BUFSIZ + 1];
-static char m_fullName[BUFSIZ + 1];
 
 /*======================================================================*/
 
 
-static int findNamedModule(const char *fileName, struct stat *statbuf,
-                                                  void *userDate)
+static int check_module_name_match(const char *filename, struct stat *statbuf,
+                                                  void *userdata)
 {
-       char *fullName = (char *) userDate;
+       char *fullname = (char *) userdata;
 
-
-       if (fullName[0] == '\0')
+       if (fullname[0] == '\0')
                return (FALSE);
        else {
-               char *tmp = strrchr((char *) fileName, '/');
-
-               if (tmp == NULL)
-                       tmp = (char *) fileName;
-               else
-                       tmp++;
-               if (check_wildcard_match(tmp, fullName) == TRUE) {
+               char *tmp, *tmp1 = strdup(filename);
+               tmp = get_last_path_component(tmp1);
+               if (strcmp(tmp, fullname) == 0) {
+                       free(tmp1);
                        /* Stop searching if we find a match */
-                       safe_strncpy(m_filename, fileName, sizeof(m_filename));
-                       return (FALSE);
+                       safe_strncpy(m_filename, filename, sizeof(m_filename));
+                       return (TRUE);
                }
+               free(tmp1);
        }
-       return (TRUE);
+       return (FALSE);
 }
 
 
@@ -799,6 +813,8 @@ arch_apply_relocation(struct obj_file *f,
        case R_ARM_NONE:
 #elif defined(__i386__)
        case R_386_NONE:
+#elif defined(__mc68000__) 
+       case R_68K_NONE:
 #elif defined(__powerpc__)
        case R_PPC_NONE:
 #elif defined(__mips__)
@@ -812,6 +828,8 @@ arch_apply_relocation(struct obj_file *f,
        case R_ARM_ABS32:
 #elif defined(__i386__)
        case R_386_32:  
+#elif defined(__mc68000__) 
+       case R_68K_32:
 #elif defined(__powerpc__)
        case R_PPC_ADDR32:
 #elif defined(__mips__)
@@ -819,6 +837,18 @@ arch_apply_relocation(struct obj_file *f,
 #endif
                *loc += v;
                break;
+#if defined(__mc68000__)
+    case R_68K_8:
+               if (v > 0xff)
+               ret = obj_reloc_overflow;
+               *(char *)loc = v;
+               break;
+    case R_68K_16:
+               if (v > 0xffff)
+               ret = obj_reloc_overflow;
+               *(short *)loc = v;
+               break;
+#endif /* __mc68000__   */
 
 #if defined(__powerpc__)
        case R_PPC_ADDR16_HA:
@@ -924,6 +954,22 @@ arch_apply_relocation(struct obj_file *f,
        case R_386_PC32:
                *loc += v - dot;
                break;
+#elif defined(__mc68000__)
+    case R_68K_PC8:
+               v -= dot;
+               if ((Elf32_Sword)v > 0x7f || (Elf32_Sword)v < -(Elf32_Sword)0x80)
+               ret = obj_reloc_overflow;
+               *(char *)loc = v;
+    break;
+               case R_68K_PC16:
+               v -= dot;
+               if ((Elf32_Sword)v > 0x7fff || (Elf32_Sword)v < -(Elf32_Sword)0x8000)
+               ret = obj_reloc_overflow;
+               *(short *)loc = v;
+               break;
+    case R_68K_PC32:
+               *(int *)loc = v - dot;
+               break;
 #elif defined(__powerpc__)
        case R_PPC_REL32:
                *loc = v - dot;
@@ -1003,6 +1049,11 @@ arch_apply_relocation(struct obj_file *f,
        case R_386_JMP_SLOT:
                *loc = v;
                break;
+#elif defined(__mc68000__)
+       case R_68K_GLOB_DAT:
+       case R_68K_JMP_SLOT:
+               *loc = v;
+               break;
 #endif
 
 #if defined(__arm__)
@@ -1014,10 +1065,15 @@ arch_apply_relocation(struct obj_file *f,
         case R_386_RELATIVE:
                *loc += f->baseaddr;
                break;
+#elif defined(__mc68000__)
+    case R_68K_RELATIVE:
+       *(int *)loc += f->baseaddr;
+       break;
 #endif
 
 #if defined(BB_USE_GOT_ENTRIES)
 
+#if !defined(__68k__)
 #if defined(__sh__)
         case R_SH_GOTPC:
 #elif defined(__arm__)
@@ -1028,10 +1084,11 @@ arch_apply_relocation(struct obj_file *f,
                assert(got != 0);
 #if defined(__sh__)
                *loc += got - dot + rel->r_addend;;
-#elif defined(__i386__) || defined(__arm__)
+#elif defined(__i386__) || defined(__arm__) || defined(__m68k_)
                *loc += got - dot;
 #endif
                break;
+#endif // __68k__
 
 #if defined(__sh__)
        case R_SH_GOT32:
@@ -1039,6 +1096,8 @@ arch_apply_relocation(struct obj_file *f,
        case R_ARM_GOT32:
 #elif defined(__i386__)
        case R_386_GOT32:
+#elif defined(__mc68000__)
+       case R_68K_GOT32:
 #endif
                assert(isym != NULL);
         /* needs an entry in the .got: set it, once */
@@ -1049,22 +1108,26 @@ arch_apply_relocation(struct obj_file *f,
         /* make the reloc with_respect_to_.got */
 #if defined(__sh__)
                *loc += isym->gotent.offset + rel->r_addend;
-#elif defined(__i386__) || defined(__arm__)
+#elif defined(__i386__) || defined(__arm__) || defined(__mc68000__)
                *loc += isym->gotent.offset;
 #endif
                break;
 
     /* address relative to the got */
+#if !defined(__mc68000__)
 #if defined(__sh__)
        case R_SH_GOTOFF:
 #elif defined(__arm__)
        case R_ARM_GOTOFF:
 #elif defined(__i386__)
        case R_386_GOTOFF:
+#elif defined(__mc68000__)
+       case R_68K_GOTOFF:
 #endif
                assert(got != 0);
                *loc += v - got;
                break;
+#endif // __mc68000__
 
 #endif /* BB_USE_GOT_ENTRIES */
 
@@ -1120,6 +1183,9 @@ int arch_create_got(struct obj_file *f)
 #elif defined(__i386__)
                        case R_386_GOT32:
                                break;
+#elif defined(__mc68000__)
+                       case R_68K_GOT32:
+                               break;
 #endif
 
 #if defined(__powerpc__)
@@ -1394,8 +1460,13 @@ struct obj_symbol *obj_add_symbol(struct obj_file *f, const char *name,
        f->symtab[hash] = sym;
        sym->ksymidx = -1;
 
-       if (ELFW(ST_BIND) (info) == STB_LOCAL)
-               f->local_symtab[symidx] = sym;
+       if (ELFW(ST_BIND)(info) == STB_LOCAL && symidx != -1) {
+               if (symidx >= f->local_symtab_size)
+                       error_msg("local symbol %s with index %ld exceeds local_symtab_size %ld",
+                                       name, (long) symidx, (long) f->local_symtab_size);
+               else
+                       f->local_symtab[symidx] = sym;
+       }
 
   found:
        sym->name = name;
@@ -2519,6 +2590,16 @@ new_init_module(const char *m_name, struct obj_file *f,
                        module->runsize > sec->header.sh_addr - m_addr)
                                module->runsize = sec->header.sh_addr - m_addr;
        }
+       sec = obj_find_section(f, ARCHDATA_SEC_NAME);
+       if (sec && sec->header.sh_size) {
+               module->archdata_start = (void*)sec->header.sh_addr;
+               module->archdata_end = module->archdata_start + sec->header.sh_size;
+       }
+       sec = obj_find_section(f, KALLSYMS_SEC_NAME);
+       if (sec && sec->header.sh_size) {
+               module->kallsyms_start = (void*)sec->header.sh_addr;
+               module->kallsyms_end = module->kallsyms_start + sec->header.sh_size;
+       }
 
        if (!arch_init_module(f, module))
                return 0;
@@ -2899,7 +2980,7 @@ int obj_create_image(struct obj_file *f, char *image)
 
 /*======================================================================*/
 
-struct obj_file *obj_load(FILE * fp)
+struct obj_file *obj_load(FILE * fp, int loadprogbits)
 {
        struct obj_file *f;
        ElfW(Shdr) * section_headers;
@@ -2978,6 +3059,12 @@ struct obj_file *obj_load(FILE * fp)
                        break;
 
                case SHT_PROGBITS:
+#if LOADBITS
+                       if (!loadprogbits) {
+                               sec->contents = NULL;
+                               break;
+                       }
+#endif                 
                case SHT_SYMTAB:
                case SHT_STRTAB:
                case SHT_RELM:
@@ -3093,6 +3180,39 @@ struct obj_file *obj_load(FILE * fp)
        return f;
 }
 
+#ifdef BB_FEATURE_INSMOD_LOADINKMEM
+/*
+ * load the unloaded sections directly into the memory allocated by
+ * kernel for the module
+ */
+
+int obj_load_progbits(FILE * fp, struct obj_file* f)
+{
+       char* imagebase = (char*) f->imagebase;
+       ElfW(Addr) base = f->baseaddr;
+       struct obj_section* sec;
+       
+       for (sec = f->load_order; sec; sec = sec->load_next) {
+
+               /* section already loaded? */
+               if (sec->contents != NULL)
+                       continue;
+               
+               if (sec->header.sh_size == 0)
+                       continue;
+
+               sec->contents = imagebase + (sec->header.sh_addr - base);
+               fseek(fp, sec->header.sh_offset, SEEK_SET);
+               if (fread(sec->contents, sec->header.sh_size, 1, fp) != 1) {
+                       errorMsg("error reading ELF section data: %s\n", strerror(errno));
+                       return 0;
+               }
+
+       }
+       return 1;
+}
+#endif
+
 static void hide_special_symbols(struct obj_file *f)
 {
        static const char *const specials[] = {
@@ -3125,7 +3245,7 @@ extern int insmod_main( int argc, char **argv)
        FILE *fp;
        struct obj_file *f;
        struct stat st;
-       char m_name[BUFSIZ + 1] = "\0";
+       char m_name[FILENAME_MAX + 1] = "\0";
        int exit_status = EXIT_FAILURE;
        int m_has_modinfo;
 #ifdef BB_FEATURE_INSMOD_VERSION_CHECKING
@@ -3152,7 +3272,7 @@ extern int insmod_main( int argc, char **argv)
                                flag_export = 0;
                                break;
                        case 'o':                       /* name the output module */
-                               strncpy(m_name, optarg, BUFSIZ);
+                               strncpy(m_name, optarg, FILENAME_MAX);
                                break;
                        case 'L':                       /* Stub warning */
                                /* This is needed for compatibility with modprobe.
@@ -3186,26 +3306,55 @@ extern int insmod_main( int argc, char **argv)
        }
        strcat(m_fullName, ".o");
 
-       /* Get a filedesc for the module */
+       /* Get a filedesc for the module.  Check we we have a complete path */
        if (stat(argv[optind], &st) < 0 || !S_ISREG(st.st_mode) ||
                        (fp = fopen(argv[optind], "r")) == NULL) {
-               /* Hmpf.  Could not open it. Search through _PATH_MODULES to find a module named m_name */
-               if (recursive_action(_PATH_MODULES, TRUE, FALSE, FALSE,
-                                                       findNamedModule, 0, m_fullName) == FALSE) 
+               struct utsname myuname;
+
+               /* Hmm.  Could not open it.  First search under /lib/modules/`uname -r`,
+                * but do not error out yet if we fail to find it... */
+               if (uname(&myuname) == 0) {
+                       char module_dir[FILENAME_MAX];
+                       char real_module_dir[FILENAME_MAX];
+                       snprintf (module_dir, sizeof(module_dir), "%s/%s", 
+                                       _PATH_MODULES, myuname.release);
+                       /* Jump through hoops in case /lib/modules/`uname -r`
+                        * is a symlink.  We do not want recursive_action to
+                        * follow symlinks, but we do want to follow the
+                        * /lib/modules/`uname -r` dir, So resolve it ourselves
+                        * if it is a link... */
+                       if (realpath (module_dir, real_module_dir) == NULL)
+                               strcpy(real_module_dir, module_dir);
+                       recursive_action(real_module_dir, TRUE, FALSE, FALSE,
+                                       check_module_name_match, 0, m_fullName);
+               }
+
+               /* Check if we have found anything yet */
+               if (m_filename[0] == '\0' || ((fp = fopen(m_filename, "r")) == NULL)) 
                {
-                       if (m_filename[0] == '\0'
-                               || ((fp = fopen(m_filename, "r")) == NULL)) 
+                       char module_dir[FILENAME_MAX];
+                       if (realpath (_PATH_MODULES, module_dir) == NULL)
+                               strcpy(module_dir, _PATH_MODULES);
+                       /* No module found under /lib/modules/`uname -r`, this
+                        * time cast the net a bit wider.  Search /lib/modules/ */
+                       if (recursive_action(module_dir, TRUE, FALSE, FALSE,
+                                               check_module_name_match, 0, m_fullName) == FALSE) 
                        {
-                               error_msg("No module named '%s' found in '%s'", m_fullName, _PATH_MODULES);
-                               return EXIT_FAILURE;
-                       }
-               } else
-                       error_msg_and_die("No module named '%s' found in '%s'", m_fullName, _PATH_MODULES);
-       } else
+                               if (m_filename[0] == '\0'
+                                               || ((fp = fopen(m_filename, "r")) == NULL)) 
+                               {
+                                       error_msg("%s: no module by that name found", m_fullName);
+                                       return EXIT_FAILURE;
+                               }
+                       } else
+                               error_msg_and_die("%s: no module by that name found", m_fullName);
+               }
+       } else 
                safe_strncpy(m_filename, argv[optind], sizeof(m_filename));
 
+       printf("Using %s\n", m_filename);
 
-       if ((f = obj_load(fp)) == NULL)
+       if ((f = obj_load(fp, LOADBITS)) == NULL)
                perror_msg_and_die("Could not load the module");
 
        if (get_modinfo_value(f, "kernel_version") == NULL)
@@ -3330,6 +3479,19 @@ extern int insmod_main( int argc, char **argv)
                goto out;
        }
 
+#if  !LOADBITS
+       /*
+        * the PROGBITS section was not loaded by the obj_load
+        * now we can load them directly into the kernel memory
+        */
+       //      f->imagebase = (char*) m_addr;
+       f->imagebase = (ElfW(Addr)) m_addr;
+       if (!obj_load_progbits(fp, f)) {
+               delete_module(m_name);
+               goto out;
+       }
+#endif 
+
        if (!obj_relocate(f, m_addr)) {
                delete_module(m_name);
                goto out;