LWTools Old Repo: src/output.c comparison

Checkpoint: object format output

comparison

equal deleted inserted replaced

-:033a328a10ae
+:41ff4686b46b
 }
 void write_code_obj(asmstate_t *as, FILE *of)
 {
 	lwasm_line_t *l;
+	sectiontab_t *s;
 	int i;
+	unsigned char buf[16];
 	// output the magic number and file header
-	writebytes("LWOBJ16\0", 8, 1, of);
+	// the 8 is NOT an error
+	writebytes("LWOBJ16", 8, 1, of);
 	// run through the entire system and build the byte streams for each
 	// section; at the same time, generate a list of "local" symbols to
 	// output for each section
 	// NOTE: for "local" symbols, we will append \x01 and the ascii string
 				re -> offset = l -> codeaddr + l -> relocoff;
 				re -> expr = l -> exprs[0];
 			}
 		}
 	}
-}
+	// run through the sections
+	for (s = as -> sections; s; s = s -> next)
+	{
+		// write the name
+		writebytes(s -> name, strlen(s -> name) + 1, 1, of);
+		// write the flags
+		if (s -> flags & SECTION_BSS)
+			writebytes("\x01", 1, 1, of);
+		// indicate end of flags - the "" is NOT an error
+		writebytes("", 1, 1, of);
+		// now blast out the code
+		// length
+		buf[0] = s -> oblen >> 8 & 0xff;
+		buf[1] = s -> oblen & 0xff;
+		writebytes(buf, 2, 1, of);
+		if (!(s -> flags & SECTION_BSS))
+		{
+			writebytes(s -> obytes, s -> oblen, 1, of);
+		}
+	}
+	// flag no more sections
+	// the "" is NOT an error
+	writebytes("", 1, 1, of);
+}

Mercurial > hg-old > index.cgi