Changeset 26 for Search-Namazu

Show
Ignore:
Timestamp:
01/24/00 14:35:23 (12 years ago)
Author:
knok
Message:

Search::Namazu new version.

Location:
Search-Namazu/trunk
Files:
3 modified

Legend:

Unmodified
Added
Removed
  • Search-Namazu/trunk/ChangeLog

    r21 r26  
     12000-01-24  NOKUBI Takatsugu  <knok@daionet.gr.jp> 
     2 
     3        * Version 0.20. 
     4        * Namazu.{pm,xs}: Adapted to new library symbols (nmz_ prefix). 
     5 
    161999-12-08  NOKUBI Takatsugu  <knok@daionet.gr.jp> 
    27 
  • Search-Namazu/trunk/Namazu.pm

    r21 r26  
    7878# %EXPORT_TAGS = (all => [qw()]); 
    7979 
    80 $VERSION = '0.02'; 
     80$VERSION = '0.10'; 
    8181 
    8282bootstrap Search::Namazu $VERSION; 
     
    9898    my $sortmeth = $args{'sortMethod'}; 
    9999    my $sortord = $args{'sortOrder'}; 
    100     my $config = $args{'config'}; 
    101100    my $lang = $args{'lang'}; 
    102101    my $query = $args{'query'}; 
    103102 
    104 # initialize libnamazu... (not implemented yet.) 
    105  
    106     if (defined $config) { 
    107         load_conf($config); 
    108     } 
     103# initialize 
    109104 
    110105    if (! defined $index) { 
     
    171166} 
    172167 
    173 package Search::Namazu::HList; 
     168package Search::Namazu::Result; 
    174169 
    175170sub new { 
  • Search-Namazu/trunk/Namazu.xs

    r21 r26  
    3434#include "libnamazu.h" 
    3535#include "codeconv.h" 
    36 #include "conf.h" 
    3736#include "field.h" 
    3837#include "hlist.h" 
     
    6463                char result[BUFSIZE]; 
    6564 
    66                 uniq_idxnames(); 
    67                 expand_idxname_aliases(); 
    68                 complete_idxnames(); 
     65                nmz_uniq_idxnames(); 
     66                nmz_expand_idxname_aliases(); 
     67                nmz_complete_idxnames(); 
    6968 
    7069                qstr = SvPV(query, na); 
    7170                strcpy(cqstr, qstr); 
    72                 codeconv_query(cqstr); 
     71                nmz_codeconv_query(cqstr); 
    7372                retar = newAV(); 
    7473                hlist = nmz_search(cqstr); 
    7574                for (i = 0; i < hlist.num; i ++) { 
    76                         SV *ohlist = perl_eval_pv("new Search::Namazu::HList", TRUE); 
     75                        SV *ohlist = perl_eval_pv("new Search::Namazu::Result", TRUE); 
    7776                        SV *tmp; 
    78                         get_field_data(hlist.data[i].idxid, hlist.data[i].docid, "uri", result); 
     77                        nmz_get_field_data(hlist.data[i].idxid, hlist.data[i].docid, "uri", result); 
    7978                        PUSHMARK(SP); 
    8079                        XPUSHs(ohlist); 
     
    9291                        av_push(retar, ohlist); 
    9392                } 
    94                 free_hlist(hlist); 
     93                nmz_free_hlist(hlist); 
    9594                EXTEND(SP, hlist.num); 
    9695                for (i = 0; i < hlist.num; i ++) { 
    9796                        XPUSHs(av_pop(retar)); 
    9897                } 
    99                 free_idxnames(); 
    100                 free_aliases(); 
    101                 free_replaces(); 
     98                nmz_free_internal(); 
    10299 
    103100int 
     
    110107        CODE: 
    111108                tmp = SvPV(index, na); 
    112                 RETVAL = add_index(tmp); 
     109                RETVAL = nmz_add_index(tmp); 
    113110 
    114111        OUTPUT: 
     
    118115nmz_sortbydate() 
    119116        CODE: 
    120                 set_sortmethod(SORT_BY_SCORE); 
     117                nmz_set_sortmethod(SORT_BY_SCORE); 
    121118 
    122119void 
    123120nmz_sortbyscore() 
    124121        CODE: 
    125                 set_sortmethod(SORT_BY_DATE); 
     122                nmz_set_sortmethod(SORT_BY_DATE); 
    126123 
    127124void 
    128125nmz_sortbyfield() 
    129126        CODE: 
    130                 set_sortmethod(SORT_BY_FIELD); 
     127                nmz_set_sortmethod(SORT_BY_FIELD); 
    131128 
    132129void 
    133130nmz_descendingsort() 
    134131        CODE: 
    135                 set_sortorder(ASCENDING); 
     132                nmz_set_sortorder(ASCENDING); 
    136133 
    137134void 
    138135nmz_ascendingsort() 
    139136        CODE: 
    140                 set_sortorder(DESCENDING); 
    141  
    142 int 
    143 nmz_setconfig(conf) 
    144         SV *conf 
    145  
    146         PREINIT: 
    147                 char *tmp; 
    148  
    149         CODE: 
    150                 tmp = SvPV(conf, na); 
    151                 RETVAL = load_conf(tmp); 
    152  
    153         OUTPUT: 
    154                 RETVAL 
     137                nmz_set_sortorder(DESCENDING); 
    155138 
    156139int 
     
    163146        CODE: 
    164147                tmp = SvPV(lang, na); 
    165                 RETVAL = set_lang(tmp); 
     148                RETVAL = nmz_set_lang(tmp); 
    166149 
    167150        OUTPUT: