1/*
2 * FreeBSD install - a package for the installation and maintainance
3 * of non-core utilities.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 *
14 * Jordan K. Hubbard
15 * 18 July 1993
16 *
17 * Miscellaneous string utilities.
18 *
19 */
20
21#include <sys/cdefs.h>
22__FBSDID("$FreeBSD$");
23
24#include "lib.h"
25
26char *
27strconcat(const char *s1, const char *s2)
28{
29    static char tmp[FILENAME_MAX];
30
31    tmp[0] = '\0';
32    strncpy(tmp, s1 ? s1 : s2, FILENAME_MAX);  /* XXX: what if both are NULL? */
33    if (s1 && s2)
34	strncat(tmp, s2, FILENAME_MAX - strlen(tmp));
35    return tmp;
36}
37
38/* Get a string parameter as a file spec or as a "contents follow -" spec */
39char *
40get_dash_string(char **str)
41{
42    char *s = *str;
43
44    if (*s == '-')
45	*str = copy_string_adds_newline(s + 1);
46    else
47	*str = fileGetContents(s);
48    return *str;
49}
50
51/* Rather Obvious */
52char *
53copy_string(const char *str)
54{
55    return (str ? strdup(str) : NULL);
56}
57
58/* Rather Obvious but adds a trailing \n newline */
59char *
60copy_string_adds_newline(const char *str)
61{
62    if (str == NULL) {
63	return (NULL);
64    } else  {
65	char *copy;
66	size_t line_length;
67
68	line_length = strlen(str) + 2;
69	if ((copy = malloc(line_length)) == NULL)
70		return (NULL);
71	memcpy(copy, str, line_length - 2);
72	copy[line_length - 2] = '\n';	/* Adds trailing \n */
73	copy[line_length - 1] = '\0';
74
75	return (copy);
76   }
77}
78
79/* Return TRUE if 'str' ends in suffix 'suff' */
80Boolean
81suffix(const char *str, const char *suff)
82{
83    char *idx;
84    Boolean ret = FALSE;
85
86    idx = strrchr(str, '.');
87    if (idx && !strcmp(idx + 1, suff))
88	ret = TRUE;
89    return ret;
90}
91
92/* Assuming str has a suffix, brutally murder it! */
93void
94nuke_suffix(char *str)
95{
96    char *idx;
97
98    idx = strrchr(str, '.');
99    if (idx)
100	*idx = '\0';  /* Yow!  Don't try this on a const! */
101}
102
103/* Lowercase a whole string */
104void
105str_lowercase(char *str)
106{
107    while (*str) {
108	*str = tolower(*str);
109	++str;
110    }
111}
112
113char *
114get_string(char *str, int max, FILE *fp)
115{
116    int len;
117
118    if (!str)
119	return NULL;
120    str[0] = '\0';
121    while (fgets(str, max, fp)) {
122	len = strlen(str);
123	while (len && isspace(str[len - 1]))
124	    str[--len] = '\0';
125	if (len)
126	   return str;
127    }
128    return NULL;
129}
130