diff options
author | Timothy Pearson <kb9vqf@pearsoncomputing.net> | 2013-01-27 01:04:32 -0600 |
---|---|---|
committer | Timothy Pearson <kb9vqf@pearsoncomputing.net> | 2013-01-27 01:04:32 -0600 |
commit | 793cf2dff35dffe3ec4c7b24252947dde758a1b2 (patch) | |
tree | 7d9972d99ed281a36418ae9f5fc128e3c951532c /tdefile-plugins/au | |
parent | 04f764aaf273340e1d5811d4216dd8127cacc5db (diff) | |
download | tdemultimedia-793cf2dff35dffe3ec4c7b24252947dde758a1b2.tar.gz tdemultimedia-793cf2dff35dffe3ec4c7b24252947dde758a1b2.zip |
Rename a number of libraries and executables to avoid conflicts with KDE4
Diffstat (limited to 'tdefile-plugins/au')
-rw-r--r-- | tdefile-plugins/au/Makefile.am | 22 | ||||
-rw-r--r-- | tdefile-plugins/au/tdefile_au.cpp | 172 | ||||
-rw-r--r-- | tdefile-plugins/au/tdefile_au.desktop | 67 | ||||
-rw-r--r-- | tdefile-plugins/au/tdefile_au.h | 38 |
4 files changed, 299 insertions, 0 deletions
diff --git a/tdefile-plugins/au/Makefile.am b/tdefile-plugins/au/Makefile.am new file mode 100644 index 00000000..054c6181 --- /dev/null +++ b/tdefile-plugins/au/Makefile.am @@ -0,0 +1,22 @@ +## Makefile.am for au file meta info plugin + +# set the include path for X, qt and KDE +INCLUDES = $(all_includes) + +# these are the headers for your project +noinst_HEADERS = tdefile_au.h + +kde_module_LTLIBRARIES = tdefile_au.la + +tdefile_au_la_SOURCES = tdefile_au.cpp +tdefile_au_la_LDFLAGS = $(all_libraries) $(KDE_RPATH) $(LIB_QT) -lDCOP $(LIB_TDECORE) $(LIB_TDEUI) -ltdefx $(LIB_KIO) -ltdetexteditor -module $(KDE_PLUGIN) +tdefile_au_la_LIBADD = $(LIB_KIO) + +# let automoc handle all of the meta source files (moc) +METASOURCES = AUTO + +messages: + $(XGETTEXT) tdefile_au.cpp -o $(podir)/tdefile_au.pot + +services_DATA = tdefile_au.desktop +servicesdir = $(kde_servicesdir) diff --git a/tdefile-plugins/au/tdefile_au.cpp b/tdefile-plugins/au/tdefile_au.cpp new file mode 100644 index 00000000..0b0b86f6 --- /dev/null +++ b/tdefile-plugins/au/tdefile_au.cpp @@ -0,0 +1,172 @@ +/* This file is part of the KDE project + * Copyright (C) 2002 Shane Wright <me@shanewright.co.uk> + * + * 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 version 2. + * + * 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; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, + * Boston, MA 02110-1301, USA. + * + */ + +#include <config.h> +#include "tdefile_au.h" + +#include <kprocess.h> +#include <klocale.h> +#include <kgenericfactory.h> +#include <kstringvalidator.h> +#include <kdebug.h> + +#include <tqdict.h> +#include <tqvalidator.h> +#include <tqcstring.h> +#include <tqfile.h> +#include <tqdatetime.h> + +#if !defined(__osf__) +#include <inttypes.h> +#else +typedef unsigned long uint32_t; +typedef unsigned short uint16_t; +#endif + +typedef KGenericFactory<KAuPlugin> AuFactory; + +K_EXPORT_COMPONENT_FACTORY(tdefile_au, AuFactory( "tdefile_au" )) + +KAuPlugin::KAuPlugin(TQObject *parent, const char *name, + const TQStringList &args) + + : KFilePlugin(parent, name, args) +{ + KFileMimeTypeInfo* info = addMimeTypeInfo( "audio/basic" ); + + KFileMimeTypeInfo::GroupInfo* group = 0L; + + group = addGroupInfo(info, "Technical", i18n("Technical Details")); + + KFileMimeTypeInfo::ItemInfo* item; + + item = addItemInfo(group, "Length", i18n("Length"), TQVariant::Int); + setSuffix(item, "s"); + + item = addItemInfo(group, "Sample Rate", i18n("Sample Rate"), TQVariant::Int); + setSuffix(item, "Hz"); + + item = addItemInfo(group, "Channels", i18n("Channels"), TQVariant::Int); + + item = addItemInfo(group, "Encoding", i18n("Encoding"), TQVariant::String); + +} + +bool KAuPlugin::readInfo( KFileMetaInfo& info, uint what) +{ + // the file signature, wants to be tidier... + const char fsig[] = { 0x2e, 0x73, 0x6e, 0x64 }; + + // a dword buffer for input + char inbuf[4]; + + // some vars for the file properties + uint32_t datasize; + uint32_t encoding; + uint32_t samplerate; + uint32_t channels; + uint16_t bytespersample; + + if ( info.path().isEmpty() ) // remote file + return false; + + TQFile file(info.path()); + + if (!file.open(IO_ReadOnly)) + { + kdDebug(7034) << "Couldn't open " << TQFile::encodeName(info.path()).data() << endl; + return false; + } + + TQDataStream dstream(&file); + + // AU files are big-endian + dstream.setByteOrder(TQDataStream::BigEndian); + + + // Read and verify the signature + dstream.readRawBytes(inbuf, 4); + if (memcmp(fsig, inbuf, 4)) + return false; + + // skip unwanted bits + file.at(8); + + // grab the bits we want + dstream >> datasize; + dstream >> encoding; + dstream >> samplerate; + dstream >> channels; + + // add the info + KFileMetaInfoGroup group = appendGroup(info, "Technical"); + appendItem(group, "Sample Rate", (uint) samplerate); + appendItem(group, "Channels", (uint) channels); + + // work out the encoding + switch (encoding) { + case 1 : + appendItem(group, "Encoding", i18n("8-bit ISDN u-law")); + bytespersample = 1; + break; + case 2 : + appendItem(group, "Encoding", i18n("8-bit linear PCM [REF-PCM]")); + bytespersample = 1; + break; + case 3 : + appendItem(group, "Encoding", i18n("16-bit linear PCM")); + bytespersample = 2; + break; + case 4 : + appendItem(group, "Encoding", i18n("24-bit linear PCM")); + bytespersample = 3; + break; + case 5 : + appendItem(group, "Encoding", i18n("32-bit linear PCM")); + bytespersample = 4; + break; + case 6 : + appendItem(group, "Encoding", i18n("32-bit IEEE floating point")); + bytespersample = 4; + break; + case 7 : + appendItem(group, "Encoding", i18n("64-bit IEEE floating point")); + bytespersample = 8; + break; + case 23 : + appendItem(group, "Encoding", i18n("8-bit ISDN u-law compressed")); + bytespersample = 1; + break; + default : + appendItem(group, "Encoding", i18n("Unknown")); + bytespersample = 0; + } + + // work out length from bytespersample + channels + size + if ((channels > 0) && (datasize > 0) && (datasize != 0xFFFFFFFF) && (bytespersample > 0) && (samplerate > 0)) { + uint32_t length = datasize / channels / bytespersample / samplerate; + appendItem(group, "Length", (uint) length); + } else { + appendItem(group, "Length", "???"); + } + + return true; +} + +#include "tdefile_au.moc" diff --git a/tdefile-plugins/au/tdefile_au.desktop b/tdefile-plugins/au/tdefile_au.desktop new file mode 100644 index 00000000..b3057140 --- /dev/null +++ b/tdefile-plugins/au/tdefile_au.desktop @@ -0,0 +1,67 @@ +[Desktop Entry] +Type=Service +Name=AU Info +Name[af]=Au Inligting +Name[bg]=Информация за AU +Name[br]=Titouroù AU +Name[bs]=AU informacije +Name[ca]=Informació AU +Name[cs]=AU info +Name[cy]=Gwybodaeth AU +Name[da]=AU-info +Name[de]=AU-Info +Name[el]=Πληροφορίες AU +Name[eo]=AU-informo +Name[es]=Info AU +Name[et]=AU info +Name[eu]=AU informazioa +Name[fa]=اطلاعات AU +Name[fi]=AU-tiedot +Name[fr]=Informations AU +Name[gl]=Información AU +Name[he]=מידע AU +Name[hi]=AU जानकारी +Name[hr]=AU Informacije +Name[hu]=AU-jellemzők +Name[is]=AU upplýsingar +Name[it]=Informazioni AU +Name[ja]=AU 情報 +Name[kk]=AU мәліметі +Name[km]=ព័ត៌មាន AU +Name[ko]=AU 정보 +Name[lt]=AU informacija +Name[mk]=AU информации +Name[nb]=AU informasjon +Name[nds]=AU-Info +Name[ne]=AU सूचना +Name[nl]=AU-informatie +Name[nn]=AU-info +Name[pa]=AU ਜਾਣਕਾਰੀ +Name[pl]=Informacja o pliku AU +Name[pt]=Informação do AU +Name[pt_BR]=Informação sobre AU +Name[ro]=Informaţii AU +Name[ru]=Сведения о AU +Name[se]=AU-dieđut +Name[sk]=AU info +Name[sl]=Podatki o AU +Name[sr]=Информације о AU-у +Name[sr@Latn]=Informacije o AU-u +Name[sv]=AU-information +Name[ta]=AU தகவல் +Name[tg]=AU Ахборот +Name[th]=ข้อมูล AU +Name[tr]=AU Bilgisi +Name[uk]=Інформація по AU +Name[uz]=XBM haqida maʼlumot +Name[uz@cyrillic]=XBM ҳақида маълумот +Name[xh]=Ulwazi lwe AU +Name[zh_CN]=AU 信息 +Name[zh_HK]=AU 資訊 +Name[zh_TW]=AU 資訊 +Name[zu]=Ulwazi lwe-AU +ServiceTypes=KFilePlugin +X-TDE-Library=tdefile_au +MimeType=audio/basic +PreferredGrous=Technical +PreferredItems=Length,Sample Rate,Channels,Encoding diff --git a/tdefile-plugins/au/tdefile_au.h b/tdefile-plugins/au/tdefile_au.h new file mode 100644 index 00000000..7ac18c9c --- /dev/null +++ b/tdefile-plugins/au/tdefile_au.h @@ -0,0 +1,38 @@ +/* This file is part of the KDE project + * Copyright (C) 2002 Shane Wright <me@shanewright.co.uk> + * + * 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 version 2. + * + * 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; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, + * Boston, MA 02110-1301, USA. + * + */ + +#ifndef __KFILE_AU_H__ +#define __KFILE_AU_H__ + +#include <tdefilemetainfo.h> + +class TQStringList; + +class KAuPlugin: public KFilePlugin +{ + Q_OBJECT + + +public: + KAuPlugin( TQObject *parent, const char *name, const TQStringList& args ); + + virtual bool readInfo( KFileMetaInfo& info, uint what); +}; + +#endif |