/*
This file is part of a common library
Copyright (C) 2002-6 Toby Thain, toby@telegraphics.com.au
This program is free software; you can redistribute it and/or modify
it under the terms of 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.
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 the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
#include <string.h>
#include <stdlib.h>
#ifdef WIN_ENV
#include <windows.h>
#endif
#include "str.h"
#include "sprintf_tiny.h"
void strcpy_advance(TCHAR** str, TCHAR* append) {
xstrcpy(*str, append);
*str += xstrlen(append);
}
void strcpy_advance_a(TCHAR** str, char* append) {
#ifdef UNICODE
mbstowcs(*str, append, 1000);
#else
strcpy_advance(str, append);
#endif
}
#ifdef UNICODE
size_t xstrlen(wchar_t* s) {
return lstrlen(s);
}
wchar_t* xstrcpy(wchar_t* dst, wchar_t* src) {
return lstrcpy(dst, src);
}
wchar_t* xstrcat(wchar_t* dst, const wchar_t* src) {
return lstrcat(dst, src);
}
wchar_t* xstrrchr(wchar_t* const _Str, const int _Ch) {
}
int xstrcasecmp(const wchar_t* a, const wchar_t* b) {
return _wcsicmp(a, b);
}
int xstrcmp(const wchar_t* a, const wchar_t* b) {
return lstrcmpW(a, b);
}
#else
size_t xstrlen(char* s) {
}
char* xstrcpy(char* dst, char* src) {
}
char* xstrcat(char* dst, const char* src) {
}
char* xstrrchr(char* const _Str, const int _Ch) {
}
int xstrcasecmp(const char* a, const char* b) {
//return strcasecmp(a, b);
return _stricmp(a, b);
}
int xstrcmp(const char* a, const char* b) {
}
#endif
// convert C (null-terminated) to Pascal (length byte) string
// no bounds checking
unsigned char *myc2pstr(char *s){
*s = (unsigned char)n;
return (unsigned char*)s;
}
// convert Pascal string to C string
// no bounds checking
char *myp2cstr(unsigned char *s){
int n = *s;
s[n] = 0;
return (char*)s;
}
// copy Pascal string to C string
// no bounds checking
char *myp2cstrcpy(char *dst,const unsigned char *src){
dst[src[0]] = 0;
return dst;
}
// copy C string to Pascal string
unsigned char *myc2pstrcpy(unsigned char *dst,const char *src){
*dst = n <= 255 ? (unsigned char)n : 255;
return dst;
}
// copy null-terminated string;
// returns pointer after last character copied
char *cat(char *d,char *s){
while( (*d = *s++) )
d++;
return d;
}
/*
void *my_memset(void *dst, int val, size_t len){
char *p;
for(p=(char*)dst;len--;)
*p++ = val;
return dst;
}
*/
// my_strdup() is like _strdup(), with the difference that it accepts "char*" instead of "const char*" as argument
char *my_strdup(char *s){
if(p)
return p;
}
// DM 03.12.2021 removed, because it is not used in Filter Foundry
/*
unsigned char *PLcstrcpy(unsigned char *s1,const char *s2){
size_t n = strlen(s2);
if(n>255)
n = 255;
memcpy(s1+1,s2,n);
*s1 = (unsigned char)n;
return s1;
}
*/
// DM 03.12.2021 removed, because it is not used in Filter Foundry
/*
unsigned char *PLcstrcat(unsigned char * str1,const char * s2){
size_t n = strlen(s2);
if(str1[0]+n > 255)
n = 255 - str1[0];
memcpy(str1+1+str1[0],s2,n);
str1[0] += (unsigned char)n;
return str1;
}
*/
void strcpy_win_replace_ampersand(char* dst, char* src) {
size_t i;
for (i
= 0; i
< strlen(src
); i
++) {
#ifdef WIN_ENV
// & needs to be replaced to && in:
// - Labels (SETCTLTEXT)
// - Menu items (i.e. PIPL)
// It is not required in:
// - Filedialog FileName
// - MessageBox title or content
// - Window titles
// - Input boxes, e.g. import+export of an existing filter
if (src[i] == '&') {
*dst++ = src[i];
}
#endif
* dst++ = src[i];
}
*dst++ = '\0';
}