// Copyright (C) 2021 The Qt Company Ltd.
// SPDX-License-Identifier: LicenseRef-Qt-Commercial OR LGPL-3.0-only OR GPL-2.0-only OR GPL-3.0-only

#include "qmediastoragelocation_p.h"

#include <QStandardPaths>
#include <QUrl>

QT_BEGIN_NAMESPACE

QDir QMediaStorageLocation::defaultDirectory(QStandardPaths::StandardLocation type)
{
    QStringList dirCandidates;

#if QT_CONFIG(mmrenderer)
    dirCandidates << QLatin1String("shared/camera");
#endif

    dirCandidates << QStandardPaths::writableLocation(type);
    dirCandidates << QStandardPaths::writableLocation(QStandardPaths::DocumentsLocation);
    dirCandidates << QDir::homePath();
    dirCandidates << QDir::currentPath();
    dirCandidates << QDir::tempPath();

    for (const QString &path : std::as_const(dirCandidates)) {
        QDir dir(path);
        if (dir.exists() && QFileInfo(path).isWritable())
            return dir;
    }

    return QDir();
}

static QString generateFileName(const QDir &dir, const QString &prefix, const QString &extension)
{
    auto lastMediaIndex = 0;
    const auto list = dir.entryList({ QStringLiteral("%1*.%2").arg(prefix, extension) });
    for (const QString &fileName : list) {
        auto mediaIndex = QStringView{fileName}.mid(prefix.size(), fileName.size() - prefix.size() - extension.size() - 1).toInt();
        lastMediaIndex = qMax(lastMediaIndex, mediaIndex);
    }

    const QString name = QStringLiteral("%1%2.%3")
            .arg(prefix)
            .arg(lastMediaIndex + 1, 4, 10, QLatin1Char('0'))
            .arg(extension);

    return dir.absoluteFilePath(name);
}


QString QMediaStorageLocation::generateFileName(const QString &requestedName,
                                                QStandardPaths::StandardLocation type,
                                                const QString &extension)
{
    using namespace Qt::StringLiterals;

    if (QUrl(requestedName).scheme() == "content"_L1)
        return requestedName;

    auto prefix = "clip_"_L1;
    switch (type) {
        case QStandardPaths::PicturesLocation: prefix = "image_"_L1; break;
        case QStandardPaths::MoviesLocation: prefix = "video_"_L1; break;
        case QStandardPaths::MusicLocation: prefix = "record_"_L1; break;
        default: break;
    }

    if (requestedName.isEmpty())
        return generateFileName(defaultDirectory(type), prefix, extension);

    QString path = requestedName;

    const QFileInfo fileInfo{ path };

    if (fileInfo.isRelative() && QUrl(path).isRelative())
        path = defaultDirectory(type).absoluteFilePath(path);

    if (fileInfo.isDir())
        return generateFileName(QDir(path), prefix, extension);

    if (fileInfo.suffix().isEmpty() && !extension.isEmpty()) {
        // File does not have an extension, so add the suggested one
        if (!path.endsWith(u'.'))
            path.append(u'.');
        path.append(extension);
    }
    return path;
}

QT_END_NAMESPACE
