diff options
Diffstat (limited to 'ldap/clients/dsgw/search.c')
| -rw-r--r-- | ldap/clients/dsgw/search.c | 217 |
1 files changed, 217 insertions, 0 deletions
diff --git a/ldap/clients/dsgw/search.c b/ldap/clients/dsgw/search.c new file mode 100644 index 00000000..90b40fcc --- /dev/null +++ b/ldap/clients/dsgw/search.c @@ -0,0 +1,217 @@ +/** + * PROPRIETARY/CONFIDENTIAL. Use of this product is subject to + * license terms. Copyright © 2001 Sun Microsystems, Inc. + * Some preexisting portions Copyright © 2001 Netscape Communications Corp. + * All rights reserved. + */ +/* + * search.c -- CGI program to generate smart search form -- HTTP gateway + * + * Copyright (c) 1996 Netscape Communications Corp. + * All rights reserved. + */ + +#include "dsgw.h" +#include "dbtdsgw.h" +static void get_request(char *docname); +static void do_searchtype_popup( struct ldap_searchobj *sop ); + + +int main( argc, argv, env ) + int argc; + char *argv[]; +#ifdef DSGW_DEBUG + char *env[]; +#endif +{ + auto int reqmethod; + char *docname = NULL; + char *qs = NULL; + + /* Parse out the file=blah.html */ + if (( qs = getenv( "QUERY_STRING" )) != NULL && *qs != '\0' ) { + /* parse the query string: */ + auto char *p, *iter = NULL; + qs = dsgw_ch_strdup( qs ); + + for ( p = ldap_utf8strtok_r( qs, "&", &iter ); p != NULL; + p = ldap_utf8strtok_r( NULL, "&", &iter )) { + + /* + * Get the conf file name. It'll be translated + * into /dsgw/context/CONTEXT.conf if + * CONTEXT is all alphanumeric (no slahes, + * or dots). CONTEXT is passed into the cgi. + * if context=CONTEXT is not there, or PATH_INFO + * was used, then use dsgw.conf + */ + if ( !strncasecmp( p, "context=", 8 )) { + context = dsgw_ch_strdup( p + 8 ); + dsgw_form_unescape( context ); + continue; + } + + + /*Get the filename and check it for naughtiness -RJP*/ + if ( !strncasecmp( p, "file=", 5 )) { + docname = dsgw_ch_strdup( p + 5 ); + dsgw_form_unescape( docname ); + + /* + * Make sure the person isn't trying to get + * some file not in the gateway. + */ + if (! dsgw_valid_docname(docname)) { + dsgw_error( DSGW_ERR_BADFILEPATH, docname, + DSGW_ERROPT_EXIT, 0, NULL ); + } + continue; + } + + + } + + free( qs ); qs = NULL; + } + + + reqmethod = dsgw_init( argc, argv, DSGW_METHOD_GET ); + dsgw_send_header(); + +#ifdef DSGW_DEBUG + dsgw_logstringarray( "env", env ); +{ + char buf[ 1024 ]; + getcwd( buf, sizeof(buf)); + dsgw_log( "cwd: \"%s\"\n", buf ); +} +#endif + + if ( reqmethod == DSGW_METHOD_GET ) { + get_request(docname); + } + exit( 0 ); +} + + +static void +get_request(char *docname) +{ + + auto char* filename = NULL; + auto struct ldap_searchobj* sop = NULL; + + if (docname != NULL && *docname == '/') { + docname++; + } + + if ( docname == NULL || *docname == '\0' ) { + filename = "search.html"; + } else if ( !strcmp( docname, "string" )) { + filename = "searchString.html"; + dsgw_init_searchprefs( &sop ); + } + if (filename) { + auto FILE* html = dsgw_open_html_file( filename, DSGW_ERROPT_EXIT ); + auto char line[ BIG_LINE ]; + auto int argc; + auto char **argv; + + while ( dsgw_next_html_line( html, line )) { + if ( dsgw_parse_line( line, &argc, &argv, 0, dsgw_simple_cond_is_true, NULL )) { + if ( dsgw_directive_is( line, "HEAD" )) { + dsgw_head_begin(); + dsgw_emits ("\n"); + } else if ( dsgw_directive_is( line, "DS_SEARCH_SCRIPT" )) { + dsgw_emits ("<SCRIPT LANGUAGE=\"JavaScript\">\n" + "<!-- Hide from non-JavaScript-capable browsers\n" + "\n" + "function validate(sform)\n" + "{\n" + " if (sform.searchstring.value == '') {\n"); +/* + * It would have been nice to detect when the user pressed return without + * typing anything into the searchstring area, but on Navigator 2.x, the + * form variable's value seems to get set *after* the onSubmit handler + * executes, which is unfortunate. + */ + dsgw_emit_alert ("searchFrame", NULL, /* "%s<br>(search base %s)", */ + XP_GetClientStr (DBT_youDidNotSupplyASearchString_), + gc->gc_ldapsearchbase); + dsgw_emits (" return false;\n" + " }\n" + " sform.searchstring.select();\n" + " sform.searchstring.focus();\n" + " return true;\n" + "}\n" + "\n" + "function init()\n" + "{}\n" + "// End hiding -->\n" + "</SCRIPT>\n"); + + } else if ( dsgw_directive_is( line, "DS_SEARCH_BODY" )) { + dsgw_emitf ("<BODY onLoad=\"" + "document.searchForm.searchstring.select();" + "document.searchForm.searchstring.focus();\" %s>\n", + dsgw_html_body_colors ); + dsgw_emit_alertForm(); + + } else if ( dsgw_directive_is( line, "DS_SEARCH_FORM" )) { + dsgw_form_begin ("searchForm", "action=\"%s\" %s %s", + dsgw_getvp( DSGW_CGINUM_DOSEARCH ), + "onSubmit=\"return top.validate(this)\"", + argc > 0 ? argv[0] : ""); + dsgw_emitf ("\n" + "<INPUT TYPE=hidden NAME=\"mode\" VALUE=\"smart\">\n" + "<INPUT TYPE=hidden NAME=\"base\" VALUE=\"%s\">\n" + "<INPUT TYPE=hidden NAME=\"ldapserver\" VALUE=\"%s\">\n" + "<INPUT TYPE=hidden NAME=\"ldapport\" VALUE=\"%d\">\n", + gc->gc_ldapsearchbase, gc->gc_ldapserver, gc->gc_ldapport ); + } else if ( dsgw_directive_is( line, "DS_SEARCH_BASE" )) { +#ifdef NOTFORNOW + /* ldap_dn2ufn currently gobbles up 'dc' so don't use */ + /* it for now */ + auto char* ufn = ldap_dn2ufn( gc->gc_ldapsearchbase ); + dsgw_emits( ufn ); + free( ufn ); +#else + dsgw_emits( gc->gc_ldapsearchbase ); +#endif + } else if ( dsgw_directive_is( line, "DS_SEARCH_TYPE" )) { + do_searchtype_popup( sop ); + } else if ( dsgw_directive_is( line, "DS_HELP_BUTTON" )) { + dsgw_emit_helpbutton (argc > 0 ? argv[0] : ""); + } else { + dsgw_emits (line); + } + dsgw_argv_free( argv ); + } + } + fclose (html); + } +} + + +static void +do_searchtype_popup( +struct ldap_searchobj *sop +) +{ + int first = 1; + struct ldap_searchobj *so; + + dsgw_emits( "<SELECT NAME=\"type\">\n" ); + for ( so = ldap_first_searchobj( sop ); so != NULL; + so = ldap_next_searchobj( sop, so ), first = 0) { + /* Skip any marked "internal-only" */ + if ( LDAP_IS_SEARCHOBJ_OPTION_SET( so, LDAP_SEARCHOBJ_OPT_INTERNAL )) { + continue; + } + dsgw_emitf( "<OPTION%s value=\"%s\">%s</OPTION>\n", + first ? " selected" : "", + so->so_objtypeprompt, + dsgw_get_translation( so->so_objtypeprompt )); + } + dsgw_emits( "</SELECT>\n" ); +} |