php-src/ext/yp/yp.c
1999-05-21 08:29:51 +00:00

192 lines
5.4 KiB
C

/*
+----------------------------------------------------------------------+
| PHP HTML Embedded Scripting Language Version 4.0 |
+----------------------------------------------------------------------+
| Copyright (c) 1997-1999 PHP Development Team (See Credits file) |
+----------------------------------------------------------------------+
| This program is free software; you can redistribute it and/or modify |
| it under the terms of one of the following licenses: |
| |
| A) the GNU General Public License as published by the Free Software |
| Foundation; either version 2 of the License, or (at your option) |
| any later version. |
| |
| B) the PHP License as published by the PHP Development Team and |
| included in the distribution in the file: LICENSE |
| |
| This program is distributed in the hope that it will be useful, |
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| GNU General Public License for more details. |
| |
| You should have received a copy of both licenses referred to here. |
| If you did not, or have any questions about PHP licensing, please |
| contact core@php.net. |
+----------------------------------------------------------------------+
| Authors: Stephanie Wehner <_@r4k.net> |
+----------------------------------------------------------------------+
*/
/* $Id$ */
#include "php.h"
#if HAVE_YP
#include "php3_yp.h"
#include <rpcsvc/ypclnt.h>
function_entry yp_functions[] = {
PHP_FE(yp_get_default_domain, NULL)
PHP_FE(yp_order, NULL)
PHP_FE(yp_master, NULL)
PHP_FE(yp_match, NULL)
PHP_FE(yp_first, NULL)
PHP_FE(yp_next, NULL)
{NULL, NULL, NULL}
};
zend_module_entry yp_module_entry = {
"YP",
yp_functions,
NULL,
NULL,
NULL,
NULL,
php3_info_yp,
STANDARD_MODULE_PROPERTIES
};
/* {{{ proto string yp_get_default_domain(void)
Returns the domain or false */
PHP_FUNCTION(yp_get_default_domain) {
char *outdomain;
if(yp_get_default_domain(&outdomain)) {
RETURN_FALSE;
}
RETVAL_STRING(outdomain,1);
}
/* }}} */
/* {{{ proto int yp_order(string domain, string map)
Returns the order number or false */
PHP_FUNCTION(yp_order) {
pval *domain, *map;
#if SOLARIS_YP
unsigned long outval;
#else
int outval;
#endif
if((ARG_COUNT(ht) != 2) || (getParameters(ht,2,&domain,&map) == FAILURE)) {
WRONG_PARAM_COUNT;
}
convert_to_string(domain);
convert_to_string(map);
if(yp_order(domain->value.str.val,map->value.str.val,&outval)) {
RETURN_FALSE;
}
RETVAL_LONG(outval);
}
/* }}} */
/* {{{ proto string yp_master(string domain, string map)
Returns the machine name of the master */
PHP_FUNCTION(yp_master) {
pval *domain, *map;
char *outname;
if((ARG_COUNT(ht) != 2) || (getParameters(ht,2,&domain,&map) == FAILURE)) {
WRONG_PARAM_COUNT;
}
convert_to_string(domain);
convert_to_string(map);
if(yp_master(domain->value.str.val,map->value.str.val,&outname)) {
RETURN_FALSE;
}
RETVAL_STRING(outname,1);
}
/* }}} */
/* {{{ proto string yp_match(string domain, string map, string key)
Returns the matched line or false */
PHP_FUNCTION(yp_match) {
pval *domain, *map, *key;
char *outval;
int outvallen;
if((ARG_COUNT(ht) != 3) || (getParameters(ht,3,&domain,&map,&key) == FAILURE)) {
WRONG_PARAM_COUNT;
}
convert_to_string(domain);
convert_to_string(map);
convert_to_string(key);
if(yp_match(domain->value.str.val,map->value.str.val,key->value.str.val,key->value.str.len,&outval,&outvallen)) {
RETURN_FALSE;
}
RETVAL_STRING(outval,1);
}
/* }}} */
/* {{{ proto array yp_first(string domain, string map)
Returns the first key as $var["key"] and the first line as $var["value"] */
PHP_FUNCTION(yp_first) {
pval *domain, *map;
char *outval, *outkey;
int outvallen, outkeylen;
if((ARG_COUNT(ht) != 2) || (getParameters(ht,2,&domain,&map) == FAILURE)) {
WRONG_PARAM_COUNT;
}
convert_to_string(domain);
convert_to_string(map);
if(yp_first(domain->value.str.val,map->value.str.val,&outkey,&outkeylen,&outval,&outvallen)) {
RETURN_FALSE;
}
array_init(return_value);
add_assoc_string(return_value,"key",outkey,1);
add_assoc_string(return_value,"value",outval,1);
}
/* }}} */
/* {{{ proto array yp_next(string domain, string map, string key)
Returns an array with $var[$key] and the the line as the value */
PHP_FUNCTION(yp_next) {
pval *domain, *map, *key;
char *outval, *outkey;
int outvallen, outkeylen;
if((ARG_COUNT(ht) != 3) || (getParameters(ht,3,&domain,&map, &key) == FAILURE)) {
WRONG_PARAM_COUNT;
}
convert_to_string(domain);
convert_to_string(map);
convert_to_string(key);
if(yp_next(domain->value.str.val,map->value.str.val,key->value.str.val,key->value.str.len,&outkey,&outkeylen,&outval,&outvallen)) {
RETURN_FALSE;
}
array_init(return_value);
add_assoc_string(return_value,outkey,outval,1);
}
/* }}} */
void php3_info_yp(ZEND_MODULE_INFO_FUNC_ARGS) {
PUTS("Compiled with YP Support.");
}
#endif /* HAVE_YP */