code review 4607048: ld: make .rodata section read-only

src/cmd/ld/data.c

 // Inferno utils/8l/asm.c
 // http://code.google.com/p/inferno-os/source/browse/utils/8l/asm.c
 //
 //      Copyright © 1994-1999 Lucent Technologies Inc.  All rights reserved.
 //      Portions Copyright © 1995-1997 C H Forsyth (forsyth@terzarima.net)
 //      Portions Copyright © 1997-1999 Vita Nuova Limited
 //      Portions Copyright © 2000-2007 Vita Nuova Holdings Limited (www.vitanuova.com)
 //      Portions Copyright © 2004,2006 Bruce Ellis
 //      Portions Copyright © 2005-2007 C H Forsyth (forsyth@terzarima.net)
 //      Revisions Copyright © 2000-2007 Lucent Technologies Inc. and others
@@ skipping 763 matching lines @@
         *l = nil;
 
         datap = datsort(datap);
 
         /*
          * allocate data sections.  list is sorted by type,
          * so we can just walk it for each piece we want to emit.
          */
 
         /* read-only data */
-        sect = addsection(&segtext, ".rodata", 06);
+        sect = addsection(&segtext, ".rodata", 04);
         sect->vaddr = 0;
         datsize = 0;
         s = datap;
         for(; s != nil && s->type < SDATA; s = s->next) {
                 s->type = SRODATA;
                 t = rnd(s->size, PtrSize);
                 s->value = datsize;
                 datsize += t;
         }
         sect->len = datsize - sect->vaddr;
@@ skipping 141 matching lines @@
         xdefine("erodata", SRODATA, rodata->vaddr + rodata->len);
         xdefine("data", SBSS, data->vaddr);
         xdefine("edata", SBSS, data->vaddr + data->len);
         xdefine("end", SBSS, segdata.vaddr + segdata.len);
 
         sym = lookup("pclntab", 0);
         xdefine("epclntab", SRODATA, sym->value + sym->size);
         sym = lookup("symtab", 0);
         xdefine("esymtab", SRODATA, sym->value + sym->size);
 }