root/trunk/apufba/Main.d

/*
 Copyright (c) 2007, Carlos Santander Bernal

 This software is provided 'as/is', without any express or implied warranty. In
 no event will the authors be held liable for any damages arising from the use
 of this software.

 Permission is granted to anyone to use this software for any purpose, including
 commercial applications, and to alter it and redistribute it freely, subject to
 the following restrictions:

 1. The origin of this software must not be misrepresented; you must not
 claim that you wrote the original software. If you use this software in
 a product, an acknowledgment in the product documentation would be
 appreciated but is not required.

 2. Altered source versions must be plainly marked as such, and must not be
 misrepresented as being the original software.

 3. This notice may not be removed or altered from any source distribution.
 */
module apufba.Main;

import apufba.platf.LaunchBrowser;

import fbd.FacebookClient : FacebookClient, PropertyInfo;
import fbd.FacebookError : FacebookError;
import fbd.FacebookUser : FacebookUser;

import tango.io.FileConduit : FileConduit;
import tango.math.Random : Random;
import tango.text.Util : join, locate, trim;
import tango.text.convert.Integer : toUtf8;
import tango.text.stream.LineIterator : LineIterator;
import tango.util.log.ConsoleAppender : ConsoleAppender;
import tango.util.log.Log : Log, Logger;
import tango.util.time.DateTime : DateTime;

