User:Opensource Obscure/FFHUD

FFHUD: a simple FriendFeed HUD

• An idea by Opensource Obscure
  
• Current release: 0.7
  
• One-button, Custom messages, Rooms and Profile Image support.

FFHUD lets you post to FriendFeed. Posts always include a SLURL link to your actual location. You can send a quick update that automatically includes the parcel description, or write a custom message. If available, the owner or owner-group profile image is also published, accordingly to their privacy settings.

If you're on FriendFeed, you may want to join this room:
http://friendfeed.com/rooms/secondlife
Feel free to use this room for testing:
http://friendfeed.com/rooms/ffhud

UPDATE:
FFHUD just received an API ID from FriendFeed. I'll soon release a new version that includes "Sent via FFHUD" in a specific part of messages, as the other FriendFeed clients do. --oobscure 04:59, 25 July 2008 (PDT)

Setup

• Edit the script and put your FriendFeed account data. You may also specify a room.
• Put the script in a prim (you may also want to rename it)
• Wear the prim as an HUD

How to use FFHUD

• Touch it once to get information about parcel you're in (printed in private chat via llOwnerSay)
• Touch it again within 20 seconds to publish a post on FriendFeed... (that includes available info about the parcel: SLURL, description, owner/owner-group profile image)
• ...or say a message on channel 8 within 20 seconds to publish a post (that includes same parcel info than above + your message) - Example:

/8 This is my message

Notes

Feel free to use this room for testing:
http://friendfeed.com/rooms/ffhud

FFHUD builds your posts this way:

• LINK = SLURL of your location
• TITLE = parcel name
• COMMENT = parcel description (if available) OR your message
• IMAGE = profile image of resident or group that owns the parcel
• ROOM = according to your settings

FFHUD shows the FriendFeed favicon image by default; it changes (after the first touch) if a profile image is available for the parcel owners. Profile images are shown by using llSetTexture; the UUID is retrieved using the Second Life Search; the image web address (not the image itself) is sent to FriendFeed, that then retrieves and hosts a copy of the image.

Script

This code works but may be horrible and flawed. Feel free to suggest me how to improve it. I am not a real developer and I lack some programming basis, so any feedback can help me. I usually make the LSL scripts I need by reading around, cutting, pasting and tweaking code from other sources. To write FFHUD I used snippets by User:Ordinal Malaprop, User:Cory Linden, MarcoDuff Palen, User:Jana Kamachi and others.

To do:

• add switch to turn off/on image support
• enriched SLURL as in Ordinal Malaprop's TwitterBox
• ...better code

<lsl>// FFHUD 0.7 // free for public use // A project started by Opensource Obscure //

// Look for your username and FriendFeed key here: https://friendfeed.com/account/api string user=""; // your FriendFeed username string ffkey=""; // your FriendFeed key

// You can send messages to a FriendFeed room: // "" -----------> default setting - you won't share messages to any room // "ffhud" ------> a test room you can freely use // "secondlife" -> an unofficial SL room - http://friendfeed.com/rooms/secondlife // Change accordingly the line below: string room="";

// after 1st click you have a few seconds to write and send // your text message before FFHUD comes back to default state. // you can change the timing below: float listentime = 20.0;

/////////////////////////////////////////////////// // you don't need to modify anything below

string desc; integer listen_handle; string baseurl="@friendfeed.com/api/share"; key request_ff; key request_texture; string ownerurl = "http://world.secondlife.com/resident/"; string groupurl = "http://world.secondlife.com/group/"; string code1 = "<img alt=\"profile image\" src=\"http://secondlife.com/app/image/"; string code2 = "\" class=\"parcelimg\" />"; key textureuuid = ""; key texturedefault = "4760a44f-06f7-622e-7429-b01570a598b0";

//{ Combined Library - Copyright (C) 2004-2008, Strife Onizuka (cc-by 3.0) - "Jul 17 2008", "14:03:07" string str_replace(string src, string from, string to) {//replaces all occurrences of 'from' with 'to' in 'src'.

   integer len = llStringLength(from) - 1;
   if(len >= 0)
   {
       string  buffer = src;
       integer b_pos = -1;
       integer to_len = llStringLength(to) - 1;
       @loop;//instead of a while loop, saves 5 bytes (and runs faster).
       integer to_pos = 1 + llSubStringIndex(buffer, from);
       if(to_pos)
       {

// b_pos += to_pos; // src = llInsertString(llDeleteSubString(src, b_pos, b_pos + len), b_pos, to); // b_pos += to_len; // buffer = llGetSubString(src, 1 + (b_pos), 0x40000000);

           buffer = llGetSubString(src = llInsertString(llDeleteSubString(src, b_pos += to_pos, b_pos + len), b_pos, to), 1 + (b_pos += to_len), 0x40000000);
           jump loop;
       }
   }
   return src;

} //}

// partially redundant (1) string parcelname() {

   list lstParcelName=llGetParcelDetails(llGetPos(),[PARCEL_DETAILS_NAME]);                
   string a = (string)lstParcelName;
   string name = llDumpList2String(llParseString2List(a,[" "],[]),"+"); 
   return name; 

}

