Changeset 207

Timestamp:

03/16/06 14:01:08 (6 years ago)

Author:

knok

Message:

Fixed wrong array access bug.

Location:

Search-Namazu/trunk

Files:

• ChangeLog (modified) (1 diff)
• Namazu.xs (modified) (4 diffs)

Search-Namazu/trunk/ChangeLog

@@ +1 @@
+2006-03-16  NOKUBI Takatsugu  <knok@daionet.gr.jp>
+
+        * Namazu.xs: Fixed wrong array access.
+          Reported by Tadamasa Teranishi, thanks.
+
 2006-03-14  NOKUBI Takatsugu  <knok@daionet.gr.jp>
 

Search-Namazu/trunk/Namazu.xs

@@ -55 +55 @@
 #endif
 
+#define SEARCH_NAMAZU_FIELDS 5
+
 MODULE = Search::Namazu         PACKAGE = Search::Namazu
 
@@ -69 +71 @@
                 AV *retar;
                 NmzResult hlist;
-                char result[5][BUFSIZE];
+                char result[SEARCH_NAMAZU_FIELDS][BUFSIZE];
 
                 qstr = SvPV(query, PL_na);
@@ -83 +85 @@
                         nmz_get_field_data(hlist.data[i].idxid, hlist.data[i].docid, "title", result[2]);
                         nmz_get_field_data(hlist.data[i].idxid, hlist.data[i].docid, "author", result[3]);
-                        nmz_get_field_data(hlist.data[i].idxid, hlist.data[i].docid, "size", result[5]);
+                        nmz_get_field_data(hlist.data[i].idxid, hlist.data[i].docid, "size", result[4]);
                         ENTER;
                         SAVETMPS;
@@ -95 +97 @@
                         PUSHs(sv_2mortal(newSVpv(result[2], strlen(result[2]))));
                         PUSHs(sv_2mortal(newSVpv(result[3], strlen(result[3]))));
-                        PUSHs(sv_2mortal(newSVpv(result[3], strlen(result[4]))));
+                        PUSHs(sv_2mortal(newSVpv(result[4], strlen(result[4]))));
                         PUTBACK;
                         perl_call_method("set", G_DISCARD);