objiter.rs

/*
 * Various types to support iteration.
 */

use crate::pyobject::{
    PyContext, PyFuncArgs, PyObjectPayload, PyObjectRef, PyResult, TypeProtocol,
};
use crate::vm::VirtualMachine;

use super::objbool;
use super::objbytearray::PyByteArray;
use super::objbytes::PyBytes;
use super::objrange::PyRange;
use super::objtype;

/*
 * This helper function is called at multiple places. First, it is called
 * in the vm when a for loop is entered. Next, it is used when the builtin
 * function 'iter' is called.
 */
pub fn get_iter(vm: &mut VirtualMachine, iter_target: &PyObjectRef) -> PyResult {
    vm.call_method(iter_target, "__iter__", vec![])
    // let type_str = objstr::get_value(&vm.to_str(iter_target.typ()).unwrap());
    // let type_error = vm.new_type_error(format!("Cannot iterate over {}", type_str));
    // return Err(type_error);
}

pub fn call_next(vm: &mut VirtualMachine, iter_obj: &PyObjectRef) -> PyResult {
    vm.call_method(iter_obj, "__next__", vec![])
}

/*
 * Helper function to retrieve the next object (or none) from an iterator.
 */
pub fn get_next_object(
    vm: &mut VirtualMachine,
    iter_obj: &PyObjectRef,
) -> PyResult<Option<PyObjectRef>> {
    let next_obj: PyResult = call_next(vm, iter_obj);

    match next_obj {
        Ok(value) => Ok(Some(value)),
        Err(next_error) => {
            // Check if we have stopiteration, or something else:
            if objtype::isinstance(&next_error, &vm.ctx.exceptions.stop_iteration) {
                Ok(None)
            } else {
                Err(next_error)
            }
        }
    }
}

/* Retrieve all elements from an iterator */
pub fn get_all(vm: &mut VirtualMachine, iter_obj: &PyObjectRef) -> PyResult<Vec<PyObjectRef>> {
    let mut elements = vec![];
    loop {
        let element = get_next_object(vm, iter_obj)?;
        match element {
            Some(v) => elements.push(v),
            None => break,
        }
    }
    Ok(elements)
}

pub fn new_stop_iteration(vm: &mut VirtualMachine) -> PyObjectRef {
    let stop_iteration_type = vm.ctx.exceptions.stop_iteration.clone();
    vm.new_exception(stop_iteration_type, "End of iterator".to_string())
}

fn contains(vm: &mut VirtualMachine, args: PyFuncArgs, iter_type: PyObjectRef) -> PyResult {
    arg_check!(
        vm,
        args,
        required = [(iter, Some(iter_type)), (needle, None)]
    );
    loop {
        if let Some(element) = get_next_object(vm, iter)? {
            let equal = vm._eq(needle.clone(), element.clone())?;
            if objbool::get_value(&equal) {
                return Ok(vm.new_bool(true));
            } else {
                continue;
            }
        } else {
            return Ok(vm.new_bool(false));
        }
    }
}

/// Common setup for iter types, adds __iter__ and __contains__ methods
pub fn iter_type_init(context: &PyContext, iter_type: &PyObjectRef) {
    let contains_func = {
        let cloned_iter_type = iter_type.clone();
        move |vm: &mut VirtualMachine, args: PyFuncArgs| {
            contains(vm, args, cloned_iter_type.clone())
        }
    };
    context.set_attr(
        &iter_type,
        "__contains__",
        context.new_rustfunc(contains_func),
    );
    let iter_func = {
        let cloned_iter_type = iter_type.clone();
        move |vm: &mut VirtualMachine, args: PyFuncArgs| {
            arg_check!(
                vm,
                args,
                required = [(iter, Some(cloned_iter_type.clone()))]
            );
            // Return self:
            Ok(iter.clone())
        }
    };
    context.set_attr(&iter_type, "__iter__", context.new_rustfunc(iter_func));
}

// Sequence iterator:
fn iter_new(vm: &mut VirtualMachine, args: PyFuncArgs) -> PyResult {
    arg_check!(vm, args, required = [(iter_target, None)]);

    get_iter(vm, iter_target)
}

fn iter_next(vm: &mut VirtualMachine, args: PyFuncArgs) -> PyResult {
    arg_check!(vm, args, required = [(iter, Some(vm.ctx.iter_type()))]);

    if let PyObjectPayload::Iterator {
        ref position,
        iterated_obj: ref iterated_obj_ref,
    } = iter.payload
    {
        if let Some(range) = iterated_obj_ref.payload::<PyRange>() {
            if let Some(int) = range.get(position.get()) {
                position.set(position.get() + 1);
                Ok(vm.ctx.new_int(int))
            } else {
                Err(new_stop_iteration(vm))
            }
        } else if let Some(bytes) = iterated_obj_ref.payload::<PyBytes>() {
            if position.get() < bytes.len() {
                let obj_ref = vm.ctx.new_int(bytes[position.get()]);
                position.set(position.get() + 1);
                Ok(obj_ref)
            } else {
                Err(new_stop_iteration(vm))
            }
        } else if let Some(bytes) = iterated_obj_ref.payload::<PyByteArray>() {
            if position.get() < bytes.value.borrow().len() {
                let obj_ref = vm.ctx.new_int(bytes.value.borrow()[position.get()]);
                position.set(position.get() + 1);
                Ok(obj_ref)
            } else {
                Err(new_stop_iteration(vm))
            }
        } else {
            match iterated_obj_ref.payload {
                PyObjectPayload::Sequence { ref elements } => {
                    if position.get() < elements.borrow().len() {
                        let obj_ref = elements.borrow()[position.get()].clone();
                        position.set(position.get() + 1);
                        Ok(obj_ref)
                    } else {
                        Err(new_stop_iteration(vm))
                    }
                }
                _ => {
                    panic!("NOT IMPL");
                }
            }
        }
    } else {
        panic!("NOT IMPL");
    }
}

pub fn init(context: &PyContext) {
    let iter_type = &context.iter_type;

    let iter_doc = "iter(iterable) -> iterator\n\
                    iter(callable, sentinel) -> iterator\n\n\
                    Get an iterator from an object.  In the first form, the argument must\n\
                    supply its own iterator, or be a sequence.\n\
                    In the second form, the callable is called until it returns the sentinel.";

    iter_type_init(context, iter_type);
    context.set_attr(&iter_type, "__new__", context.new_rustfunc(iter_new));
    context.set_attr(&iter_type, "__next__", context.new_rustfunc(iter_next));
    context.set_attr(&iter_type, "__doc__", context.new_str(iter_doc.to_string()));
}