aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPatrik Nyblom <pan@erlang.org>2013-08-16 14:42:53 +0200
committerPatrik Nyblom <pan@erlang.org>2013-08-23 16:50:58 +0200
commitc82784a8fc24ede2760cc96b5f5d6596684ba7e2 (patch)
tree3c122d99d85581217f136c873ea73c262bb7c0fd
parentfa5cc308af8c073832cc7b58dd52fa2f523582cc (diff)
downloadotp-c82784a8fc24ede2760cc96b5f5d6596684ba7e2.tar.gz
otp-c82784a8fc24ede2760cc96b5f5d6596684ba7e2.tar.bz2
otp-c82784a8fc24ede2760cc96b5f5d6596684ba7e2.zip
Add debug functionality to retrieve async key
-rw-r--r--erts/emulator/drivers/common/efile_drv.c22
1 files changed, 11 insertions, 11 deletions
diff --git a/erts/emulator/drivers/common/efile_drv.c b/erts/emulator/drivers/common/efile_drv.c
index 9e95325c24..779ecd1bd2 100644
--- a/erts/emulator/drivers/common/efile_drv.c
+++ b/erts/emulator/drivers/common/efile_drv.c
@@ -3133,25 +3133,25 @@ file_flush(ErlDrvData e) {
/*********************************************************************
* Driver entry point -> control
+ * Only debug functionality...
*/
static ErlDrvSSizeT
file_control(ErlDrvData e, unsigned int command,
char* buf, ErlDrvSizeT len, char **rbuf, ErlDrvSizeT rlen) {
- /*
- * warning: variable ‘desc’ set but not used
- * [-Wunused-but-set-variable]
- * ... no kidding ...
- *
- *
file_descriptor *desc = (file_descriptor *)e;
switch (command) {
+ case 'K' :
+ if (rlen < 4) {
+ *rbuf = EF_ALLOC(4);
+ }
+ (*rbuf)[0] = ((desc->key) >> 24) & 0xFF;
+ (*rbuf)[1] = ((desc->key) >> 16) & 0xFF;
+ (*rbuf)[2] = ((desc->key) >> 8) & 0xFF;
+ (*rbuf)[3] = (desc->key) & 0xFF;
+ return 4;
default:
return 0;
- }
- ASSERT(0);
- desc = NULL;
- */
- return 0;
+ }
}
/*********************************************************************