/*
*/
/*
- * tuntap-socket-rawlinux create [<ifname>] => <sockid>
- * tuntap-socket-rawlinux ifname <sockid> => <ifname>
- * tuntap-socket-rawlinux close <sockid>
- * tuntap-socket-rawlinux receive <sockid> <data>
- * tuntap-socket-rawlinux on-transmit <sockid> <mtu> [<script>]
+ * tuntap-socket-raw create [<ifname>] => <sockid>
+ * tuntap-socket-raw ifname <sockid> => <ifname>
+ * tuntap-socket-raw close <sockid>
+ * tuntap-socket-raw receive <sockid> <data>
+ * tuntap-socket-raw on-transmit <sockid> <mtu> [<script>]
* calls, effectively, eval <script> [list <data> <socket>]
* if script not supplied, cancel
*/
IdDataTable tuntap_socks= { "tuntap" };
-int do_tuntap_socket_create(ClientData cd, Tcl_Interp *ip,
- const char *ifname, void **sock_r) {
+int do_tuntap_socket_raw_create(ClientData cd, Tcl_Interp *ip,
+ const char *ifname, void **sock_r) {
int fd, r;
struct ifreq ifr;
TuntapSocket *sock;
return TCL_OK;
}
-int do_tuntap_socket_receive(ClientData cd, Tcl_Interp *ip,
- void *sock_v, HBytes_Value data) {
+int do_tuntap_socket_raw_receive(ClientData cd, Tcl_Interp *ip,
+ void *sock_v, HBytes_Value data) {
TuntapSocket *sock= sock_v;
int l, r;
return TCL_OK;
}
-int do_tuntap_socket_ifname(ClientData cd, Tcl_Interp *ip,
- void *sock_v, const char **result) {
+int do_tuntap_socket_raw_ifname(ClientData cd, Tcl_Interp *ip,
+ void *sock_v, const char **result) {
TuntapSocket *sock= sock_v;
*result= sock->ifname;
return TCL_OK;
if (rc) Tcl_BackgroundError(ip);
}
-int do_tuntap_socket_on_transmit(ClientData cd, Tcl_Interp *ip, void *sock_v,
- long mtu, Tcl_Obj *newscript) {
+int do_tuntap_socket_raw_on_transmit(ClientData cd, Tcl_Interp *ip,
+ void *sock_v,
+ long mtu, Tcl_Obj *newscript) {
TuntapSocket *sock= sock_v;
int rc;
return TCL_OK;
}
-int do_tuntap_socket_close(ClientData cd, Tcl_Interp *ip, void *sock_v) {
+int do_tuntap_socket_raw_close(ClientData cd, Tcl_Interp *ip, void *sock_v) {
TuntapSocket *sock= sock_v;
int sockix;