src/lib/elm_cnp_helper.c

   1 #ifdef HAVE_CONFIG_H
   2 # include "elementary_config.h"
   3 #endif
   4 #include <Elementary.h>
   5 #include "elm_priv.h"
   6
   7 #include <sys/mman.h>
   8
   9 #ifdef HAVE_ELEMENTARY_X
  10
  11 #define ARRAYINIT(foo)  [foo] =
  12
  13 //#define DEBUGON 1
  14
  15 #ifdef DEBUGON
  16 # define cnp_debug(x...) fprintf(stderr, __FILE__": " x)
  17 #else
  18 # define cnp_debug(x...)
  19 #endif
  20
  21 #define PROVIDER_SET "__elm_cnp_provider_set"
  22
  23 typedef struct _Paste_Image   Paste_Image;
  24 typedef struct _Cnp_Selection Cnp_Selection;
  25 typedef struct _Escape        Escape;
  26 typedef struct _Tmp_Info      Tmp_Info;
  27 typedef struct _Cnp_Atom      Cnp_Atom;
  28 typedef struct _Saved_Type    Saved_Type;
  29 typedef struct _Dropable      Dropable;
  30
  31 typedef Eina_Bool (*Converter_Fn_Cb)     (char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
  32 typedef int       (*Response_Handler_Cb) (Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *);
  33 typedef int       (*Notify_Handler_Cb)   (Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *);
  34
  35 enum
  36 {
  37    CNP_ATOM_TARGETS = 0,
  38    CNP_ATOM_text_uri,
  39    CNP_ATOM_text_urilist,
  40    CNP_ATOM_text_x_vcard,
  41    CNP_ATOM_image_png,
  42    CNP_ATOM_image_jpeg,
  43    CNP_ATOM_image_bmp,
  44    CNP_ATOM_image_gif,
  45    CNP_ATOM_image_tiff,
  46    CNP_ATOM_image_svg,
  47    CNP_ATOM_image_xpm,
  48    CNP_ATOM_image_tga,
  49    CNP_ATOM_image_ppm,
  50    CNP_ATOM_XELM,
  51    CNP_ATOM_text_html_utf8,
  52    CNP_ATOM_text_html,
  53    CNP_ATOM_UTF8STRING,
  54    CNP_ATOM_STRING,
  55    CNP_ATOM_TEXT,
  56    CNP_ATOM_text_plain_utf8,
  57    CNP_ATOM_text_plain,
  58
  59    CNP_N_ATOMS,
  60 };
  61
  62 struct _Paste_Image
  63 {
  64    Evas_Object *entry;
  65    const char  *tag;
  66    const char  *file;
  67    Evas_Object *img;
  68 };
  69
  70 struct _Cnp_Selection
  71 {
  72    const char      *debug;
  73    Evas_Object     *widget;
  74    char            *selbuf;
  75    Evas_Object     *requestwidget;
  76    void            *udata;
  77    Elm_Sel_Format   requestformat;
  78    Elm_Drop_Cb      datacb;
  79    Eina_Bool      (*set)     (Ecore_X_Window, const void *data, int size);
  80    Eina_Bool      (*clear)   (void);
  81    void           (*request) (Ecore_X_Window, const char *target);
  82
  83    Elm_Sel_Format    format;
  84    Ecore_X_Selection ecore_sel;
  85
  86    Eina_Bool         active : 1;
  87 };
  88
  89 struct _Escape
  90 {
  91    const char *escape;
  92    const char  value;
  93 };
  94
  95 struct _Tmp_Info
  96 {
  97    char *filename;
  98    void *map;
  99    int   fd;
 100    int   len;
 101 };
 102
 103 struct _Cnp_Atom
 104 {
 105    const char          *name;
 106    Elm_Sel_Format       formats;
 107    /* Called by ecore to do conversion */
 108    Converter_Fn_Cb      converter;
 109    Response_Handler_Cb  response;
 110    Notify_Handler_Cb    notify;
 111    /* Atom */
 112    Ecore_X_Atom         atom;
 113 };
 114
 115 struct _Saved_Type
 116 {
 117    const char  **types;
 118    Paste_Image  *pi;
 119    int           ntypes;
 120    int           x, y;
 121    Eina_Bool     textreq: 1;
 122 };
 123
 124 struct _Dropable
 125 {
 126    Evas_Object     *obj;
 127    /* FIXME: Cache window */
 128    Elm_Sel_Format   types;
 129    Elm_Drop_Cb      dropcb;
 130    void            *cbdata;
 131 };
 132
 133 static Tmp_Info *elm_cnp_tempfile_create(int size);
 134 static int tmpinfo_free(Tmp_Info *tmp);
 135
 136 static Eina_Bool _elm_cnp_init(void);
 137 static Eina_Bool selection_clear(void *udata __UNUSED__, int type, void *event);
 138 static Eina_Bool selection_notify(void *udata __UNUSED__, int type, void *event);
 139 static char *remove_tags(const char *p, int *len);
 140 static char *mark_up(const char *start, int inlen, int *lenp);
 141
 142 static Evas_Object *image_provider(void *images, Evas_Object *entry, const char *item);
 143 static void entry_deleted(void *images, Evas *e, Evas_Object *entry, void *unused);
 144
 145 static Eina_Bool targets_converter(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 146 static Eina_Bool text_converter(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 147 static Eina_Bool html_converter(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 148 static Eina_Bool edje_converter(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 149 static Eina_Bool uri_converter(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 150 static Eina_Bool image_converter(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 151 static Eina_Bool vcard_send(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 152
 153 static int response_handler_targets(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *);
 154
 155 static int notify_handler_targets(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify);
 156 static int notify_handler_text(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify);
 157 static int notify_handler_image(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify);
 158 static int notify_handler_uri(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify);
 159 static int notify_handler_edje(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify);
 160 static int notify_handler_html(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify);
 161 static int vcard_receive(Cnp_Selection *sed, Ecore_X_Event_Selection_Notify *notify);
 162
 163 static Paste_Image *pasteimage_alloc(const char *file, int pathlen);
 164 static Eina_Bool pasteimage_append(Paste_Image *pi, Evas_Object *entry);
 165 static void pasteimage_free(Paste_Image *pi);
 166 static void entry_insert_filter(Evas_Object* entry, char* str);
 167
 168 /* Optimisation: Turn this into a 256 byte table:
 169  *      then can lookup in one index, not N checks */
 170 static const Escape escapes[] = {
 171   { "<br>",   '\n' },
 172   { "<ps>",   '\n' },
 173   { "<\t>",   '\t' },
 174   { "gt;",    '>'  },
 175   { "lt;",    '<'  },
 176   { "amp;",   '&'  },
 177   { "quot;",  '\'' },
 178   { "dquot;", '"'  }
 179 };
 180 #define N_ESCAPES ((int)(sizeof(escapes) / sizeof(escapes[0])))
 181
 182 static Cnp_Atom atoms[CNP_N_ATOMS] = {
 183      [CNP_ATOM_TARGETS] = {
 184           "TARGETS",
 185           (Elm_Sel_Format) -1, // everything
 186           targets_converter,
 187           response_handler_targets,
 188           notify_handler_targets,
 189           0
 190      },
 191      [CNP_ATOM_XELM] =  {
 192           "application/x-elementary-markup",
 193           ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_HTML,
 194           edje_converter,
 195           NULL,
 196           notify_handler_edje,
 197           0
 198      },
 199      [CNP_ATOM_text_uri] = {
 200           "text/uri",
 201           ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_IMAGE, /* Either images or entries */
 202           uri_converter,
 203           NULL,
 204           notify_handler_uri,
 205           0
 206      },
 207      [CNP_ATOM_text_urilist] = {
 208           "text/uri-list",
 209           ELM_SEL_FORMAT_IMAGE,
 210           uri_converter,
 211           NULL,
 212           notify_handler_uri,
 213           0
 214      },
 215      [CNP_ATOM_text_x_vcard] = {
 216           "text/x-vcard",
 217           ELM_SEL_FORMAT_VCARD,
 218           vcard_send, NULL,
 219           vcard_receive, 0
 220      },
 221      [CNP_ATOM_image_png] = {
 222           "image/png",
 223           ELM_SEL_FORMAT_IMAGE,
 224           image_converter,
 225           NULL,
 226           notify_handler_image,
 227           0
 228      },
 229      [CNP_ATOM_image_jpeg] = {
 230           "image/jpeg",
 231           ELM_SEL_FORMAT_IMAGE,
 232           image_converter,
 233           NULL,
 234           notify_handler_image,/* Raw image data is the same */
 235           0
 236      },
 237      [CNP_ATOM_image_bmp] = {
 238           "image/x-ms-bmp",
 239           ELM_SEL_FORMAT_IMAGE,
 240           image_converter,
 241           NULL,
 242           notify_handler_image,/* Raw image data is the same */
 243           0
 244      },
 245      [CNP_ATOM_image_gif] = {
 246           "image/gif",
 247           ELM_SEL_FORMAT_IMAGE,
 248           image_converter,
 249           NULL,
 250           notify_handler_image,/* Raw image data is the same */
 251           0
 252      },
 253      [CNP_ATOM_image_tiff] = {
 254           "image/tiff",
 255           ELM_SEL_FORMAT_IMAGE,
 256           image_converter,
 257           NULL,
 258           notify_handler_image,/* Raw image data is the same */
 259           0
 260      },
 261      [CNP_ATOM_image_svg] = {
 262           "image/svg+xml",
 263           ELM_SEL_FORMAT_IMAGE,
 264           image_converter,
 265           NULL,
 266           notify_handler_image,/* Raw image data is the same */
 267           0
 268      },
 269      [CNP_ATOM_image_xpm] = {
 270           "image/x-xpixmap",
 271           ELM_SEL_FORMAT_IMAGE,
 272           image_converter,
 273           NULL,
 274           notify_handler_image,/* Raw image data is the same */
 275           0
 276      },
 277      [CNP_ATOM_image_tga] = {
 278           "image/x-tga",
 279           ELM_SEL_FORMAT_IMAGE,
 280           image_converter,
 281           NULL,
 282           notify_handler_image,/* Raw image data is the same */
 283           0
 284      },
 285      [CNP_ATOM_image_ppm] = {
 286           "image/x-portable-pixmap",
 287           ELM_SEL_FORMAT_IMAGE,
 288           image_converter,
 289           NULL,
 290           notify_handler_image,/* Raw image data is the same */
 291           0
 292      },
 293      [CNP_ATOM_text_html_utf8] = {
 294           "text/html;charset=utf-8",
 295           ELM_SEL_FORMAT_HTML,
 296           html_converter,
 297           NULL,
 298           notify_handler_html,
 299           0
 300      },
 301      [CNP_ATOM_text_html] = {
 302           "text/html",
 303           ELM_SEL_FORMAT_HTML,
 304           html_converter,
 305           NULL,
 306           notify_handler_html, /* No encoding: Webkit only */
 307           0
 308      },
 309      [CNP_ATOM_UTF8STRING] = {
 310           "UTF8_STRING",
 311           ELM_SEL_FORMAT_TEXT | ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_HTML,
 312           text_converter,
 313           NULL,
 314           notify_handler_text,
 315           0
 316      },
 317      [CNP_ATOM_STRING] = {
 318           "STRING",
 319           ELM_SEL_FORMAT_TEXT | ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_HTML,
 320           text_converter,
 321           NULL,
 322           notify_handler_text,
 323           0
 324      },
 325      [CNP_ATOM_TEXT] = {
 326           "TEXT",
 327           ELM_SEL_FORMAT_TEXT | ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_HTML,
 328           text_converter,
 329           NULL,
 330           NULL,
 331           0
 332      },
 333      [CNP_ATOM_text_plain_utf8] = {
 334           "text/plain;charset=utf-8",
 335           ELM_SEL_FORMAT_TEXT | ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_HTML,
 336           text_converter,
 337           NULL,
 338           NULL,
 339           0
 340      },
 341      [CNP_ATOM_text_plain] = {
 342           "text/plain",
 343           ELM_SEL_FORMAT_TEXT | ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_HTML,
 344           text_converter,
 345           NULL,
 346           NULL,
 347           0
 348      },
 349 };
 350
 351 static Cnp_Selection selections[ELM_SEL_MAX] = {
 352      ARRAYINIT(ELM_SEL_PRIMARY) {
 353           .debug = "Primary",
 354           .ecore_sel = ECORE_X_SELECTION_PRIMARY,
 355           .set = ecore_x_selection_primary_set,
 356           .clear = ecore_x_selection_primary_clear,
 357           .request = ecore_x_selection_primary_request,
 358      },
 359      ARRAYINIT(ELM_SEL_SECONDARY) {
 360           .debug = "Secondary",
 361           .ecore_sel = ECORE_X_SELECTION_SECONDARY,
 362           .set = ecore_x_selection_secondary_set,
 363           .clear = ecore_x_selection_secondary_clear,
 364           .request = ecore_x_selection_secondary_request,
 365      },
 366      ARRAYINIT(ELM_SEL_CLIPBOARD) {
 367           .debug = "Clipboard",
 368           .ecore_sel = ECORE_X_SELECTION_CLIPBOARD,
 369           .set = ecore_x_selection_clipboard_set,
 370           .clear = ecore_x_selection_clipboard_clear,
 371           .request = ecore_x_selection_clipboard_request,
 372      },
 373      ARRAYINIT(ELM_SEL_XDND) {
 374           .debug = "XDnD",
 375           .ecore_sel = ECORE_X_SELECTION_XDND,
 376           .request = ecore_x_selection_xdnd_request,
 377      },
 378 };
 379
 380 /* Data for DND in progress */
 381 static Saved_Type savedtypes =  { NULL, NULL, 0, 0, 0, EINA_FALSE };
 382
 383 static void (*dragdonecb) (void *data, Evas_Object *obj) = NULL;
 384 static void *dragdonedata = NULL;
 385
 386 static int _elm_cnp_init_count = 0;
 387 /* FIXME: who left this out of XAtoms.h */
 388 static Ecore_X_Atom clipboard_atom;
 389
 390 static Eina_List *pastedimages = NULL;
 391
 392 /**
 393  * Drag & Drop functions
 394  */
 395
 396 /* FIXME: Way too many globals */
 397 static Eina_List *drops = NULL;
 398 static Evas_Object *dragwin = NULL;
 399 static int _dragx = 0, _dragy = 0;
 400 static Ecore_Event_Handler *handler_pos = NULL;
 401 static Ecore_Event_Handler *handler_drop = NULL;
 402 static Ecore_Event_Handler *handler_enter = NULL;
 403 static Ecore_Event_Handler *handler_status = NULL;
 404
 405 #endif
 406
 407 /* Stringshared, so I can just compare pointers later */
 408 static const char *text_uri;
 409
 410 /* For convert EFL to HTML */
 411
 412 #define TAGPOS_START    0x00000001
 413 #define TAGPOS_END      0x00000002
 414 #define TAGPOS_ALONE    0x00000003
 415
 416 /* TEXTBLOCK tag using stack but close tag word has no mean maybe bug...
 417  * TEXTBLOCK <b>bold<font>font</b>bold</font>
 418  * HTML <b>bold<font>font bold</b>font</font> */
 419
 420 typedef struct _TagTable {
 421      char *src;
 422      char *dst;
 423      char tagType;
 424 }TagTable;
 425
 426 TagTable _EFLtoHTMLConvertTable[] = {
 427        {"font", "font", 0},
 428        {"underline", "del", 0},
 429        {"strikethrough", "ins", 0},
 430        {"br", "br", 1},
 431        {"ps", "br", 1},
 432        {"b", "b", 1},
 433        {"item", "img", 1}
 434 };
 435
 436 TagTable _HTMLtoEFLConvertTable[] = {
 437        {"font", "", 0},
 438        {"del", "underline", 0},
 439        {"u", "underline", 0},
 440        {"ins", "strikethrough", 0},
 441        {"s", "strikethrough", 0},
 442        {"br", "br", 1},
 443        {"b", "b", 1},
 444        {"strong", "b", 1},
 445        {"img", "item", 1}
 446 };
 447
 448
 449 typedef struct _TagNode TagNode, *PTagNode;
 450 struct _TagNode {
 451      char *tag;  //EINA_STRINGSHARE if NULL just str
 452      char *tag_str;
 453      char *str;
 454      char *pos_in_ori_str;
 455      PTagNode matchTag;
 456      void *tagData;
 457      unsigned char tagPosType;
 458 };
 459
 460 typedef struct _FontTagData FontTagData, *PFontTagData;
 461 struct _FontTagData {
 462      char *name;
 463      char *color;
 464      char *size;
 465      char *bg_color;
 466 };
 467
 468
 469 typedef struct _ItemTagData ItemTagData, *PItemTagData;
 470 struct _ItemTagData {
 471      char *href;
 472      char *width;
 473      char *height;
 474 };
 475
 476 #define SAFEFREE(ptr) \
 477    do\
 478 {\
 479    if (ptr)\
 480    free(ptr);\
 481    ptr = NULL;\
 482 } while(0);\
 483
 484 #define freeAndAssign(dst, value) \
 485    do\
 486 {\
 487    if (value)\
 488      {\
 489         SAFEFREE(dst);\
 490         dst = value;\
 491      }\
 492 } while(0);
 493
 494
 495 static PTagNode _new_tag_node(char *tag, char *tag_str, char* str, char *pos_in_ori_str);
 496 static PTagNode _get_start_node(char *str);
 497 static PTagNode _get_next_node(PTagNode prev);
 498 static void _delete_node(PTagNode node);
 499 static void _link_match_tags(Eina_List *nodes);
 500 static char *_get_tag_value(const char *tag_str, const char *tag_name);
 501 static char *_convert_to_html(Eina_List* nodes);
 502 static void _set_EFL_tag_data(Eina_List* nodes);
 503 static char *_convert_to_edje(Eina_List* nodes);
 504 static void _set_HTML_tag_data(Eina_List* nodes);
 505 static PFontTagData _set_EFL_font_data(PFontTagData data, const char *tag_str);
 506 static PItemTagData _set_EFL_item_data(PItemTagData data, const char *tag_str);
 507 static PFontTagData _set_HTML_font_data(PFontTagData data, const char *tag_str);
 508 static PItemTagData _set_HTML_img_data(PItemTagData data, const char *tag_str);
 509
 510 #ifdef DEBUGON
 511 static void _dumpNode(Eina_List* nodes);
 512 #endif
 513
 514 static PTagNode
 515 _new_tag_node(char *tag, char *tag_str, char* str, char *pos_in_ori_str)
 516 {
 517    PTagNode newNode = calloc(1, sizeof(TagNode));
 518    if (tag)
 519      eina_str_tolower(&tag);
 520    newNode->tag = tag;
 521    if (tag_str)
 522      eina_str_tolower(&tag_str);
 523    newNode->tag_str = tag_str;
 524    newNode->str = str;
 525    newNode->pos_in_ori_str = pos_in_ori_str;
 526    return newNode;
 527 }
 528
 529 static PTagNode
 530 _get_start_node(char *str)
 531 {
 532    char *startStr = NULL;
 533    if (!str || str[0] == '\0')
 534      return NULL;
 535
 536    if (str[0] != '<')
 537      {
 538         char *tagStart = strchr(str, '<');
 539         if (!tagStart)
 540           startStr = strdup(str);
 541         else
 542           {
 543              int strLength = tagStart - str;
 544              startStr = malloc(sizeof(char) * (strLength + 1));
 545              strncpy(startStr, str, strLength);
 546              startStr[strLength] = '\0';
 547           }
 548      }
 549
 550    return _new_tag_node(NULL, NULL, startStr, str);
 551 }
 552
 553 static PTagNode
 554 _get_next_node(PTagNode prev)
 555 {
 556    PTagNode retTag = NULL;
 557    char *tagStart;
 558    char *tagEnd;
 559    char *tagNameEnd = NULL;
 560    char *nextTagStart;
 561
 562    if (prev->tag == NULL)
 563      tagStart = strchr(prev->pos_in_ori_str, '<');
 564    else
 565      tagStart = strchr(prev->pos_in_ori_str + 1, '<');
 566
 567    if (!tagStart)
 568      return retTag;
 569
 570    tagEnd = strchr(tagStart, '>');
 571    nextTagStart = strchr(tagStart + 1, '<');
 572
 573    if (!tagEnd || (nextTagStart && (nextTagStart < tagEnd)))
 574         return _get_start_node(tagStart + 1);
 575
 576    int spCnt = 5;
 577    char *spArray[spCnt];
 578    spArray[0] = strchr(tagStart, '=');
 579    spArray[1] = strchr(tagStart, '_');
 580    spArray[2] = strchr(tagStart, ' ');
 581    spArray[3] = strchr(tagStart, '\t');
 582    spArray[4] = strchr(tagStart, '\n');
 583    tagNameEnd = tagEnd;
 584
 585    int i;
 586    for (i = 0; i < spCnt; i++)
 587      {
 588         if (spArray[i] && spArray[i] < tagNameEnd)
 589           tagNameEnd = spArray[i];
 590      }
 591
 592    int tagLength = tagNameEnd - tagStart - 1;
 593    char *tagName = NULL;
 594    if (!strncmp(&tagStart[1], "color", tagLength))
 595      tagName = strndup("font", 4);
 596    else if (!strncmp(&tagStart[1], "/color", tagLength))
 597      tagName = strndup("/font", 5);
 598    else if (!strncmp(&tagStart[1], "/item", tagLength))
 599      tagName = strdup("");
 600    else
 601      tagName = strndup(&tagStart[1], tagLength);
 602
 603    int tagStrLength = 0;
 604    char *tagStr = NULL;
 605    if (tagName)
 606      {
 607         tagStrLength = tagEnd - tagStart + 1;
 608         tagStr = strndup(tagStart, tagStrLength);
 609      }
 610
 611    unsigned int strLength = nextTagStart ? (unsigned int)(nextTagStart - tagEnd - 1) : strlen(&tagEnd[1]);
 612    char *str = strndup(&tagEnd[1], strLength);
 613
 614    retTag = _new_tag_node(tagName, tagStr, str, tagStart);
 615    return retTag;
 616 }
 617
 618
 619 static void
 620 _delete_node(PTagNode node)
 621 {
 622    if (node)
 623      {
 624         SAFEFREE(node->tag_str);
 625         SAFEFREE(node->str);
 626
 627         if (node->tagData)
 628           {
 629              if (node->tag)
 630                {
 631                   if (!strcmp("font", node->tag))
 632                     {
 633                        PFontTagData data = node->tagData;
 634                        SAFEFREE(data->name);
 635                        SAFEFREE(data->color);
 636                        SAFEFREE(data->size);
 637                        SAFEFREE(data->bg_color);
 638                     }
 639                   if (!strcmp("item", node->tag))
 640                     {
 641                        PItemTagData data = node->tagData;
 642                        SAFEFREE(data->href);
 643                        SAFEFREE(data->width);
 644                        SAFEFREE(data->height);
 645                     }
 646
 647                }
 648              SAFEFREE(node->tagData);
 649           }
 650         SAFEFREE(node->tag);
 651         SAFEFREE(node);
 652      }
 653 }
 654
 655 static void
 656 _link_match_tags(Eina_List *nodes)
 657 {
 658    Eina_List *stack = NULL;
 659
 660    PTagNode trail, popData;
 661    Eina_List *l, *r;
 662
 663    EINA_LIST_FOREACH(nodes, l, trail)
 664      {
 665         if (!trail->tag || trail->tag[0] == '\0')
 666           continue;
 667         if (!strcmp("br", trail->tag))
 668           {
 669              trail->tagPosType = TAGPOS_ALONE;
 670              continue;
 671           }
 672         else if (!strcmp("item", trail->tag) || !strcmp("img", trail->tag))
 673           {
 674              trail->tagPosType = TAGPOS_ALONE;
 675              continue;
 676           }
 677
 678         if (trail->tag[0] != '/') // PUSH
 679           {
 680              stack = eina_list_append(stack, trail);
 681 /*             eina_array_push(stack, trail);
 682              cnp_debug("stack: %d, tag %s\n", eina_array_count_get(stack), trail->tag);*/
 683              cnp_debug("stack: %d, tag %s\n", eina_list_count(stack), trail->tag);
 684           }
 685         else // POP
 686           {
 687              if (!eina_list_count(stack))
 688                {
 689                   cnp_debug("tag not matched %s\n", trail->tag);
 690                   continue;
 691                }
 692
 693              EINA_LIST_REVERSE_FOREACH(stack, r, popData)
 694                {
 695                   if (popData->tag && !strcmp(popData->tag, &trail->tag[1]))
 696                     {
 697                        popData->tagPosType = TAGPOS_START;
 698                        trail->tagPosType = TAGPOS_END;
 699                        popData->matchTag = trail;
 700                        trail->matchTag = popData;
 701                        stack = eina_list_remove_list(stack, r);
 702                        break;
 703                     }
 704                }
 705 /*             popData = eina_array_pop(stack);
 706
 707              popData->tagPosType = TAGPOS_START;
 708              trail->tagPosType = TAGPOS_END;
 709              popData->matchTag = trail;
 710              trail->matchTag = popData;
 711              cnp_debug("pop stack: %d, tag %s\n", eina_array_count_get(stack), trail->tag);
 712              */
 713           }
 714      }
 715
 716 /*   if (eina_array_count_get(stack))
 717      cnp_debug("stack state: %d, tag %s\n", eina_array_count_get(stack), trail->tag);*/
 718
 719    /* Make Dummy close tag */
 720 /*   while ((popData = eina_array_pop(stack)))  */
 721
 722    EINA_LIST_REVERSE_FOREACH(stack, r, popData)
 723      {
 724         PTagNode newData;
 725         int tagLength = strlen(popData->tag);
 726         char *tagName = malloc(sizeof(char) * (tagLength + 2));
 727
 728         tagName[0] = '/';
 729         tagName[1] = '\0';
 730         strcat(tagName, popData->tag);
 731
 732         newData = _new_tag_node(tagName, NULL, NULL, NULL);
 733         popData->tagPosType = TAGPOS_START;
 734         newData->tagPosType = TAGPOS_END;
 735         popData->matchTag = newData;
 736         newData->matchTag = popData;
 737         nodes = eina_list_append(nodes, newData);
 738 /*        cnp_debug("stack: %d, tag %s\n", eina_array_count_get(stack), popData->tag);*/
 739      }
 740 /*   cnp_debug("stack_top: %d\n", eina_array_count_get(stack));
 741    eina_array_free(stack);*/
 742    eina_list_free(stack);
 743 }
 744
 745 static char *
 746 _get_tag_value(const char *tag_str, const char *tag_name)
 747 {
 748    if (!tag_name || !tag_str)
 749      return NULL;
 750
 751    char *tag;
 752    if ((tag = strstr(tag_str, tag_name)))
 753      {
 754         if (tag[strlen(tag_name)] == '_')
 755           return NULL;
 756         char *value = strchr(tag, '=');
 757         if (value)
 758           {
 759              do
 760                {
 761                   value++;
 762                } while (!isalnum(*value) && *value != '#');
 763
 764              int spCnt = 6;
 765              char *spArray[spCnt];
 766              spArray[0] = strchr(value, ' ');
 767              spArray[1] = strchr(value, '>');
 768              spArray[2] = strchr(value, '\"');
 769              spArray[3] = strchr(value, '\'');
 770              spArray[4] = strchr(value, '\t');
 771              spArray[5] = strchr(value, '\n');
 772              char *valueEnd = strchr(value, '\0');
 773
 774              int i;
 775              int start = 0;
 776              if ((!strncmp(tag_str, "<item", 5) && !strcmp(tag_name, "href")) // EFL img tag
 777                || (!strncmp(tag_str, "<img", 4) && !strcmp(tag_name, "src"))) // HTML img tag
 778                start = 1;
 779
 780              for (i = start; i < spCnt; i++)
 781                {
 782                   if (spArray[i] && spArray[i] < valueEnd)
 783                     valueEnd = spArray[i];
 784                }
 785
 786              int valueLength = valueEnd - value;
 787              return strndup(value, valueLength);
 788           }
 789      }
 790    return NULL;
 791 }
 792
 793 static PFontTagData
 794 _set_EFL_font_data(PFontTagData data, const char *tag_str)
 795 {
 796    char *value;
 797
 798    if (!data)
 799      data = calloc(1, sizeof(FontTagData));
 800    value = _get_tag_value(tag_str, "font_size");
 801    freeAndAssign(data->size, value);
 802    value = _get_tag_value(tag_str, "color");
 803    freeAndAssign(data->color, value);
 804    value = _get_tag_value(tag_str, "bgcolor");
 805    freeAndAssign(data->bg_color, value);
 806    value = _get_tag_value(tag_str, "font");
 807    freeAndAssign(data->name, value);
 808
 809    return data;
 810 }
 811
 812 static PItemTagData
 813 _set_EFL_item_data(PItemTagData data, const char *tag_str)
 814 {
 815    char *value;
 816
 817    if (!data)
 818      data = calloc(1, sizeof(ItemTagData));
 819    value = _get_tag_value(tag_str, "href");
 820    if (value)
 821      {
 822         char *path = strstr(value, "file://");
 823         if (path)
 824           {
 825              char *modify = malloc(sizeof(char) * (strlen(value) + 1));
 826              strncpy(modify, "file://", 8);
 827              path += 7;
 828              while (path[1] && path[0] && path[1] == '/' && path[0] == '/')
 829                {
 830                   path++;
 831                }
 832              strcat(modify, path);
 833              data->href = modify;
 834              cnp_debug("image href ---%s---\n", data->href);
 835              free(value);
 836           }
 837         else
 838           freeAndAssign(data->href, value);
 839      }
 840
 841    value = _get_tag_value(tag_str, "absize");
 842    if (value)
 843      {
 844         char *xpos = strchr(value, 'x');
 845         if (xpos)
 846           {
 847              int absizeLen = strlen(value);
 848              freeAndAssign(data->width, strndup(value, xpos - value));
 849              freeAndAssign(data->height, strndup(xpos + 1, absizeLen - (xpos - value) - 1));
 850              cnp_debug("image width: -%s-, height: -%s-\n", data->width, data->height);
 851           }
 852         free(value);
 853      }
 854    return data;
 855 }
 856
 857 static void
 858 _set_EFL_tag_data(Eina_List* nodes)
 859 {
 860    PTagNode trail;
 861    Eina_List *l;
 862
 863    EINA_LIST_FOREACH(nodes, l, trail)
 864      {
 865         if (!trail->tag)
 866           continue;
 867         if (!strcmp("font", trail->tag))
 868              trail->tagData = _set_EFL_font_data(trail->tagData, trail->tag_str);
 869         else if (!strcmp("item", trail->tag))
 870              trail->tagData = _set_EFL_item_data(trail->tagData, trail->tag_str);
 871      }
 872 }
 873
 874 static PFontTagData
 875 _set_HTML_font_data(PFontTagData data, const char *tag_str)
 876 {
 877    char *value;
 878
 879    if (!data)
 880      data = calloc(1, sizeof(FontTagData));
 881    value = _get_tag_value(tag_str, "size");
 882    freeAndAssign(data->size, value);
 883    value = _get_tag_value(tag_str, "color");
 884    freeAndAssign(data->color, value);
 885    value = _get_tag_value(tag_str, "bgcolor");
 886    freeAndAssign(data->bg_color, value);
 887    value = _get_tag_value(tag_str, "face");
 888    freeAndAssign(data->name, value);
 889
 890    return data;
 891 }
 892
 893 static PItemTagData
 894 _set_HTML_img_data(PItemTagData data, const char *tag_str)
 895 {
 896    char *value;
 897
 898    if (!data)
 899      data = calloc(1, sizeof(ItemTagData));
 900    value = _get_tag_value(tag_str, "src");
 901    if (value)
 902      {
 903         char *path = strstr(value, "file://");
 904         if (path)
 905           {
 906              char *modify = malloc(sizeof(char) * (strlen(value) + 1));
 907              strncpy(modify, "file://", 8);
 908              path += 7;
 909              while (path[1] && path[0] && path[1] == '/' && path[0] == '/')
 910                {
 911                   path++;
 912                }
 913              strcat(modify, path);
 914              data->href = modify;
 915              cnp_debug("image src ---%s---\n", data->href);
 916              free(value);
 917           }
 918         else
 919           freeAndAssign(data->href, value);
 920      }
 921
 922    value = _get_tag_value(tag_str, "width");
 923    freeAndAssign(data->width, value);
 924    value = _get_tag_value(tag_str, "height");
 925    freeAndAssign(data->height, value);
 926    return data;
 927 }
 928
 929 static void
 930 _set_HTML_tag_data(Eina_List* nodes)
 931 {
 932    PTagNode trail;
 933    Eina_List *l;
 934
 935    EINA_LIST_FOREACH(nodes, l, trail)
 936      {
 937         if (!trail->tag)
 938           continue;
 939         if (!strcmp("font", trail->tag))
 940              trail->tagData = _set_HTML_font_data(trail->tagData, trail->tag_str);
 941         else if (!strcmp("img", trail->tag))
 942              trail->tagData = _set_HTML_img_data(trail->tagData, trail->tag_str);
 943      }
 944 }
 945
 946 #ifdef DEBUGON
 947 static void
 948 _dumpNode(Eina_List* nodes)
 949 {
 950    PTagNode trail;
 951    Eina_List *l;
 952
 953    EINA_LIST_FOREACH(nodes, l, trail)
 954      {
 955         cnp_debug("tag: %s, tag_str: %s, str: %s, tagPosType: %d\n",
 956                trail->tag, trail->tag_str, trail->str, trail->tagPosType);
 957         cnp_debug("matchTag: %x ", (unsigned int)trail->matchTag);
 958         if (trail->matchTag)
 959           cnp_debug("matchTag->tag_str: %s", trail->matchTag->tag_str);
 960         if (trail->tagData)
 961           {
 962              if (!strcmp(trail->tag, "font"))
 963                {
 964                   PFontTagData data = trail->tagData;
 965                   cnp_debug(" tagData->name: %s, tagData->color: %s, tagData->size: %s, tagData->bg_color: %s",
 966                          data->name, data->color, data->size, data->bg_color);
 967                }
 968              else if (!strcmp(trail->tag, "item") || !strcmp(trail->tag, "img"))
 969                {
 970                   PItemTagData data = trail->tagData;
 971                   cnp_debug(" tagData->href: %s, tagData->width: %s, tagData->height: %s",
 972                          data->href, data->width, data->height);
 973                }
 974              else
 975                cnp_debug("\nERROR!!!! not need tagData");
 976           }
 977         cnp_debug("\n");
 978      }
 979 }
 980 #endif
 981
 982 static char *
 983 _convert_to_html(Eina_List* nodes)
 984 {
 985    PTagNode trail;
 986    Eina_List *l;
 987
 988    Eina_Strbuf *html = eina_strbuf_new();
 989
 990    int tableCnt = sizeof(_EFLtoHTMLConvertTable) / sizeof(TagTable);
 991
 992    EINA_LIST_FOREACH(nodes, l, trail)
 993      {
 994         if (trail->tag)
 995           {
 996              char *tagName = trail->tagPosType == TAGPOS_END ?
 997                 trail->matchTag->tag : trail->tag;
 998              int j;
 999              for(j = 0; j < tableCnt; j++)
1000                {
1001                   if (!strcmp(_EFLtoHTMLConvertTable[j].src, tagName))
1002                     {
1003                        switch(trail->tagPosType)
1004                          {
1005                           case TAGPOS_END:
1006                              eina_strbuf_append(html, "</");
1007                              break;
1008                           default:
1009                              eina_strbuf_append(html, "<");
1010                              break;
1011                          }
1012
1013                        eina_strbuf_append(html, _EFLtoHTMLConvertTable[j].dst);
1014                        if (trail->tagPosType != TAGPOS_END)
1015                          {
1016                             if (!strcmp(_EFLtoHTMLConvertTable[j].src, "font"))
1017                               {
1018                                  PFontTagData data = trail->tagData;
1019                                  if (data->name)
1020                                    {
1021                                    }
1022                                  if (data->color)
1023                                    eina_strbuf_append_printf(html, " color=\"%s\"", data->color);
1024                                  if (data->size)
1025                                    eina_strbuf_append_printf(html, " size=\"%s\"", data->size);
1026                                  if (data->bg_color)
1027                                    {
1028                                    }
1029                               }
1030                             else if (!strcmp(_EFLtoHTMLConvertTable[j].src, "item"))
1031                               {
1032                                  PItemTagData data = trail->tagData;
1033                                  if (data->href)
1034                                    eina_strbuf_append_printf(html, " src=\"%s\"", data->href);
1035                                  if (data->width)
1036                                    eina_strbuf_append_printf(html, " width=\"%s\"", data->width);
1037                                  if (data->height)
1038                                    eina_strbuf_append_printf(html, " height=\"%s\"", data->height);
1039                               }
1040                          }
1041                        switch(trail->tagPosType)
1042                          {
1043                             /* closed tag does not need in HTML
1044                           case TAGPOS_ALONE:
1045                              eina_strbuf_append(html, " />");
1046                              break;*/
1047                           default:
1048                              eina_strbuf_append(html, ">");
1049                              break;
1050                          }
1051                        break;
1052                     }
1053                }
1054           }
1055         if (trail->str)
1056           eina_strbuf_append(html, trail->str);
1057      }
1058
1059    char *ret = eina_strbuf_string_steal(html);
1060    eina_strbuf_free(html);
1061    return ret;
1062 }
1063
1064 #define IMAGE_DEFAULT_WIDTH "240"
1065 #define IMAGE_DEFAULT_HEIGHT "180"
1066
1067
1068 static char *
1069 _convert_to_edje(Eina_List* nodes)
1070 {
1071    PTagNode trail;
1072    Eina_List *l;
1073
1074    Eina_Strbuf *html = eina_strbuf_new();
1075
1076    int tableCnt = sizeof(_HTMLtoEFLConvertTable) / sizeof(TagTable);
1077
1078    EINA_LIST_FOREACH(nodes, l, trail)
1079      {
1080         if (trail->tag)
1081           {
1082              char *tagName = trail->tagPosType == TAGPOS_END ?
1083                 trail->matchTag->tag : trail->tag;
1084              int j;
1085              for(j = 0; j < tableCnt; j++)
1086                {
1087                   if (!strcmp(_HTMLtoEFLConvertTable[j].src, tagName))
1088                     {
1089                        if (_HTMLtoEFLConvertTable[j].dst[0] != '\0')
1090                          {
1091                             switch(trail->tagPosType)
1092                               {
1093                                case TAGPOS_END:
1094                                   eina_strbuf_append(html, "</");
1095                                   break;
1096                                default:
1097                                   eina_strbuf_append(html, "<");
1098                                   break;
1099                               }
1100
1101                             eina_strbuf_append(html, _HTMLtoEFLConvertTable[j].dst);
1102                          }
1103                        if (trail->tagPosType != TAGPOS_END)
1104                          {
1105                             if (!strcmp(_HTMLtoEFLConvertTable[j].src, "font"))
1106                               {
1107                                  PFontTagData data = trail->tagData;
1108                                  if (data->name)
1109                                    {
1110                                    }
1111                                  if (data->color)
1112                                    eina_strbuf_append_printf(html, "<color=%s>", data->color);
1113                                  if (data->size)
1114                                    eina_strbuf_append_printf(html, "<font_size=%s>", data->size);
1115                                  if (data->bg_color)
1116                                    {
1117                                    }
1118                                  break;
1119                               }
1120                             else if (!strcmp(_HTMLtoEFLConvertTable[j].src, "img"))
1121                               {
1122                                  PItemTagData data = trail->tagData;
1123                                  char *width = IMAGE_DEFAULT_WIDTH, *height = IMAGE_DEFAULT_HEIGHT;
1124                                  if (data->width)
1125                                    width = data->width;
1126                                  if (data->height)
1127                                    height = data->height;
1128                                  eina_strbuf_append_printf(html, " absize=%sx%s", width, height);
1129                                  if (data->href)
1130                                    eina_strbuf_append_printf(html, " href=%s></item>", data->href);
1131                                  break;
1132                               }
1133                          }
1134                        else
1135                          {
1136                             if (_HTMLtoEFLConvertTable[j].dst[0] == '\0')
1137                               {
1138                                  if (!strcmp(_HTMLtoEFLConvertTable[j].src, "font"))
1139                                    {
1140                                       if (trail->matchTag->tagData)
1141                                         {
1142                                            PFontTagData data = trail->matchTag->tagData;
1143                                            if (data->name)
1144                                              {
1145                                              }
1146                                            if (data->color)
1147                                              eina_strbuf_append_printf(html, "</color>");
1148                                            if (data->size)
1149                                              eina_strbuf_append_printf(html, "</font>");
1150                                            if (data->bg_color)
1151                                              {
1152                                              }
1153                                            break;
1154                                         }
1155                                    }
1156                               }
1157                          }
1158                        switch(trail->tagPosType)
1159                          {
1160                             /* not support in efl
1161                           case TAGPOS_ALONE:
1162                              eina_strbuf_append(html, " />");
1163                              break;
1164                              */
1165                           default:
1166                              eina_strbuf_append(html, ">");
1167                              break;
1168                          }
1169                        break;
1170                     }
1171                }/* for(j = 0; j < tableCnt; j++) end */
1172           }
1173         if (trail->str)
1174           eina_strbuf_append(html, trail->str);
1175      }
1176
1177    char *ret = eina_strbuf_string_steal(html);
1178    eina_strbuf_free(html);
1179    return ret;
1180
1181 }
1182
1183 Eina_Bool
1184 elm_selection_set(Elm_Sel_Type selection, Evas_Object *widget, Elm_Sel_Format format, const char *selbuf)
1185 {
1186 #ifdef HAVE_ELEMENTARY_X
1187    Evas_Object *top = elm_widget_top_get(widget);
1188    Ecore_X_Window xwin;
1189    Cnp_Selection *sel;
1190
1191    if (top) xwin = elm_win_xwindow_get(top);
1192    else xwin = elm_win_xwindow_get(widget);
1193    if (!xwin) return EINA_FALSE;
1194    if ((unsigned int)selection >= (unsigned int)ELM_SEL_MAX) return EINA_FALSE;
1195    if (!_elm_cnp_init_count) _elm_cnp_init();
1196    if ((!selbuf) && (format != ELM_SEL_FORMAT_IMAGE))
1197      return elm_selection_clear(selection, widget);
1198
1199    sel = selections + selection;
1200
1201    sel->active = 1;
1202    sel->widget = widget;
1203
1204    sel->set(xwin, &selection, sizeof(Elm_Sel_Type));
1205    sel->format = format;
1206    sel->selbuf = selbuf ? strdup(selbuf) : NULL;
1207
1208    return EINA_TRUE;
1209 #else
1210    return EINA_FALSE;
1211 #endif
1212 }
1213
1214 Eina_Bool
1215 elm_selection_clear(Elm_Sel_Type selection, Evas_Object *widget)
1216 {
1217 #ifdef HAVE_ELEMENTARY_X
1218    Cnp_Selection *sel;
1219
1220    if ((unsigned int)selection >= (unsigned int)ELM_SEL_MAX) return EINA_FALSE;
1221    if (!_elm_cnp_init_count) _elm_cnp_init();
1222
1223    sel = selections + selection;
1224
1225    /* No longer this selection: Consider it gone! */
1226    if ((!sel->active) || (sel->widget != widget)) return EINA_TRUE;
1227
1228    sel->active = 0;
1229    sel->widget = NULL;
1230    sel->clear();
1231
1232    return EINA_TRUE;
1233 #else
1234    return EINA_FALSE;
1235 #endif
1236 }
1237
1238 Eina_Bool
1239 elm_selection_get(Elm_Sel_Type selection, Elm_Sel_Format format,
1240                   Evas_Object *widget, Elm_Drop_Cb datacb, void *udata)
1241 {
1242 #ifdef HAVE_ELEMENTARY_X
1243    Evas_Object *top;
1244    Cnp_Selection *sel;
1245
1246    if ((unsigned int)selection >= (unsigned int)ELM_SEL_MAX) return EINA_FALSE;
1247    if (!_elm_cnp_init_count) _elm_cnp_init();
1248
1249    sel = selections + selection;
1250    top = elm_widget_top_get(widget);
1251    if (!top) return EINA_FALSE;
1252
1253    sel->requestformat = format;
1254    sel->requestwidget = widget;
1255    sel->request(elm_win_xwindow_get(top), ECORE_X_SELECTION_TARGET_TARGETS);
1256    sel->datacb = datacb;
1257    sel->udata = udata;
1258
1259    return EINA_TRUE;
1260 #else
1261    return EINA_FALSE;
1262 #endif
1263 }
1264
1265 #ifdef HAVE_ELEMENTARY_X
1266
1267 static Eina_Bool
1268 _elm_cnp_init(void)
1269 {
1270    int i;
1271
1272    if (_elm_cnp_init_count++) return EINA_TRUE;
1273    for (i = 0; i < CNP_N_ATOMS; i++)
1274      {
1275         atoms[i].atom = ecore_x_atom_get(atoms[i].name);
1276         ecore_x_selection_converter_atom_add(atoms[i].atom,
1277                                              atoms[i].converter);
1278      }
1279    clipboard_atom = ecore_x_atom_get("CLIPBOARD");
1280
1281    ecore_event_handler_add(ECORE_X_EVENT_SELECTION_CLEAR, selection_clear, NULL);
1282    ecore_event_handler_add(ECORE_X_EVENT_SELECTION_NOTIFY, selection_notify, NULL);
1283
1284    text_uri = eina_stringshare_add("text/uri-list");
1285    return EINA_TRUE;
1286 }
1287
1288 static Eina_Bool
1289 selection_clear(void *udata __UNUSED__, int type __UNUSED__, void *event)
1290 {
1291    Ecore_X_Event_Selection_Clear *ev = event;
1292    Cnp_Selection *sel;
1293    int i;
1294
1295    for (i = 0; i < ELM_SEL_MAX; i++)
1296      {
1297         if (selections[i].ecore_sel == ev->selection) break;
1298      }
1299    cnp_debug("selection %d clear\n", i);
1300    /* Not me... Don't care */
1301    if (i == ELM_SEL_MAX) return ECORE_CALLBACK_PASS_ON;
1302
1303    sel = selections + i;
1304    sel->active = 0;
1305    sel->widget = NULL;
1306    sel->selbuf = NULL;
1307
1308    return ECORE_CALLBACK_PASS_ON;
1309 }
1310
1311
1312 /*
1313  * Response to a selection notify:
1314  *      - So we have asked for the selection list.
1315  *      - If it's the targets list, parse it, and fire of what we want,
1316  *      else it's the data we want.
1317  */
1318 static Eina_Bool
1319 selection_notify(void *udata __UNUSED__, int type __UNUSED__, void *event)
1320 {
1321    Ecore_X_Event_Selection_Notify *ev = event;
1322    Cnp_Selection *sel;
1323    int i;
1324
1325    cnp_debug("selection notify callback: %d\n",ev->selection);
1326    switch (ev->selection)
1327      {
1328       case ECORE_X_SELECTION_CLIPBOARD:
1329          sel = selections + ELM_SEL_CLIPBOARD;
1330          break;
1331       case ECORE_X_SELECTION_PRIMARY:
1332          sel = selections + ELM_SEL_PRIMARY;
1333          break;
1334       case ECORE_X_SELECTION_SECONDARY:
1335          sel = selections + ELM_SEL_SECONDARY;
1336          break;
1337       case ECORE_X_SELECTION_XDND:
1338          sel = selections + ELM_SEL_XDND;
1339          break;
1340       default:
1341          return ECORE_CALLBACK_PASS_ON;
1342      }
1343    cnp_debug("Target is %s\n", ev->target);
1344
1345    for (i = 0; i < CNP_N_ATOMS; i++)
1346      {
1347         if (!strcmp(ev->target, atoms[i].name))
1348           {
1349              if (atoms[i].notify)
1350                {
1351                   cnp_debug("Found something: %s\n", atoms[i].name);
1352                   atoms[i].notify(sel, ev);
1353                }
1354              else
1355                {
1356                   cnp_debug("Ignored: No handler!\n");
1357                }
1358           }
1359      }
1360
1361    return ECORE_CALLBACK_PASS_ON;
1362 }
1363
1364
1365
1366 static Eina_Bool
1367 targets_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize)
1368 {
1369    int i,count;
1370    Ecore_X_Atom *aret;
1371    Cnp_Selection *sel;
1372
1373    if (!data_ret) return EINA_FALSE;
1374    if (!data || (*((unsigned int *)data) >= ELM_SEL_MAX))
1375      return EINA_FALSE;
1376
1377    sel = selections + *((int *)data);
1378
1379    for (i = 0, count = 0; i < CNP_N_ATOMS ; i++)
1380      {
1381         if (sel->format & atoms[i].formats) count++;
1382      }
1383
1384    aret = malloc(sizeof(Ecore_X_Atom) * count);
1385    for (i = 0, count = 0; i < CNP_N_ATOMS; i++)
1386      {
1387         if (sel->format & atoms[i].formats) aret[count ++] = atoms[i].atom;
1388      }
1389
1390    *data_ret = aret;
1391    if (typesize) *typesize = 32 /* urk */;
1392    if (ttype) *ttype = ECORE_X_ATOM_ATOM;
1393    if (size_ret) *size_ret = count;
1394
1395    return EINA_TRUE;
1396 }
1397
1398 static Eina_Bool
1399 image_converter(char *target __UNUSED__, void *data __UNUSED__, int size __UNUSED__, void **data_ret __UNUSED__, int *size_ret __UNUSED__, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1400 {
1401    cnp_debug("Image converter called\n");
1402    return EINA_TRUE;
1403 }
1404
1405 static Eina_Bool
1406 vcard_send(char *target __UNUSED__, void *data __UNUSED__, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1407 {
1408    Cnp_Selection *sel;
1409
1410    cnp_debug("Vcard send called\n");
1411
1412    sel = selections + *((int *)data);
1413
1414    if (data_ret) *data_ret = strdup(sel->selbuf);
1415    if (size_ret) *size_ret = strlen(sel->selbuf);
1416
1417    return EINA_TRUE;
1418 }
1419
1420 static Eina_Bool
1421 is_uri_type_data(Cnp_Selection *sel __UNUSED__, Ecore_X_Event_Selection_Notify *notify)
1422 {
1423    Ecore_X_Selection_Data *data;
1424    char *p;
1425
1426    data = notify->data;
1427    cnp_debug("data->format is %d %p %p\n", data->format, notify, data);
1428    if (data->content == ECORE_X_SELECTION_CONTENT_FILES) return EINA_TRUE;
1429    else p = (char *)data->data;
1430
1431    if (!p) return EINA_TRUE;
1432    cnp_debug("Got %s\n", p);
1433    if (strncmp(p, "file://", 7))
1434      {
1435         if (*p != '/') return EINA_FALSE;
1436      }
1437
1438    return EINA_TRUE;
1439 }
1440
1441 /*
1442  * Callback to handle a targets response on a selection request:
1443  * So pick the format we'd like; and then request it.
1444  */
1445 static int
1446 notify_handler_targets(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1447 {
1448    Ecore_X_Selection_Data_Targets *targets;
1449    Ecore_X_Atom *atomlist;
1450    Evas_Object *top;
1451    int i, j;
1452
1453    targets = notify->data;
1454    atomlist = (Ecore_X_Atom *)(targets->data.data);
1455
1456    for (j = 1; j < CNP_N_ATOMS; j++)
1457      {
1458         cnp_debug("\t%s %d\n", atoms[j].name, atoms[j].atom);
1459         if (!(atoms[j].formats & sel->requestformat)) continue;
1460         for (i = 0; i < targets->data.length; i++)
1461           {
1462              if ((atoms[j].atom == atomlist[i]) && (atoms[j].notify))
1463                {
1464 #if 0
1465                   if ((j == CNP_ATOM_text_uri) ||
1466                       (j == CNP_ATOM_text_urilist))
1467                     {
1468                       if(!is_uri_type_data(sel, notify)) continue;
1469                     }
1470 #endif
1471                   cnp_debug("Atom %s matches\n",atoms[j].name);
1472                   goto done;
1473                }
1474           }
1475      }
1476
1477    cnp_debug("Couldn't find anything that matches\n");
1478    return ECORE_CALLBACK_PASS_ON;
1479
1480 done:
1481    top = elm_widget_top_get(sel->requestwidget);
1482    if (!top) top = sel->requestwidget;
1483    cnp_debug("Sending request for %s\n", atoms[j].name);
1484    sel->request(elm_win_xwindow_get(top), atoms[j].name);
1485
1486    return ECORE_CALLBACK_PASS_ON;
1487 }
1488
1489 static int
1490 response_handler_targets(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1491 {
1492    Ecore_X_Selection_Data_Targets *targets;
1493    Ecore_X_Atom *atomlist;
1494    Evas_Object *top;
1495    int i,j;
1496
1497    targets = notify->data;
1498    atomlist = (Ecore_X_Atom *)(targets->data.data);
1499
1500    /* Start from 1: Skip targets */
1501    for (j = 1 ; j < CNP_N_ATOMS ; j ++)
1502      {
1503         if (!(atoms[j].formats & sel->requestformat)) continue;
1504         for (i = 0 ; i < targets->data.length ; i ++)
1505           {
1506              if ((atoms[j].atom == atomlist[i]) && (atoms[j].response))
1507                {
1508                   /* Found a match: Use it */
1509                   goto found;
1510                }
1511           }
1512      }
1513 found:
1514    if (j == CNP_N_ATOMS)
1515      {
1516         cnp_debug("No matching type found\n");
1517         return 0;
1518      }
1519
1520    top = elm_widget_top_get(sel->requestwidget);
1521    if (!top) return 0;
1522
1523    sel->request(elm_win_xwindow_get(top), atoms[j].name);
1524    return 0;
1525 }
1526
1527 static void
1528 entry_insert_filter(Evas_Object* entry, char* str)
1529 {
1530    if (!entry || !str)
1531      return;
1532
1533    char *insertStr = str;
1534    // if entry has text only set then remove item tags
1535    if (elm_entry_cnp_textonly_get(entry))
1536      {
1537         while (EINA_TRUE)
1538           {
1539              char *startTag = NULL;
1540              char *endTag = NULL;
1541
1542              startTag = strstr(insertStr, "<item");
1543              if (!startTag)
1544                startTag = strstr(insertStr, "</item");
1545              if (startTag)
1546                endTag = strstr(startTag, ">");
1547              else
1548                break;
1549              if (!endTag || startTag > endTag)
1550                {
1551                   cnp_debug("Broken tag: %s\n", str);
1552                   break;
1553                }
1554
1555              size_t sindex = startTag - insertStr;
1556              size_t eindex = endTag - insertStr + 1;
1557
1558              Eina_Strbuf *buf = eina_strbuf_new();
1559              if (buf)
1560                {
1561                   eina_strbuf_append(buf, insertStr);
1562                   eina_strbuf_remove(buf, sindex, eindex);
1563                   insertStr = eina_strbuf_string_steal(buf);
1564                   eina_strbuf_free(buf);
1565                }
1566           }
1567      }
1568    cnp_debug("remove item tag: %s\n", insertStr);
1569
1570    // if entry has single line set then remove <br> & <ps> tags
1571    if (elm_entry_single_line_get(entry))
1572      {
1573         Eina_Strbuf *buf = eina_strbuf_new();
1574         if (buf)
1575           {
1576              eina_strbuf_append(buf, insertStr);
1577              eina_strbuf_replace_all(buf, "<br>", "");
1578              eina_strbuf_replace_all(buf, "<ps>", "");
1579              insertStr = eina_strbuf_string_steal(buf);
1580              eina_strbuf_free(buf);
1581           }
1582      }
1583    cnp_debug("remove break tag: %s\n", insertStr);
1584
1585    elm_entry_entry_insert(entry, insertStr);
1586
1587    if (insertStr != str)
1588      free(insertStr);
1589 }
1590
1591 static int
1592 notify_handler_text(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1593 {
1594    Ecore_X_Selection_Data *data;
1595    char *str;
1596
1597    data = notify->data;
1598
1599    if (sel->datacb)
1600      {
1601         Elm_Selection_Data ddata;
1602
1603         str = strdup(data->data);
1604         ddata.x = ddata.y = 0;
1605         ddata.format = ELM_SEL_FORMAT_TEXT;
1606         ddata.data = str;
1607         ddata.len = data->length;
1608         sel->datacb(sel->udata, sel->widget, &ddata);
1609         free(str);
1610         return 0;
1611      }
1612
1613    cnp_debug("Notify handler text %d %d %p\n", data->format,data->length, data->data);
1614    str = mark_up((char *)data->data, data->length, NULL);
1615    cnp_debug("String is %s (from %s)\n", str, data->data);
1616    entry_insert_filter(sel->requestwidget, str);
1617    //elm_entry_entry_insert(sel->requestwidget, str);
1618    free(str);
1619    return 0;
1620 }
1621
1622
1623 /**
1624  * So someone is pasting an image into my entry or widget...
1625  */
1626 static int
1627 notify_handler_uri(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1628 {
1629    Ecore_X_Selection_Data *data;
1630    Ecore_X_Selection_Data_Files *files;
1631    Paste_Image *pi;
1632    char *p, *stripstr;
1633
1634    data = notify->data;
1635    cnp_debug("data->format is %d %p %p\n", data->format, notify, data);
1636    if (data->content == ECORE_X_SELECTION_CONTENT_FILES)
1637      {
1638         cnp_debug("got a files list\n");
1639         files = notify->data;
1640         if (files->num_files > 1)
1641           {
1642              /* Don't handle many items */
1643              cnp_debug("more then one file: Bailing\n");
1644              return 0;
1645           }
1646         stripstr = p = strdup(files->files[0]);
1647      }
1648    else
1649      {
1650         stripstr = p = strndup((char *)data->data, data->length);
1651      }
1652
1653    if (!p)
1654      {
1655         cnp_debug("Couldn't find a file\n");
1656         return 0;
1657      }
1658    cnp_debug("Got %s\n",p);
1659    if (sel->datacb)
1660      {
1661         Elm_Selection_Data ddata;
1662
1663         ddata.x = ddata.y = 0;
1664         ddata.format = ELM_SEL_FORMAT_MARKUP;
1665         ddata.data = p;
1666         ddata.len = data->length;
1667         sel->datacb(sel->udata, sel->widget, &ddata);
1668         free(p);
1669         return 0;
1670      }
1671    if (strncmp(p, "file://", 7))
1672      {
1673         /* Try and continue if it looks sane */
1674         if (*p != '/')
1675           {
1676              free(p);
1677              return 0;
1678           }
1679      }
1680    else
1681      {
1682         p += strlen("file://");
1683      }
1684
1685    if (savedtypes.pi) pasteimage_free(savedtypes.pi);
1686    pi = pasteimage_alloc(p, strlen(p));
1687    if (savedtypes.textreq)
1688      {
1689         savedtypes.textreq = 0;
1690         savedtypes.pi = pi;
1691      }
1692    else
1693      {
1694         pasteimage_append(pi, sel->requestwidget);
1695         savedtypes.pi = NULL;
1696      }
1697    free(stripstr);
1698    return 0;
1699 }
1700
1701 /**
1702  * Just receieved an vcard, either through cut and paste, or dnd.
1703  */
1704 static int
1705 vcard_receive(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1706 {
1707    Dropable *dropable;
1708    Eina_List *l;
1709    Ecore_X_Selection_Data *data;
1710
1711    data = notify->data;
1712    cnp_debug("vcard receive\n");
1713
1714    if (sel == (selections + ELM_SEL_XDND))
1715      {
1716         Elm_Selection_Data ddata;
1717
1718         cnp_debug("drag & drop\n");
1719         /* FIXME: this needs to be generic: Used for all receives */
1720         EINA_LIST_FOREACH(drops, l, dropable)
1721           {
1722              if (dropable->obj == sel->requestwidget) break;
1723           }
1724         if (!dropable)
1725           {
1726              cnp_debug("Unable to find drop object");
1727              ecore_x_dnd_send_finished();
1728              return 0;
1729           }
1730         dropable = eina_list_data_get(l);
1731         ddata.x = savedtypes.x;
1732         ddata.y = savedtypes.y;
1733         ddata.format = ELM_SEL_FORMAT_VCARD;
1734         ddata.data = data->data;
1735         ddata.len = data->length;
1736         dropable->dropcb(dropable->cbdata, dropable->obj, &ddata);
1737         ecore_x_dnd_send_finished();
1738      }
1739    else if (sel->datacb)
1740      {
1741         Elm_Selection_Data ddata;
1742         ddata.x = ddata.y = 0;
1743         ddata.format = ELM_SEL_FORMAT_IMAGE;
1744         ddata.data = data->data;
1745         ddata.len = data->length;
1746         sel->datacb(sel->udata, sel->widget, &ddata);
1747      }
1748    else
1749      {
1750         cnp_debug("Paste request\n");
1751      }
1752
1753    return 0;
1754
1755 }
1756
1757
1758 static int
1759 notify_handler_image(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1760 {
1761    Ecore_X_Selection_Data *data;
1762    Tmp_Info *tmp;
1763    Paste_Image *pi;
1764
1765    cnp_debug("got a png (or a jpeg)!\n");
1766    data = notify->data;
1767
1768    cnp_debug("Size if %d\n", data->length);
1769
1770    if (sel->datacb)
1771      {
1772         Elm_Selection_Data ddata;
1773
1774         ddata.x = ddata.y = 0;
1775         ddata.format = ELM_SEL_FORMAT_IMAGE;
1776         ddata.data = data->data;
1777         ddata.len = data->length;
1778         sel->datacb(sel->udata, sel->widget, &ddata);
1779         return 0;
1780      }
1781
1782    /* generate tmp name */
1783    tmp = elm_cnp_tempfile_create(data->length);
1784    memcpy(tmp->map, data->data, data->length);
1785    munmap(tmp->map,data->length);
1786
1787    /* FIXME: Add to paste image data to clean up */
1788    pi = pasteimage_alloc(tmp->filename, strlen(tmp->filename));
1789    pasteimage_append(pi, sel->requestwidget);
1790
1791    tmpinfo_free(tmp);
1792    return 0;
1793 }
1794
1795 static int
1796 notify_handler_edje(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1797 {
1798    Ecore_X_Selection_Data *data;
1799
1800    data = notify->data;
1801
1802    char *stripstr = NULL;
1803    stripstr = malloc(sizeof(char) * (data->length + 1));
1804    strncpy(stripstr, (char *)data->data, data->length);
1805    stripstr[data->length] = '\0';
1806
1807    if (sel->datacb)
1808      {
1809         Elm_Selection_Data ddata;
1810         ddata.x = ddata.y = 0;
1811         ddata.format = ELM_SEL_FORMAT_MARKUP;
1812         ddata.data = stripstr;
1813         ddata.len = data->length;
1814         sel->datacb(sel->udata, sel->widget, &ddata);
1815      }
1816    else
1817      entry_insert_filter(sel->requestwidget, stripstr);
1818      //elm_entry_entry_insert(sel->requestwidget, stripstr);
1819
1820    cnp_debug("String is %s (%d bytes)\n", stripstr, data->length);
1821    free(stripstr);
1822    return 0;
1823 }
1824
1825 /**
1826  *    Warning: Generic text/html can';t handle it sanely.
1827  *    Firefox sends ucs2 (i think).
1828  *       chrome sends utf8... blerg
1829  */
1830 static int
1831 notify_handler_html(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1832 {
1833    Ecore_X_Selection_Data *data;
1834
1835    cnp_debug("Got some HTML: Checking encoding is useful\n");
1836    data = notify->data;
1837
1838    char *stripstr = NULL;
1839    stripstr = malloc(sizeof(char) * (data->length + 1));
1840    strncpy(stripstr, (char *)data->data, data->length);
1841    stripstr[data->length] = '\0';
1842
1843    if (sel->datacb)
1844      {
1845         Elm_Selection_Data ddata;
1846         ddata.x = ddata.y = 0;
1847         ddata.format = ELM_SEL_FORMAT_HTML;
1848         ddata.data = stripstr;
1849         ddata.len = data->length;
1850         sel->datacb(sel->udata, sel->widget, &ddata);
1851      }
1852    else
1853      entry_insert_filter(sel->requestwidget, stripstr);
1854      //elm_entry_entry_insert(sel->requestwidget, stripstr);
1855
1856    cnp_debug("String is %s (%d bytes)\n", stripstr, data->length);
1857    free(stripstr);
1858    return 0;
1859 }
1860
1861
1862 static Eina_Bool
1863 text_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1864 {
1865    Cnp_Selection *sel;
1866
1867    cnp_debug("text converter\n");
1868    sel = selections + *((int *)data);
1869    if (!sel->active) return EINA_TRUE;
1870
1871    if ((sel->format & ELM_SEL_FORMAT_MARKUP) ||
1872        (sel->format & ELM_SEL_FORMAT_HTML))
1873      {
1874         *data_ret = remove_tags(sel->selbuf, size_ret);
1875      }
1876    else if (sel->format & ELM_SEL_FORMAT_TEXT)
1877      {
1878         *data_ret = strdup(sel->selbuf);
1879         *size_ret = strlen(sel->selbuf);
1880      }
1881    else if (sel->format & ELM_SEL_FORMAT_IMAGE)
1882      {
1883         cnp_debug("Image %s\n", evas_object_type_get(sel->widget));
1884         cnp_debug("Elm type: %s\n", elm_object_widget_type_get(sel->widget));
1885         evas_object_image_file_get(elm_photocam_internal_image_get(sel->widget), (const char **)data_ret, NULL);
1886         if (!*data_ret) *data_ret = strdup("No file");
1887         else *data_ret = strdup(*data_ret);
1888         *size_ret = strlen(*data_ret);
1889      }
1890    return EINA_TRUE;
1891 }
1892
1893 static Eina_Bool
1894 edje_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1895 {
1896    Cnp_Selection *sel;
1897    sel = selections + *((int *)data);
1898 /*   if (data_ret) *data_ret = strdup(sel->selbuf);
1899    if (size_ret) *size_ret = strlen(sel->selbuf);*/
1900    char *edje = NULL;
1901
1902    if (data_ret && (sel->format == ELM_SEL_FORMAT_TEXT))
1903      {
1904         if (sel->selbuf && sel->selbuf[0] != '\0')
1905           edje = mark_up(sel->selbuf, strlen(sel->selbuf), NULL);
1906      }
1907    else if (data_ret && ((sel->format & ELM_SEL_FORMAT_HTML)))
1908      {
1909         Eina_List *nodeList = NULL;
1910         Eina_List *trail;
1911         PTagNode nodeData;
1912
1913         nodeData = _get_start_node(sel->selbuf);
1914
1915         while (nodeData)
1916           {
1917              nodeList = eina_list_append(nodeList, nodeData);
1918              nodeData = _get_next_node(nodeData);
1919           }
1920
1921         _link_match_tags(nodeList);
1922
1923         _set_HTML_tag_data(nodeList);
1924
1925 #ifdef DEBUGON
1926         _dumpNode(nodeList);
1927 #endif
1928         edje = _convert_to_edje(nodeList);
1929
1930         cnp_debug("convert edje: %s\n", edje);
1931
1932         EINA_LIST_FOREACH(nodeList, trail, nodeData)
1933            _delete_node(nodeData);
1934         eina_list_free(nodeList);
1935
1936      }
1937    if (data_ret)
1938      {
1939         if (edje)
1940           *data_ret = edje;
1941         else
1942            if (sel->selbuf)
1943              *data_ret = strdup(sel->selbuf);
1944            else
1945              *data_ret = strdup("");
1946      }
1947    if (size_ret)
1948      {
1949         if (edje)
1950           *size_ret = strlen(edje);
1951         else
1952           if (sel->selbuf)
1953             *size_ret = strlen(sel->selbuf);
1954           else
1955             *size_ret = 0;
1956      }
1957
1958    return EINA_TRUE;
1959 }
1960
1961 static Eina_Bool
1962 html_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1963 {
1964    Cnp_Selection *sel;
1965
1966    sel = selections + *(int *)data;
1967
1968    char *html = NULL;
1969    char *convert_target = sel->selbuf;
1970    Eina_Bool convert_edje = EINA_FALSE;
1971
1972    if (data_ret && (sel->format == ELM_SEL_FORMAT_TEXT))
1973      {
1974         if (sel->selbuf && sel->selbuf[0] != '\0')
1975           {
1976              convert_target = mark_up(sel->selbuf, strlen(sel->selbuf), NULL);
1977              convert_edje = EINA_TRUE;
1978           }
1979      }
1980
1981    if (data_ret && ((sel->format & ELM_SEL_FORMAT_MARKUP) || convert_edje))
1982      {
1983         Eina_List *nodeList = NULL;
1984         Eina_List *trail;
1985         PTagNode nodeData;
1986
1987         nodeData = _get_start_node(convert_target);
1988
1989         while (nodeData)
1990           {
1991              nodeList = eina_list_append(nodeList, nodeData);
1992              nodeData = _get_next_node(nodeData);
1993           }
1994
1995         _link_match_tags(nodeList);
1996
1997         _set_EFL_tag_data(nodeList);
1998
1999 #ifdef DEBUGON
2000         _dumpNode(nodeList);
2001 #endif
2002         html = _convert_to_html(nodeList);
2003
2004         cnp_debug("convert html: %s\n", html);
2005
2006         EINA_LIST_FOREACH(nodeList, trail, nodeData)
2007            _delete_node(nodeData);
2008         eina_list_free(nodeList);
2009      }
2010    if (data_ret)
2011      {
2012         if (html)
2013           *data_ret = html;
2014         else
2015           if (sel->selbuf)
2016             *data_ret = strdup(sel->selbuf);
2017           else
2018             *data_ret = strdup("");
2019      }
2020
2021    if (size_ret)
2022      {
2023         if (html)
2024           *size_ret = strlen(html);
2025         else
2026           if (sel->selbuf)
2027             *size_ret = strlen(sel->selbuf);
2028           else
2029             *size_ret = 0;
2030      }
2031    if (convert_target != sel->selbuf)
2032      free(convert_target);
2033
2034    return EINA_TRUE;
2035 }
2036
2037 static Eina_Bool
2038 uri_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
2039 {
2040    Cnp_Selection *sel;
2041    sel = selections + *((int *)data);
2042    cnp_debug("Uri converter\n");
2043    if (data_ret) *data_ret = strdup(sel->selbuf);
2044    if (size_ret) *size_ret = strlen(sel->selbuf);
2045    return EINA_TRUE;
2046 }
2047
2048 /*
2049  * Image paste provide
2050  */
2051
2052 /* FIXME: Should add provider for each pasted item: Use data to store it
2053  * much easier */
2054 static Evas_Object *
2055 image_provider(void *images __UNUSED__, Evas_Object *entry, const char *item)
2056 {
2057    Paste_Image *pi;
2058    Eina_List *l;
2059
2060    cnp_debug("image provider for %s called\n", item);
2061    EINA_LIST_FOREACH(pastedimages, l, pi)
2062      {
2063         cnp_debug("is it %s?\n",pi->tag);
2064         if (!strcmp(pi->tag, item))
2065           {
2066              /* Found it */
2067              Evas_Object *o;
2068              o = evas_object_image_filled_add(evas_object_evas_get(entry));
2069              /* FIXME: Handle eets */
2070              cnp_debug("file is %s (object is %p)\n", pi->file, o);
2071              evas_object_image_file_set(o, pi->file, NULL);
2072              evas_object_show(o);
2073              return o;
2074           }
2075      }
2076    return NULL;
2077 }
2078
2079
2080 static Paste_Image *
2081 pasteimage_alloc(const char *file, int pathlen)
2082 {
2083    Paste_Image *pi;
2084    int len;
2085    char *buf, *filebuf;
2086    int prefixlen = strlen("file://");
2087
2088    pi = calloc(1, sizeof(Paste_Image));
2089    if (!pi) return NULL;
2090
2091    len = snprintf(NULL, 0, "pasteimage-%p", pi);
2092    len++;
2093    buf = malloc(len);
2094    if (!buf)
2095      {
2096         free(pi);
2097         return NULL;
2098      }
2099    snprintf(buf, len, "pasteimage-%p", pi);
2100    pi->tag = buf;
2101
2102    if (file)
2103      {
2104         if (strstr(file,"file://")) file += prefixlen;
2105         filebuf = alloca(pathlen + 1);
2106         strncpy(filebuf, file, pathlen);
2107         filebuf[pathlen] = 0;
2108         pi->file = strdup(filebuf);
2109      }
2110
2111    return pi;
2112 }
2113
2114 static void
2115 pasteimage_free(Paste_Image *pi)
2116 {
2117    if (!pi) return;
2118    if (pi->file) free((void*)pi->file);
2119    if (pi->tag) free((void*)pi->tag);
2120    free(pi);
2121 }
2122
2123 static Eina_Bool
2124 pasteimage_provider_set(Evas_Object *entry)
2125 {
2126    void *v;
2127    const char *type;
2128
2129    if (!entry) return EINA_FALSE;
2130    type = elm_widget_type_get(entry);
2131    cnp_debug("type is %s\n", type);
2132    if ((!type) || (strcmp(type, "entry"))) return EINA_FALSE;
2133
2134    v = evas_object_data_get(entry, PROVIDER_SET);
2135    if (!v)
2136      {
2137         evas_object_data_set(entry, PROVIDER_SET, pasteimage_provider_set);
2138         elm_entry_item_provider_append(entry, image_provider, NULL);
2139         evas_object_event_callback_add(entry, EVAS_CALLBACK_FREE,
2140                                        entry_deleted, NULL);
2141      }
2142    return EINA_TRUE;
2143 }
2144
2145
2146 static Eina_Bool
2147 pasteimage_append(Paste_Image *pi, Evas_Object *entry)
2148 {
2149    char *entrytag;
2150    int len;
2151    static const char *tagstring = "<item absize=240x180 href=file://%s></item>";
2152
2153    if (!pi) return EINA_FALSE;
2154    if (!entry) return EINA_FALSE;
2155    if (elm_entry_cnp_textonly_get(entry)) return EINA_FALSE;
2156
2157    pasteimage_provider_set(entry);
2158
2159    len = strlen(tagstring)+strlen(pi->file);
2160
2161    pastedimages = eina_list_append(pastedimages, pi);
2162    entrytag = alloca(len + 1);
2163    snprintf(entrytag, len + 1, tagstring, pi->file);
2164    elm_entry_entry_insert(entry, entrytag);
2165
2166    return EINA_TRUE;
2167 }
2168
2169 static void
2170 entry_deleted(void *images __UNUSED__, Evas *e __UNUSED__, Evas_Object *entry, void *unused __UNUSED__)
2171 {
2172    Paste_Image *pi;
2173    Eina_List *l,*next;
2174
2175    EINA_LIST_FOREACH_SAFE(pastedimages, l, next, pi)
2176      {
2177         if (pi->entry == entry)
2178           pastedimages = eina_list_remove_list(pastedimages, l);
2179      }
2180 }
2181
2182
2183 static char *
2184 remove_tags(const char *p, int *len)
2185 {
2186    char *q,*ret;
2187    int i;
2188    if (!p) return NULL;
2189
2190    q = malloc(strlen(p) + 1);
2191    if (!q) return NULL;
2192    ret = q;
2193
2194    while (*p)
2195      {
2196         if ((*p != '<') && (*p != '&')) *q++ = *p++;
2197         else if (*p == '<')
2198           {
2199              if ((p[1] == 'b') && (p[2] == 'r') &&
2200                  ((p[3] == ' ') || (p[3] == '/') || (p[3] == '>')))
2201                *q++ = '\n';
2202              while ((*p) && (*p != '>')) p++;
2203              p++;
2204           }
2205         else if (*p == '&')
2206           {
2207              p++;
2208              for (i = 0 ; i < N_ESCAPES ; i++)
2209                {
2210                   if (!strncmp(p,escapes[i].escape, strlen(escapes[i].escape)))
2211                     {
2212                        p += strlen(escapes[i].escape);
2213                        *q = escapes[i].value;
2214                        q++;
2215                        break;
2216                     }
2217                }
2218              if (i == N_ESCAPES) *q ++= '&';
2219           }
2220      }
2221    *q = 0;
2222    if (len) *len = q - ret;
2223    return ret;
2224 }
2225
2226 /* Mark up */
2227 static char *
2228 mark_up(const char *start, int inlen, int *lenp)
2229 {
2230    int l, i;
2231    const char *p;
2232    char *q, *ret;
2233    const char *endp = NULL;
2234
2235    if (!start) return NULL;
2236    if (inlen >= 0) endp = start + inlen;
2237    /* First pass: Count characters */
2238    for (l = 0, p = start; ((!endp) || (p < endp)) && (*p); p++)
2239      {
2240         for (i = 0 ; i < N_ESCAPES ; i ++)
2241           {
2242              if (*p == escapes[i].value)
2243                {
2244                   if (!iscntrl(escapes[i].value)) l++;
2245                   l += strlen(escapes[i].escape);
2246                   break;
2247                }
2248           }
2249         if (i == N_ESCAPES) l++;
2250      }
2251
2252    q = ret = malloc(l + 1);
2253
2254    /* Second pass: Change characters */
2255    for (p = start; ((!endp) || (p < endp)) && (*p); )
2256      {
2257         for (i = 0; i < N_ESCAPES; i++)
2258           {
2259              if (*p == escapes[i].value)
2260                {
2261                   if (!iscntrl(escapes[i].value)) *q++ = '&';
2262                   strcpy(q, escapes[i].escape);
2263                   q += strlen(escapes[i].escape);
2264                   p ++;
2265                   break;
2266                }
2267           }
2268         if (i == N_ESCAPES) *q++ = *p++;
2269      }
2270    *q = 0;
2271
2272    if (lenp) *lenp = l;
2273    return ret;
2274 }
2275
2276
2277 static Eina_Bool
2278 _dnd_enter(void *data __UNUSED__, int etype __UNUSED__, void *ev)
2279 {
2280    Ecore_X_Event_Xdnd_Enter *enter = ev;
2281    int i;
2282
2283    /* Skip it */
2284    if ((!enter) || (!enter->num_types) || (!enter->types)) return EINA_TRUE;
2285
2286    cnp_debug("Types\n");
2287    savedtypes.ntypes = enter->num_types;
2288    if (savedtypes.types) free(savedtypes.types);
2289    savedtypes.types = malloc(sizeof(char *) * enter->num_types);
2290    if (!savedtypes.types) return EINA_FALSE;
2291
2292    for (i = 0; i < enter->num_types; i++)
2293      {
2294         savedtypes.types[i] = eina_stringshare_add(enter->types[i]);
2295         cnp_debug("Type is %s %p %p\n", enter->types[i],
2296                   savedtypes.types[i],text_uri);
2297         if (savedtypes.types[i] == text_uri)
2298           {
2299              /* Request it, so we know what it is */
2300              cnp_debug("Sending uri request\n");
2301              savedtypes.textreq = 1;
2302              if (savedtypes.pi) pasteimage_free(savedtypes.pi);
2303              savedtypes.pi = NULL; /* FIXME: Free? */
2304              ecore_x_selection_xdnd_request(enter->win, text_uri);
2305           }
2306      }
2307
2308    /* FIXME: Find an object and make it current */
2309    return EINA_TRUE;
2310 }
2311
2312 static Eina_Bool
2313 _dnd_drop(void *data __UNUSED__, int etype __UNUSED__, void *ev)
2314 {
2315    struct _Ecore_X_Event_Xdnd_Drop *drop;
2316    Dropable *dropable;
2317    Eina_List *l;
2318    Ecore_Evas *ee;
2319    Ecore_X_Window xwin;
2320    Elm_Selection_Data ddata;
2321    int x, y, w, h;
2322    int i, j;
2323
2324    drop = ev;
2325
2326    // check we still have something to drop
2327    if (!drops) return EINA_TRUE;
2328
2329    /* Find any widget in our window; then work out geometry rel to our window */
2330    for (l = drops; l; l = l->next)
2331      {
2332         dropable = l->data;
2333         xwin = (Ecore_X_Window)ecore_evas_window_get
2334            (ecore_evas_ecore_evas_get(evas_object_evas_get
2335                                       (dropable->obj)));
2336         if (xwin == drop->win) break;
2337      }
2338    /* didn't find a window */
2339    if (!l) return EINA_TRUE;
2340
2341    /* Calculate real (widget relative) position */
2342    // - window position
2343    // - widget position
2344    ee = ecore_evas_ecore_evas_get(evas_object_evas_get(dropable->obj));
2345    ecore_evas_geometry_get(ee, &x, &y, NULL, NULL);
2346    savedtypes.x = drop->position.x - x;
2347    savedtypes.y = drop->position.y - y;
2348
2349    cnp_debug("Drop position is %d,%d\n", savedtypes.x, savedtypes.y);
2350
2351    for (; l; l = l->next)
2352      {
2353         dropable = l->data;
2354         evas_object_geometry_get(dropable->obj, &x, &y, &w, &h);
2355         if ((savedtypes.x >= x) && (savedtypes.y >= y) &&
2356             (savedtypes.x < x + w) && (savedtypes.y < y + h))
2357           break; /* found! */
2358      }
2359
2360    if (!l) return EINA_TRUE; /* didn't find one */
2361
2362    evas_object_geometry_get(dropable->obj, &x, &y, NULL, NULL);
2363    savedtypes.x -= x;
2364    savedtypes.y -= y;
2365
2366    /* Find our type from the previous list */
2367    for (i = 0; i < CNP_N_ATOMS; i++)
2368      {
2369         for (j = 0; j < savedtypes.ntypes; j++)
2370           {
2371              if (!strcmp(savedtypes.types[j], atoms[i].name)) goto found;
2372           }
2373      }
2374
2375    cnp_debug("Didn't find a target\n");
2376    return EINA_TRUE;
2377
2378 found:
2379    cnp_debug("Found a target we'd like: %s\n", atoms[i].name);
2380    cnp_debug("0x%x\n",xwin);
2381
2382    if (i == CNP_ATOM_text_urilist)
2383      {
2384         cnp_debug("We found a URI... (%scached) %s\n",
2385                   savedtypes.pi ? "" : "not ",
2386                   savedtypes.pi->file);
2387         if (savedtypes.pi)
2388           {
2389              char *entrytag;
2390              static const char *tagstring = "<item absize=240x180 href="
2391                 "file://%s></item>";
2392              ddata.x = savedtypes.x;
2393              ddata.y = savedtypes.y;
2394
2395              /* If it's markup that also supports images */
2396              if ((dropable->types & ELM_SEL_FORMAT_MARKUP) &&
2397                  (dropable->types & ELM_SEL_FORMAT_IMAGE))
2398                {
2399                   int len;
2400                   ddata.format = ELM_SEL_FORMAT_MARKUP;
2401                   pasteimage_provider_set(dropable->obj);
2402
2403                   pastedimages = eina_list_append(pastedimages, savedtypes.pi);
2404                   len = strlen(tagstring) + strlen(savedtypes.pi->file);
2405                   entrytag = alloca(len + 1);
2406                   snprintf(entrytag, len + 1, tagstring, savedtypes.pi->file);
2407                   ddata.data = entrytag;
2408                   cnp_debug("Insert %s\n", (char *)ddata.data);
2409                   dropable->dropcb(dropable->cbdata, dropable->obj, &ddata);
2410                   ecore_x_dnd_send_finished();
2411
2412                   if (savedtypes.pi) pasteimage_free(savedtypes.pi);
2413                   savedtypes.pi = NULL;
2414                   return EINA_TRUE;
2415                }
2416              else if (dropable->types & ELM_SEL_FORMAT_IMAGE)
2417                {
2418                   cnp_debug("Doing image insert (%s)\n", savedtypes.pi->file);
2419                   ddata.format = ELM_SEL_FORMAT_IMAGE;
2420                   ddata.data = (char *)savedtypes.pi->file;
2421                   dropable->dropcb(dropable->cbdata, dropable->obj, &ddata);
2422                   ecore_x_dnd_send_finished();
2423
2424                   if (savedtypes.pi) pasteimage_free(savedtypes.pi);
2425                   savedtypes.pi = NULL;
2426
2427                   return EINA_TRUE;
2428                }
2429              else
2430                {
2431                   cnp_debug("Item doesn't support images... passing\n");
2432                   pasteimage_free(savedtypes.pi);
2433                   return EINA_TRUE;
2434                }
2435           }
2436         else if (savedtypes.textreq)
2437           {
2438              /* Already asked: Pretend we asked now, and paste immediately when
2439               * it comes in */
2440              savedtypes.textreq = 0;
2441              ecore_x_dnd_send_finished();
2442              return EINA_TRUE;
2443           }
2444      }
2445
2446    cnp_debug("doing a request then\n");
2447    selections[ELM_SEL_XDND].requestwidget = dropable->obj;
2448    selections[ELM_SEL_XDND].requestformat = ELM_SEL_FORMAT_MARKUP;
2449    selections[ELM_SEL_XDND].active = EINA_TRUE;
2450
2451    ecore_x_selection_xdnd_request(xwin, atoms[i].name);
2452
2453    return EINA_TRUE;
2454 }
2455 static Eina_Bool
2456 _dnd_position(void *data __UNUSED__, int etype __UNUSED__, void *ev)
2457 {
2458    struct _Ecore_X_Event_Xdnd_Position *pos;
2459    Ecore_X_Rectangle rect;
2460
2461    pos = ev;
2462
2463    /* Need to send a status back */
2464    /* FIXME: Should check I can drop here */
2465    /* FIXME: Should highlight widget */
2466    rect.x = pos->position.x - 5;
2467    rect.y = pos->position.y - 5;
2468    rect.width = 10;
2469    rect.height = 10;
2470    ecore_x_dnd_send_status(EINA_TRUE, EINA_FALSE, rect, pos->action);
2471
2472    return EINA_TRUE;
2473 }
2474
2475 /**
2476  * When dragging this is callback response from the destination.
2477  * The important thing we care about: Can we drop; thus update cursor
2478  * appropriately.
2479  */
2480 static Eina_Bool
2481 _dnd_status(void *data __UNUSED__, int etype __UNUSED__, void *ev)
2482 {
2483    struct _Ecore_X_Event_Xdnd_Status *status = ev;
2484
2485    if (!status) return EINA_TRUE;
2486
2487    /* Only thing we care about: will accept */
2488    if (status->will_accept)
2489      {
2490         cnp_debug("Will accept\n");
2491      }
2492    else
2493      { /* Won't accept */
2494         cnp_debug("Won't accept accept\n");
2495      }
2496    return EINA_TRUE;
2497 }
2498
2499 /**
2500  * Add a widget as drop target.
2501  */
2502 Eina_Bool
2503 elm_drop_target_add(Evas_Object *obj, Elm_Sel_Type format, Elm_Drop_Cb dropcb, void *cbdata)
2504 {
2505    Dropable *drop;
2506    Ecore_X_Window xwin;
2507    Eina_List *item;
2508    int first;
2509
2510    if (!obj) return EINA_FALSE;
2511    if (!_elm_cnp_init_count) _elm_cnp_init();
2512
2513    /* Is this the first? */
2514    first = (!drops) ? 1 : 0;
2515
2516    EINA_LIST_FOREACH(drops, item, drop)
2517      {
2518         if (drop->obj == obj)
2519           {
2520              /* Update: Not a new one */
2521              drop->dropcb = dropcb;
2522              drop->cbdata = cbdata;
2523              drop->types = format;
2524              return EINA_TRUE;
2525           }
2526      }
2527
2528    /* Create new drop */
2529    drop = calloc(1, sizeof(Dropable));
2530    if (!drop) return EINA_FALSE;
2531    /* FIXME: Check for eina's deranged error method */
2532    drops = eina_list_append(drops, drop);
2533
2534    if (!drops/* || or other error */)
2535      {
2536         free(drop);
2537         return EINA_FALSE;
2538      }
2539    drop->dropcb = dropcb;
2540    drop->cbdata = cbdata;
2541    drop->types = format;
2542    drop->obj = obj;
2543
2544    evas_object_event_callback_add(obj, EVAS_CALLBACK_DEL,
2545                                   /* I love C and varargs */
2546                                   (Evas_Object_Event_Cb)elm_drop_target_del,
2547                                   obj);
2548    /* FIXME: Handle resizes */
2549
2550    /* If not the first: We're done */
2551    if (!first) return EINA_TRUE;
2552
2553    xwin = (Ecore_X_Window)ecore_evas_window_get
2554       (ecore_evas_ecore_evas_get(evas_object_evas_get(obj)));
2555
2556    ecore_x_dnd_aware_set(xwin, EINA_TRUE);
2557
2558    cnp_debug("Adding drop target calls\n");
2559    handler_enter = ecore_event_handler_add(ECORE_X_EVENT_XDND_ENTER,
2560                                            _dnd_enter, NULL);
2561    handler_pos = ecore_event_handler_add(ECORE_X_EVENT_XDND_POSITION,
2562                                          _dnd_position, NULL);
2563    handler_drop = ecore_event_handler_add(ECORE_X_EVENT_XDND_DROP,
2564                                           _dnd_drop, NULL);
2565
2566    return EINA_TRUE;
2567 }
2568
2569 Eina_Bool
2570 elm_drop_target_del(Evas_Object *obj)
2571 {
2572    Dropable *drop,*del;
2573    Eina_List *item;
2574    Ecore_X_Window xwin;
2575
2576    del = NULL;
2577    EINA_LIST_FOREACH(drops, item, drop)
2578      {
2579         if (drop->obj == obj)
2580           {
2581              drops = eina_list_remove_list(drops, item);
2582              del = drop;
2583              break;
2584           }
2585      }
2586    if (!del) return EINA_FALSE;
2587
2588    evas_object_event_callback_del(obj, EVAS_CALLBACK_FREE,
2589                                   (Evas_Object_Event_Cb)elm_drop_target_del);
2590    free(drop);
2591    /* If still drops there: All fine.. continue */
2592    if (drops) return EINA_TRUE;
2593
2594    cnp_debug("Disabling DND\n");
2595    xwin = (Ecore_X_Window)ecore_evas_window_get
2596       (ecore_evas_ecore_evas_get(evas_object_evas_get(obj)));
2597    ecore_x_dnd_aware_set(xwin, EINA_FALSE);
2598
2599    ecore_event_handler_del(handler_pos);
2600    ecore_event_handler_del(handler_drop);
2601    ecore_event_handler_del(handler_enter);
2602
2603    if (savedtypes.pi)
2604      {
2605         pasteimage_free(savedtypes.pi);
2606         savedtypes.pi = NULL;
2607      }
2608
2609    return EINA_TRUE;
2610 }
2611
2612
2613 static void
2614 _drag_mouse_up(void *un __UNUSED__, Evas *e __UNUSED__, Evas_Object *obj, void *data __UNUSED__)
2615 {
2616    evas_object_event_callback_del(obj, EVAS_CALLBACK_MOUSE_UP, _drag_mouse_up);
2617    ecore_x_dnd_drop();
2618    if (dragdonecb)
2619      {
2620         dragdonecb(dragdonecb,selections[ELM_SEL_XDND].widget);
2621         dragdonecb = NULL;
2622      }
2623    if (dragwin)
2624      {
2625         evas_object_del(dragwin);
2626         dragwin = NULL;
2627      }
2628 }
2629
2630 static void
2631 _drag_move(void *data __UNUSED__, Ecore_X_Xdnd_Position *pos)
2632 {
2633    evas_object_move(dragwin,
2634                     pos->position.x - _dragx,
2635                     pos->position.y - _dragy);
2636 }
2637
2638
2639 Eina_Bool
2640 elm_drag_start(Evas_Object *obj, Elm_Sel_Format format, const char *data, void (*dragdone) (void *data, Evas_Object *), void *donecbdata)
2641 {
2642    Ecore_X_Window xwin;
2643    Cnp_Selection *sel;
2644    Elm_Sel_Type xdnd = ELM_SEL_XDND;
2645    Ecore_Evas *ee;
2646    int x, y, x2, y2, x3, y3;
2647    Evas_Object *icon;
2648    int w, h;
2649
2650    if (!_elm_cnp_init_count) _elm_cnp_init();
2651
2652    xwin = elm_win_xwindow_get(obj);
2653
2654    cnp_debug("starting drag...\n");
2655
2656    ecore_x_dnd_type_set(xwin, "text/uri-list", 1);
2657    sel = selections + ELM_SEL_XDND;
2658    sel->active = 1;
2659    sel->widget = obj;
2660    sel->format = format;
2661    sel->selbuf = data ? strdup(data) : NULL;
2662    dragdonecb = dragdone;
2663    dragdonedata = donecbdata;
2664
2665    ecore_x_dnd_callback_pos_update_set(_drag_move, NULL);
2666    ecore_x_dnd_begin(xwin, (unsigned char *)&xdnd, sizeof(Elm_Sel_Type));
2667    evas_object_event_callback_add(obj, EVAS_CALLBACK_MOUSE_UP,
2668                                   _drag_mouse_up, NULL);
2669
2670    handler_status = ecore_event_handler_add(ECORE_X_EVENT_XDND_STATUS,
2671                                             _dnd_status, NULL);
2672
2673    dragwin = elm_win_add(NULL, "Elm Drag Object", ELM_WIN_UTILITY);
2674    elm_win_override_set(dragwin, 1);
2675
2676    /* FIXME: Images only */
2677    icon = elm_icon_add(dragwin);
2678    elm_icon_file_set(icon, data + 7, NULL); /* 7!? "file://" */
2679    elm_win_resize_object_add(dragwin,icon);
2680    evas_object_size_hint_weight_set(icon, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2681    evas_object_size_hint_align_set(icon, EVAS_HINT_FILL, EVAS_HINT_FILL);
2682
2683    /* Position subwindow appropriately */
2684    ee = ecore_evas_ecore_evas_get(evas_object_evas_get(obj));
2685    ecore_evas_geometry_get(ee, &x, &y, NULL, NULL);
2686    evas_object_geometry_get(obj, &x2, &y2, &w, &h);
2687    x += x2;
2688    y += y2;
2689    evas_object_move(dragwin, x, y);
2690    evas_object_resize(icon, w, h);
2691    evas_object_resize(dragwin, w, h);
2692
2693    evas_object_show(icon);
2694    evas_object_show(dragwin);
2695
2696    evas_pointer_canvas_xy_get(evas_object_evas_get(obj), &x3, &y3);
2697    _dragx = x3 - x2;
2698    _dragy = y3 - y2;
2699
2700    return EINA_TRUE;
2701 }
2702
2703 static Tmp_Info *
2704 elm_cnp_tempfile_create(int size)
2705 {
2706    Tmp_Info *info;
2707    const char *tmppath;
2708    int len;
2709
2710    info = malloc(sizeof(Tmp_Info));
2711    if (!info) return NULL;
2712
2713    tmppath = getenv("TMP");
2714    if (!tmppath) tmppath = P_tmpdir;
2715    len = snprintf(NULL, 0, "%s/%sXXXXXX", tmppath, "elmcnpitem-");
2716    if (len < 0)
2717      {
2718         free(info);
2719         return NULL;
2720      }
2721    len++;
2722    info->filename = malloc(len);
2723    if (!info->filename)
2724      {
2725         free(info);
2726         return NULL;
2727      }
2728    snprintf(info->filename,len,"%s/%sXXXXXX", tmppath, "elmcnpitem-");
2729
2730    info->fd = mkstemp(info->filename);
2731
2732 # ifdef __linux__
2733      {
2734         char *tmp;
2735         /* And before someone says anything see POSIX 1003.1-2008 page 400 */
2736         long pid;
2737
2738         pid = (long)getpid();
2739         /* Use pid instead of /proc/self: That way if can be passed around */
2740         len = snprintf(NULL,0,"/proc/%li/fd/%i", pid, info->fd);
2741         len++;
2742         tmp = malloc(len);
2743         if (tmp)
2744           {
2745              snprintf(tmp,len, "/proc/%li/fd/%i", pid, info->fd);
2746              unlink(info->filename);
2747              free(info->filename);
2748              info->filename = tmp;
2749           }
2750      }
2751 # endif
2752
2753    cnp_debug("filename is %s\n", info->filename);
2754    if (size < 1)
2755      {
2756         /* Set map to NULL and return */
2757         info->map = NULL;
2758         info->len = 0;
2759         return info;
2760      }
2761
2762    /* Map it in */
2763    if (ftruncate(info->fd, size))
2764      {
2765         perror("ftruncate");
2766         info->map = NULL;
2767         info->len = 0;
2768         return info;
2769      }
2770
2771    eina_mmap_safety_enabled_set(EINA_TRUE);
2772
2773    info->map = mmap(NULL, size, PROT_READ|PROT_WRITE, MAP_SHARED, info->fd, 0);
2774    if (info->map == MAP_FAILED)
2775      {
2776         perror("mmap");
2777         info->map = NULL;
2778         info->len = 0;
2779      }
2780
2781    return info;
2782 }
2783
2784
2785 static int
2786 tmpinfo_free(Tmp_Info *info)
2787 {
2788    if (!info) return 0;
2789    free(info->filename);
2790    free(info);
2791    return 0;
2792 }
2793
2794 #else
2795 /* Stubs for windows */
2796 Eina_Bool
2797 elm_drag_start(Evas_Object *o, Elm_Sel_Format f, const char *d, void (*donecb)(void *, Evas_Object *),void *cbdata)
2798 {
2799    return EINA_FALSE;
2800 }
2801
2802 Eina_Bool
2803 elm_drop_target_add(Evas_Object *obj, Elm_Sel_Type format, Elm_Drop_Cb dropcb, void *cbdata)
2804 {
2805    return EINA_FALSE;
2806 }
2807
2808 Eina_Bool
2809 elm_drop_target_del(Evas_Object *o)
2810 {
2811    return EINA_TRUE;
2812 }
2813 #endif
2814
2815 /* vim:set ts=8 sw=3 sts=3 expandtab cino=>5n-2f0^-2{2(0W1st0 :*/