Return to lookup.c CVS log

Up to [MW Coherent from dump] / coherent / g / usr / bin / me

Annotation of coherent/g/usr/bin/me/lookup.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * On GEMDOS and MSDOS, helpfiles specified on the command line
                      3:  * are <name>.HLP for the main help, and <name>.IDX for the index file,
                      4:  * if any.  On other systems, the help file is <name>, the index file,
                      5:  * <name>.idx
                      6:  */
                      7: #include "ed.h"
                      8: 
                      9: #if    LIBHELP
                     10: #ifndef        NULL
                     11: #define        NULL    ((char *)0)             /* rather than using stdio.h    */
                     12: #endif
                     13: 
                     14: static uchar lookbuff[NFILEN];
                     15: 
                     16: inithelp(){
                     17:        extern uchar *getenv();
                     18: 
                     19:        if (helpfile == NULL) {
                     20:                if ((helpfile = getenv("HELP")) == NULL) {
                     21:                        helpfile = "helpfile";
                     22: #if    GEM || MSDOS
                     23:                        helpindex = "helpindx";  /* Short name for xDOS */
                     24: #else
                     25:                        helpindex = "helpindex"; /* Long name for others */
                     26: #endif
                     27:                } else {
                     28:                        strcpy(hfname, helpfile);       /* from env.    */
                     29:                        helpfile = hfname;
                     30:                        strcpy(hiname, hfname);
                     31: #if    GEM || MSDOS
                     32:                        strcat(hfname, ".hlp");
                     33:                        strcat(hiname, ".idx");
                     34:                        helpindex = hiname;
                     35: #else
                     36:                        strcat(hiname, ".idx");
                     37:                        helpindex = hiname;
                     38: #endif
                     39:                }
                     40:        }
                     41: }
                     42: 
                     43: do_lookup(topic)
                     44: uchar *topic;
                     45: {
                     46:        inithelp();
                     47:        if (topic == NULL || *topic == '\0') {
                     48:                mlwrite("[No subject specified]");
                     49:                return FALSE;
                     50:        }
                     51:        mlwrite("[looking for topic %s]", topic);
                     52:        return helpwindow(topic);
                     53: }
                     54: 
                     55: promptlook(f, n)
                     56: {
                     57:        register int    s;
                     58: 
                     59:        inithelp();
                     60:        if ((s=mlreply("Topic: ", lookbuff, NFILEN)) != TRUE)
                     61:                return s;
                     62:        mlwrite("[looking for topic %s]", lookbuff);
                     63:        return do_lookup(lookbuff);
                     64: }
                     65: 
                     66: hlpindex(f, n)
                     67: {
                     68:        register int    s;
                     69: 
                     70:        inithelp();
                     71:        if ((s=mlreply("Keyword: ", lookbuff, NFILEN)) != TRUE)
                     72:                return s;
                     73:        mlwrite("[looking for keyword %s]", lookbuff);
                     74:        return topicwindow(lookbuff);
                     75: }
                     76: #endif

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.