size_t tag_size;
        void (*module_load)(struct codetag_type *cttype,
                            struct codetag_module *cmod);
-       void (*module_unload)(struct codetag_type *cttype,
+       bool (*module_unload)(struct codetag_type *cttype,
                              struct codetag_module *cmod);
 };
 
 
 #if defined(CONFIG_CODE_TAGGING) && defined(CONFIG_MODULES)
 void codetag_load_module(struct module *mod);
-void codetag_unload_module(struct module *mod);
+bool codetag_unload_module(struct module *mod);
 #else
 static inline void codetag_load_module(struct module *mod) {}
-static inline void codetag_unload_module(struct module *mod) {}
+static inline bool codetag_unload_module(struct module *mod) { return true; }
 #endif
 
 #endif /* _LINUX_CODETAG_H */
 
        return module_alloc(size);
 }
 
-static void module_memory_free(void *ptr, enum mod_mem_type type)
+static void module_memory_free(void *ptr, enum mod_mem_type type,
+                              bool unload_codetags)
 {
+       if (!unload_codetags && mod_mem_type_is_core_data(type))
+               return;
+
        if (mod_mem_use_vmalloc(type))
                vfree(ptr);
        else
                module_memfree(ptr);
 }
 
-static void free_mod_mem(struct module *mod)
+static void free_mod_mem(struct module *mod, bool unload_codetags)
 {
        for_each_mod_mem_type(type) {
                struct module_memory *mod_mem = &mod->mem[type];
                /* Free lock-classes; relies on the preceding sync_rcu(). */
                lockdep_free_key_range(mod_mem->base, mod_mem->size);
                if (mod_mem->size)
-                       module_memory_free(mod_mem->base, type);
+                       module_memory_free(mod_mem->base, type,
+                                          unload_codetags);
        }
 
        /* MOD_DATA hosts mod, so free it at last */
        lockdep_free_key_range(mod->mem[MOD_DATA].base, mod->mem[MOD_DATA].size);
-       module_memory_free(mod->mem[MOD_DATA].base, MOD_DATA);
+       module_memory_free(mod->mem[MOD_DATA].base, MOD_DATA, unload_codetags);
 }
 
 /* Free a module, remove from lists, etc. */
 static void free_module(struct module *mod)
 {
+       bool unload_codetags;
+
        trace_module_free(mod);
 
-       codetag_unload_module(mod);
+       unload_codetags = codetag_unload_module(mod);
+       if (!unload_codetags)
+               pr_warn("%s: memory allocation(s) from the module still alive, cannot unload cleanly\n",
+                       mod->name);
+
        mod_sysfs_teardown(mod);
 
        /*
        kfree(mod->args);
        percpu_modfree(mod);
 
-       free_mod_mem(mod);
+       free_mod_mem(mod, unload_codetags);
 }
 
 void *__symbol_get(const char *symbol)
        return 0;
 out_enomem:
        for (t--; t >= 0; t--)
-               module_memory_free(mod->mem[t].base, t);
+               module_memory_free(mod->mem[t].base, t, true);
        return ret;
 }
 
        percpu_modfree(mod);
        module_arch_freeing_init(mod);
 
-       free_mod_mem(mod);
+       free_mod_mem(mod, true);
 }
 
 int __weak module_finalize(const Elf_Ehdr *hdr,
 
 #include <linux/module.h>
 #include <linux/seq_buf.h>
 #include <linux/slab.h>
+#include <linux/vmalloc.h>
 
 struct codetag_type {
        struct list_head link;
        mutex_unlock(&codetag_lock);
 }
 
-void codetag_unload_module(struct module *mod)
+bool codetag_unload_module(struct module *mod)
 {
        struct codetag_type *cttype;
+       bool unload_ok = true;
 
        if (!mod)
-               return;
+               return true;
 
        mutex_lock(&codetag_lock);
        list_for_each_entry(cttype, &codetag_types, link) {
                }
                if (found) {
                        if (cttype->desc.module_unload)
-                               cttype->desc.module_unload(cttype, cmod);
+                               if (!cttype->desc.module_unload(cttype, cmod))
+                                       unload_ok = false;
 
                        cttype->count -= range_size(cttype, &cmod->range);
                        idr_remove(&cttype->mod_idr, mod_id);
                up_write(&cttype->mod_lock);
        }
        mutex_unlock(&codetag_lock);
+
+       return unload_ok;
 }
 
 #else /* CONFIG_MODULES */