summaryrefslogtreecommitdiffstats
path: root/tdefile-plugins/au
diff options
context:
space:
mode:
authorTimothy Pearson <kb9vqf@pearsoncomputing.net>2013-01-27 01:04:32 -0600
committerTimothy Pearson <kb9vqf@pearsoncomputing.net>2013-01-27 01:04:32 -0600
commit793cf2dff35dffe3ec4c7b24252947dde758a1b2 (patch)
tree7d9972d99ed281a36418ae9f5fc128e3c951532c /tdefile-plugins/au
parent04f764aaf273340e1d5811d4216dd8127cacc5db (diff)
downloadtdemultimedia-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.am22
-rw-r--r--tdefile-plugins/au/tdefile_au.cpp172
-rw-r--r--tdefile-plugins/au/tdefile_au.desktop67
-rw-r--r--tdefile-plugins/au/tdefile_au.h38
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