* addr2line.c (uleb128): cast the value to unsigned long.

* addr2line.c (fill_lines): print error when lseek fails.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@31010 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ChangeLog

@@ -1,3 +1,9 @@
+Thu Mar  3 00:46:51 2011  NARUSE, Yui  <naruse@ruby-lang.org>
+
+	* addr2line.c (uleb128): cast the value to unsigned long.
+
+	* addr2line.c (fill_lines): print error when lseek fails.
+
 Thu Mar  3 00:36:29 2011  NARUSE, Yui  <naruse@ruby-lang.org>
 
 	* lib/rexml/encoding.rb (REXML::Encoding#encoding=): store @encoding

addr2line.c

@@ -85,7 +85,7 @@ uleb128(char **p) {
     for (;;) {
 	unsigned char b = *(unsigned char *)(*p)++;
 	if (b < 0x80) {
-	    r += b << s;
+	    r += (unsigned long)b << s;
 	    break;
 	}
 	r += (b & 0x7f) << s;
@@ -442,6 +442,12 @@ fill_lines(int num_traces, void **traces, char **syms, int check_debuglink,
 	return;
     }
     filesize = lseek(fd, 0, SEEK_END);
+    if (filesize < 0) {
+	int e = errno;
+	close(fd);
+	fprintf(stderr, "lseek: %s\n", strerror(e));
+	return;
+    }
     lseek(fd, 0, SEEK_SET);
     /* async-signal unsafe */
     file = (char *)mmap(NULL, filesize, PROT_READ, MAP_SHARED, fd, 0);