/*
 * sim-write.S -- write interface for FT32 simulator
 *
 * Copyright (C) 2015 FTDI (support@ftdichip.com)
 *
 * The authors hereby grant permission to use, copy, modify, distribute,
 * and license this software and its documentation for any purpose, provided
 * that existing copyright notices are retained in all copies and that this
 * notice is included verbatim in any distributions. No written agreement,
 * license, or royalty fee is required for any of the authorized uses.
 * Modifications to this software may be copyrighted by their authors
 * and need not follow the licensing terms described here, provided that
 * the new terms are clearly indicated on the first page of each file where
 * they apply.
 */

#include "syscall.h"

/*
 * Input:
 * $r0            -- File descriptor.
 * $r1            -- String to be printed.
 * $r2      -- Length of the string.
 *
 * Output:
 * $r0          -- Length written or -1.
 * errno  -- Set if an error
 */

        .globl        _write
        .type        _write,@function
        .weak        write
        .text
_write:
write:

#         LDI.l   $r1,$r0,0
#         STA.l   MAGIC,$r1
#         jmp     .f
#
# .loop:
#         sta.l   0x10000,$r2
#         add.l   $r0,$r0,1
# .f:
#         ldi.b   $r2,$r0,0
#         cmp.b   $r2,0
#         jmpc    nz,.loop

        ldk.l   $r3,0x10000
        streamout.b $r3,$r1,$r2
        move.l  $r0,$r2

        return

.Lend:
        .size        _write,.Lend-_write