int main (char[][] args)
{
    Logger logger = Log.getLogger ("apufba");
    logger.addAppender (new ConsoleAppender ());

    /*
     'account' should be:
     API Key:       your-api-key
     Secret:    your-secret
     */
    auto account = new FileConduit ("account");
    auto it = new LineIterator!(char) (account);

    char[] tmp = it.next ();
    auto pos = locate (tmp, ':');
    char[] apikey = trim (tmp[pos + 1 .. $]);

    tmp = it.next ();
    pos = locate (tmp, ':');
    char[] secret = trim (tmp[pos + 1 .. $]);

    logger.info ("API Key: " ~ apikey);
    logger.info ("Secret: " ~ secret);

    auto fbclient = new FacebookClient (apikey, secret);
    fbclient.authenticate ();

    auto loginurl = fbclient.loginURL ();
    logger.info ("Login URL: " ~ loginurl);

    logInToFacebook (loginurl);

    fbclient.getSession ();

    auto fields_to_request = [cast(char[]) FacebookUser.Fields.NAME,
        FacebookUser.Fields.NOTES_COUNT, FacebookUser.Fields.WALL_COUNT,
        FacebookUser.Fields.FIRST_NAME, FacebookUser.Fields.STATUS,
    /+
     FacebookUser.Fields.PROFILE_UPDATE_TIME, FacebookUser.Fields.WORK_HISTORY,
     FacebookUser.Fields.MEETING_FOR, FacebookUser.Fields.MEETING_SEX,
     FacebookUser.Fields.EDUCATION_HISTORY,
     FacebookUser.Fields.BIRTHDAY,
     FacebookUser.Fields.POLITICAL, FacebookUser.Fields.TIMEZONE,
     FacebookUser.Fields.AFFILIATIONS,
     FacebookUser.Fields.RELATIONSHIP_STATUS, FacebookUser.Fields.RELIGION,
     FacebookUser.Fields.SEX, FacebookUser.Fields.SIGNIFICANT_OTHER_ID,
     FacebookUser.Fields.CURRENT_LOCATION,
     FacebookUser.Fields.HOMETOWN_LOCATION, FacebookUser.Fields.ACTIVITIES,
     FacebookUser.Fields.HS_INFO, FacebookUser.Fields.TV,
     FacebookUser.Fields.HAS_ADDED_APP, FacebookUser.Fields.IS_APP_USER,
     FacebookUser.Fields.INTERESTS, FacebookUser.Fields.MUSIC,
     FacebookUser.Fields.MOVIES, FacebookUser.Fields.PIC_BIG,
     FacebookUser.Fields.ABOUT_ME, FacebookUser.Fields.BOOKS,
     FacebookUser.Fields.LAST_NAME, FacebookUser.Fields.PIC,
     FacebookUser.Fields.PIC_SMALL, FacebookUser.Fields.PIC_SQUARE,
     FacebookUser.Fields.QUOTES,
     // +/
    ];

    auto user = fbclient.getThisUserInfo (fields_to_request);

    with (logger)
        with (user)
        {
            info ("User ID: " ~ userId);
            info ("   | name: " ~ name);
            info ("   | notes count: " ~ .toUtf8 (notesCount));
            info ("   | wall count: " ~ .toUtf8 (wallCount));
            info ("   | status: " ~ firstName ~ " is " ~ status.message);
            info ("     | set on " ~ dateTimeToUtf8 (status.time));
        /+
         info ("   | work history:");
         foreach (winfo; workHistory)
         with (winfo)
         info (
         "     | " ~ companyName ~ ", " ~ description ~ ", " ~ position ~ ", " ~ startDate ~ ", " ~ endDate ~ ", " ~ location.city ~ ", " ~ location.country);
         info ("   | profile update time: " ~ dateTimeToUtf8 (
         profileUpdateTime));
         info ("   | meeting for: " ~ join (meetingFor, "+"));
         info ("   | meeting sex: " ~ join (meetingSex, "+"));
         info ("   | birthday: " ~ birthday);
         info ("   | political: " ~ political);
         info ("   | timezone: " ~ timezone);
         info ("   | relationship status: " ~ relationshipStatus);
         info ("   | religion: " ~ religion);
         info ("   | sex: " ~ sex);
         info ("   | significant other id: " ~ significantOtherId);
         info ("   | activities: " ~ activities);
         info ("   | tv: " ~ tv);
         info ("   | interests: " ~ interests);
         info ("   | music: " ~ music);
         info ("   | movies: " ~ movies);
         info ("   | big picture URL: " ~ picBig);
         info ("   | about me: " ~ aboutMe);
         info ("   | books: " ~ books);
         info ("   | first name: " ~ firstName);
         info ("   | last name: " ~ lastName);
         info ("   | pic URL: " ~ pic);
         info ("   | small pic URL: " ~ picSmall);
         info ("   | square pic URL: " ~ picSquare);
         info ("   | quotes: " ~ quotes);
         info ("   | has added application: " ~ .toUtf8 (hasAddedApp));
         info ("   | is application user: " ~ .toUtf8 (isAppUser));
         with (hometownLocation)
         info (
         "   | hometown location: " ~ city ~ ", " ~ state ~ ", " ~ country ~ ", " ~ .toUtf8 (
         zip));
         with (currentLocation)
         info (
         "   | current location: " ~ city ~ ", " ~ state ~ ", " ~ country ~ ", " ~ .toUtf8 (
         zip));
         info ("   | affiliations:");
         foreach (aff; affiliations)
         with (aff)
         info (
         "     | " ~ name ~ ", " ~ .toUtf8 (nid) ~ ", " ~ type ~ ", " ~ status ~ ", " ~ .toUtf8 (
         year));
         info ("   | education history:");
         foreach (einfo; educationHistory)
         with (einfo)
         {
         info ("     | " ~ name ~ ", " ~ .toUtf8 (year));
         foreach (conc; concentrations)
         info ("       | " ~ conc);
         }
         // +/
        }

    //launchBrowser (user.picBig);

    version (none)
    {
        logger.info ("getting friends");

        auto friendList = fbclient.getFriends ();

        logger.info (toUtf8 (friendList.length) ~ " friends");

        logger.info ("getting friends details");

        auto start = (new Random ()).next (friendList.length - 5);
        auto friendsDetails = fbclient.getUsersInfo (
            friendList[start .. start + 5], [FacebookUser.Fields.NAME]);

        logger.info ("5 random friends:");
        foreach (friend; friendsDetails)
            logger.info ("   | " ~ friend.name);

        logger.info ("is app added? " ~ toUtf8 (fbclient.isAppAdded ()));

        logger.info ("publishing story");
        if (fbclient.publishStory ("apufba story",
            "this is just a test... please delete it..."))
            logger.info ("story published!");
        else
            logger.info ("couldn't publish story :(");

        logger.info ("getting friends");
        auto friendsUsers = fbclient.getFriendsAppUsers ();
        logger.info (
            toUtf8 (friendsUsers.length) ~ " friends who are app users");

        logger.info ("publishing action");
        if (fbclient.publishAction ("apufba action",
            "this is just a test... please delete it..."))
            logger.info ("action published!");
        else
            logger.info ("couldn't publish action :(");

        logger.info ("getting notifications");
        auto notifications = fbclient.getNotifications ();
        logger.info (
            "   | " ~ toUtf8 (notifications.messages.unread) ~ " unread messages (" ~ dateTimeToUtf8 (
                notifications.messages.mostRecent) ~ ")");
        logger.info (
            "   | " ~ toUtf8 (notifications.pokes.unread) ~ " unread pokes (" ~ dateTimeToUtf8 (
                notifications.pokes.mostRecent) ~ ")");
        logger.info (
            "   | " ~ toUtf8 (notifications.shares.unread) ~ " unread shares (" ~ dateTimeToUtf8 (
                notifications.shares.mostRecent) ~ ")");
        logger.info (
            "   | " ~ toUtf8 (notifications.friendRequests.length) ~ " friend requests");
        auto groups = notifications.groupInvites;
        logger.info ("   | " ~ toUtf8 (groups.length) ~ " group invites");
        foreach (g; groups)
            logger.info ("        | " ~ toUtf8 (g));
        auto events = notifications.eventInvites;
        logger.info ("   | " ~ toUtf8 (events.length) ~ " event invites");
        foreach (e; events)
            logger.info ("        | " ~ toUtf8 (e));
    }

    logger.info ("getting albums");
    auto albums = fbclient.getThisUserAlbums ();
    foreach (alb; albums)
        with (alb)
            logger.info (
                "        | " ~ id ~ ": " ~ name ~ " (" ~ description ~ ") @ " ~ location ~ ", " ~ dateTimeToUtf8 (
                    created) ~ " (" ~ dateTimeToUtf8 (modified) ~ ") by " ~ ownerId ~ " - cover: " ~ coverPhotoId ~ " photos: " ~ .toUtf8 (
                    size) ~ " URL: " ~ link);

    if (albums.length > 0)
    {
        logger.info ("getting one photo");
        auto photos = fbclient.getPhotosById (albums[0].coverPhotoId);
        foreach (p; photos)
            with (p)
                logger.info (
                    "        | " ~ id ~ ": " ~ caption ~ " by " ~ ownerId ~ " in " ~ albumId ~ ", " ~ dateTimeToUtf8 (
                        created) ~ " # " ~ src ~ " # " ~ bigSrc ~ " # " ~ smallSrc ~ " # " ~ link);
    }

    version (none)
    {
        logger.info ("setting test preference");
        fbclient.setUserPreference (0, "foo");
        logger.info ("getting test preference");
        auto pref = fbclient.getUserPreference (1);
        logger.info ("   | test preference is: " ~ pref);

        logger.info ("setting test preferences");
        fbclient.setUserPreferences ([1, 2, 3], ["bar", "baz", "bat"], false);

        logger.info ("getting test preferences");
        auto prefs = fbclient.getUserPreferences ();
    }

    try
    {
        logger.info ("creating object type");
        fbclient.createObjectType ("test");

        logger.info ("renaming object type");
        fbclient.renameObjectType ("test", "foo");

        logger.info ("defining object property");
        fbclient.defineObjectProperty ("foo", "bar",
            PropertyInfo.PropertyType.STRING);

        logger.info ("renaming object property");
        fbclient.renameObjectProperty ("foo", "bar", "baz");

        logger.info ("getting object type");
        auto props = fbclient.getObjectType ("foo");
        foreach (pi; props)
            logger.info ("   | " ~ pi.name ~ "," ~ .toUtf8 (pi.dataType));

        logger.info ("creating object");
        auto id = fbclient.createObject ("foo", ["baz"], ["abc"]);

        logger.info ("setting object property");
        fbclient.setObjectProperty (id, "baz", "xyz");

        logger.info ("getting object property");
        auto prop = fbclient.getObjectProperty (id, "baz");
        logger.info ("   | baz=" ~ prop);
    }
    finally
    {
        logger.info ("getting object types");
        auto otypes = fbclient.getObjectTypes ();
        logger.info ("   | " ~ join (otypes, ","));
        logger.info ("dropping object type");
        foreach (t; otypes)
            fbclient.dropObjectType (t);
    }

    return 0;
}

char[] dateTimeToUtf8 (DateTime dt)
{
    return .toUtf8 (dt.year) ~ "-" ~ .toUtf8 (dt.month) ~ "-" ~ .toUtf8 (dt.day);
}