Distributed Name Service (DNS) Management Programming Manual
DNS Programming Example, C
H–18 46958 Tandem Computers Incorporated
 if (! strcmp(domain, "LOCAL"))
 memset(¶m.zdomain, ' ', ZDNS_VAL_DNSLEN);
 else
 if (*domain)
 {
 memset(¶m.zdomain, ' ', ZDNS_VAL_DNSLEN);
 dns_strtomem(¶m.zdomain, domain, ZDNS_VAL_DNSLEN);
 }
 }
param.zreftype = reftype;
if (reftype == ZDNS_OBJ_SSOBJ)
 /*-------------------------------------------*/
 /* Referent is SSOBJECT; get object's name */
 /*-------------------------------------------*/
 dns_strtomem(¶m.zssobj, ssobject, ZDNS_VAL_OBJLEN);
dns_strtomem(¶m.zssmgr, ssmanager, ZDNS_VAL_MGRLEN);
/*-------------------------------*/
/* Put token into request buffer */
/*-------------------------------*/
if (status = SSPUT((short *) &req_buf
 , (short *) &zdns_map_add_alias
 , (char *) ¶m))
 return dns_return(spi_err, status);
/*-------------------------*/
/* Start a TMF transaction */
/*-------------------------*/
if (status = BEGINTRANSACTION())
 return dns_return(tmf_err, status);
/*----------------------------------*/
/* Send request to the name manager */
/*----------------------------------*/
result = dns_send(file_desc, &req_buf, &resp_buf, false);
if (result.err_class)
 {
 /*---------------------------------------------------*/
 /* Error on send; abort the transaction and return */
 /*---------------------------------------------------*/
 ABORTTRANSACTION();
 return result;
 }
/*----------------------------------*/
/* Get RETCODE from response buffer */
/*----------------------------------*/










