/*
 * Copyright 2008, Haiku.
 * Distributed under the terms of the MIT license.
 *
 * Authors:
 *              Michael Pfeiffer <laplace@users.sourceforge.net>
 */

#include "PrinterSelection.h"
#include "PPDParser.h"
#include "StatementListVisitor.h"
#include "UIUtils.h"

#include <Directory.h>
#include <Entry.h>
#include <Path.h>

#include <ScrollView.h>
#include <StringView.h>

// margin
const float kLeftMargin = 3.0;
const float kRightMargin = 3.0;
const float kTopMargin = 3.0;
const float kBottomMargin = 3.0;

// space between views
const float kHorizontalSpace = 8.0;
const float kVerticalSpace = 8.0;

#include <stdio.h>

PrinterSelectionView::PrinterSelectionView(BRect bounds, const char *name, uint32 resizeMask, uint32 flags) 
        : BView(bounds, name, resizeMask, flags) 
{       
        // add vendor list view 
        bounds.OffsetTo(0, 0);
        BRect listBounds(bounds.left + kLeftMargin, bounds.top + kTopMargin, 
                bounds.right / 3.0 - kHorizontalSpace / 2, bounds.bottom - kBottomMargin);
        listBounds.right -= B_V_SCROLL_BAR_WIDTH;
        listBounds.bottom -= B_H_SCROLL_BAR_HEIGHT;

        BStringView* label = new BStringView(listBounds, "vendors-label", "Vendors:");
        AddChild(label);
        label->ResizeToPreferred();
        
        listBounds.top += label->Bounds().bottom + 5;

        fVendors = new BListView(listBounds, "vendors", B_SINGLE_SELECTION_LIST,
                B_FOLLOW_ALL);
        FillVendors();

        BScrollView* scrollView = new BScrollView("vendors-scroll-view", 
                fVendors, B_FOLLOW_LEFT | B_FOLLOW_TOP_BOTTOM, 0, true, true);

        AddChild(scrollView);

        // add details view
        BRect printerBounds(listBounds);
        printerBounds.left = B_V_SCROLL_BAR_WIDTH + printerBounds.right + kHorizontalSpace;
        printerBounds.right = bounds.right - kRightMargin - B_V_SCROLL_BAR_WIDTH;
        printerBounds.top = bounds.top + kTopMargin;
        label = new BStringView(printerBounds, "printers-label", "Printers:");
        AddChild(label);
        label->ResizeToPreferred();

        BRect detailBounds(listBounds);
        detailBounds.left = B_V_SCROLL_BAR_WIDTH + detailBounds.right + kHorizontalSpace;
        detailBounds.right = bounds.right - kRightMargin - B_V_SCROLL_BAR_WIDTH;
        fPrinters = new BListView(detailBounds, "printers", B_SINGLE_SELECTION_LIST,
                B_FOLLOW_ALL);

        scrollView = new BScrollView("printers-scroll-view", 
                fPrinters, B_FOLLOW_LEFT | B_FOLLOW_TOP_BOTTOM, 0, true, true);

        AddChild(scrollView);
}

void PrinterSelectionView::AttachedToWindow()
{
        fVendors->SetSelectionMessage(new BMessage('sel'));
        fVendors->SetTarget(this);

        fPrinters->SetSelectionMessage(new BMessage('prnt'));
        fPrinters->SetTarget(this);
}


void PrinterSelectionView::FillVendors()
{
        BDirectory directory("/boot/beos/etc/ppd");
        BEntry entry;
        while (directory.GetNextEntry(&entry) == B_OK) {
                char name[B_FILE_NAME_LENGTH];
                entry.GetName(name);
                BPath path;
                entry.GetPath(&path);
                fVendors->AddItem(new FileItem(name, path.Path()));
        }
}

void PrinterSelectionView::FillPrinters(const char* vendor)
{
        MakeEmpty(fPrinters);
        
        BList printers;
        BDirectory directory(vendor);
        BEntry entry;
        while (directory.GetNextEntry(&entry) == B_OK) {
                char name[B_FILE_NAME_LENGTH];
                entry.GetName(name);
                BPath path;
                entry.GetPath(&path);
                
                PPDParser parser(path.Path());
                PPD* ppd = parser.ParseHeader();
                if (parser.HasWarning()) {
                        fprintf(stderr, "Warning(s): %s", parser.GetWarningMessage());
                }

                if (ppd != NULL) {
                
                        BString label;
                        const char* s;
                        s = ppd->GetValue("ModelName");
                        if (s != NULL) {
                                label << s;
                        }
                        s = ppd->GetValue("PCFileName");
                        if (s != NULL) {
                                label << " [" << s << "]";
                        }
                        s = ppd->GetValue("Manufacturer");
                        if (s != NULL) {
                                label << " (" << s << ")";      
                        }
                        printers.AddItem(new FileItem(label.String(), path.Path()));
                        delete ppd;
                } else {
                        fprintf(stderr, "Parsing error (%s)\n%s\n", path.Path(),
                                parser.GetErrorMessage());
                }
        }
        
        fPrinters->AddList(&printers);
}

void PrinterSelectionView::MessageReceived(BMessage* msg)
{
        int32 index;
        switch (msg->what) {
                case 'sel': 
                        if (msg->FindInt32("index", &index) == B_OK) {
                                FileItem* file = (FileItem*)fVendors->ItemAt(index);
                                if (file != NULL) {
                                        FillPrinters(file->GetFile());
                                }
                        }
                        break;
                case 'prnt': 
                        if (msg->FindInt32("index", &index) == B_OK) {
                                FileItem* file = (FileItem*)fPrinters->ItemAt(index);
                                if (file != NULL) {
                                        BMessage copy(*Message());
                                        copy.AddString("file", file->GetFile());
                                        InvokeNotify(&copy);
                                }
                        }
                        break;
        }
        BView::MessageReceived(msg);
}