// partially redundant (1) // we use this after 2nd touch if no message is provided by the user string parceldesc() {

   list lstParcelDesc=llGetParcelDetails(llGetPos(),[PARCEL_DETAILS_DESC]);                
   string a = (string)lstParcelDesc;  
   if(a != NULL_KEY)
   {
       desc = llDumpList2String(llParseString2List(a,[" "],[]),"+") + "+-+";                
   } 
   else
   {
       desc = "";
   } 
   return str_replace(desc, "&", "and");   

}

// partially redundant (1) string parcelowner() {

   return (string)llGetParcelDetails(llGetPos(),[PARCEL_DETAILS_OWNER]);    

}

// partially redundant (1) string parcelgroup() {

   return (string)lstParcelGroup=llGetParcelDetails(llGetPos(),[PARCEL_DETAILS_GROUP]);

}

// this comes from Cory Ondrejka I think string slurl() {

   string simname = str_replace(llGetRegionName(), " ", "+");
   vector detectedPos = llGetRootPosition();        
   string sx = (string)llRound(detectedPos.x);
   string sy = (string)llRound(detectedPos.y);
   string sz = (string)llRound(detectedPos.z);
   return "http://slurl.com/secondlife/" + simname + "/" + sx + "/" + sy + "/" + sz;   

}

// partially redundant (1) infoparcel() {

   llOwnerSay("parcel name = " + (string)llGetParcelDetails(llGetPos(),[PARCEL_DETAILS_NAME]));
   llOwnerSay("parcel desc = " + (string)llGetParcelDetails(llGetPos(),[PARCEL_DETAILS_DESC]));
   llOwnerSay("parcel owner = " + "secondlife:///app/agent/" + parcelowner() + "/about");   
   llOwnerSay("parcel group = " + "secondlife:///app/group/" + parcelgroup() + "/about");

}

texture() {

   if (parcelgroup() == parcelowner()) // group-owned land
   {
       request_texture = llHTTPRequest(groupurl + parcelgroup(),[HTTP_METHOD,"GET"],"");            
   }  
   else // group may be set, but land is not group-owned
       // single residents have pictures more often than group so we choose them
   { 
       request_texture = llHTTPRequest(ownerurl + parcelowner(),[HTTP_METHOD,"GET"],"");               
   }

}

string prepara(string messaggio) {

   string imageurl = "http://secondlife.com/app/image/" + (string)textureuuid + "/2";       
   messaggio = llDumpList2String(llParseString2List(messaggio,[" "],[]),"+");
   string post = 
   "http://" + 
   user + 
   ":" + 
   ffkey + 
   baseurl + 
   "?title=" + 
   parcelname() +
   "&link=" + 
   llEscapeURL(slurl()) + 
   "&comment=" +      
   messaggio +
   "&room=" +
   room +
   "&image0_url=" + 
   llEscapeURL(imageurl);
   return post;

}

default {

   on_rez(integer start_param)
   {
       llOwnerSay(": Ready. Touch once to get parcel info - Touch twice to update your FriendFeed page.");         
   }
   
   state_entry()
   {
       llSetTexture(texturedefault, ALL_SIDES);         
       llSetTimerEvent(0.0);                
   }
   
   
   touch_start(integer total_number)
   {      
       infoparcel();
       texture();
       state pronto;        
   }

   // redundant (2)
   http_response(key request_id, integer status, list metadata, string body)
   {
   if(request_id == request_ff) 
       {
       llOwnerSay(": Message sent.");
       }
   
   else if(request_id == request_texture)
       {
       textureuuid = (key)llGetSubString(body,llSubStringIndex(body, code1)+llStringLength(code1),llSubStringIndex(body,code2)-3);
       llSetTexture(textureuuid, ALL_SIDES);
       }
   }                                 

}

state pronto {

   state_entry()
   {
       llSetTimerEvent(listentime);        
       llOwnerSay(": Say your message on channel 8 within 20 seconds, or touch again to send a quick post.");        
       listen_handle = llListen(8, "", llGetOwner(), "");                
   }
   
   changed(integer change) 
   { 
   if (change & (CHANGED_TELEPORT | CHANGED_REGION))
   {
       llOwnerSay(": Location changed, restarting.");           
       state default;
   }
   }
   
   timer()
   {
       llOwnerSay(": Time over.");        
       state default;
   }
                   
   touch_start(integer total_number)
   {
       request_ff = llHTTPRequest(prepara(parceldesc()), [HTTP_METHOD,"POST"], ""); 
       state default;        
   } 
   
   listen(integer channel, string name, key id, string message)
   {
       request_ff = llHTTPRequest(prepara(message), [HTTP_METHOD,"POST"], ""); 
       state default;        
   }

   // redundant (2)
   http_response(key request_id, integer status, list metadata, string body)
   {
   if(request_id == request_ff) 
       {
       llOwnerSay(": Message sent.");
       }
   
   else if(request_id == request_texture)
       {
       textureuuid = (key)llGetSubString(body, llSubStringIndex(body, code1) + llStringLength(code1), llSubStringIndex(body,code2) - 3);
       llSetTexture(textureuuid, ALL_SIDES);
       }
   }

}</lsl>