extra/io/serial/unix/bsd/bsd.factor

   1 ! Copyright (C) 2008 Doug Coleman.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: alien.syntax kernel math.bitwise sequences system io.serial
   4 literals ;
   5 IN: io.serial.unix
   6
   7 M: bsd lookup-baud ( m -- n )
   8     dup {
   9         0 50 75 110 134 150 200 300 600 1200 1800 2400 4800
  10         7200 9600 14400 19200 28800 38400 57600 76800 115200
  11         230400 460800 921600
  12     } member? [ invalid-baud ] unless ;
  13
  14 CONSTANT: TCSANOW     0
  15 CONSTANT: TCSADRAIN   1
  16 CONSTANT: TCSAFLUSH   2
  17 CONSTANT: TCSASOFT    HEX: 10
  18
  19 CONSTANT: TCIFLUSH    1
  20 CONSTANT: TCOFLUSH    2
  21 CONSTANT: TCIOFLUSH   3
  22 CONSTANT: TCOOFF      1
  23 CONSTANT: TCOON       2
  24 CONSTANT: TCIOFF      3
  25 CONSTANT: TCION       4
  26
  27 ! iflags
  28 CONSTANT: IGNBRK      HEX: 00000001
  29 CONSTANT: BRKINT      HEX: 00000002
  30 CONSTANT: IGNPAR      HEX: 00000004
  31 CONSTANT: PARMRK      HEX: 00000008
  32 CONSTANT: INPCK       HEX: 00000010
  33 CONSTANT: ISTRIP      HEX: 00000020
  34 CONSTANT: INLCR       HEX: 00000040
  35 CONSTANT: IGNCR       HEX: 00000080
  36 CONSTANT: ICRNL       HEX: 00000100
  37 CONSTANT: IXON        HEX: 00000200
  38 CONSTANT: IXOFF       HEX: 00000400
  39 CONSTANT: IXANY       HEX: 00000800
  40 CONSTANT: IMAXBEL     HEX: 00002000
  41 CONSTANT: IUTF8       HEX: 00004000
  42
  43 ! oflags
  44 CONSTANT: OPOST       HEX: 00000001
  45 CONSTANT: ONLCR       HEX: 00000002
  46 CONSTANT: OXTABS      HEX: 00000004
  47 CONSTANT: ONOEOT      HEX: 00000008
  48
  49 ! cflags
  50 CONSTANT: CIGNORE     HEX: 00000001
  51 CONSTANT: CSIZE       HEX: 00000300
  52 CONSTANT: CS5         HEX: 00000000
  53 CONSTANT: CS6         HEX: 00000100
  54 CONSTANT: CS7         HEX: 00000200
  55 CONSTANT: CS8         HEX: 00000300
  56 CONSTANT: CSTOPB      HEX: 00000400
  57 CONSTANT: CREAD       HEX: 00000800
  58 CONSTANT: PARENB      HEX: 00001000
  59 CONSTANT: PARODD      HEX: 00002000
  60 CONSTANT: HUPCL       HEX: 00004000
  61 CONSTANT: CLOCAL      HEX: 00008000
  62 CONSTANT: CCTS_OFLOW  HEX: 00010000
  63 CONSTANT: CRTS_IFLOW  HEX: 00020000
  64 CONSTANT: CRTSCTS flags{ CCTS_OFLOW CRTS_IFLOW }
  65 CONSTANT: CDTR_IFLOW  HEX: 00040000
  66 CONSTANT: CDSR_OFLOW  HEX: 00080000
  67 CONSTANT: CCAR_OFLOW  HEX: 00100000
  68 CONSTANT: MDMBUF      HEX: 00100000
  69
  70 ! lflags
  71 CONSTANT: ECHOKE      HEX: 00000001
  72 CONSTANT: ECHOE       HEX: 00000002
  73 CONSTANT: ECHOK       HEX: 00000004
  74 CONSTANT: ECHO        HEX: 00000008
  75 CONSTANT: ECHONL      HEX: 00000010
  76 CONSTANT: ECHOPRT     HEX: 00000020
  77 CONSTANT: ECHOCTL     HEX: 00000040
  78 CONSTANT: ISIG        HEX: 00000080
  79 CONSTANT: ICANON      HEX: 00000100
  80 CONSTANT: ALTWERASE   HEX: 00000200
  81 CONSTANT: IEXTEN      HEX: 00000400
  82 CONSTANT: EXTPROC     HEX: 00000800
  83 CONSTANT: TOSTOP      HEX: 00400000
  84 CONSTANT: FLUSHO      HEX: 00800000
  85 CONSTANT: NOKERNINFO  HEX: 02000000
  86 CONSTANT: PENDIN      HEX: 20000000
  87 CONSTANT: NOFLSH      HEX: 80000000