diff options
Diffstat (limited to 'cups')
| -rw-r--r-- | cups/Makefile.am | 17 | ||||
| -rw-r--r-- | cups/cups.h | 32 | ||||
| -rw-r--r-- | cups/hcrp.c | 350 | ||||
| -rw-r--r-- | cups/main.c | 711 | ||||
| -rw-r--r-- | cups/sdp.c | 117 | ||||
| -rw-r--r-- | cups/spp.c | 116 |
6 files changed, 1343 insertions, 0 deletions
diff --git a/cups/Makefile.am b/cups/Makefile.am new file mode 100644 index 00000000..f01665ee --- /dev/null +++ b/cups/Makefile.am @@ -0,0 +1,17 @@ + +if CUPS +cupsdir = $(libdir)/cups/backend + +cups_PROGRAMS = bluetooth + +bluetooth_SOURCES = main.c cups.h sdp.c spp.c hcrp.c + +bluetooth_LDADD = $(top_builddir)/common/libhelper.a \ + @GDBUS_LIBS@ @GLIB_LIBS@ @DBUS_LIBS@ @BLUEZ_LIBS@ +endif + +AM_CFLAGS = @BLUEZ_CFLAGS@ @DBUS_CFLAGS@ @GLIB_CFLAGS@ @GDBUS_CFLAGS@ + +INCLUDES = -I$(top_srcdir)/common + +MAINTAINERCLEANFILES = Makefile.in diff --git a/cups/cups.h b/cups/cups.h new file mode 100644 index 00000000..c8de4ab8 --- /dev/null +++ b/cups/cups.h @@ -0,0 +1,32 @@ +/* + * + * BlueZ - Bluetooth protocol stack for Linux + * + * Copyright (C) 2003-2008 Marcel Holtmann <marcel@holtmann.org> + * + * + * 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 2 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, write to the Free Software + * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA + * + */ + +enum { /**** Backend exit codes ****/ + CUPS_BACKEND_OK = 0, /* Job completed successfully */ + CUPS_BACKEND_FAILED = 1, /* Job failed, use error-policy */ + CUPS_BACKEND_AUTH_REQUIRED = 2, /* Job failed, authentication required */ + CUPS_BACKEND_HOLD = 3, /* Job failed, hold job */ + CUPS_BACKEND_STOP = 4, /* Job failed, stop queue */ + CUPS_BACKEND_CANCEL = 5, /* Job failed, cancel job */ + CUPS_BACKEND_RETRY = 6, /* Failure requires us to retry (BlueZ specific) */ +}; diff --git a/cups/hcrp.c b/cups/hcrp.c new file mode 100644 index 00000000..5f0211e2 --- /dev/null +++ b/cups/hcrp.c @@ -0,0 +1,350 @@ +/* + * + * BlueZ - Bluetooth protocol stack for Linux + * + * Copyright (C) 2003-2008 Marcel Holtmann <marcel@holtmann.org> + * + * + * 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 2 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, write to the Free Software + * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA + * + */ + +#ifdef HAVE_CONFIG_H +#include <config.h> +#endif + +#include <stdio.h> +#include <errno.h> +#include <unistd.h> +#include <string.h> +#include <signal.h> +#include <sys/socket.h> + +#include <bluetooth/bluetooth.h> +#include <bluetooth/l2cap.h> + +#include <netinet/in.h> + +#include "cups.h" + +#define HCRP_PDU_CREDIT_GRANT 0x0001 +#define HCRP_PDU_CREDIT_REQUEST 0x0002 +#define HCRP_PDU_GET_LPT_STATUS 0x0005 + +#define HCRP_STATUS_FEATURE_UNSUPPORTED 0x0000 +#define HCRP_STATUS_SUCCESS 0x0001 +#define HCRP_STATUS_CREDIT_SYNC_ERROR 0x0002 +#define HCRP_STATUS_GENERIC_FAILURE 0xffff + +struct hcrp_pdu_hdr { + uint16_t pid; + uint16_t tid; + uint16_t plen; +} __attribute__ ((packed)); +#define HCRP_PDU_HDR_SIZE 6 + +struct hcrp_credit_grant_cp { + uint32_t credit; +} __attribute__ ((packed)); +#define HCRP_CREDIT_GRANT_CP_SIZE 4 + +struct hcrp_credit_grant_rp { + uint16_t status; +} __attribute__ ((packed)); +#define HCRP_CREDIT_GRANT_RP_SIZE 2 + +struct hcrp_credit_request_rp { + uint16_t status; + uint32_t credit; +} __attribute__ ((packed)); +#define HCRP_CREDIT_REQUEST_RP_SIZE 6 + +struct hcrp_get_lpt_status_rp { + uint16_t status; + uint8_t lpt_status; +} __attribute__ ((packed)); +#define HCRP_GET_LPT_STATUS_RP_SIZE 3 + +static int hcrp_credit_grant(int sk, uint16_t tid, uint32_t credit) +{ + struct hcrp_pdu_hdr hdr; + struct hcrp_credit_grant_cp cp; + struct hcrp_credit_grant_rp rp; + unsigned char buf[128]; + int len; + + hdr.pid = htons(HCRP_PDU_CREDIT_GRANT); + hdr.tid = htons(tid); + hdr.plen = htons(HCRP_CREDIT_GRANT_CP_SIZE); + cp.credit = credit; + memcpy(buf, &hdr, HCRP_PDU_HDR_SIZE); + memcpy(buf + HCRP_PDU_HDR_SIZE, &cp, HCRP_CREDIT_GRANT_CP_SIZE); + len = write(sk, buf, HCRP_PDU_HDR_SIZE + HCRP_CREDIT_GRANT_CP_SIZE); + + len = read(sk, buf, sizeof(buf)); + memcpy(&hdr, buf, HCRP_PDU_HDR_SIZE); + memcpy(&rp, buf + HCRP_PDU_HDR_SIZE, HCRP_CREDIT_GRANT_RP_SIZE); + + if (ntohs(rp.status) != HCRP_STATUS_SUCCESS) { + errno = EIO; + return -1; + } + + return 0; +} + +static int hcrp_credit_request(int sk, uint16_t tid, uint32_t *credit) +{ + struct hcrp_pdu_hdr hdr; + struct hcrp_credit_request_rp rp; + unsigned char buf[128]; + int len; + + hdr.pid = htons(HCRP_PDU_CREDIT_REQUEST); + hdr.tid = htons(tid); + hdr.plen = htons(0); + memcpy(buf, &hdr, HCRP_PDU_HDR_SIZE); + len = write(sk, buf, HCRP_PDU_HDR_SIZE); + + len = read(sk, buf, sizeof(buf)); + memcpy(&hdr, buf, HCRP_PDU_HDR_SIZE); + memcpy(&rp, buf + HCRP_PDU_HDR_SIZE, HCRP_CREDIT_REQUEST_RP_SIZE); + + if (ntohs(rp.status) != HCRP_STATUS_SUCCESS) { + errno = EIO; + return -1; + } + + if (credit) + *credit = ntohl(rp.credit); + + return 0; +} + +static int hcrp_get_lpt_status(int sk, uint16_t tid, uint8_t *lpt_status) +{ + struct hcrp_pdu_hdr hdr; + struct hcrp_get_lpt_status_rp rp; + unsigned char buf[128]; + int len; + + hdr.pid = htons(HCRP_PDU_GET_LPT_STATUS); + hdr.tid = htons(tid); + hdr.plen = htons(0); + memcpy(buf, &hdr, HCRP_PDU_HDR_SIZE); + len = write(sk, buf, HCRP_PDU_HDR_SIZE); + + len = read(sk, buf, sizeof(buf)); + memcpy(&hdr, buf, HCRP_PDU_HDR_SIZE); + memcpy(&rp, buf + HCRP_PDU_HDR_SIZE, HCRP_GET_LPT_STATUS_RP_SIZE); + + if (ntohs(rp.status) != HCRP_STATUS_SUCCESS) { + errno = EIO; + return -1; + } + + if (lpt_status) + *lpt_status = rp.lpt_status; + + return 0; +} + +static inline int hcrp_get_next_tid(int tid) +{ + if (tid > 0xf000) + return 0; + else + return tid + 1; +} + +int hcrp_print(bdaddr_t *src, bdaddr_t *dst, unsigned short ctrl_psm, unsigned short data_psm, int fd, int copies, const char *cups_class) +{ + struct sockaddr_l2 addr; + struct l2cap_options opts; + socklen_t size; + unsigned char buf[2048]; + int i, ctrl_sk, data_sk, mtu, count, len, timeout = 0; + uint8_t status; + uint16_t tid = 0; + uint32_t tmp, credit = 0; + + if ((ctrl_sk = socket(PF_BLUETOOTH, SOCK_SEQPACKET, BTPROTO_L2CAP)) < 0) { + perror("ERROR: Can't create socket"); + if (cups_class) + return CUPS_BACKEND_FAILED; + else + return CUPS_BACKEND_RETRY; + } + + memset(&addr, 0, sizeof(addr)); + addr.l2_family = AF_BLUETOOTH; + bacpy(&addr.l2_bdaddr, src); + + if (bind(ctrl_sk, (struct sockaddr *) &addr, sizeof(addr)) < 0) { + perror("ERROR: Can't bind socket"); + close(ctrl_sk); + if (cups_class) + return CUPS_BACKEND_FAILED; + else + return CUPS_BACKEND_RETRY; + } + + memset(&addr, 0, sizeof(addr)); + addr.l2_family = AF_BLUETOOTH; + bacpy(&addr.l2_bdaddr, dst); + addr.l2_psm = htobs(ctrl_psm); + + if (connect(ctrl_sk, (struct sockaddr *) &addr, sizeof(addr)) < 0) { + perror("ERROR: Can't connect to device"); + close(ctrl_sk); + if (cups_class) + return CUPS_BACKEND_FAILED; + else + return CUPS_BACKEND_RETRY; + } + + if ((data_sk = socket(PF_BLUETOOTH, SOCK_SEQPACKET, BTPROTO_L2CAP)) < 0) { + perror("ERROR: Can't create socket"); + close(ctrl_sk); + if (cups_class) + return CUPS_BACKEND_FAILED; + else + return CUPS_BACKEND_RETRY; + } + + memset(&addr, 0, sizeof(addr)); + addr.l2_family = AF_BLUETOOTH; + bacpy(&addr.l2_bdaddr, src); + + if (bind(data_sk, (struct sockaddr *) &addr, sizeof(addr)) < 0) { + perror("ERROR: Can't bind socket"); + close(data_sk); + close(ctrl_sk); + if (cups_class) + return CUPS_BACKEND_FAILED; + else + return CUPS_BACKEND_RETRY; + } + + memset(&addr, 0, sizeof(addr)); + addr.l2_family = AF_BLUETOOTH; + bacpy(&addr.l2_bdaddr, dst); + addr.l2_psm = htobs(data_psm); + + if (connect(data_sk, (struct sockaddr *) &addr, sizeof(addr)) < 0) { + perror("ERROR: Can't connect to device"); + close(data_sk); + close(ctrl_sk); + if (cups_class) + return CUPS_BACKEND_FAILED; + else + return CUPS_BACKEND_RETRY; + } + + fputs("STATE: -connecting-to-device\n", stderr); + + memset(&opts, 0, sizeof(opts)); + size = sizeof(opts); + + if (getsockopt(data_sk, SOL_L2CAP, L2CAP_OPTIONS, &opts, &size) < 0) { + perror("ERROR: Can't get socket options"); + close(data_sk); + close(ctrl_sk); + if (cups_class) + return CUPS_BACKEND_FAILED; + else + return CUPS_BACKEND_RETRY; + } + + mtu = opts.omtu; + + /* Ignore SIGTERM signals if printing from stdin */ + if (fd == 0) { +#ifdef HAVE_SIGSET + sigset(SIGTERM, SIG_IGN); +#elif defined(HAVE_SIGACTION) + memset(&action, 0, sizeof(action)); + sigemptyset(&action.sa_mask); + action.sa_handler = SIG_IGN; + sigaction(SIGTERM, &action, NULL); +#else + signal(SIGTERM, SIG_IGN); +#endif /* HAVE_SIGSET */ + } + + tid = hcrp_get_next_tid(tid); + if (hcrp_credit_grant(ctrl_sk, tid, 0) < 0) { + fprintf(stderr, "ERROR: Can't grant initial credits\n"); + close(data_sk); + close(ctrl_sk); + if (cups_class) + return CUPS_BACKEND_FAILED; + else + return CUPS_BACKEND_RETRY; + } + + for (i = 0; i < copies; i++) { + + if (fd != 0) { + fprintf(stderr, "PAGE: 1 1\n"); + lseek(fd, 0, SEEK_SET); + } + + while (1) { + if (credit < mtu) { + tid = hcrp_get_next_tid(tid); + if (!hcrp_credit_request(ctrl_sk, tid, &tmp)) { + credit += tmp; + timeout = 0; + } + } + + if (!credit) { + if (timeout++ > 300) { + tid = hcrp_get_next_tid(tid); + if (!hcrp_get_lpt_status(ctrl_sk, tid, &status)) + fprintf(stderr, "ERROR: LPT status 0x%02x\n", status); + break; + } + + sleep(1); + continue; + } + + count = read(fd, buf, (credit > mtu) ? mtu : credit); + if (count <= 0) + break; + + len = write(data_sk, buf, count); + if (len < 0) { + perror("ERROR: Error writing to device"); + close(data_sk); + close(ctrl_sk); + return CUPS_BACKEND_FAILED; + } + + if (len != count) + fprintf(stderr, "ERROR: Can't send complete data\n"); + + credit -= len; + } + + } + + close(data_sk); + close(ctrl_sk); + + return CUPS_BACKEND_OK; +} diff --git a/cups/main.c b/cups/main.c new file mode 100644 index 00000000..001d6788 --- /dev/null +++ b/cups/main.c @@ -0,0 +1,711 @@ +/* + * + * BlueZ - Bluetooth protocol stack for Linux + * + * Copyright (C) 2003-2008 Marcel Holtmann <marcel@holtmann.org> + * + * + * 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 2 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, write to the Free Software + * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA + * + */ + +#ifdef HAVE_CONFIG_H +#include <config.h> +#endif + +#include <stdio.h> +#include <errno.h> +#include <fcntl.h> +#include <unistd.h> +#include <stdlib.h> +#include <string.h> +#include <signal.h> +#include <sys/socket.h> + +#include <bluetooth/bluetooth.h> +#include <bluetooth/sdp.h> +#include <bluetooth/sdp_lib.h> + +#include <gdbus.h> + +#include "cups.h" +#include "sdp-xml.h" + +extern int sdp_search_spp(sdp_session_t *sdp, uint8_t *channel); +extern int sdp_search_hcrp(sdp_session_t *sdp, unsigned short *ctrl_psm, unsigned short *data_psm); + +extern int spp_print(bdaddr_t *src, bdaddr_t *dst, uint8_t channel, int fd, int copies, const char *cups_class); +extern int hcrp_print(bdaddr_t *src, bdaddr_t *dst, unsigned short ctrl_psm, unsigned short data_psm, int fd, int copies, const char *cups_class); + +#define PRINTER_SERVICE_CLASS_NAME "printer" + +struct cups_device { + char *bdaddr; + char *name; + char *id; +}; + +static GSList *device_list = NULL; +static GMainLoop *loop = NULL; +static DBusConnection *conn = NULL; + +#define ATTRID_1284ID 0x0300 + +static char *parse_xml_sdp(const char *xml) +{ + sdp_record_t *sdp_record; + sdp_list_t *l; + char *str = NULL; + + sdp_record = sdp_xml_parse_record(xml, strlen(xml)); + if (sdp_record == NULL) + return NULL; + for (l = sdp_record->attrlist; l != NULL; l = l->next) { + sdp_data_t *data; + + data = (sdp_data_t *) l->data; + if (data->attrId != ATTRID_1284ID) + continue; + /* Ignore the length, it's null terminated */ + str = g_strdup(data->val.str + 2); + break; + } + sdp_record_free(sdp_record); + + return str; +} + +static char *device_get_ieee1284_id(const char *adapter, const char *bdaddr) +{ + guint service_handle; + DBusMessage *message, *reply; + DBusMessageIter iter, reply_iter, iter_array; + const char *hcr_print = "00001126-0000-1000-8000-00805f9b34fb"; + char *xml, *id; + + /* Look for the service handle of the HCRP service */ + message = dbus_message_new_method_call("org.bluez", adapter, + "org.bluez.Adapter", + "GetRemoteServiceHandles"); + dbus_message_iter_init_append(message, &iter); + dbus_message_iter_append_basic(&iter, DBUS_TYPE_STRING, &bdaddr); + dbus_message_iter_append_basic(&iter, DBUS_TYPE_STRING, &hcr_print); + + reply = dbus_connection_send_with_reply_and_block(conn, + message, -1, NULL); + + dbus_message_unref(message); + + if (!reply) + return NULL; + + dbus_message_iter_init(reply, &reply_iter); + if (dbus_message_iter_get_arg_type(&reply_iter) != DBUS_TYPE_ARRAY) { + dbus_message_unref(reply); + return NULL; + } + + /* Hopefully we only get one handle, or take a punt */ + dbus_message_iter_recurse(&reply_iter, &iter_array); + while (dbus_message_iter_get_arg_type(&iter_array) == DBUS_TYPE_UINT32) { + dbus_message_iter_get_basic(&iter_array, &service_handle); + dbus_message_iter_next(&iter_array); + } + + dbus_message_unref(reply); + + /* Now get the XML for the HCRP service record */ + message = dbus_message_new_method_call("org.bluez", adapter, + "org.bluez.Adapter", + "GetRemoteServiceRecordAsXML"); + dbus_message_iter_init_append(message, &iter); + dbus_message_iter_append_basic(&iter, DBUS_TYPE_STRING, &bdaddr); + dbus_message_iter_append_basic(&iter, DBUS_TYPE_UINT32, &service_handle); + + reply = dbus_connection_send_with_reply_and_block(conn, + message, -1, NULL); + + dbus_message_unref(message); + + if (!reply) + return NULL; + + dbus_message_iter_init(reply, &reply_iter); + dbus_message_iter_get_basic(&reply_iter, &xml); + + id = parse_xml_sdp(xml); + + dbus_message_unref(reply); + + return id; +} + +static void add_device_to_list(const char *name, const char *bdaddr, const char *id) +{ + struct cups_device *device; + GSList *l; + + /* Look for the device in the list */ + for (l = device_list; l != NULL; l = l->next) { + device = (struct cups_device *) l->data; + + if (strcmp(device->bdaddr, bdaddr) == 0) { + g_free(device->name); + device->name = g_strdup(name); + return; + } + } + + /* Or add it to the list if it's not there */ + device = g_new0(struct cups_device, 1); + device->bdaddr = g_strdup(bdaddr); + device->name = g_strdup(name); + device->id = g_strdup(id); + + device_list = g_slist_prepend(device_list, device); +} + +static char *escape_name(const char *str, char orig, char dest) +{ + char *ret, *s; + + ret = g_strdup(str); + while ((s = strchr(ret, orig)) != NULL) + s[0] = dest; + return ret; +} + +static void print_printer_details(const char *name, const char *bdaddr, const char *id) +{ + char *uri, *escaped; + guint len; + + escaped = escape_name(name, '\"', '\''); + len = strlen("bluetooth://") + 12 + 1; + uri = g_malloc(len); + snprintf(uri, len, "bluetooth://%c%c%c%c%c%c%c%c%c%c%c%c", + bdaddr[0], bdaddr[1], + bdaddr[3], bdaddr[4], + bdaddr[6], bdaddr[7], + bdaddr[9], bdaddr[10], + bdaddr[12], bdaddr[13], + bdaddr[15], bdaddr[16]); + printf("network %s \"Unknown\" \"%s (Bluetooth)\"", uri, escaped); + if (id != NULL) + printf(" \"%s\"\n", id); + else + printf ("\n"); + g_free(escaped); + g_free(uri); +} + +static gboolean device_is_printer(const char *adapter, const char *bdaddr) +{ + char *class; + DBusMessage *message, *reply; + DBusMessageIter iter, reply_iter; + + message = dbus_message_new_method_call("org.bluez", adapter, + "org.bluez.Adapter", + "GetRemoteMinorClass"); + dbus_message_iter_init_append(message, &iter); + dbus_message_iter_append_basic(&iter, DBUS_TYPE_STRING, &bdaddr); + + reply = dbus_connection_send_with_reply_and_block(conn, + message, -1, NULL); + + dbus_message_unref(message); + + if (!reply) + return FALSE; + + dbus_message_iter_init(reply, &reply_iter); + dbus_message_iter_get_basic(&reply_iter, &class); + + if (class != NULL && strcmp(class, PRINTER_SERVICE_CLASS_NAME) == 0) { + dbus_message_unref(reply); + return TRUE; + } + + return FALSE; +} + +static char *device_get_name(const char *adapter, const char *bdaddr) +{ + DBusMessage *message, *reply; + DBusMessageIter iter, reply_iter; + char *name; + + message = dbus_message_new_method_call("org.bluez", adapter, + "org.bluez.Adapter", + "GetRemoteName"); + dbus_message_iter_init_append(message, &iter); + dbus_message_iter_append_basic(&iter, DBUS_TYPE_STRING, &bdaddr); + + reply = dbus_connection_send_with_reply_and_block(conn, + message, -1, NULL); + + dbus_message_unref(message); + + if (!reply) + return NULL; + + dbus_message_iter_init(reply, &reply_iter); + dbus_message_iter_get_basic(&reply_iter, &name); + + name = g_strdup(name); + dbus_message_unref(reply); + + return name; +} + +static void remote_device_found(const char *adapter, const char *bdaddr, guint class, int rssi) +{ + uint8_t major_index = (class >> 8) & 0x1F; + uint8_t minor_index; + uint8_t shift_minor = 0; + gboolean found = FALSE; + char *name, *id; + + /* Check if we have a printer + * From hcid/dbus-adapter.c minor_class_str() */ + if (major_index != 6) + return; + + minor_index = (class >> 4) & 0x0F; + while (shift_minor < 4) { + if (((minor_index >> shift_minor) & 0x01) == 0x01) { + if (shift_minor == 3) { + found = TRUE; + break; + } + } + shift_minor++; + } + + if (!found) + return; + + name = device_get_name(adapter, bdaddr); + id = device_get_ieee1284_id(adapter, bdaddr); + add_device_to_list(name, bdaddr, id); + g_free(name); + g_free(id); +} + +static void remote_name_updated(const char *bdaddr, const char *name) +{ + add_device_to_list(name, bdaddr, NULL); +} + +static void discovery_completed(void) +{ + GSList *l; + + for (l = device_list; l != NULL; l = l->next) { + struct cups_device *device = (struct cups_device *) l->data; + + if (device->name == NULL) + device->name = escape_name(device->bdaddr, ':', '-'); + print_printer_details(device->name, device->bdaddr, device->id); + g_free(device->name); + g_free(device->bdaddr); + g_free(device->id); + g_free(device); + } + + g_slist_free(device_list); + device_list = NULL; + + g_main_loop_quit(loop); +} + +static void remote_device_disappeared(const char *bdaddr) +{ + GSList *l; + + for (l = device_list; l != NULL; l = l->next) { + struct cups_device *device = (struct cups_device *) l->data; + + if (strcmp(device->bdaddr, bdaddr) == 0) { + g_free(device->name); + g_free(device->bdaddr); + g_free(device); + device_list = g_slist_delete_link(device_list, l); + return; + } + } +} + +static gboolean list_known_printers(const char *adapter) +{ + DBusMessageIter reply_iter, iter_array; + DBusError error; + DBusMessage *message, *reply; + + message = dbus_message_new_method_call ("org.bluez", adapter, + "org.bluez.Adapter", + "ListRemoteDevices"); + if (message == NULL) + return FALSE; + + dbus_error_init(&error); + reply = dbus_connection_send_with_reply_and_block(conn, + message, -1, &error); + + dbus_message_unref(message); + + if (&error != NULL && dbus_error_is_set(&error)) + return FALSE; + + dbus_message_iter_init(reply, &reply_iter); + if (dbus_message_iter_get_arg_type(&reply_iter) != DBUS_TYPE_ARRAY) { + dbus_message_unref(reply); + return FALSE; + } + + dbus_message_iter_recurse(&reply_iter, &iter_array); + while (dbus_message_iter_get_arg_type(&iter_array) == DBUS_TYPE_STRING) { + char *bdaddr; + + dbus_message_iter_get_basic(&iter_array, &bdaddr); + if (device_is_printer(adapter, bdaddr)) { + char *name, *id; + name = device_get_name(adapter, bdaddr); + id = device_get_ieee1284_id(adapter, bdaddr); + add_device_to_list(name, bdaddr, id); + g_free(name); + g_free(id); + } + dbus_message_iter_next(&iter_array); + } + + dbus_message_unref(reply); + + return FALSE; +} + +static DBusHandlerResult filter_func(DBusConnection *connection, DBusMessage *message, void *user_data) +{ + const char *adapter; + + if (dbus_message_is_signal(message, "org.bluez.Adapter", + "RemoteDeviceFound")) { + char *bdaddr; + guint class; + int rssi; + + dbus_message_get_args(message, NULL, + DBUS_TYPE_STRING, &bdaddr, + DBUS_TYPE_UINT32, &class, + DBUS_TYPE_INT32, &rssi, + DBUS_TYPE_INVALID); + adapter = dbus_message_get_path(message); + remote_device_found(adapter, bdaddr, class, rssi); + } else if (dbus_message_is_signal(message, "org.bluez.Adapter", + "RemoteNameUpdated")) { + char *bdaddr, *name; + + dbus_message_get_args(message, NULL, + DBUS_TYPE_STRING, &bdaddr, + DBUS_TYPE_STRING, &name, + DBUS_TYPE_INVALID); + remote_name_updated(bdaddr, name); + } else if (dbus_message_is_signal(message, "org.bluez.Adapter", + "RemoteDeviceDisappeared")) { + char *bdaddr; + + dbus_message_get_args(message, NULL, + DBUS_TYPE_STRING, &bdaddr, + DBUS_TYPE_INVALID); + remote_device_disappeared(bdaddr); + } else if (dbus_message_is_signal(message, "org.bluez.Adapter", + "DiscoveryCompleted")) { + discovery_completed(); + } + + return DBUS_HANDLER_RESULT_NOT_YET_HANDLED; +} + +static gboolean list_printers(void) +{ + /* 1. Connect to the bus + * 2. Get the manager + * 3. Get the default adapter + * 4. Get a list of devices + * 5. Get the class of each device + * 6. Print the details from each printer device + */ + DBusError error; + dbus_bool_t hcid_exists; + DBusMessage *reply, *message; + DBusMessageIter reply_iter; + char *adapter, *match; + guint len; + + conn = g_dbus_setup_bus(DBUS_BUS_SYSTEM, NULL, NULL); + if (conn == NULL) + return FALSE; + + dbus_error_init(&error); + hcid_exists = dbus_bus_name_has_owner(conn, "org.bluez", &error); + if (&error != NULL && dbus_error_is_set(&error)) + return FALSE; + + if (!hcid_exists) + return FALSE; + + /* Get the default adapter */ + message = dbus_message_new_method_call("org.bluez", "/org/bluez", + "org.bluez.Manager", + "DefaultAdapter"); + if (message == NULL) { + dbus_connection_unref(conn); + return FALSE; + } + + reply = dbus_connection_send_with_reply_and_block(conn, + message, -1, &error); + + dbus_message_unref(message); + + if (&error != NULL && dbus_error_is_set(&error)) { + dbus_connection_unref(conn); + return FALSE; + } + + dbus_message_iter_init(reply, &reply_iter); + if (dbus_message_iter_get_arg_type(&reply_iter) != DBUS_TYPE_STRING) { + dbus_message_unref(reply); + dbus_connection_unref(conn); + return FALSE; + } + + dbus_message_iter_get_basic(&reply_iter, &adapter); + adapter = g_strdup(adapter); + dbus_message_unref(reply); + + if (!dbus_connection_add_filter(conn, filter_func, adapter, g_free)) { + g_free(adapter); + dbus_connection_unref(conn); + return FALSE; + } + +#define MATCH_FORMAT \ + "type='signal'," \ + "interface='org.bluez.Adapter'," \ + "sender='org.bluez'," \ + "path='%s'" + + len = strlen(MATCH_FORMAT) - 2 + strlen(adapter) + 1; + match = g_malloc(len); + snprintf(match, len, "type='signal'," + "interface='org.bluez.Adapter'," + "sender='org.bluez'," + "path='%s'", + adapter); + dbus_bus_add_match(conn, match, &error); + g_free(match); + + message = dbus_message_new_method_call("org.bluez", adapter, + "org.bluez.Adapter", + "DiscoverDevicesWithoutNameResolving"); + + if (!dbus_connection_send_with_reply(conn, message, NULL, -1)) { + dbus_message_unref(message); + dbus_connection_unref(conn); + g_free(adapter); + return FALSE; + } + dbus_message_unref(message); + + /* Also add the the recent devices */ + g_timeout_add(0, (GSourceFunc) list_known_printers, adapter); + + loop = g_main_loop_new(NULL, TRUE); + g_main_loop_run(loop); + + dbus_connection_unref(conn); + + return TRUE; +} + +/* + * Usage: printer-uri job-id user title copies options [file] + * + */ + +int main(int argc, char *argv[]) +{ + sdp_session_t *sdp; + bdaddr_t bdaddr; + unsigned short ctrl_psm, data_psm; + uint8_t channel, b[6]; + char *ptr, str[3], device[18], service[12]; + const char *uri, *cups_class; + int i, err, fd, copies, proto; + + /* Make sure status messages are not buffered */ + setbuf(stderr, NULL); + + /* Ignore SIGPIPE signals */ +#ifdef HAVE_SIGSET + sigset(SIGPIPE, SIG_IGN); +#elif defined(HAVE_SIGACTION) + memset(&action, 0, sizeof(action)); + action.sa_handler = SIG_IGN; + sigaction(SIGPIPE, &action, NULL); +#else + signal(SIGPIPE, SIG_IGN); +#endif /* HAVE_SIGSET */ + + if (argc == 1) { + if (list_printers() == TRUE) + return CUPS_BACKEND_OK; + else + return CUPS_BACKEND_FAILED; + } + + if (argc < 6 || argc > 7) { + fprintf(stderr, "Usage: bluetooth job-id user title copies options [file]\n"); + return CUPS_BACKEND_FAILED; + } + + if (argc == 6) { + fd = 0; + copies = 1; + } else { + if ((fd = open(argv[6], O_RDONLY)) < 0) { + perror("ERROR: Unable to open print file"); + return CUPS_BACKEND_FAILED; + } + copies = atoi(argv[4]); + } + + uri = getenv("DEVICE_URI"); + if (!uri) + uri = argv[0]; + + if (strncasecmp(uri, "bluetooth://", 12)) { + fprintf(stderr, "ERROR: No device URI found\n"); + return CUPS_BACKEND_FAILED; + } + + ptr = argv[0] + 12; + for (i = 0; i < 6; i++) { + strncpy(str, ptr, 2); + b[i] = (uint8_t) strtol(str, NULL, 16); + ptr += 2; + } + sprintf(device, "%2.2X:%2.2X:%2.2X:%2.2X:%2.2X:%2.2X", + b[0], b[1], b[2], b[3], b[4], b[5]); + + str2ba(device, &bdaddr); + + ptr = strchr(ptr, '/'); + if (ptr) { + strncpy(service, ptr + 1, 12); + + if (!strncasecmp(ptr + 1, "spp", 3)) + proto = 1; + else if (!strncasecmp(ptr + 1, "hcrp", 4)) + proto = 2; + else + proto = 0; + } else { + strcpy(service, "auto"); + proto = 0; + } + + cups_class = getenv("CLASS"); + + fprintf(stderr, "DEBUG: %s device %s service %s fd %d copies %d class %s\n", + argv[0], device, service, fd, copies, + cups_class ? cups_class : "(none)"); + + fputs("STATE: +connecting-to-device\n", stderr); + +service_search: + sdp = sdp_connect(BDADDR_ANY, &bdaddr, SDP_RETRY_IF_BUSY); + if (!sdp) { + fprintf(stderr, "ERROR: Can't open Bluetooth connection\n"); + return CUPS_BACKEND_FAILED; + } + + switch (proto) { + case 1: + err = sdp_search_spp(sdp, &channel); + break; + case 2: + err = sdp_search_hcrp(sdp, &ctrl_psm, &data_psm); + break; + default: + proto = 2; + err = sdp_search_hcrp(sdp, &ctrl_psm, &data_psm); + if (err) { + proto = 1; + err = sdp_search_spp(sdp, &channel); + } + break; + } + + sdp_close(sdp); + + if (err) { + if (cups_class) { + fputs("INFO: Unable to contact printer, queuing on " + "next printer in class...\n", stderr); + sleep(5); + return CUPS_BACKEND_FAILED; + } + sleep(20); + fprintf(stderr, "ERROR: Can't get service information\n"); + goto service_search; + } + +connect: + switch (proto) { + case 1: + err = spp_print(BDADDR_ANY, &bdaddr, channel, + fd, copies, cups_class); + break; + case 2: + err = hcrp_print(BDADDR_ANY, &bdaddr, ctrl_psm, data_psm, + fd, copies, cups_class); + break; + default: + err = CUPS_BACKEND_FAILED; + fprintf(stderr, "ERROR: Unsupported protocol\n"); + break; + } + + if (err == CUPS_BACKEND_FAILED && cups_class) { + fputs("INFO: Unable to contact printer, queuing on " + "next printer in class...\n", stderr); + sleep(5); + return CUPS_BACKEND_FAILED; + } else if (err == CUPS_BACKEND_RETRY) { + sleep(20); + goto connect; + } + + if (fd != 0) + close(fd); + + if (!err) + fprintf(stderr, "INFO: Ready to print\n"); + + return err; +} diff --git a/cups/sdp.c b/cups/sdp.c new file mode 100644 index 00000000..62f5c491 --- /dev/null +++ b/cups/sdp.c @@ -0,0 +1,117 @@ +/* + * + * BlueZ - Bluetooth protocol stack for Linux + * + * Copyright (C) 2003-2008 Marcel Holtmann <marcel@holtmann.org> + * + * + * 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 2 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, write to the Free Software + * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA + * + */ + +#ifdef HAVE_CONFIG_H +#include <config.h> +#endif + +#include <stdio.h> +#include <errno.h> +#include <unistd.h> +#include <signal.h> +#include <sys/socket.h> + +#include <bluetooth/bluetooth.h> +#include <bluetooth/sdp.h> +#include <bluetooth/sdp_lib.h> + +int sdp_search_hcrp(sdp_session_t *sdp, unsigned short *ctrl_psm, unsigned short *data_psm) +{ + sdp_list_t *srch, *attrs, *rsp; + uuid_t svclass; + uint16_t attr1, attr2; + int err; + + if (!sdp) + return -1; + + sdp_uuid16_create(&svclass, HCR_PRINT_SVCLASS_ID); + srch = sdp_list_append(NULL, &svclass); + + attr1 = SDP_ATTR_PROTO_DESC_LIST; + attrs = sdp_list_append(NULL, &attr1); + attr2 = SDP_ATTR_ADD_PROTO_DESC_LIST; + attrs = sdp_list_append(attrs, &attr2); + + err = sdp_service_search_attr_req(sdp, srch, SDP_ATTR_REQ_INDIVIDUAL, attrs, &rsp); + if (err) + return -1; + + for (; rsp; rsp = rsp->next) { + sdp_record_t *rec = (sdp_record_t *) rsp->data; + sdp_list_t *protos; + + if (!sdp_get_access_protos(rec, &protos)) { + unsigned short psm = sdp_get_proto_port(protos, L2CAP_UUID); + if (psm > 0) { + *ctrl_psm = psm; + } + } + + if (!sdp_get_add_access_protos(rec, &protos)) { + unsigned short psm = sdp_get_proto_port(protos, L2CAP_UUID); + if (psm > 0 && *ctrl_psm > 0) { + *data_psm = psm; + return 0; + } + } + } + + return -1; +} + +int sdp_search_spp(sdp_session_t *sdp, uint8_t *channel) +{ + sdp_list_t *srch, *attrs, *rsp; + uuid_t svclass; + uint16_t attr; + int err; + + if (!sdp) + return -1; + + sdp_uuid16_create(&svclass, SERIAL_PORT_SVCLASS_ID); + srch = sdp_list_append(NULL, &svclass); + + attr = SDP_ATTR_PROTO_DESC_LIST; + attrs = sdp_list_append(NULL, &attr); + + err = sdp_service_search_attr_req(sdp, srch, SDP_ATTR_REQ_INDIVIDUAL, attrs, &rsp); + if (err) + return -1; + + for (; rsp; rsp = rsp->next) { + sdp_record_t *rec = (sdp_record_t *) rsp->data; + sdp_list_t *protos; + + if (!sdp_get_access_protos(rec, &protos)) { + uint8_t ch = sdp_get_proto_port(protos, RFCOMM_UUID); + if (ch > 0) { + *channel = ch; + return 0; + } + } + } + + return -1; +} diff --git a/cups/spp.c b/cups/spp.c new file mode 100644 index 00000000..cd9bfd58 --- /dev/null +++ b/cups/spp.c @@ -0,0 +1,116 @@ +/* + * + * BlueZ - Bluetooth protocol stack for Linux + * + * Copyright (C) 2003-2008 Marcel Holtmann <marcel@holtmann.org> + * + * + * 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 2 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, write to the Free Software + * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA + * + */ + +#ifdef HAVE_CONFIG_H +#include <config.h> +#endif + +#include <stdio.h> +#include <errno.h> +#include <unistd.h> +#include <signal.h> +#include <sys/socket.h> + +#include <bluetooth/bluetooth.h> +#include <bluetooth/rfcomm.h> + +#include "cups.h" + +int spp_print(bdaddr_t *src, bdaddr_t *dst, uint8_t channel, int fd, int copies, const char *cups_class) +{ + struct sockaddr_rc addr; + unsigned char buf[2048]; + int i, sk, err, len; + + if ((sk = socket(PF_BLUETOOTH, SOCK_STREAM, BTPROTO_RFCOMM)) < 0) { + perror("ERROR: Can't create socket"); + if (cups_class) + return CUPS_BACKEND_FAILED; + else + return CUPS_BACKEND_RETRY; + } + + addr.rc_family = AF_BLUETOOTH; + bacpy(&addr.rc_bdaddr, src); + addr.rc_channel = 0; + + if (bind(sk, (struct sockaddr *) &addr, sizeof(addr)) < 0) { + perror("ERROR: Can't bind socket"); + close(sk); + if (cups_class) + return CUPS_BACKEND_FAILED; + else + return CUPS_BACKEND_RETRY; + } + + addr.rc_family = AF_BLUETOOTH; + bacpy(&addr.rc_bdaddr, dst); + addr.rc_channel = channel; + + if (connect(sk, (struct sockaddr *) &addr, sizeof(addr)) < 0) { + perror("ERROR: Can't connect to device"); + close(sk); + if (cups_class) + return CUPS_BACKEND_FAILED; + else + return CUPS_BACKEND_RETRY; + } + + fputs("STATE: -connecting-to-device\n", stderr); + + /* Ignore SIGTERM signals if printing from stdin */ + if (fd == 0) { +#ifdef HAVE_SIGSET + sigset(SIGTERM, SIG_IGN); +#elif defined(HAVE_SIGACTION) + memset(&action, 0, sizeof(action)); + sigemptyset(&action.sa_mask); + action.sa_handler = SIG_IGN; + sigaction(SIGTERM, &action, NULL); +#else + signal(SIGTERM, SIG_IGN); +#endif /* HAVE_SIGSET */ + } + + for (i = 0; i < copies; i++) { + + if (fd != 0) { + fprintf(stderr, "PAGE: 1 1\n"); + lseek(fd, 0, SEEK_SET); + } + + while ((len = read(fd, buf, sizeof(buf))) > 0) { + err = write(sk, buf, len); + if (err < 0) { + perror("ERROR: Error writing to device"); + close(sk); + return CUPS_BACKEND_FAILED; + } + } + + } + + close(sk); + + return CUPS_BACKEND_OK; +} |