return result;
}
+/*
+ * removes double slashes from pathnames
+ * allows / disallows trailing slashes
+ */
+void StripSlashes(char *Dir, int TrailingSlash)
+{
+ char *a, *b;
+
+ a = b = Dir;
+
+ while (!IsEmptyStr(a)) {
+ if (*a == '/') {
+ while (*a == '/')
+ a++;
+ *b = '/';
+ b++;
+ }
+ else {
+ *b = *a;
+ b++; a++;
+ }
+ }
+ if ((TrailingSlash) && (*(b - 1) != '/')){
+ *b = '/';
+ b++;
+ }
+ *b = '\0';
+
+}
/*
* Strip leading and trailing spaces from a string
char *ptr;
size_t new_len = 0;
- if (!buf) {
+ if ((buf == NULL) || (*buf == '\0')) {
return 0;
}
* \param maxlen Size of string buffer
* \return Pointer to the source memory right after we stopped reading.
*/
-char *memreadline(char *start, char *buf, int maxlen)
+const char *memreadline(const char *start, char *buf, int maxlen)
{
char ch;
- char *ptr;
+ const char *ptr;
int len = 0; /**< tally our own length to avoid strlen() delays */
ptr = start;
* \param retlen the length of the returned string
* \return Pointer to the source memory right after we stopped reading.
*/
-char *memreadlinelen(char *start, char *buf, int maxlen, int *retlen)
+const char *memreadlinelen(const char *start, char *buf, int maxlen, int *retlen)
{
char ch;
- char *ptr;
+ const char *ptr;
int len = 0; /**< tally our own length to avoid strlen() delays */
ptr = start;
* The code is roughly based on the strstr() replacement from 'tin' written
* by Urs Jannsen.
*/
-inline char *_bmstrcasestr_len(char *text, size_t textlen, char *pattern, size_t patlen) {
+inline static const char *_bmstrcasestr_len(const char *text, size_t textlen, const char *pattern, size_t patlen) {
register unsigned char *p, *t;
register int i, j, *delta;
* The code is roughly based on the strstr() replacement from 'tin' written
* by Urs Jannsen.
*/
-char *bmstrcasestr(char *text, char *pattern) {
+const char *bmstrcasestr(const char *text, const char *pattern) {
size_t textlen;
size_t patlen;
return _bmstrcasestr_len(text, textlen, pattern, patlen);
}
-char *bmstrcasestr_len(char *text, size_t textlen, char *pattern, size_t patlen) {
+const char *bmstrcasestr_len(const char *text, size_t textlen, const char *pattern, size_t patlen) {
return _bmstrcasestr_len(text, textlen, pattern, patlen);
}
}
}
-/**
- * \brief detect whether this char starts an utf-8 encoded char
- * \param Char character to inspect
- * \returns yes or no
- */
-inline int Ctdl_IsUtf8SequenceStart(char Char)
-{
-/** 11??.???? indicates an UTF8 Sequence. */
- return ((Char & 0xC0) != 0);
-}
-
-/**
- * \brief evaluate the length of an utf8 special character sequence
- * \param Char the character to examine
- * \returns width of utf8 chars in bytes
- */
-inline int Ctdl_GetUtf8SequenceLength(char Char)
-{
- int n = 1;
- char test = (1<<7);
-
- while ((n < 8) && ((test & Char) != 0)) {
- test = test << 1;
- n ++;
- }
- if (n > 6)
- n = 1;
- return n;
-}
-
-/**
- * \brief measure the number of glyphs in an UTF8 string...
- * \param str string to measure
- * \returns the length of str
- */
-int Ctdl_Utf8StrLen(char *str)
-{
- int n = 0;
- int m = 0;
- char *aptr;
-
- if (str == NULL)
- return n;
- aptr = str;
- while (*aptr != '\0') {
- if (Ctdl_IsUtf8SequenceStart(*aptr)){
- m = Ctdl_GetUtf8SequenceLength(*aptr);
- while ((m-- > 0) && (*aptr++ != '\0'))
- n ++;
- }
- else {
- n++;
- aptr++;
- }
-
- }
- return n;
-}
-
-/**
- * \brief cuts a string after maxlen glyphs
- * \param str string to cut to maxlen glyphs
- * \param maxlen how long may the string become?
- * \returns pointer to maxlen or the end of the string
- */
-char *Ctdl_Utf8StrCut(char *str, int maxlen)
-{
- int n = 0, m = 0;
- char *aptr;
-
- if (str == NULL)
- return NULL;
- aptr = str;
- while (*aptr != '\0') {
- if (Ctdl_IsUtf8SequenceStart(*aptr)){
- m = Ctdl_GetUtf8SequenceLength(*aptr);
- while ((m-- > 0) && (*aptr++ != '\0'))
- n ++;
- }
- else {
- n++;
- aptr++;
- }
- if (n > maxlen) {
- *aptr = '\0';
- return aptr;
- }
- }
- return aptr;
-}
-
/*
* Convert all whitespace characters in a supplied string to underscores