aboutsummaryrefslogtreecommitdiff
path: root/src/functionrange.cpp
blob: 624f246f1ba5b37fbe09414c75bd8591d4fc12cb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
/*
 * Copyright (C) 2007-2012 Xagasoft, All rights reserved.
 *
 * This file is part of the Xagasoft Build and is released under the
 * terms of the license contained in the file LICENSE.
 */

#include "functionrange.h"

#include <bu/plugger.h>
PluginInterface3( pluginFunctionRange, range, FunctionRange, Function,
        "Mike Buland", 0, 1 );

FunctionRange::FunctionRange()
{
}

FunctionRange::~FunctionRange()
{
}

Bu::String FunctionRange::getName() const
{
    return "range";
}

Variable FunctionRange::call( Variable &input, VarList lParams )
{
    Variable vRet( Variable::typeList );
    int iLow = 1;
    int iHigh = 1;
    int iStep = 1;
    if( lParams.getSize() == 1 )
    {
        iHigh = lParams.first().toInt();
    }
    else if( lParams.getSize() == 2 )
    {
        iLow = lParams.first().toInt();
        iHigh = lParams.last().toInt();
    }
    else if( lParams.getSize() == 3 )
    {
        VarList::iterator i = lParams.begin();
        iLow = (*i).toInt();
        i++;
        iHigh = (*i).toInt();
        i++;
        iStep = (*i).toInt();
    }
    if( iStep == 0 )
        throw Bu::ExceptionBase("Step cannot be zero.");

    if( iHigh < iLow )
    {
        if( iStep > 0 )
            throw Bu::ExceptionBase(
                "If start is less than end then step must be negative.");
        for( int j = iLow; j >= iHigh; j += iStep )
        {
            vRet.append( Variable( j ) );
        }
    }
    else
    {
        if( iStep < 0 )
            throw Bu::ExceptionBase(
                "If start is more than end then step must be positive.");
        for( int j = iLow; j <= iHigh; j += iStep )
        {
            vRet.append( Variable( j ) );
        }
    }


    return vRet;
}