13
0
livetrax/libs/pbd/convert.cc

315 lines
6.8 KiB
C++
Raw Normal View History

/*
* Copyright (C) 2006-2017 Paul Davis <paul@linuxaudiosystems.com>
* Copyright (C) 2006 Taybin Rutkin <taybin@taybin.com>
* Copyright (C) 2009-2012 Carl Hetherington <carl@carlh.net>
* Copyright (C) 2015-2019 Robin Gareus <robin@gareus.org>
*
* 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.,
* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
*/
#include <cmath>
#include <algorithm>
#include <string>
#include <stdint.h>
#include <stdlib.h>
#include <cstdio>
#include <ctype.h>
#include <cstring>
#ifndef __STDC_FORMAT_MACROS
#define __STDC_FORMAT_MACROS
#endif
#include <inttypes.h>
#include <glib.h>
#include "pbd/convert.h"
#include "pbd/i18n.h"
using std::string;
using std::vector;
using Glib::ustring;
namespace PBD {
string
capitalize (const string& str)
{
string ret = str;
if (!str.empty()) {
/* XXX not unicode safe */
ret[0] = toupper (str[0]);
}
return ret;
}
string
downcase (const string& str)
{
string copy (str);
std::transform (copy.begin(), copy.end(), copy.begin(), ::tolower);
return copy;
}
const char*
downcase (const char* str)
{
char *copy = strdup (str);
for (char* p = copy; *p; ++p) {
*p = tolower (*p);
}
return copy;
}
vector<string>
upcase (char const *array[])
{
vector<string> ret;
for (int n = 0; array[n]; ++n) {
string s (array[n]);
std::transform (s.begin(), s.end(), s.begin(), ::toupper);
ret.push_back (s);
}
return ret;
}
string
short_version (string orig, string::size_type target_length)
{
/* this tries to create a recognizable abbreviation
of "orig" by removing characters until we meet
a certain target length.
note that we deliberately leave digits in the result
without modification.
*/
string::size_type pos;
/* remove white-space and punctuation, starting at end */
while (orig.length() > target_length) {
if ((pos = orig.find_last_of (_("\"\n\t ,<.>/?:;'[{}]~`!@#$%^&*()_-+="))) == string::npos) {
break;
}
orig.replace (pos, 1, "");
}
/* remove lower-case vowels, starting at end */
while (orig.length() > target_length) {
if ((pos = orig.find_last_of (_("aeiou"))) == string::npos) {
break;
}
orig.replace (pos, 1, "");
}
/* remove upper-case vowels, starting at end */
while (orig.length() > target_length) {
if ((pos = orig.find_last_of (_("AEIOU"))) == string::npos) {
break;
}
orig.replace (pos, 1, "");
}
/* remove lower-case consonants, starting at end */
while (orig.length() > target_length) {
if ((pos = orig.find_last_of (_("bcdfghjklmnpqrtvwxyz"))) == string::npos) {
break;
}
orig.replace (pos, 1, "");
}
/* remove upper-case consonants, starting at end */
while (orig.length() > target_length) {
if ((pos = orig.find_last_of (_("BCDFGHJKLMNPQRTVWXYZ"))) == string::npos) {
break;
}
orig.replace (pos, 1, "");
}
/* whatever the length is now, use it */
2015-10-05 10:17:49 -04:00
return orig;
}
int
atoi (const string& s)
{
return ::atoi (s.c_str());
}
int32_t
atol (const string& s)
{
return (int32_t) ::atol (s.c_str());
}
int64_t
atoll (const string& s)
{
return (int64_t) ::atoll (s.c_str());
}
double
atof (const string& s)
{
return ::atof (s.c_str());
}
vector<string>
internationalize (const char *package_name, const char **array)
{
vector<string> v;
for (uint32_t i = 0; array[i]; ++i) {
v.push_back (dgettext(package_name, array[i]));
}
return v;
}
static int32_t
int_from_hex (char hic, char loc)
{
int hi; /* hi byte */
int lo; /* low byte */
hi = (int) hic;
if( ('0'<=hi) && (hi<='9') ) {
hi -= '0';
} else if( ('a'<= hi) && (hi<= 'f') ) {
hi -= ('a'-10);
} else if( ('A'<=hi) && (hi<='F') ) {
hi -= ('A'-10);
}
2015-10-05 10:17:49 -04:00
lo = (int) loc;
2015-10-05 10:17:49 -04:00
if( ('0'<=lo) && (lo<='9') ) {
lo -= '0';
} else if( ('a'<=lo) && (lo<='f') ) {
lo -= ('a'-10);
} else if( ('A'<=lo) && (lo<='F') ) {
lo -= ('A'-10);
}
return lo + (16 * hi);
}
string
url_decode (string const & url)
{
string decoded;
for (string::size_type i = 0; i < url.length(); ++i) {
if (url[i] == '+') {
decoded += ' ';
} else if (url[i] == '%' && i <= url.length() - 3) {
decoded += char (int_from_hex (url[i + 1], url[i + 2]));
i += 2;
} else {
decoded += url[i];
}
}
return decoded;
}
#if 0
string
length2string (const int32_t samples, const float sample_rate)
{
int32_t secs = (int32_t) (samples / sample_rate);
int32_t hrs = secs / 3600;
secs -= (hrs * 3600);
int32_t mins = secs / 60;
secs -= (mins * 60);
int32_t total_secs = (hrs * 3600) + (mins * 60) + secs;
int32_t samples_remaining = (int) floor (samples - (total_secs * sample_rate));
float fractional_secs = (float) samples_remaining / sample_rate;
char duration_str[32];
sprintf (duration_str, "%02" PRIi32 ":%02" PRIi32 ":%05.2f", hrs, mins, (float) secs + fractional_secs);
return duration_str;
}
#endif
string
length2string (const int64_t samples, const double sample_rate)
{
int64_t secs = (int64_t) floor (samples / sample_rate);
int64_t hrs = secs / 3600LL;
secs -= (hrs * 3600LL);
int64_t mins = secs / 60LL;
secs -= (mins * 60LL);
2015-10-05 10:17:49 -04:00
int64_t total_secs = (hrs * 3600LL) + (mins * 60LL) + secs;
int64_t samples_remaining = (int64_t) floor (samples - (total_secs * sample_rate));
float fractional_secs = (float) samples_remaining / sample_rate;
2015-10-05 10:17:49 -04:00
char duration_str[64];
sprintf (duration_str, "%02" PRIi64 ":%02" PRIi64 ":%05.2f", hrs, mins, (float) secs + fractional_secs);
2015-10-05 10:17:49 -04:00
return duration_str;
}
static bool
chars_equal_ignore_case(char x, char y)
{
/* app should have called setlocale() if its wants this comparison to be
locale sensitive.
*/
return toupper (x) == toupper (y);
}
bool
strings_equal_ignore_case (const string& a, const string& b)
{
if (a.length() == b.length()) {
return std::equal (a.begin(), a.end(), b.begin(), chars_equal_ignore_case);
}
return false;
}
/** A wrapper for dgettext that takes a msgid of the form Context|Text.
* If Context|Text is translated, the translation is returned, otherwise
* just Text is returned. Useful for getting translations of words or phrases
* that have different meanings in different contexts.
*/
const char *
sgettext (const char* domain_name, const char* msgid)
{
const char * msgval = dgettext (domain_name, msgid);
if (msgval == msgid) {
const char * p = strrchr (msgid, '|');
if (p) {
msgval = p + 1;
}
}
return msgval;
}
} // namespace PBD