fix GCC warnings for the target with long uint32_t

Note: on some targets, int32_t is a long.
eg. GCC in the recent ESP-IDF has such a configuration.

references:
apache/nuttx#16022
https://docs.espressif.com/projects/esp-idf/en/stable/esp32/migration-guides/release-5.x/5.0/gcc.html#espressif-toolchain-changes

Author: yamt

lib/exec.c

@@ -253,8 +253,8 @@ frame_enter(struct exec_context *ctx, struct instance *inst, uint32_t funcidx,
 #endif
         cells_zero(locals + nparams, nlocals - nparams);
 
-        xlog_trace_insn("frame enter: maxlabels %u maxcells %u", ei->maxlabels,
-                        ei->maxcells);
+        xlog_trace_insn("frame enter: maxlabels %" PRIu32 " maxcells %" PRIu32,
+                        ei->maxlabels, ei->maxcells);
         uint32_t i;
         for (i = 0; i < nlocals; i++) {
                 if (i == nparams) {

lib/exec_debug.c

@@ -11,7 +11,7 @@
 
 #define VEC_PRINT_USAGE(name, vec)                                            \
         nbio_printf("%s %" PRIu32 " (%zu bytes)\n", (name), (vec)->psize,     \
-                    (vec)->psize * sizeof(*(vec)->p));
+                    (size_t)(vec)->psize * sizeof(*(vec)->p));
 
 #define STAT_PRINT(name)                                                      \
         nbio_printf("%23s %12" PRIu64 "\n", #name, ctx->stats.name);

lib/exec_insn_subr.c

@@ -131,7 +131,7 @@ memory_getptr2(struct exec_context *ctx, uint32_t memidx, uint32_t ptr,
                         " + %08" PRIx32 ", size %" PRIu32
                         ", meminst size %" PRIu32 ", pagesize %" PRIu32,
                         memidx, ptr, offset, size, meminst->size_in_pages,
-                        1 << memtype_page_shift(meminst->type));
+                        memtype_page_size(meminst->type));
                 assert(ret != 0);
         }
         return ret;
@@ -706,7 +706,7 @@ retry:;
         }
         memory_atomic_unlock(lock);
         if (ret == 0) {
-                xlog_trace("%s: returning %d result %d", __func__, ret,
+                xlog_trace("%s: returning %d result %" PRIu32, __func__, ret,
                            *resultp);
         } else {
                 xlog_trace("%s: returning %d", __func__, ret);

lib/expr.c

@@ -245,7 +245,7 @@ read_expr_common(const uint8_t **pp, const uint8_t *ep, struct expr *expr,
 #endif
         xlog_trace("code size %zu, jump table size %zu, max labels %" PRIu32
                    ", cells %" PRIu32,
-                   p - expr->start, ei->njumps * sizeof(*ei->jumps),
+                   p - expr->start, (size_t)ei->njumps * sizeof(*ei->jumps),
                    ei->maxlabels, ei->maxcells);
         validation_context_reuse(vctx);
         return 0;

lib/host_instance.c

@@ -219,7 +219,7 @@ host_func_getptr2(struct exec_context *ctx, struct meminst *mem, uint32_t ptr,
                         ", size %" PRIu32 ", meminst size %" PRIu32
                         ", pagesize %" PRIu32,
                         ptr, size, mem->size_in_pages,
-                        1 << memtype_page_shift(mem->type));
+                        memtype_page_size(mem->type));
         }
         return ret;
 }

lib/insn_impl_control.h

@@ -511,7 +511,8 @@ INSN_IMPL(call_indirect)
                         goto fail;
                 }
                 const struct functype *ft = &m->types[typeidx];
-                xlog_trace_insn("call_indirect (table %u type %u) %u %u",
+                xlog_trace_insn("call_indirect (table %" PRIu32
+                                " type %" PRIu32 ") %" PRIu32 " %" PRIu32,
                                 tableidx, typeidx, ft->parameter.ntypes,
                                 ft->result.ntypes);
                 ret = pop_valtypes(&ft->parameter, vctx);

lib/insn_impl_tailcall.h

@@ -70,7 +70,8 @@ INSN_IMPL(return_call_indirect)
                         goto fail;
                 }
                 const struct functype *ft = &m->types[typeidx];
-                xlog_trace_insn("call_indirect (table %u type %u) %u %u",
+                xlog_trace_insn("call_indirect (table %" PRIu32
+                                " type %" PRIu32 ") %" PRIu32 " %" PRIu32,
                                 tableidx, typeidx, ft->parameter.ntypes,
                                 ft->result.ntypes);
                 ret = pop_valtypes(&ft->parameter, vctx);

lib/instance.c

@@ -782,6 +782,6 @@ instance_print_stats(const struct instance *inst)
                             " pages (min/max=%" PRIu32 "/%" PRIu32
                             " pagesize=%" PRIu32 ")\n",
                             i, mi->allocated, mi->size_in_pages, lim->min,
-                            lim->max, 1 << memtype_page_shift(mi->type));
+                            lim->max, memtype_page_size(mi->type));
         }
 }

lib/module.c

@@ -1637,7 +1637,8 @@ read_code_section(const uint8_t **pp, const uint8_t *ep,
 
         uint32_t i;
         for (i = 0; i < m->nfuncs; i++) {
-                xlog_trace("func nlocals %u", m->funcs[i].localtype.nlocals);
+                xlog_trace("func nlocals %" PRIu32,
+                           m->funcs[i].localtype.nlocals);
         }
 
         *pp = p;
@@ -2214,7 +2215,7 @@ module_load_into(struct module *m, const uint8_t *p, const uint8_t *ep,
                 goto fail;
         }
         if (v != 1) { /* version */
-                report_error(&ctx->report, "wrong version: %u", v);
+                report_error(&ctx->report, "wrong version: %" PRIu32, v);
                 ret = EINVAL;
                 goto fail;
         }

lib/type.c

@@ -449,3 +449,9 @@ memtype_page_shift(const struct memtype *type)
         return WASM_PAGE_SHIFT;
 #endif
 }
+
+uint32_t
+memtype_page_size(const struct memtype *type)
+{
+        return UINT32_C(1) << memtype_page_shift(type);
+}