/*
ToolsMenu - Lets you add tools to the Workbench Tools menu
Copyright (C) 2015  Kim Fastrup Larsen

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, either version 3 of the License, or
(at your option) any later version.

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.  If not, see <http://www.gnu.org/licenses/>.

The author can be contacted on <kimflarsen@hotmail.com>.
*/

#include <exec/lists.h>
#include <exec/memory.h>

#include <clib/exec_protos.h>

#include <pragmas/exec_pragmas.h>

#include <string.h>

#include "util.h"

char *copy_of(const char *s)
{
    char *result;

    if ((result = AllocVec(strlen(s) + 1, MEMF_PUBLIC)) != NULL)
        strcpy(result, s);
    return result;
}

void for_all(const struct List *l, void (*f)(void *))
{
    struct Node *n, *next;

    /* This form of iteration allows f() to free nodes */
    for (n = l->lh_Head; (next = n->ln_Succ) != NULL; n = next)
        (*f)(n);
}

BOOL in_list(const struct List *l, const struct Node *node)
{
    struct Node *n;

    for (n = l->lh_Head; n->ln_Succ != NULL; n = n->ln_Succ)
        if (n == node)
            return TRUE;
    return FALSE;
}

struct Node *node_at(const struct List *l, UWORD i)
{
    struct Node *n;

    for (n = l->lh_Head; n->ln_Succ != NULL; n = n->ln_Succ) {
        if (i == 0)
            return n;
        --i;
    }
    return NULL;
}