diff options
Diffstat (limited to 'sidplay-libs-2.1.0/libsidplay/src/sidtune/SidTuneTools.cpp')
-rw-r--r-- | sidplay-libs-2.1.0/libsidplay/src/sidtune/SidTuneTools.cpp | 215 |
1 files changed, 215 insertions, 0 deletions
diff --git a/sidplay-libs-2.1.0/libsidplay/src/sidtune/SidTuneTools.cpp b/sidplay-libs-2.1.0/libsidplay/src/sidtune/SidTuneTools.cpp new file mode 100644 index 00000000..79bf1597 --- /dev/null +++ b/sidplay-libs-2.1.0/libsidplay/src/sidtune/SidTuneTools.cpp @@ -0,0 +1,215 @@ +/* + * /home/ms/files/source/libsidtune/RCS/SidTuneTools.cpp,v + * + * Copyright (C) Michael Schwendt <mschwendt@yahoo.com> + * + * 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 "SidTuneTools.h" + +#ifdef HAVE_EXCEPTIONS +# include <new> +#endif +#include <ctype.h> +#include <string.h> + +// Own version of strdup, which uses new instead of malloc. +char* SidTuneTools::myStrDup(const char *source) +{ + char *dest; +#ifdef HAVE_EXCEPTIONS + if ( (dest = new(std::nothrow) char[strlen(source)+1]) != 0) +#else + if ( (dest = new char[strlen(source)+1]) != 0) +#endif + { + strcpy(dest,source); + } + return dest; +} + +// Return pointer to file name position in complete path. +char* SidTuneTools::fileNameWithoutPath(char* s) +{ + int last_slash_pos = -1; + for ( uint_least32_t pos = 0; pos < strlen(s); pos++ ) + { +#if defined(SID_FS_IS_COLON_AND_BACKSLASH_AND_SLASH) + if ( s[pos] == ':' || s[pos] == '\\' || + s[pos] == '/' ) +#elif defined(SID_FS_IS_COLON_AND_SLASH) + if ( s[pos] == ':' || s[pos] == '/' ) +#elif defined(SID_FS_IS_SLASH) + if ( s[pos] == '/' ) +#elif defined(SID_FS_IS_BACKSLASH) + if ( s[pos] == '\\' ) +#elif defined(SID_FS_IS_COLON) + if ( s[pos] == ':' ) +#else +#error Missing file/path separator definition. +#endif + { + last_slash_pos = pos; + } + } + return( &s[last_slash_pos +1] ); +} + +// Return pointer to file name position in complete path. +// Special version: file separator = forward slash. +char* SidTuneTools::slashedFileNameWithoutPath(char* s) +{ + int last_slash_pos = -1; + for ( uint_least32_t pos = 0; pos < strlen(s); pos++ ) + { + if ( s[pos] == '/' ) + { + last_slash_pos = pos; + } + } + return( &s[last_slash_pos +1] ); +} + +// Return pointer to file name extension in path. +// The backwards-version. +char* SidTuneTools::fileExtOfPath(char* s) +{ + uint_least32_t last_dot_pos = strlen(s); // assume no dot and append + for ( int pos = last_dot_pos; pos >= 0; --pos ) + { + if ( s[pos] == '.' ) + { + last_dot_pos = pos; + break; + } + } + return( &s[last_dot_pos] ); +} + +// Parse input string stream. Read and convert a hexa-decimal number up +// to a ``,'' or ``:'' or ``\0'' or end of stream. +uint_least32_t SidTuneTools::readHex( std::istrstream& hexin ) +{ + uint_least32_t hexLong = 0; + char c; + do + { + hexin >> c; + if ( !hexin ) + break; + if (( c != ',') && ( c != ':' ) && ( c != 0 )) + { + // machine independed to_upper + c &= 0xdf; + ( c < 0x3a ) ? ( c &= 0x0f ) : ( c -= ( 0x41 - 0x0a )); + hexLong <<= 4; + hexLong |= (uint_least32_t)c; + } + else + { + if ( c == 0 ) + hexin.putback(c); + break; + } + } while ( hexin ); + return hexLong; +} + +// Parse input string stream. Read and convert a decimal number up +// to a ``,'' or ``:'' or ``\0'' or end of stream. +uint_least32_t SidTuneTools::readDec( std::istrstream& decin ) +{ + uint_least32_t hexLong = 0; + char c; + do + { + decin >> c; + if ( !decin ) + break; + if (( c != ',') && ( c != ':' ) && ( c != 0 )) + { + c &= 0x0f; + hexLong *= 10; + hexLong += (uint_least32_t)c; + } + else + { + if ( c == 0 ) + decin.putback(c); + break; + } + } while ( decin ); + return hexLong; +} + +// Search terminated string for next newline sequence. +// Skip it and return pointer to start of next line. +const char* SidTuneTools::returnNextLine(const char* s) +{ + // Unix: LF = 0x0A + // Windows, DOS: CR,LF = 0x0D,0x0A + // Mac: CR = 0x0D + char c; + while ((c = *s) != 0) + { + s++; // skip read character + if (c == 0x0A) + { + break; // LF found + } + else if (c == 0x0D) + { + if (*s == 0x0A) + { + s++; // CR,LF found, skip LF + } + break; // CR or CR,LF found + } + } + if (*s == 0) // end of string ? + { + return 0; // no next line available + } + return s; // next line available +} + +// Skip any characters in an input string stream up to '='. +void SidTuneTools::skipToEqu( std::istrstream& parseStream ) +{ + char c; + do + { + parseStream >> c; + } + while ( c != '=' ); +} + +void SidTuneTools::copyStringValueToEOL(const char* pSourceStr, char* pDestStr, int DestMaxLen ) +{ + // Start at first character behind '='. + while ( *pSourceStr != '=' ) + { + pSourceStr++; + } + pSourceStr++; // Skip '='. + while (( DestMaxLen > 0 ) && ( *pSourceStr != 0 ) + && ( *pSourceStr != '\n' ) && ( *pSourceStr != '\r' )) + { + *pDestStr++ = *pSourceStr++; + DestMaxLen--; + } + *pDestStr++ = 0; +} |