1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License, Version 1.0 only 6 * (the "License"). You may not use this file except in compliance 7 * with the License. 8 * 9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 10 * or http://www.opensolaris.org/os/licensing. 11 * See the License for the specific language governing permissions 12 * and limitations under the License. 13 * 14 * When distributing Covered Code, include this CDDL HEADER in each 15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 16 * If applicable, add the following below this CDDL HEADER, with the 17 * fields enclosed by brackets "[]" replaced with your own identifying 18 * information: Portions Copyright [yyyy] [name of copyright owner] 19 * 20 * CDDL HEADER END 21 */ 22 /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */ 23 /* All Rights Reserved */ 24 25 26 #pragma ident "%Z%%M% %I% %E% SMI" 27 /* SVr4.0 2. */ 28 #include "mail.h" 29 /* 30 * Get comment field, if any, from line. 31 * 1 ==> found comment. 32 * 0 ==> no comment found. 33 * -1 ==> no closing (terminating) paren found for comment. 34 */ 35 36 getcomment(s, q) 37 register char *s; 38 register char *q; /* Copy comment, if found, to here */ 39 { 40 register char *p, *sav_q; 41 register int depth = 0; 42 43 if ((p = strchr(s, '(')) == (char *)NULL) { 44 /* no comment found */ 45 return (0); 46 } 47 sav_q = q; 48 while (*p) { 49 *q++ = *p; 50 if (*p == ')') { 51 /* account for nested parens within comment */ 52 depth--; 53 if (depth == 0) { 54 break; 55 } 56 } else if (*p == '(') { 57 depth++; 58 } 59 p++; 60 } 61 *q = '\0'; 62 if (*p != ')') { 63 /* closing paren not found */ 64 *sav_q = '\0'; 65 return (-1); 66 } 67 /* found comment */ 68 return (1); 69 } 70